Bonjour à tous,
j'essaye d'effectuer un emballage automatique en ABAP, avec comme variable d'entrée le numéro de bon de livraison, l'article et la quantité.
J'utilise la fonction ci-dessous (peut-être qu'elle n'est pas adapté ? ) et j'ai toujours le message que je n'ai pas de poste à emballer...
Pouvez-vous m'aider SVP ?
Merci d'avance.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31 DATA : LF_DATA_CHANGED TYPE XFELD, LT_MESSAGES TYPE HUITEM_MESSAGES_T, xfeld TYPE XFELD. DATA :BEGIN OF LT_KOMPV OCCURS 0. INCLUDE STRUCTURE KOMPV. DATA :END OF LT_KOMPV. DATA :BEGIN OF ls_mess. INCLUDE STRUCTURE HUITEM_MESSAGES. DATA :END OF ls_mess. DATA : lf_act_sessions LIKE SM04DIC-COUNTER, lf_max_sessions LIKE SM04DIC-COUNTER. LT_KOMPV-POBJKEY = '0083037986'. " Numéro du bon de livraison LT_KOMPV-POBJPOS = '000010'. "Position LT_KOMPV-VELIN = '1'. APPEND LT_KOMPV. CALL FUNCTION 'V51P_PACKING_DETERMINATION' EXPORTING IF_CALL = 'D' IT_KOMPV = LT_KOMPV[] IMPORTING ET_MESSAGES = LT_MESSAGES EXCEPTIONS PACKINSTRUCTION = 01 OTHERS = 99.
Dav
Partager