Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 15/09/2010 00:00:00
Data/Hora Última Alteração: 14/06/2012 10:38:33
Descrição da Nota: CRIADO TRATAMENTO PARA EMBARQUE DE CONSIGNAÇÃO.
Sintoma
Necessário tratamento tratamento diferenciado para embarque com modalidade de consignação.
Solução
Criado tratamento para embarque de consignação.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10605 Data: 15/09/2010 Hora: 14:23:57
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10605
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00004
Agrupamento : 00037
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04974 - 00001 - 7.0 - 00003 - TEXTOS DOCUMENTO CONTÁBIL GERADO NA MIGO
05561 - 00002 - 7.0 - 00004 - REMOÇÃO DE CODIGO FIXO NO PROGRAMA PARA PRCESSOS DE CARVÃO
09764 - 00003 - 8.0 - 00002 - EMBARQUE REGIME 12 NA DI NÃO ALTERA O REGIME TRIBUTÁRIO
10212 - 00004 - 8.0 - 00003 - O VALOR DOS IMPOSTOS ESTÁ ERRADO PARA PROCESSOS DE ADMISSÃO TEMPO
10535 - 00005 - 8.0 - 00004 - TRATAMENTO DE ADMISSÃO TEMPORÁRIA E CONSUMO NO EMBARQUE
----------------------------------------------------------------------------------------------------
CRIADO TRATAMENTO PARA EMBARQUE DE CONSIGNAÇÃO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
CONSIGNAÇÃO - MODALIDADE 05 - EMBARQUE.
----------------------------------------------------------------------------------------------------
Objetos da nota:
TABD /PWS/ZYCIT507
TABD /PWS/ZYCIT478
REPS /PWS/MZYCI017X01
REPS /PWS/MZYCI017F01
REPS /PWS/MZYCI023F01
REPS /PWS/MZYCI023F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT478
*Acrescentar campo ao final da tabela
Nome campo Chv Elem.dados Tab.verif. N CtDt Comp. Grupo
MANDT MANDT CLNT 3
LIFNR LIFNR CHAR 10
OP_ICMS /PWS/ZYCIL855 CHAR 1
PERCENT /PWS/ZYGLD568 DEC 6
*<<Inicio Inclusao
ALIQICMS J_1BTXRATE DEC 6
*<<Fim Inclusao
*Gerar a visão de atualização da tabela novamente.
----------------------------------------------------------------------------------------------------
*Criar a tabela de parâmetro /PWS/ZYCIT507
MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCIT507
DESCRIÇÃO BREVE: CI - Parâmetro Lancto.Recebimento X Modalidade
CARACTERÍSTICAS
CATEGORIA DA TABELA: tabela transparente
CLASSE DE ENTREGA: A Tabela de aplicação (dados mestre e de movimento)
(X) - ATUALIZAÇÃO DE TABELAS PERMITIDA
CAMPOS NOVOS
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
MANDT MANDT X X t000
MODALIDADE /PWS/ZYCIL278 X X t156
TP_MOVTO BWART
OPÇÕES TÉCNICAS
TIPO DE DADOS: APPL2 Organização e customizing
CATEGOR. TAMANHO: 0 Registros dados esperados: 0 Até 10.000
(X) - AR. BUFFER ATIVADO
*Criar visão de tabela
MODIFICAR VISÃO DA TABELA /PWS/ZYCIT507
INDICAÇÕES TÉCNICAS PARA DIÁLOGO
GRUPO DE AUTORIZAÇÃO: ZYCE
OBJETO AUTORIZAÇÃO: S_TABU_DIS
GRUPO DE FUNÇÕES: /PWS/ZYCIGF1
CL. DESENVOLVIMENTO: /PWS/ZYCI
TELAS DE ATUALIZAÇÃO
CTG. ATUALIZAÇÃO: (X) - NÍVEL ÚNICO
(_) - 2 NÍVEIS
Nº TELA AUTORIZAÇÃO: TELA SÍNTESE: 507
TELA INDIVIDUAL: 0
INDICAÇÕES PARA TRASNPORTE DE DADOS DE DIÁLOGO
ROTINA DE REGISTRO: (_) - ROTINA REG. STANDARD
(X) - ROTINA REG. INDIVIDUAL
*Criar transação para tabela /PWS/ZYCIT507
CÓDIGO DE TRANSAÇÃO: /PWS/ZYCIT507
ATRIBUTOS DA TRANSAÇÃO
TEXTO BREVE: CI - Parâmetro Lancto.Recebimento X Modalidade
OBJETO DE EXECUÇÃO
(X) - TRANSAÇÃO C/ PARÂMETROS (TRANSAÇÃO DE PARÂMETROS)
TEXTO DA TRANSAÇÃO: CI - Parâmetro Lancto.Recebimento X Modalidade
VALOR PROPOSTO PARA
(X) - TRANSAÇÃO SM30 (x) - OMITIR 1ºTELA
CLASSIFICAÇÃO DE TRANSAÇÃO:
(x) - TRANSAÇÃO PROFESSIONAL USER
CAPACIDADE GUI:
(X) SAP GUI PARA HTML
(X) SAP GUI PARA JAVA
(X) SAP GUI PARA WINDOWS
VALORES PROPOSTOS
NOME DO CAMPO DA TELA VALOR
VIEWNAME /PWS/ZYCIT507
UPDATE X
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017X01
...
TABLES /pws/zycit504.
* >> Início da inclusão:
TABLES /pws/zycit507.
* << Fim da inclusão
DATA: BEGIN OF COMMON PART a.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...
v_sgtxt = v_sgtxt.
IF NOT v_xblnr IS INITIAL.
itab_zycie033-lfsnr = v_xblnr.
ENDIF.
IF NOT v_sgtxt IS INITIAL.
itab_zycie033-sgtxt = v_sgtxt.
ENDIF.
itab_zycie033-bktxt = wa_nf-nfnum.
IF NOT wa_nf-bwartwe IS INITIAL.
itab_zycie033-bwartwe = wa_nf-bwartwe.
* >> Início da inclusão: FORM FILL_DATE_MB01
else.
SELECT SINGLE tp_movto
FROM /pws/zycit507
INTO itab_zycie033-bwartwe
WHERE modalidade = /pws/zycit001-modalidade .
* << Fim da inclusão
ENDIF.
IF t001-land1 = 'AR' OR t001-land1 ='CL'.
itab_zycie033-bwartwe = '101'.
ENDIF.
IF v_existe_nfr NE 'S'.
itab_zycie033-bukrs = /pws/zycie043-bukrs.
ELSE.
itab_zycie033-bukrs = /pws/zycie041-bukrs.
ENDIF.
APPEND itab_zycie033.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
ENDIF.
IF itab_it-codregtri IS INITIAL.
itab_it-codregtri = /pws/zycie100a-codregtri = '1'.
ENDIF.
IF /pws/zycie100a-codregtriipi IS INITIAL.
/pws/zycie100a-codregtriipi = '3'.
ENDIF.
IF sy-tcode = '/PWS/ZYCI023_C'.
* >> Início da exclusão: FORM LOAD_DATA_BLITEM
IF itab_zycit001-regime = '05' .
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_DATA_BLITEM
IF itab_zycit001-regime = '05' OR
( itab_zycit001-regime = '12'
AND itab_it-adm_temp = 'X' ) OR
itab_zycit001-modalidade = '06' .
* << Fim da inclusão
itab_it-codregtri = '5'.
itab_it-codregtripiscofi = '5'.
itab_it-codregtriipi = '5'.
itab_it-codregtriicms = '5'.
ENDIF.
ENDIF.
MOVE itab_it TO wa_it.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
ENDIF.
ENDIF.
ELSE.
LOOP AT it_words_app.
ittxt2-line = it_words_app-word.
APPEND ittxt2.
ENDLOOP.
ENDIF.
ENDLOOP.
* >> Início da inclusão: FORM FILL_TEXT_COMPL
IF itab_zycit001-modalidade EQ '06'.
ittxt2-line = text-287. APPEND ittxt2.
ittxt2-line = text-288. APPEND ittxt2.
ENDIF.
* << Fim da inclusão
MOVE: ittxt2[] TO ittxt1[].
...