- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Erro ao gerar Sispag Itau baixado do fórum
×
Linguagem de Programação ADVPL
Perguntas Erro ao gerar Sispag Itau baixado do fórum
- paulobeto
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 49
- Obrigados Recebidos: 0
12 anos 4 meses atrás #2474
por paulobeto
Erro ao gerar Sispag Itau baixado do fórum foi criado 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)
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) :
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)
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.
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
12 anos 4 meses atrás #2476
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Re: Erro ao gerar Sispag Itau baixado do fórum
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.
- paulobeto
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 49
- Obrigados Recebidos: 0
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
12 anos 4 meses atrás #2485
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Re: Erro ao gerar Sispag Itau baixado do fórum
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.
- paulobeto
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 49
- Obrigados Recebidos: 0
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
12 anos 4 meses atrás #2491
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Re: Erro ao gerar Sispag Itau baixado do fórum
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.
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.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Erro ao gerar Sispag Itau baixado do fórum
Tempo para a criação da página:0.191 segundos