× Linguagem de Programação ADVPL

Perguntas Erro ao gerar Sispag Itau baixado do fórum

Mais
12 anos 4 meses atrás #2474 por paulobeto
Olá pessoal,

Estou implantando na empresa o Sispag Itau, eu peguei um pronto aqui do forum ja com os fontes e fiz as alterações no arquivo de envio de remessa colocando as informações da empresa. Mas quando vou gerar a remessa para o banco acontece seguinte erro abaixo. Observação eu ja debuguei todos os fontes e não encontro o erro. Parece que esta dando erro em algum ponto de entrada, mas eu não estou utilizando ponto de entrada. Por acaso aconteceu esse problema ai com alguém já?


THREAD ERROR (proliveira, SISTEMAS-18) 03/07/2012 10:36:23
type mismatch on compare on FA150ORIG(FINA150.PRX) 16/12/2011 18:43:51 line : 1102

[TOTVS build: 7.00.111010P-20111220]
Called from FA240GRAVA(FINA240.PRX) 12/01/2012 15:44:42 line : 2023
Called from FA240LINHA(FINA240.PRX) 12/01/2012 15:44:42 line : 1891
Called from SISPAGGER(FINA240.PRX) 12/01/2012 15:44:42 line : 1757
Called from {||SISPAGGER("SE2")}(FINA240.PRX) 12/01/2012 15:44:42 line : 1379
Called from eval line : 43
Called from { || FWSETSHOWKEYS( .F. ), EVAL( BACTION, @LEND ),LEND := .T. , FWSETSHOWKEYS( .T. ), ODLG:END() }(MSPROCES.PRW) 13/05/2010 14:48:40 line : 43
Called from ::MSDIALOG:ACTIVATE
Called from PROCESSA(MSPROCES.PRW) 13/05/2010 14:48:40 line : 45
Called from FA240SIS(FINA240.PRX) 12/01/2012 15:44:42 line : 1379
Called from EXECBROW(MSLIB.PRW) 11/01/2012 17:42:37 line : 982
Called from {|aArray,nPos,aSvRotina,lRunPopUp| aSvRotina := Aclone(aRotina), If(aArray <> NIL,aRotina := Aclone(aArray),),SetEnch(aRotina[nPos][1]), inclui := (aRotina[nPos][4] == 3), altera := (aRotina[nPos][4] == 4), ExecBrow(aRotina[nPos][2],If(Len(aRotina[nPos]) > 4,aRotina[nPos][5],),nPos,'SE2',@aEncho,,'xFilial("SE2")','xFilial("SE2")', .F.,.T.,lSeeAll .and. lBrwFilOn,.F.,.T.,lRunPopUp),If(lAxPesqui,MbrSetAllCols(cAlias,aIdxCol),),aRotina := Aclone(aSvRotina)} line : 8174
Called from eval line : 8201
Called from {|| Eval(bExecBrow,, 3)} line : 8201
Called from ::TDIALOG:ACTIVATE
Called from MBRWINDOW(MSLIB.PRW) 11/01/2012 17:42:37 line : 8424
Called from MBROWSE(MSLIB.PRW) 11/01/2012 17:42:37 line : 622
Called from FINA300(FINA300.PRX) 29/07/2011 12:10:09 line : 59
Called from __EXECUTE(APLIB090.PRW) 09/03/2012 10:16:18 line : 1117
Called from MDIEXECUTE(APLIB260.PRW) 22/03/2012 16:26:58 line : 1247
Publicas
Public 1: CPAISLOC(C) :BRA
Public 2: LWSISPORTAL(L) :.F.
Public 3: OAPP(O) :O
Public 4: _NOMEEXEC(C) :SIGAFIN.EXE
Public 5: AAMBIENTES(A) :
Public 6: USIGAADV(L) :.F.
Public 7: NCAMPOS(N) :200
Public 8: CARQTEL(C) :SIGAFIN.SCR
Public 9: CARQREL(C) :SIGAFIN.REL
Public 10: CARQMNU(C) :\system/\SIGAFIN.XNU
Public 11: CARQHLP(C) :SIGAHLP.HLP
Public 12: CARQPSW(C) :SIGAMAT.PSW
Public 13: CARQEMP(C) :SIGAMAT.EMP
Public 14: CARQALC(C) :SIGAMAT.ALC
Public 15: CALC(L) :.F.
Public 16: AGEN(L) :.F.
Public 17: HELP(L) :.F.
Public 18: LINUTIL(L) :.F.
Public 19: F_ASK(C) :askfor
Public 20: HAVE_A_MOUSE(L) :.F.
Public 21: CACESSO(C) :

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 4 meses atrás #2476 por lalberto
Paulo o arquivo de remessa chegou à ser gerado ? se sim anexa ele no topico para eu dar uma olhada.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 4 meses atrás #2484 por paulobeto
Luiz,

Foi gerado sim, mas incompleto por conta do erro. Segue no anexo.

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 4 meses atrás #2485 por lalberto
Faltou o Anexo, precisa compactar ok.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 4 meses atrás #2488 por paulobeto
Anexo.

Arquivo Anexo:

Nome do Arquivo: testsispag.rar
Tamanho do Arquivo:0 KB
Anexos:

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 4 meses atrás #2491 por lalberto
Cara muito estranho este erro, estou vendo a linha de detalhe tipo A, e aparentemente o erro acontece aqui:

GSEU NUMERO 0740930SE2->E2_IDCNAB
GDATA DE PGTO 0941010GRAVADATA(SE2->E2_VENCREA,.F.,5)
GMOEDA-TIPO 1021040'REA'
GZEROS 1051190'000000000000000'
GVALOR DO PGTO 1201340STRZERO(INT(ROUND(SE2->E2_SALDO*100,2)),15)

Porque ele chega a Gravar o Nome do Fornecedor:

NATALIA ROSE SANTOS BEVILAQUA

Muito estranho.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.191 segundos
Joomla templates by a4joomla