<% IF SESSION("MATRICULA") = "" THEN %> <% response.end END IF %> <% FORM_CAMPO = Session("FORM_CAMPO") FORM1_CAMPO1 = Session("FORM1_CAMPO1") FORM1_CAMPO2 = Session("FORM1_CAMPO2") FORM1_CAMPO3 = Session("FORM1_CAMPO3") FORM1_CAMPO4 = Session("FORM1_CAMPO4") FORM1_CAMPO5 = Session("FORM1_CAMPO5") FORM1_CAMPO6 = Session("FORM1_CAMPO6") FORM1_CAMPO7 = Session("FORM1_CAMPO7") FORM1_CAMPO8 = Session("FORM1_CAMPO8") FORM1_CAMPO9 = Session("FORM1_CAMPO9") FORM1_CAMPO10 = Session("FORM1_CAMPO10") FORM1_CAMPO10a = Session("FORM1_CAMPO10a") FORM1_CAMPO10b = Session("FORM1_CAMPO10b") FORM1_CAMPO11 = Session("FORM1_CAMPO11") FORM1_CAMPO12 = Session("FORM1_CAMPO12") FORM1_CAMPO13 = Session("FORM1_CAMPO13") FORM1_CAMPO14 = Session("FORM1_CAMPO14") FORM1_CAMPO15 = Session("FORM1_CAMPO15") FORM1_CAMPO16 = Session("FORM1_CAMPO16") FORM1_CAMPO17 = Session("FORM1_CAMPO17") FORM1_CAMPO18 = Session("FORM1_CAMPO18") FORM1_CAMPO19 = Session("FORM1_CAMPO19") FORM1_CAMPO20 = Session("FORM1_CAMPO20") FORM1_CAMPO21 = Session("FORM1_CAMPO21") FORM1_CAMPO22 = Session("FORM1_CAMPO22") FORM1_CAMPO23 = Session("FORM1_CAMPO23") FORM1_CAMPO24 = Session("FORM1_CAMPO24") FORM1_CAMPO25 = Session("FORM1_CAMPO25") FORM1_CAMPO26 = Session("FORM1_CAMPO26") FORM1_CAMPO27 = Session("FORM1_CAMPO27") FORM1_CAMPO28 = Session("FORM1_CAMPO28") FORM1_CAMPO29 = Session("FORM1_CAMPO29") FORM1_CAMPO30 = Session("FORM1_CAMPO30") FORM1_CAMPO31 = Session("FORM1_CAMPO31") FORM1_CAMPO32 = Session("FORM1_CAMPO32") 'DEPENDENTES FORM2_CAMPO1 = Session("FORM2_CAMPO1") FORM2_CAMPO2 = Session("FORM2_CAMPO2") FORM2_CAMPO3 = Session("FORM2_CAMPO3") FORM2_CAMPO4 = Session("FORM2_CAMPO4") FORM2_CAMPO5 = Session("FORM2_CAMPO5") FORM2_CAMPO6 = Session("FORM2_CAMPO6") FORM2_CAMPO7 = Session("FORM2_CAMPO7") FORM2_CAMPO8 = Session("FORM2_CAMPO8") FORM2_CAMPO9 = Session("FORM2_CAMPO9") FORM2_CAMPO10 = Session("FORM2_CAMPO10") FORM2_CAMPO11 = Session("FORM2_CAMPO11") FORM2_CAMPO12 = Session("FORM2_CAMPO12") FORM2_CAMPO13 = Session("FORM2_CAMPO13") FORM2_CAMPO14 = Session("FORM2_CAMPO14") FORM2_CAMPO15 = Session("FORM2_CAMPO15") FORM2_CAMPO16 = Session("FORM2_CAMPO16") FORM2_CAMPO17 = Session("FORM2_CAMPO17") FORM2_CAMPO18 = Session("FORM2_CAMPO18") FORM2_CAMPO19 = Session("FORM2_CAMPO19") FORM2_CAMPO20 = Session("FORM2_CAMPO20") FORM2_CAMPO21 = Session("FORM2_CAMPO21") FORM2_CAMPO22 = Session("FORM2_CAMPO22") FORM2_CAMPO23 = Session("FORM2_CAMPO23") FORM2_CAMPO24 = Session("FORM2_CAMPO24") FORM4_CAMPO1 = Session("FORM4_CAMPO1") FORM4_CAMPO2 = Session("FORM4_CAMPO2") FORM4_CAMPO3 = Session("FORM4_CAMPO3") %>

	ALTERAÇÃO DE ASSOCIADO PARA ASSOCIADO ESPECIAL / AUTO-PATROCINADO
