CE PLUS - Nota 002049
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 05/09/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:08:27
Descrição da Nota: NA DI POR FORA,A MOEDA PROPOSTA NA PASTA DESPESA É A IGUAL A DO EMBARQUE
Sintoma
Ao criar a DI pelo Menu, a moeda proposta na pasta despesa é a moeda do embarque, e deveria carregar
BRL. Se criar a DI pelo embarque este erro não ocorre.
Solução
Selecionar a tabela de parâmetros gerais (/PWS/ZYCBT007) ao entrar no programa.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02049 Data: 05/09/2006 Hora: 11:35:59
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02049
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00129
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NA DI POR FORA,A MOEDA PROPOSTA NA PASTA DESPESA É A IGUAL A DO EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI POR FORA - MENU - MOEDA - PASTA DESPESA - PARÂMETROS GERAIS
/PWS/ZYCBT007
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
REPS /PWS/MZYCI023O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
WHERE nrseq EQ /pws/zycie085-nrseqdi.
IF sy-subrc NE 0.
PERFORM find_region.
SELECT SINGLE * FROM t001w INTO wa_t001w
WHERE werks EQ s_local.
* >> Início da inclusão: FORM FILL_DESP
IF wa_zycbt007 IS INITIAL and not
/pws/zycie085-bukrs is initial.
SELECT SINGLE * FROM /pws/zycbt007 INTO wa_zycbt007
WHERE bukrs EQ /pws/zycie085-bukrs.
ENDIF.
* << Fim da inclusão
SELECT SINGLE land1 FROM t001 INTO t001-land1
WHERE bukrs EQ /pws/zycie085-bukrs.
SELECT * FROM /pws/zycit020
INTO TABLE itab_zycit020
WHERE regio = v_region AND
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023O01
...
ENDMODULE.
MODULE status_0050 OUTPUT.
DATA: v_nrseq LIKE /pws/zycit094-nrseq,
v_nrseqce LIKE /pws/zycit093-nrseqce.
IF sy-tcode EQ '/PWS/ZYCI023_C'.
* >> Início da inclusão: MODULE STATUS_0050
SET PARAMETER ID 'FWS' FIELD ' ' .
* << Fim da inclusão
v_textstat = text-057.
ENDIF.
IF gc_subscreen-prog NE '0200'.
IF v_acto = 'A'.
SET PF-STATUS '0100' EXCLUDING it_statu4.
...