Boa tarde 4each , estou tendo um problema que consiste no seguinte: estou lendo um arquivo de texto e extraindo dados para uma tabela temporária , porém estou encontrando o seguinte problema: A declaração da tabela e o código que atribui os valores são: Código: DEF TEMP-TABLE tt-dados NO-UNDO FIELD id AS CHAR FIELD data-deposito AS DATE FIELD data-credito AS DATE FIELD descricao AS CHAR FIELD num-resumo AS CHAR FIELD num-cartao AS CHAR FIELD nsu-doc AS CHAR FIELD cod-autorizacao AS CHAR FIELD valor-liquido AS DEC FIELD valor-bruto AS DEC FIELD rejeitado AS CHAR FIELD valor-saque AS DEC. Leitura de dados: Código: REPEAT: RUN pi-acompanhar IN h-acomp(INPUT "Lendo cupons..."). /* Lê o arquivo linha a linha */ IMPORT STREAM s-imp UNFORMATTED c-linha. IF i-num-linha >= 4 THEN DO: c-linha = fn-free-accent(c-linha). c-linha = REPLACE(c-linha,"~"",""). CREATE tt-dados. ASSIGN tt-dados.id = "Docto " + STRING(i-num-linha - 2) tt-dados.data-deposito = DATE(ENTRY(1,c-linha,";")) tt-dados.data-credito = DATE(ENTRY(2,c-linha,";")) tt-dados.descricao = ENTRY(3,c-linha,";") tt-dados.num-resumo = ENTRY(4,c-linha,";") tt-dados.num-cartao = ENTRY(5,c-linha,";") tt-dados.nsu-doc = ENTRY(6,c-linha,";") tt-dados.cod-autorizacao = ENTRY(7,c-linha,";") tt-dados.valor-liquido = DEC(ENTRY(8,c-linha,";")) tt-dados.valor-bruto = DEC(ENTRY(9,c-linha,";")) tt-dados.rejeitado = ENTRY(10,c-linha,";") tt-dados.valor-saque = dec(ENTRY(11,c-linha,";")). /*tt-dados.cod-estabel = INT(ENTRY(5,c-linha,";")) tt-dados.qtde-comprovante = INT(ENTRY(5,c-linha,";")) tt-dados.situacao = ENTRY(10,c-linha,";") */ /* MESSAGE tt-dados.id ">" tt-dados.data-deposito.*/ END. i-num-linha = i-num-linha + 1. END. O conteúdo do arquivo a ser lido: Código: "Período: 27/07/2012 a 27/07/2012";"";"";"";"";"";"";"";"";"";"" "TOTAL";"";"";"";"";"";"";"505,59";"505,59";"";"" "Data da venda";"Data prevista de pagamento";"Descrição";"Resumo";"N° do cartão / TID";"NSU / DOC";"Código Autorização";"Valor Total Apresentado (R$)";"Valor Bruto (R$)";"Rejeitado";"Valor do saque (R$)" "27/07/2012";"27/08/2012";"Visa crédito";"120727";"400217******8530";"882410";"633421";"52,75";"52,75";"Não";"0,00" "27/07/2012";"27/08/2012";"Visa crédito";"120727";"467793******8736";"882411";"497576";"21,19";"21,19";"Não";"0,00" Meus caros , não consigo ver o motivo do apontamento de erro em parâmetros , alguma sugestão? Obrigado ps: conteúdo do "trace" abaixo: USER-INTERFACE-TRIGGER crbrw/b02crfi011.w (\\serverdts\Datasul\ems206b\desenvolvimento\crbrw\b02crfi011.r) at line 6831 --> crrn/crfirn01.p (\\serverdts\Datasul\ems206b\desenvolvimento\crrn\crfirn01.r) at line 0
Cara. Voce esta usando um programa .w e chamando .p ?? Tá parecendo que a definição dessa tt-dados esta divergentes na onde ele esta sendo definida.
Qual o problema em chamar o procedimento .p no .w? A definição da tabela consta no código acima , assim como a atribuição de dados à mesma. Não consigo achar a divergência apontada pelo compilador , alguma sugestão?
Verificar nos dois programas se a definição da tabela é identica, inclusive tem que estar na sequencia correta.
