Fórum Postar, capturar dados com Idhttp, Webbrowser #346829
30/09/2007
0
Vi um post do massuda que fala diversas coisas a respeito de postar dados em site que no caso foi para consulta ao http://www.sintegra.sefaz.pe.gov.br/ que um membro do forum podtou aqui...
no meu caso preciso logar neste site:
http://www010.dataprev.gov.br/cws/contexto/hiscre/index.html
com o webbrowser ja consigo fazer postando os dados e fazendo o login normalmente digitando os caracteres no edit e executando o javascript...
Gostaria de saber se e possivel fazer isto com idhttp da indy ja que o mesmo tem que digitar os caracteres de uma imagem, justamente para evitar as pesquisas automaticas...
outra coisa que gostaria de saber qual seria a melhor abordagem para copiar os campos que preciso no script abaix:
PS.: Se puderem me ajudar desde ja agradeço... desculpem o post do codigo tao longo...
bye
no meu caso preciso logar neste site:
http://www010.dataprev.gov.br/cws/contexto/hiscre/index.html
com o webbrowser ja consigo fazer postando os dados e fazendo o login normalmente digitando os caracteres no edit e executando o javascript...
Gostaria de saber se e possivel fazer isto com idhttp da indy ja que o mesmo tem que digitar os caracteres de uma imagem, justamente para evitar as pesquisas automaticas...
outra coisa que gostaria de saber qual seria a melhor abordagem para copiar os campos que preciso no script abaix:
<script language=JavaScript>parent.erroconfere = ´´;parent.exibeErro = ´´;</script><script language=´JavaScript´>
// ------------------------------------------------------------------
// TITULO : BPVT0122
// DESCRICAO : CONSULTA DO ÚLTIMO HISTÓRICO DE CRÉDITOS - DETALHAMENTO DE CRÉDITO - INTERNET
// CRIACAO : 05/06/06
// ALTERACAO : 12/07/06
// ORIGENS : HISCRENET2.ASP
// DESTINOS : HISCRENET2.ASP
// CONTEXTOS : HISCRE
// --------------------------------------------------------------------
//CAMPOS DA TELA - SADS
var tlatrs = ´BPV03&11´; // campo origem: TLATRS(8)
var tladthc = ´30/09/2007 19:06:04´; // campo origem: TLADTHC(20)
var nb = ´999.999.999-9´; // campo origem: BENNU(999.999.999-9)
var nbf = ´´;
nbf = nb.replace(/&/g,´.´);
var nome= ´FULANO DE TAL DA SILVA ´; // campo origem: RECNM(28)
var especie = ´ 42´; // campo origem: BENCSESPEC(3)
var descespecie = ´APOSENTADORIA POR TEMPO DE CONTRIBUICAO ´; // campo origem: BENCSESPEC-1(40)
var pal= ´ ´; //campo origem: PALCS(9)
var competencia= ´09/2007´; //campo origem: CRED2COMPET(99/9999)
var periodoinicial= ´01/09/2007´; //campo origem: PERD2INI(99/99/9999)
var periodofinal= ´30/09/2007´; //campo origem: PERD2FIM(99/99/9999)
var meiopagto= ´CCF´; //campo origem: MPGCS(3)
var oml= ´21.0.25.010´; //campo origem: OLSIDMANUT(99.9.99.999)
var datadispinicial= ´04/10/2007´; //campo origem: CRED2INIVAL(99/99/9999)
var datadispfinal= ´04/12/2007´; //campo origem: CRED2FIMVAL(99/99/9999)
var dataCalcCredito= ´10/09/2007´; //campo origem: CRED2MOVIM(99/99/9999)
var origem= ´MACICA ´; //campo origem: CRECSORIGEM(11)
var datapagto= ´ ´; //campo origem: PAGD2CRED(99/99/9999)
var contacorrente= ´0002811970´; //campo origem: BCCNUCTACOR(10)
var retorno1= ´CREDITO SEM RETORNO ´ //campo origem: PAGCSOCORR(27)
var retorno2= ´Arq:´; //campo origem: TRACO-2(4)
var retorno3= ´000093 ´; //campo origem: CRENUSERFIT(7)
var retorno4= ´Seq:´; //campo origem: TRACO-1(4)
var retorno5= ´2869410´; //campo origem: CRENUSEQARQ(7)
var banco= ´CAIXA ´; //campo origem: BANID(15)
var codbanco= ´261603´; //campo origem: OPGID(6)
var agencia= ´GUARULHOS EST. UNIF. ´;//campo origem: OPGID-1(40)
var enderecobanco= ´AV. TIRADENTES, 1624 ´; //campo origem: OPGID-2(55)
if (enderecobanco == ´ ´)
enderecobanco = ´NÃO INFORMADO.´;
function Trim(valor)
{
var novoValor = ´´;
for( i = 0; i < valor.length; i++) {
if (valor.substring(i, i+1) != ´ ´)
novoValor += valor.substring(i, i+1);
}
return novoValor;
}
function TraduzEspecie(meiopagto)
{
if (meiopagto == ´CMG´)
return ´CARTAO MAGNETICO´;
else if (meiopagto == ´APB´)
return ´CUPOM´;
else if (meiopagto == ´CCF´)
return ´CONTA CORRENTE´;
else if (meiopagto == ´CCL´)
return ´CONTA CORRENTE´;
else if (meiopagto == ´PAB´)
return ´ALTERNATIVO´;
else if (meiopagto == ´CPB´)
return ´CHEQUE´;
else if (meiopagto == ´OPB´)
return ´ORDEM DE PAGTO´;
else if (meiopagto == ´RPB´)
return ´RECIBO DE PAGTO´;
else if (meiopagto == ´AP ´)
return ´AUTORIZACAO´;
}
{
document.write(´<html>´);
document.write(´<head>´);
document.write(´<title> Detalhamento de Crédito </title>´);
document.write(´</head>´);
document.write(´<body alink=´#0000ff´ background=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/fnada.gif´ bgcolor=´ffffff´ link=´004080´´);
document.write(´text=´#000000´ vlink=´ff0000´ topMargin=0 marginheight=´0´ marginwidth=´0´ >´);
document.write(´<!-- topo azul MPAS -->´);
document.write(´<TABLE border=0 cellPadding=0 cellSpacing=0 height=70 width=´100¬´ name=´topo´><TBODY>´);
document.write(´ <TR bgColor=065ca5>´);
document.write(´ <TD align=left vAlign=top>´);
document.write(´ <TABLE border=0 cellPadding=0 cellSpacing=0>´);
document.write(´ <TBODY>´);
document.write(´ <TR>´);
document.write(´ <TD align=left vAlign=top><A href=´http://www.mpas.gov.br/´><IMG ´);
document.write(´ border=0 height=70 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/KO.gif´ ´);
document.write(´ width=94></A></TD>´);
document.write(´ <TD align=left vAlign=top><BR><A href=´http://www.mpas.gov.br/´><IMG ´);
document.write(´ border=0 height=41 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/previdencia.gif´ ´);
document.write(´ width=290></A></TD></TR></TBODY></TABLE></TD>´);
document.write(´ <TD align=right vAlign=top><A href=´http://www.redegoverno.gov.br/´><IMG ´);
document.write(´ border=0 height=70 hspace=0 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/prevnet.gif´ ´);
document.write(´ width=139></A></TD></TR></TBODY></TABLE>´);
document.write(´<center><font face=´Trebuchet MS´ color=#065ca5><h2 align=´center´>Detalhamento de Crédito</h2>´);
document.write(´<table border=´1´ width=´69¬´ height=´1´>´);
document.write(´ <tr>´);
document.write(´ <td width=´30¬´ align=´center´ bgcolor=´#C0C0C0´ height=´1´ valign=´top´><p align=´left´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Número do Benefício</font></small></small></td>´);
document.write(´ <td width=´70¬´ align=´center´ bgcolor=´C0C0C0´ height=´1´ valign=´top´><p align=´left´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Nome do Segurado</font></small></small></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´30¬´ align=´center´ height=´24´><p align=´center´><strong><font´);
document.write(´ face=´Trebuchet MS´>´ + nbf + ´</font></strong></td>´);
document.write(´ <td width=´70¬´ align=´center´ height=´24´><p align=´left´><strong><font´);
document.write(´ face=´Trebuchet MS´>´ + nome + ´</font></strong></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´ height=´1´>´);
document.write(´ <tr>´);
document.write(´ <td width=´16¬´ bgcolor=´#C0C0C0´ height=´1´ valign=´top´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Competência</font></small></small></td>´);
document.write(´ <td width=´42¬´ bgcolor=´C0C0C0´ height=´1´ valign=´top´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Período a que se refere o crédito :</font></small></small></td>´);
document.write(´ <td width=´38¬´ bgcolor=´#C0C0C0´ height=´1´ valign=´top´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Pagamento através de :</font></small></small></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´16¬´ height=´22´><p align=´center´><strong><font face=´Trebuchet MS´>´ + competencia + ´</font></strong></td>´);
document.write(´ <td width=´18¬´ height=´22´><p align=´center´><strong><font face=´Trebuchet MS´>´ + periodoinicial + ´</font></strong></td>´);
document.write(´ <td width=´5¬´ height=´22´><p align=´center´><font face=´Trebuchet MS´>a</font></td>´);
document.write(´ <td width=´20¬´ height=´22´><p align=´center´><strong><font face=´Trebuchet MS´>´ + periodofinal + ´</font></strong></td>´);
document.write(´ <td width=´42¬´ height=´22´ valign=´top´><p align=´left´><strong><font face=´Trebuchet MS´>´ + TraduzEspecie(meiopagto) + ´</font></strong></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
// Inclusão do Campo Espécie
document.write(´<table border=´1´ width=´69¬´ height=´23´>´);
document.write(´ <tr>´);
document.write(´ <td width=´100¬´ bgcolor=´#C0C0C0´ height=´6´ valign=´top´ align=´left´ checked=´false´><small><font´);
document.write(´ face=´Trebuchet MS´><small>Espécie</small></font></small></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´10¬´ height=´9´><p align=´left´><strong><font face=´Trebuchet MS´>´ + especie + ´</font></strong></td>´);
document.write(´ <td width=´70¬´ height=´9´><strong><font face=´Trebuchet MS´>´ + descespecie + ´</font></strong></td>´);
document.write(´ <td width=´20¬´ height=´9´><p align=´center´><strong><font face=´Trebuchet MS´>´ + pal + ´</font></strong></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´ height=´14´>´);
document.write(´ <tr>´);
document.write(´ <td width=´21¬´ bgcolor=´#C0C0C0´ height=´2´ valign=´top´><p align=´left´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Banco</font></small></small></td>´);
document.write(´ <td width=´54¬´ bgcolor=´C0C0C0´ height=´2´ valign=´top´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Agência bancária</font></small></small></td>´);
document.write(´ <td width=´25¬´ bgcolor=´C0C0C0´ height=´2´ valign=´top´><p align=´center´><small><small><font´);
document.write(´ face=´Trebuchet MS´>Código do Banco</font></small></small></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´21¬´ height=´9´><p align=´left´><strong><font face=´Trebuchet MS´>´ + banco + ´</font></strong></td>´);
document.write(´ <td width=´54¬´ height=´9´><strong><font face=´Trebuchet MS´>´ + agencia + ´</font></strong></td>´);
document.write(´ <td width=´25¬´ height=´9´><p align=´center´><strong><font face=´Trebuchet MS´>´ + codbanco + ´</font></strong></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´ height=´23´>´);
document.write(´ <tr>´);
document.write(´ <td width=´64¬´ bgcolor=´#C0C0C0´ height=´6´ valign=´top´ align=´left´ checked=´false´><small><font´);
document.write(´ face=´Trebuchet MS´><small>Endereço do banco</small></font></small></td>´);
document.write(´ <td width=´36¬´ bgcolor=´#C0C0C0´ height=´6´ valign=´top´ align=´left´ checked=´false´><small><font´);
document.write(´ face=´Trebuchet MS´><small>Disponível para recebimento de :</small></font></small></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´65¬´ height=´5´><small><strong><font face=´Trebuchet MS´>´ + enderecobanco + ´</font></strong></small></td>´);
document.write(´ <td width=´15¬´ height=´5´ style=´border: 1px solid´><p align=´center´><strong><font´);
document.write(´ face=´Trebuchet MS´>´ + datadispinicial + ´ </font></strong></td>´);
document.write(´ <td width=´5¬´ height=´5´ style=´border: 1px solid´><font face=´Trebuchet MS´><p´);
document.write(´ align=´center´>a</font></td>´);
document.write(´ <td width=´17¬´ height=´5´ style=´border: 1px solid´><font face=´Trebuchet MS´><p´);
document.write(´ align=´center´><strong>´ + datadispfinal + ´</strong></font></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<small><font face=´Trebuchet MS´>´);
document.write(´<table border=´1´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td height=´18´ bgcolor=´#C0C0C0´ colspan=´2´><p align=´center´><small><strong><font´);
document.write(´ face=´Trebuchet MS´>C R É D I T O S </font></strong></small></td>´);
document.write(´ </tr>´);
document.write(´ <tr>´);
document.write(´ <td width=´366´ height=´18´><p align=´center´><font face=´Trebuchet MS´><strong>Descrição das Rubricas</strong></font></td>´);
document.write(´ <td width=´145´ height=´18´><p align=´center´><font face=´Trebuchet MS´><strong>Valor</font></strong></td>´);
document.write(´ </tr>´);
}
var rubrica, linha;
var CabecDebito = true;
//imprime 1ª Rubrica
rubrica = ´101´; //campo origem: RUBCS(3)
descrub = ´Mens. reajustada´; //campo origem: DESCRUB(16)
vlrub= ´ 1.422,81´; //campo origem: RUBVL(9999999.999,99)
sinal= ´+´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 2ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 3ª Rubrica
rubrica = ´121´; //campo origem: RUBCS(3)
descrub = ´Compl. de CPMF.´; //campo origem: DESCRUB(16)
vlrub= ´ 4,01´; //campo origem: RUBVL(9999999.999,99)
sinal= ´+´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 4ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 5ª Rubrica
rubrica = ´216´; //campo origem: RUBCS(3)
descrub = ´Consig. Emprest.´; //campo origem: DESCRUB(16)
vlrub= ´ 88,96´; //campo origem: RUBVL(9999999.999,99)
sinal= ´-´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 6ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 7ª Rubrica
rubrica = ´216´; //campo origem: RUBCS(3)
descrub = ´Consig. Emprest.´; //campo origem: DESCRUB(16)
vlrub= ´ 18,56´; //campo origem: RUBVL(9999999.999,99)
sinal= ´-´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 8ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 9ª Rubrica
rubrica = ´216´; //campo origem: RUBCS(3)
descrub = ´Consig. Emprest.´; //campo origem: DESCRUB(16)
vlrub= ´ 80,36´; //campo origem: RUBVL(9999999.999,99)
sinal= ´-´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 10ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 11ª Rubrica
rubrica = ´216´; //campo origem: RUBCS(3)
descrub = ´Consig. Emprest.´; //campo origem: DESCRUB(16)
vlrub= ´ 119,56´; //campo origem: RUBVL(9999999.999,99)
sinal= ´-´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 12ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 13ª Rubrica
rubrica = ´217´; //campo origem: RUBCS(3)
descrub = ´Emprestimo RMC ´; //campo origem: DESCRUB(16)
vlrub= ´ 61,57´; //campo origem: RUBVL(9999999.999,99)
sinal= ´-´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 14ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 15ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 16ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 17ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
//imprime 18ª Rubrica
rubrica = ´ ´; //campo origem: RUBCS(3)
descrub = ´ ´; //campo origem: DESCRUB(16)
vlrub= ´ ´; //campo origem: RUBVL(9999999.999,99)
sinal= ´ ´; //campo origem: SINAL(1)
if (rubrica != ´ ´)
{
if (parseInt(rubrica) < 300 && parseInt(rubrica) > 199 && CabecDebito)
{
document.write (´<tr><td height=18 bgcolor=#C0C0C0 colspan=2><p align=center><strong><font face=´Trebuchet MS´><small>D É B I T O S</small></strong></td></tr>´);
CabecDebito = false;
}
linha = ´<tr>´;
linha = linha + ´<td><small>´ + descrub +´</small></td>´;
linha = linha + ´<td align=right><small>´+ vlrub + ´</small></td> </tr>´;
document.write (linha);
}
var valorbruto = ´ 1.426,82´; //campo origem: VALBRUTO(99.999.999.999,99)
var valordesconto= ´ 369,01´; //campo origem: VALDESC(99.999.999.999,99)
var valorliquido= ´ 1.057,81´; //campo origem: VALLIQ(99.999.999.999,99)
{
document.write(´</table>´);
document.write(´</font></small>´);
document.write(´<table border=´1´ width=´69¬´ cellpadding=´2´>´);
document.write(´ <tr>´);
document.write(´ <td width=´33¬´ align=´center´ bgcolor=´#C0C0C0´ style=´font-family: Trebuchet MS´><strong>Valor Bruto </strong></td>´);
document.write(´ <td width=´33¬´ align=´center´ bgcolor=´C0C0C0´ style=´font-family: Trebuchet MS´><strong>Valor dos´);
document.write(´ Descontos</strong></td>´);
document.write(´ <td width=´34¬´ align=´center´ bgcolor=´C0C0C0´ style=´font-family: Trebuchet MS´><strong>Valor Líquido</strong></td>´);
document.write(´ </tr>´);
document.write(´ <tr>´);
document.write(´ <td width=´33¬´ align=´right´><strong><font face=´Trebuchet MS´>´ + valorbruto + ´</font></strong></td>´);
document.write(´ <td width=´33¬´ align=´right´><strong><font face=´Trebuchet MS´>´ + valordesconto + ´</font></strong></td>´);
document.write(´ <td width=´34¬´ align=´right´><strong><font face=´Trebuchet MS´>´ + valorliquido + ´</font></strong></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´<table border=´0´ width=´69¬´>´);
document.write(´ <tr>´);
document.write(´ <td width=´100¬´><p align=´center´><u><strong><font face=´Trebuchet MS´ color=#065ca5>Este´);
document.write(´ extrato vale para simples conferência</font></strong></u></td>´);
document.write(´ </tr>´);
document.write(´</table>´);
document.write(´´);
document.write(´<a href=´JavaScript:history.back()´><img border=´0´ height=´38´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/ante.gif´ width=´120´></a>´);
document.write(´</center>´);
document.write(´<TABLE bgColor=#065ca5 border=0 cellPadding=0 cellSpacing=0 height=35 width=´100¬´>´);
document.write(´ <TBODY>´);
document.write(´ <TR>´);
document.write(´ <TD align=left vAlign=top width=´1¬´><IMG border=0 height=62 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/esquerda3b.gif´ ´);
document.write(´ width=70></TD>´);
document.write(´ <TD align=left width=´60¬´><IMG border=0 height=34 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/rodape_dtp.gif´ ´);
document.write(´ width=93><BR><IMG alt=´bluebottom2.gif (971 bytes)´ height=10 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/bluebottom2.gif´ ´);
document.write(´ width=42><IMG border=0 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/dtpextenso2d.gif´><BR></TD>´);
document.write(´ <TD align=right width=´40¬´><A ´);
document.write(´ href=´mailto:webmaster.dtp@rjo.dataprev.gov.br´ ´);
document.write(´ title=´Fale com a DATAPREV´><IMG border=0 height=25 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/mailslot.gif´ ´);
document.write(´ width=36></A></TD>´);
document.write(´ <TD align=right vAlign=top width=´1¬´><IMG border=0 height=62 ´);
document.write(´ src=´´ + parent.RAIZ_HTML_GATEWAY + ´/CONTEXTO/HISCRE/IMAGENS/padrao1girado.gif´ ´);
document.write(´ width=70></TD></TR>´);
document.write(´ </TBODY>´);
document.write(´</TABLE>´);
document.write(´</body>´);
document.write(´</html>´);
}
</script>
PS.: Se puderem me ajudar desde ja agradeço... desculpem o post do codigo tao longo...
bye
Johnny-walker
Curtir tópico
+ 0
Responder
Posts
01/10/2007
Johnny-walker
Ninguém pessoal???
Vi tantas pessoas reponderem sobre este assunto aqui que resolvi me cadastrar no forum e pensei que seria mais facil...
Uma pergunta:
Pq nao consegui editar minha mensagem? Qual tempo limite para isto? no faq isto nao é esclarecido...
bye
Vi tantas pessoas reponderem sobre este assunto aqui que resolvi me cadastrar no forum e pensei que seria mais facil...
Uma pergunta:
Pq nao consegui editar minha mensagem? Qual tempo limite para isto? no faq isto nao é esclarecido...
bye
Responder
Gostei + 0
06/10/2007
Johnny-walker
Olá amigo... pelo visto ninguém...
bem, obrigado a todos..
bye
bem, obrigado a todos..
bye
Responder
Gostei + 0
22/10/2007
Marciojb
Estou precisando desse codigo para acessar o Extrato de Pagamento do Dataprev. Esse usando o WebBrowser. pode me mandar por favor??
Responder
Gostei + 0
03/11/2007
Johnny-walker
Amigo, se quiser entre em contato que podemos negociar uma solução... tenho como logar, pegar os dados, exportar e tb tiro um screenshot do contra-cheque...
Mande uma mensagem privada ou entao entre em contato no meu email que está em meus dados pessoais e ja que permiti ter acesso ao email vc nao tera problemas...
ou tb visite o site activedelphi que sou mais participativo la, assim será mais façil entrar em contato...
bye
Mande uma mensagem privada ou entao entre em contato no meu email que está em meus dados pessoais e ja que permiti ter acesso ao email vc nao tera problemas...
ou tb visite o site activedelphi que sou mais participativo la, assim será mais façil entrar em contato...
bye
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)