Prime Institute

Avalados por :

Recuperação de Lote no SAP: Guia de Implementação e Requisitos

Crear
  • Creado 01/03/2024
  • Modificado 01/03/2024
  • 6 Vistas
0
Cargando...

(Design atual)

Lote recuperado de LIPS-CHARG

Lote do fornecedor recuperado de LIPS-LICHN

(Se não houver registro em LIPS, será impresso em branco para ambos os campos)

REQUISITO:

Lote recuperado de LIPS-CHARG

Lote do fornecedor recuperado de LIPS-LICHN apenas se LIPS-LICHN não estiver em branco.

Se LIPS-LICHN estiver em branco, o lote do fornecedor é recuperado de LIPS-CHARG.

(Se não houver registro em LIPS, será impresso em branco para ambos os campos. Se tanto LIPS-CHARG quanto LIPS-LICHN estiverem em branco, será impresso em branco para ambos os campos)

t-lips é a tabela interna:

DATA: BEGIN OF t_lips OCCURS 0,

vbeln LIKE lips-vbeln, "Número do documento de entrega

posnr LIKE lips-posnr, "Número do item para documento de entrega

charg LIKE lips-charg, "Número do lote

lichn LIKE lips-lichn, "Número do lote do fornecedor

END OF t_lips.

Abaixo está o trecho de código:

&----

*& Form f_collect_final

&----

  • Rotina para coletar todos os dados de exibição na tabela interna final

  • t_display.

----

FORM f_collect_final.

DATA: l_std_pac_no LIKE eket-menge,

l_std_pac_no_out(13) TYPE p,

l_tot_std_pt(13) TYPE c,

l_rmdr(13) TYPE n,

l_qtnt(13) TYPE n,

l_tabix TYPE i.

LOOP AT t_eket.

t_display-ebeln = t_eket-ebeln.

t_display-ebelp = t_eket-ebelp.

t_display-etens = t_eket-etens.

t_display-eindt = t_eket-eindt.

t_display-menge = t_eket-menge.

t_display-meins = t_eket-meins.

t_display-matnr = t_eket-matnr.

        1. mod begin CR1591

  • t_display-maktx = t_eket-maktx.

READ TABLE t_makt WITH KEY matnr = t_eket-matnr

BINARY SEARCH.

SAP ABAP
Pedro Pascal
Se unió el 07/03/2018
Responder
Pinterest
Telegram
Linkedin
Whatsapp

2 Respuestas

0
Cargando...

Olá,

Encontre a modificação abaixo, considere o texto em negrito e remova o antigo:

LEIA A TABELA t_lips COM A CHAVE vbeln = t_eket-vbeln

posnr = t_eket-vbelp

PESQUISA BINÁRIA.

l_tabix = sy-tabix.

SE sy-subrc = 0.

<b>se t_lips-lichn EQ espaço E

t_lips-charg NE espaço.

t_display-charg = t_lips-charg.

t_display-lichn = t_lips-charg.

endif.</b>

<i>t_display-charg = t_lips-charg.(Acredito que este é o local para mudar).

t_display-lichn = t_lips-charg.</i>ENDIF.

Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
Agregar
0
Cargando...

Olá,

teste isso. (em vez de não..inicial .....use um espaço)

SE sy-subrc = 0.

t_display-charg = t_lips-charg.

SE t_lips-lichn não é espaço.

t_display-lichn = t_lips-lichn.

SENÃO.

t_display-lichn = t_lips-charg.

FIM-SE.

FIM-SE.

Obrigado.

Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
Agregar

Partners:

Libro de reclamaciones Libro de reclamaciones

contacto@primeinstitute.com

(+51) 1641 9379
(+57) 1489 6964

© 2024 Copyright. Todos los derechos reservados.

Desarrollado por Prime Institute

¡Hola! Soy Diana, asesora académica de Prime Institute, indícame en que curso estas interesado, saludos!
Hola ¿Puedo ayudarte?