Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Prestação de Contas
Data/Hora da Publicação: 18/12/2008 00:00:00
Data/Hora Última Alteração: 09/03/2010 16:17:32
Descrição da Nota: UTILIZA TIPO DE CONTA INCORRETO NO BATCH INPUT DA F-51
Sintoma
Erro no batch input da F-51. Não encotra partidas do documento da F-43.
Solução
Corrigida chave de seleção da tabela /pws/zycbt011
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07812 Data: 18/12/2008 Hora: 13:18:04
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07812
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00007
Agrupamento : 00079
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
UTILIZA TIPO DE CONTA INCORRETO NO BATCH INPUT DA F-51
----------------------------------------------------------------------------------------------------
Palavras Chave:
BATCH - INPUT - F-51 - TIPO - CONTA
/PWS/SAPMZYCI007
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI007F01
REPS /PWS/MZYCI007F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI007F01
...
FREE : it_tab_aux.
ENDFORM.
FORM select_parametros.
SELECT SINGLE * FROM /pws/zycbt007
WHERE bukrs EQ /pws/zycie026-bukrs.
IF sy-subrc NE 0.
MESSAGE e120.
ENDIF.
SELECT SINGLE * FROM /pws/zycbt011 INTO wa_zycbt011
WHERE codeven = text-010
* >> Início da inclusão: FORM SELECT_PARAMETROS
AND bukrs EQ /pws/zycie026-bukrs
* << Fim da inclusão
AND codmod = text-009.
SELECT * FROM /pws/zycbt012 INTO TABLE it_zycbt012
WHERE codeven = text-010
AND codmod = text-009.
SELECT * FROM /pws/zycbt013 INTO TABLE it_zycbt013
WHERE tabela = text-012.
SELECT * FROM /pws/zycbt133 INTO TABLE it_zycbt133
WHERE bukrs = text-022
AND codmod = text-009.
SELECT SINGLE * FROM j_1bbranch
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI007F02
...
ENDIF.
SELECT docfat
FROM /pws/zycit026
INTO TABLE itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
dtlanc >= v_data AND
status EQ 'A'. "#EC CI_NOFIELD
IF NOT itab_doc[] IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt011 INTO wa_zycbt011
WHERE codeven = text-010
* >> Início da inclusão: FORM EXISTE_PS
AND bukrs EQ /pws/zycie026-bukrs
* << Fim da inclusão
AND codmod = text-009.
SELECT *
FROM bkpf
INTO TABLE itab_bkpf
FOR ALL ENTRIES IN itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
blart EQ wa_zycbt011-blart AND
tcode EQ 'FB01' AND
stgrd EQ ' ' AND
monat EQ /pws/zycie026-dtlanc+04(02) AND
...
...
ENDIF.
SELECT docfat
FROM /pws/zycit026
INTO TABLE itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
dtlanc >= v_data AND
status EQ 'A'. "#EC CI_NOFIELD
IF NOT itab_doc[] IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt011 INTO wa_zycbt011
WHERE codeven = text-010
* >> Início da inclusão: FORM EXISTE_CS
AND bukrs EQ /pws/zycie026-bukrs
* << Fim da inclusão
AND codmod = text-009.
SELECT *
FROM bkpf
INTO TABLE itab_bkpf
FOR ALL ENTRIES IN itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
blart EQ wa_zycbt011-blart AND
tcode EQ 'FB01' AND
stgrd EQ ' ' AND
monat EQ /pws/zycie026-dtlanc+04(02) AND
...
...
ENDIF.
SELECT docfat
FROM /pws/zycit026
INTO TABLE itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
dtlanc >= v_data AND
status EQ 'A'. "#EC CI_NOFIELD
IF NOT itab_doc[] IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt011 INTO wa_zycbt011
WHERE codeven = text-010
* >> Início da inclusão: FORM EXISTE_CF
AND bukrs EQ /pws/zycie026-bukrs
* << Fim da inclusão
AND codmod = text-009.
SELECT *
FROM bkpf
INTO TABLE itab_bkpf
FOR ALL ENTRIES IN itab_doc
WHERE bukrs EQ /pws/zycie026-bukrs AND
blart EQ wa_zycbt011-blart AND
tcode EQ 'FB01' AND
stgrd EQ ' ' AND
monat EQ /pws/zycie026-dtlanc+04(02) AND
...