Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 05/12/2011 00:00:00
Data/Hora Última Alteração: 08/12/2011 08:30:28
Descrição da Nota: NÃO FAZ NF REMESSA PARA ARGENTINA
Sintoma
Não faz NF Remessa para Argentina
Solução
Permitir fazer NF Remessa para embarques AR
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11732 Data: 05/12/2011 Hora: 13:53:47
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11732
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00009
Agrupamento : 00098
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01469 - 00001 - 6.0 - 00023 - QUANDO ESTAMOS CRIANDO A NOTA FISCAL GLOBAL, PARA MAIS DE 10.
01517 - 00002 - 6.0 - 00023 - AO CRIAR NF GLOBAL PARA MAIS DE 10 ITENS NÃO ESTÁ GRAVANDO DADOS
07366 - 00003 - 7.0 - 00007 - ATUALIZAÇÃO DE NUMERO DE NOTA PARA NF-E
09597 - 00004 - 8.0 - 00002 - PERMITIR CRIAÇÃO DE NOTA FISCAL COMPLEMENTAR PARA NOTA DE CONTING
09599 - 00005 - 8.0 - 00002 - AO CRIAR NF REMESSA DE CARVÃO, NÃO GRAVA DOCNUM.
----------------------------------------------------------------------------------------------------
NÃO FAZ NF REMESSA PARA ARGENTINA
----------------------------------------------------------------------------------------------------
Palavras Chave:
REMESSA - ARGENTINA - DOCNUM
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
IMPORT : it_zycet004[] FROM MEMORY ID 'CET004_04',
it_zycet005[] FROM MEMORY ID 'CET005_05',
it_zycee006[] FROM MEMORY ID 'CEE006_06'.
ENDIF.
ENDIF.
IF e_subrc = '0'.
* >> Início da inclusão: FORM FILL_DATA_J1B1_R
IF t001-land1 EQ 'AR' OR t001-land1 EQ 'CL'.
it_zycet005-tcode = text-065.
it_zycet005-tabela = text-025.
it_zycet005-cpochv = /pws/zycie043-nfremessa.
it_zycet005-tpmsg = 'S'.
it_zycet005-belnr = '8888888888'.
APPEND it_zycet005.
ENDIF.
* << Fim da inclusão
...
...
<nfe> TYPE ANY.
READ TABLE it_zycet005 WITH KEY tcode = text-065
tabela = text-025
cpochv =
/pws/zycie043-nfremessa
tpmsg = 'S'.
IF sy-subrc EQ 0.
IF it_zycee005-belnr NE '0000000000'.
SELECT SINGLE * FROM j_1bnfdoc
WHERE docnum EQ it_zycee005-belnr.
* >> Início da exclusão: FORM ATUALIZA_DADOS_NOTA_R
IF sy-subrc EQ 0 OR it_zycet005-belnr = '9999999999'
* << Fim da exclusão
* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA_R
IF sy-subrc EQ 0
* << Fim da inclusão
OR it_zycet005-belnr = '8888888888'.
/pws/zycie043-docnum = it_zycee005-belnr.
* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA_R
IF it_zycet005-belnr = '8888888888'.
/pws/zycie043-docnum = it_zycet005-belnr.
ENDIF.
* << Fim da inclusão
itab_zycit044-nfnum = j_1bnfdoc-nfnum.
itab_zycit044-series = j_1bnfdoc-series.
itab_zycit044-subser = j_1bnfdoc-subser.
...