CE PLUS - Nota 004400

Módulo: DOC. EXPORTAÇÃO

Funcionalidade: Declaração Despacho Exportação DDE

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

Data/Hora Última Alteração: 04/03/2010 10:49:26

Descrição da Nota: AJUSTE DDE (TOTCOND)_JPY

Sintoma

 

Ao se criar a "DDE", o valor do campo "Total Cond. Vda dos R.E. dos despachos (na moeda neg.)"

"/PWS/ZYCEE120-TOTCOND" fica com a formatação incorreta, já que a moeda é JPY.

 

Solução

 

Ajuste no programa de Declaração de Despacho (/PWS/SAPMZYCE017), realizado um SELECT no subprograma

DATA_SELECT para o valor do campo "PWS/ZYCEE120-TOTCOND", de modo que os valores sejam formatados de

acordo com a moeda usada.

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 04400 Data: 13/08/2007 Hora: 09:47:47

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

 

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

Nota Número              : 04400

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00002

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

Texto Rápido:

AJUSTE DDE (TOTCOND)_JPY

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

Palavras Chave:

NO ATO DA CRIAÇÃO DO DDE O VALOR DO CAMPO "TOTAL COND. VDA DOS R.E. DOS

DESPACHOS (NA MOEDA NEG.)" NÃO É GRAVADO COM A FORMATAÇÃO CORRETA.

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

Objetos da nota:

REPS /PWS/MZYCE107F01

 

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

Modificações efetuadas em REPS /PWS/MZYCE107F01

 

...

  SELECT *

         INTO  /pws/zycee120

         FROM  /pws/zycet120 UP TO 1 ROWS

         WHERE nrseq = /pws/zycee120-nrseq.

  ENDSELECT.

  IF sy-subrc EQ 0.

    IF sy-tcode = c_code_c.

      MESSAGE a001 WITH text-007 /pws/zycee120-nrseqsd.

    ENDIF.

  ENDIF.

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

  SELECT SINGLE WAERS

         FROM /pws/zycet008

         INTO /pws/zycee120-waers

         WHERE nrseq = /pws/zycee120-nrseq.

* << Fim da inclusão

  IF sy-tcode EQ c_code_c.

    PERFORM consiste_inspecao.

    CALL SCREEN '0100'.

  ELSE.

    CALL SCREEN '0100'.

  ENDIF.

ENDFORM.

FORM data_lock USING p_submit TYPE c.

  CHECK sy-tcode = c_code_c OR

        sy-tcode = c_code_a.

...