CE PLUS - Nota 004319

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Recebimento

Data/Hora da Publicação: 01/08/2007 00:00:00

Data/Hora Última Alteração: 09/03/2010 10:15:52

Descrição da Nota: QUANDO FAZEMOS RECEBIMENTO DE NF REMESSA, LEVA DATA DA NF GLOBAL.

Sintoma

 

No embarque foram emitidas 108 notas fiscais de remessa, a revisão de faturas da primeira nota ficou

com a data de emissão 23/07/07 conforme consta na mesma, porém na revisão das demais o sistema

buscou a data 20/07/07 que é a data de emissão da nota fiscal global.

 

Solução

 

ajustar seleção de data.

Versões Tratadas

7.0

Informações Complementares

 

----------------------------------------------------------------------------------------------------

Nota Número 04319 Data: 01/08/2007 Hora: 11:33:04

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 04319

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00002

Agrupamento              : 00006

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

----------------------------------------------------------------------------------------------------

QUANDO FAZEMOS RECEBIMENTO DE NF REMESSA, LEVA DATA DA NF GLOBAL.

----------------------------------------------------------------------------------------------------

Palavras Chave:

RECEBIMENTO - NOTA FISCAL GLOBAL - REMESSA - DATA DE REVISÃO DE FATURA

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI017F01

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI017F01

 

...

  IF v_resposta NE 'S'.

    EXIT.

  ENDIF.

  READ TABLE itab_zycit003 INDEX 1.

  v_bktxt =  /pws/zycbt007-bktxt.

  itab_zycie033-mandt = sy-mandt.

  itab_zycie033-tcode = 'MIRO'.

  itab_zycie033-tabela = 'WA_NF'.

  IF v_existe_nfr NE 'S'.

    v_chave = wa_nf-nfglobal.

* >> Início da inclusão: FORM FILL_DATE_MR1M

    SELECT SINGLE * FROM j_1bnfdoc

           WHERE docnum EQ /pws/zycie041-docnum.

* << Fim da inclusão

  ELSE.

    v_chave = wa_nf-nfremessa.

* >> Início da exclusão: FORM FILL_DATE_MR1M

  ENDIF.

  itab_zycie033-cpochv  = v_chave.

  IF /pws/zycie041-docnum IS INITIAL.

* << Fim da exclusão

    SELECT SINGLE * FROM j_1bnfdoc

           WHERE docnum EQ /pws/zycie043-docnum.

* >> Início da exclusão: FORM FILL_DATE_MR1M

  ELSE.

    SELECT SINGLE * FROM j_1bnfdoc

           WHERE docnum EQ /pws/zycie041-docnum.

* << Fim da exclusão

  ENDIF.

* >> Início da inclusão: FORM FILL_DATE_MR1M

  itab_zycie033-cpochv  = v_chave.

* << Fim da inclusão

  IF /pws/zycie001-modalidade EQ '99'

  OR t001-land1 EQ 'AR' OR t001-land1 EQ 'CL'.

    itab_zycie033-bldat = sy-datlo.

  ELSE.

    itab_zycie033-bldat   = j_1bnfdoc-docdat.

  ENDIF.

...