on 07-23-2013 8:39 PM
Boa tarde
A nota acima é referente devoluções de transferência entre centros e está ligada a nota 1787313 referente o ajuste SINEF para conteúdo importado.
Alguém conseguiu aplicar a nota com sucesso?
Tentamos aqui e acusa erro "Nota não contém instruções de correção válidas"
Obrigado
Luiz
Luiz, conseguiu aplicar a nota 1875160 com sucesso? Acabei de aplicar mas não compilou o objeto LJ1BNTF1.. analisando a instrução de correção deste objeto, percebi que falta o ENDFORM no final do código inserido pela SAP.
Esta é a intrução.. repare que não finaliza..
*&---------------------------------------------------------------------*
*& FORM set_po_matorg
*&---------------------------------------------------------------------*
* Selects PO item data using as reference:
* the reference material document or the reference Nota Fiscal.
*----------------------------------------------------------------------*
FORM set_po_matorg "1875160
USING "1875160
uv_mblnr TYPE mseg-mblnr "1875160
uv_zeile TYPE mseg-zeile "1875160
uv_mjahr TYPE mseg-mjahr "1875160
uv_docref TYPE j_1bnflin-docref "1875160
uv_itmnum TYPE j_1bnflin-itmnum "1875160
CHANGING "1875160
cs_my_ekpo TYPE ekpo. "1875160
DATA: lv_ebeln TYPE mseg-ebeln, "1875160
lv_refkey TYPE j_1bnflin-refkey, "1875160
lv_mjahr TYPE mseg-mjahr, "1875160
lv_mblnr TYPE mseg-mblnr, "1875160
lv_ebelp TYPE mseg-ebelp. "1875160
* Outgoing return STO Nota Fiscal(MBRL), "1875160
* uses material document as reference "1875160
IF NOT uv_mblnr IS INITIAL. "1875160
SELECT SINGLE ebeln FROM mseg "1875160
INTO lv_ebeln "1875160
WHERE mblnr = uv_mblnr "1875160
AND zeile = uv_zeile "1875160
AND mjahr = uv_mjahr. "1875160
lv_ebelp = uv_zeile. "1875160
* Incoming return STO Nota Fiscal(MBSU), "1875160
* uses incoming NF as reference "1875160
ELSEIF NOT uv_docref IS INITIAL. "1875160
SELECT SINGLE refkey FROM j_1bnflin "1875160
INTO lv_refkey "1875160
WHERE docnum = uv_docref "1875160
AND itmnum = uv_itmnum. "1875160
lv_mblnr = lv_refkey(10). "1875160
lv_mjahr = lv_refkey+10(4). "1875160
SELECT SINGLE ebeln FROM mseg "1875160
INTO lv_ebeln "1875160
WHERE mblnr = lv_mblnr "1875160
AND zeile = uv_zeile "1875160
AND mjahr = lv_mjahr. "1875160
lv_ebelp = uv_itmnum. "1875160
ENDIF. "1875160
CALL FUNCTION 'ME_EKPO_SINGLE_READ' "1875160
EXPORTING "1875160
pi_ebeln = lv_ebeln "1875160
pi_ebelp = lv_ebelp "1875160
IMPORTING "1875160
po_ekpo = cs_my_ekpo "1875160
EXCEPTIONS "1875160
OTHERS = 2. "1875160
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
108 | |
12 | |
11 | |
6 | |
5 | |
4 | |
3 | |
3 | |
3 | |
3 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.