I - Instituidora
<%=(FORM1_CAMPO1)%>
III - Dados Pessoais
* Nome * CPF * Endereço Complemento * Bairro *Cidade/UF * CEP <%=(FORM1_CAMPO10b)%> <% strSQL = " Select DISTINCT" strSQL = strSQL & " cidade as cidade, nome as nome_cidade, estado as uf" strSQL = strSQL & " from " strSQL = strSQL & " cad_cidade " strSQL = strSQL & " order by nome" Set ObjORs = conn_PF.Execute (strSQL) do while (ObjORs.eof = false) response.write(""&ObjORs("nome_cidade")&"-"&ObjORs("uf")&"") ObjORs.movenext loop ObjORs.close %> *Email: *
IV - Dados Bancários
*Banco	*Agência	DV	*C/Corrente	DV
V - Forma de Pagamento
<% sql_forma_pagamento = "select deb_auto_carne from cad_plano_benef where titular = " & session("matricula") sql_forma_pagamento = sql_forma_pagamento & " group by deb_auto_carne " set rs_forma_pagamento = conn_pf.Execute(sql_forma_pagamento) if rs_forma_pagamento.eof and rs_forma_pagamento.bof then else formafpag = rs_forma_pagamento("deb_auto_carne") end if if formafpag = "F" then radiof = "checked" end if if formafpag = "D" then radiod = "checked" end if if formafpag = "C" then radioc = "checked" end if %> id="pagamento" value="debito"> Débito em conta-corrente id="pagamento" value="boleto"> Boleto Bancário - Vencimento no 2º dia útil do mês.
V - Telefones
* Celular	* Trabalho	* Residencial	Fax
Manter todos os planos cadastrados? SIM / NÃO <%=(FORM4_CAMPO1)%> <%=(FORM4_CAMPO2)%> <%=(FORM4_CAMPO3)%>
Cancelar os seguintes planos:
PAS-Saúde PAS-Seguro PAS-Odontológico
VI - Excluir os seguintes Dependentes
<% SqlDep = "SELECT CB.MATRICULA AS MATRICULA, CB.NOME AS NOME, CB.SEXO AS SEXO, CGD.NOME AS PARENTESCO, CB.NASCIMENTO AS NASCIMENTO FROM CAD_BENEF CB, CAD_PLANO_BENEF CPB, CAD_GRAU_DEPENDENTE CGD WHERE CB.MATRICULA = CPB.MATRICULA AND TITULAR = "&MATRICULA&" and empresa = "&instituidora&" " SqlDep = SqlDep & "AND CPB.RELACAO_DEPENDENTE <> 61 AND CPB.RELACAO_DEPENDENTE = CGD.RELACAO_DEPENDENTE and baixa = 1 GROUP BY CB.MATRICULA,CB.NOME, CB.SEXO, CGD.NOME, CB.NASCIMENTO" Set RSTBancot = conn_pf.Execute (SqlDep) while not RSTBancot.eof If RSTBancot.EOF and RSTBancot.BOF then ELSE SEQUENCIA = SEQUENCIA + 1 MATRICULA = RSTBancot("MATRICULA") %> "> <% END IF RSTBancot.movenext wend %> Nome Completo Sexo Relação de Parentesco Excluir? M F " size="30" maxlength="38" readonly="true"> > > "> "><%=RSTBancot("PARENTESCO")%> AGREGADO(A) COMPANHEIRO(A) CÔNJUGE ENTEADO(A) FILHO(A) FILHO(A) INVÁLIDO(A) IRMÃO(Ã) INVÁLIDO(A) MÃE MENOR SOB GUARDA NETO(A) PAI PAI/MÃE RECONHECIDO SOGRO(A) Saúde Odontológico
Observações
*Campo Obrigatório