CE PLUS - Nota 012062
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 23/03/2012 00:00:00
Data/Hora Última Alteração: 03/04/2012 10:17:20
Descrição da Nota: NÃO VERIFICA LOTE AUTOMÁTICO AO FAZER A MIGO
Sintoma
Não verifica lote automático ao fazer a MIGO
Solução
Atualizado programa para verificar outra tabela na geração de lote automático devido à alleterações
no SAP STANDARD 6.0
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12062 Data: 23/03/2012 Hora: 16:31:37
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12062
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00011
Agrupamento : 00108
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11703 - 00001 - 8.0 - 00009 - PROGRAMA ESTÁ SOLICITANDO PREENCHIMENTO DO LOTE INDEVIDAMENTE.
----------------------------------------------------------------------------------------------------
NÃO VERIFICA LOTE AUTOMÁTICO AO FAZER A MIGO
----------------------------------------------------------------------------------------------------
Palavras Chave:
LOTE AUTOMÁTICO - MIGO - ERRO BATCH INPUT.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI017F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...
FORM executa_batch_input.
* >> Início da inclusão: FORM EXECUTA_BATCH_INPUT
TYPES: BEGIN OF ty_select,
line TYPE fieldname,
END OF ty_select.
DATA: t_campos TYPE TABLE OF ty_select WITH HEADER LINE,
t_tables TYPE TABLE OF ty_select WITH HEADER LINE.
* << Fim da inclusão
...
IF wa_nf-belnr_mr1m IS INITIAL AND
wa_nf-mblnr_mb01 IS INITIAL AND
wa_nf-belnr_f_51 IS INITIAL AND
wa_nf-belnr_f_02 IS INITIAL.
CLEAR: v_sair.
SELECT SINGLE * FROM /pws/zycit321.
* >> Início da inclusão: FORM EXECUTA_BATCH_INPUT
SELECT SINGLE * FROM dd03l
WHERE tabname = 'TCUBN'
AND fieldname = 'AUTBN' .
IF sy-subrc NE 0.
* << Fim da inclusão
SELECT SINGLE autbn FROM tcuch INTO v_autbn.
* >> Início da inclusão: FORM EXECUTA_BATCH_INPUT
ELSE.
t_campos-line = 'AUTBN' .
append t_campos .
t_tables-line = 'TCUBN'.
SELECT (t_campos)
INTO v_autbn
FROM (t_tables-line).
ENDSELECT.
ENDIF.
* << Fim da inclusão
REFRESH: itab_zycit223.
...