<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% set conexao=server.createobject ("ADODB.Connection") conexao.Open MM_simuladoronline9_STRING %> <% Dim autenticar_logo__MMColParam autenticar_logo__MMColParam = "1" If (Request.QueryString("ID_Usuario") <> "") Then autenticar_logo__MMColParam = Request.QueryString("ID_Usuario") End If %> <% Dim autenticar_logo__corretora autenticar_logo__corretora = "1" If (Request.QueryString("ID_Cliente") <> "") Then autenticar_logo__corretora = Request.QueryString("ID_Cliente") End If %> <% set autenticar_logo = Server.CreateObject("ADODB.Recordset") autenticar_logo.ActiveConnection = conexao autenticar_logo.Source = "SELECT * FROM usuarios_adicionais, administrador WHERE ID_Usuario = " + Replace(autenticar_logo__MMColParam, "'", "''") + " AND ID_Cliente = " + Replace(autenticar_logo__corretora, "'", "''") + " AND ativo = 'S'" autenticar_logo.CursorType = 0 autenticar_logo.CursorLocation = 2 autenticar_logo.LockType = 3 autenticar_logo.Open() autenticar_logo_numRows = 0 %> <% Dim notas_pessoais__MMColParam notas_pessoais__MMColParam = "1" If (Request.QueryString("ID_Usuario") <> "") Then notas_pessoais__MMColParam = Request.QueryString("ID_Usuario") End If %> <% Dim notas_pessoais Dim notas_pessoais_numRows Set notas_pessoais = Server.CreateObject("ADODB.Recordset") notas_pessoais.ActiveConnection = conexao notas_pessoais.Source = "SELECT * FROM informacoes_fisica WHERE ID_Cliente = " + Replace(notas_pessoais__MMColParam, "'", "''") + " AND ID_Operadora = 14" notas_pessoais.CursorType = 0 notas_pessoais.CursorLocation = 2 notas_pessoais.LockType = 1 notas_pessoais.Open() notas_pessoais_numRows = 0 %> <% Dim tabelas_promocoes__MMColParam tabelas_promocoes__MMColParam = "1" If (Request.QueryString("ID_Cliente") <> "") Then tabelas_promocoes__MMColParam = Request.QueryString("ID_Cliente") End If %> <% Dim tabelas_promocoes Dim tabelas_promocoes_cmd Dim tabelas_promocoes_numRows Set tabelas_promocoes_cmd = Server.CreateObject ("ADODB.Command") tabelas_promocoes_cmd.ActiveConnection = conexao tabelas_promocoes_cmd.CommandText = "SELECT * FROM tabelas_promocoes WHERE ID_Cliente = ?" tabelas_promocoes_cmd.Prepared = true tabelas_promocoes_cmd.Parameters.Append tabelas_promocoes_cmd.CreateParameter("param1", 5, 1, -1, tabelas_promocoes__MMColParam) ' adDouble Set tabelas_promocoes = tabelas_promocoes_cmd.Execute tabelas_promocoes_numRows = 0 %> <%=(autenticar_logo.Fields.Item("nome_corretora").Value)%> <% If Not topo_tabelas.EOF Or Not topo_tabelas.BOF Then %>
<% If Not tabelas_promocoes.EOF Or Not tabelas_promocoes.BOF Then %>
<%=(tabelas_promocoes.Fields.Item("descricao_juridica").Value)%>
<% End If ' end Not tabelas_promocoes.EOF Or NOT tabelas_promocoes.BOF %>
">
<%=(autenticar_logo.Fields.Item("site_corretora").Value)%>
(<%=(autenticar_logo.Fields.Item("ddd").Value)%>) <%=(autenticar_logo.Fields.Item("fone").Value)%> -<%=(autenticar_logo.Fields.Item("fone_2").Value)%>

<% End If ' end Not topo_tabelas.EOF Or NOT topo_tabelas.BOF %>
AMIL SAÚDE -  NOVEMBRO de 2010 - Taxa de Inscrição R$ 15,00 por Contrato
INDIVIDUAL/GRUPAL
Planos
AMIL Blue I
AMIL Blue II
AMIL Blue III
AMIL Blue IV
AMIL 140
AMIL 150
Acomodação
Enfer.
Apto.
Apto.
Apto.
Apto.
Apto.
00 a 18
120,98
146,44
184,64
210,12
257,23
352,32
19 a 23
157,27
190,37
240,03
273,16
334,40
458,02
24 a 28
173,00
209,41
264,03
300,48
367,84
503,82
29 a 33
188,57
228,26
287,79
327,52
400,95
549,16
34 a 38
207,43
251,09
316,57
360,27
441,05
604,08
39 a 43
228,17
276,20
348,23
396,30
485,16
664,49
44 a 48
296,39
358,78
452,35
514,79
630,22
863,17
49 a 53
340,85
412,60
520,20
592,01
724,75
992,65
54 a 58
426,06
515,75
650,25
740,01
905,94
1.240,81
59 ou +
725,88
878,64
1.107,84
1.260,72
1.543,38
2.113,92

Familiar I (ambos os cônjuges e filhos solteiros) Valor por vida
Planos
AMIL Blue I
AMIL Blue II
AMIL Blue III
AMIL Blue IV
AMIL 140
AMIL 150
Acomodação
Enfer.
Apto.
Apto.
Apto.
Apto.
Apto.
00 a 18
105,25
127,40
160,64
182,80
223,79
306,52
19 a 23
136,83
165,62
208,83
237,64
290,93
398,48
24 a 28
150,51
182,18
229,71
261,40
320,02
438,33
29 a 33
164,06
198,58
250,38
284,93
348,82
477,78
34 a 38
180,47
218,44
275,42
313,42
383,70
525,56
39 a 43
198,52
240,28
302,96
344,76
422,07
578,12
44 a 48
257,88
312,12
393,55
447,84
548,27
750,98
49 a 53
296,56
358,94
452,58
515,02
630,51
863,63
54 a 58
370,70
448,68
565,73
643,78
788,14
1079,54
59 ou +
631,50
764,40
963,84
1096,80
1342,74
1839,12

Familiar II (um dos cônjuges e no mínimo um filho solteiro) Valor por vida
Planos
AMIL Blue I
AMIL Blue II
AMIL Blue III
AMIL Blue IV
AMIL 140
AMIL 150
Acomodação
Enfer.
Apto.
Apto.
Apto.
Apto.
Apto.
00 a 18
112,51
136,19
171,72
195,41
239,22
327,66
19 a 23
146,26
177,05
223,24
254,03
310,99
425,96
24 a 28
160,89
194,76
245,56
279,43
342,09
468,56
29 a 33
175,37
212,29
267,66
304,58
372,88
510,73
34 a 38
192,91
233,52
294,43
335,04
410,17
561,80
39 a 43
212,20
256,87
323,87
368,54
451,19
617,98
44 a 48
275,65
333,67
420,71
478,73
586,10
802,76
49 a 53
317,00
383,72
483,82
550,54
674,02
923,17
54 a 58
396,25
479,65
604,78
688,18
842,53
1153,96
59 ou +
675,06
817,14
1030,32
1172,46
1435,32
1965,96

 

Última Alteração em 08/10/2010 <% notas_pessoais.Close() Set notas_pessoais = Nothing %> <% tabelas_promocoes.Close() Set tabelas_promocoes = Nothing %> <% autenticar_logo.Close() Set autenticar_logo = Nothing %> <% conexao.close set conexao=nothing %>