CE PLUS - Nota 009283
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 29/10/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 15:31:44
Descrição da Nota: AJUSTE PARA NÃO O OCULTAR BOTÃO DE NOTA FISCAL.
Sintoma
O programa de embarque está ocultando o botão de nota fiscal quando a empresa é estrangeira.
Solução
Ajuste para não ocultar o botão de nota fiscal.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 09283 Data: 29/10/2009 Hora: 13:40:13
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 09283
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 8.0
Pacote : 00001
Agrupamento : 00001
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04422 - 00001 - 7.0 - 00002 - AJUSTES PARA TRATAR AMRICA LATINA
----------------------------------------------------------------------------------------------------
AJUSTE PARA NÃO O OCULTAR BOTÃO DE NOTA FISCAL.
----------------------------------------------------------------------------------------------------
Palavras Chave:
OCULTAR - BOTÃO - NOTA - FISCAL - EMBARQUE - ESTRANGEIRA - EMPRESA
/PWS/SAPMZYCI001
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI001O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI001O01
...
SELECT SINGLE land1 INTO v_land1 FROM t001
WHERE bukrs = /pws/zycie001-bukrs.
IF itab_zycit477[] IS INITIAL.
SELECT * FROM /pws/zycit477
INTO TABLE itab_zycit477
WHERE land EQ v_land1.
ENDIF.
READ TABLE itab_zycit477 WITH KEY land = v_land1.
IF sy-subrc EQ 0 .
* >> Início da exclusão: MODULE STATUS_0050
it_code-fcode = 'NF'.
APPEND it_code.
* << Fim da exclusão
it_code-fcode = 'VINCULA'. APPEND it_code.
it_code-fcode = 'DESVIN'. APPEND it_code.
it_code-fcode = 'VLI'. APPEND it_code.
ENDIF.
IF /pws/zycie001-regime IS INITIAL.
it_code-fcode = 'DA'.
APPEND it_code.
it_code-fcode = 'CUSTO_DA'.
APPEND it_code.
ENDIF.
IF v_land1 NE 'BR' AND
NOT v_land1 IS INITIAL.
* >> Início da exclusão: MODULE STATUS_0050
it_code-fcode = 'NOTA'. APPEND it_code.
* << Fim da exclusão
it_code-fcode = 'DEBIT'. APPEND it_code.
it_code-fcode = 'FACPED'. APPEND it_code.
it_code-fcode = 'CO'. APPEND it_code.
it_code-fcode = 'CACL'. APPEND it_code.
it_code-fcode = 'PB_HELP'. APPEND it_code.
ENDIF.
SET PF-STATUS '0100' EXCLUDING it_code.
EXPORT v_status_s TO MEMORY ID '060'.
IF sy-tcode EQ '/PWS/ZYCI001_C'.
SET TITLEBAR '0100'.
...