Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Nota Fiscal Complementar
Data/Hora da Publicação: 05/04/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 17:09:23
Descrição da Nota: NOTA DE VARIAÇÃO CAMBIAL COM REFERENCIA
Sintoma
Ao emitir a nota de variação cambial, não esta criando com referencia ao DOCNUM.
Solução
o programa deverá buscar o texto da nota fiscal na tabela J_1BNFFTX (Texto da Nota Fiscal) com o
DOCNUM da tabela J_1BNFDOC e selecionar todos os textos e retornar quantos textos existem na nota
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01162 Data: 05/04/2006 Hora: 17:12:13
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01162
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00108
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01024 - 00001 - 6.0 - 00023 - EMISSÃO DE NOTAS EM VARIAÇÃO CAMBIAL COM REFERÊNCIA
----------------------------------------------------------------------------------------------------
NOTA DE VARIAÇÃO CAMBIAL COM REFERENCIA
----------------------------------------------------------------------------------------------------
Palavras Chave:
NOTA VARIAÇÃO CAMBIAL REFERÊNCIA
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCE_TRANSACAO_J1B1N_C
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCE_TRANSACAO_J1B1N_C
...
v_cont_aux(2) TYPE n,
v_campo1(21),
v_campo2(20),
v_campo3(20),
v_campo4(20).
* >> Início da inclusão: FUNCTION /PWS/ZYCE_TRANSACAO_J1B1N_C
data: begin of itab_J_1BNFFTX occurs 0.
include structure J_1BNFFTX.
data: end of itab_J_1BNFFTX.
* << Fim da inclusão
LOOP AT t_dados.
CHECK t_dados-tcode = 'J1B1N'.
IF ( t_dados-docdat = space ).
t_campos-mandt = t_dados-mandt.
t_campos-campo = 'J_1BDYDOC-DOCDAT'.
...
...
PERFORM bdc_field USING: 'BDC_OKCODE' '=TAB4'.
PERFORM bdc_tela USING 'SAPLJ1BB2' '2000'.
CLEAR v_cont.
CLEAR v_campo.
DESCRIBE TABLE t_message LINES v_cont.
* >> Início da inclusão: FUNCTION /PWS/ZYCE_TRANSACAO_J1B1N_C
select * from J_1BNFFTX into table itab_J_1BNFFTX
where docnum = t_dados-docnum.
* << Fim da inclusão
clear v_cont_aux.
* >> Início da inclusão: FUNCTION /PWS/ZYCE_TRANSACAO_J1B1N_C
describe table itab_J_1BNFFTX lines v_cont_aux.
* << Fim da inclusão
LOOP AT t_message.
...