:) hola amigos de foro, tengo un gran problema con la sentencia SUBMIT ... estoy intentando ejecutar el programa de la transaccion MC.9 pero no me regresa ningun valor alguien sabra porque .. de antemano les agradesco la ayuda que puedan darme ..
saludos !!
REPORT ZSUBMIT2 LINE-SIZE 185 LINE-COUNT 63 NO STANDARD PAGE HEADING.
tables : S031.
DATA: ABAPLIST LIKE ABAPLIST OCCURS 0.
DATA: BEGIN OF vlist OCCURS 0,
filler1(01) TYPE c,
field1(06) TYPE c,
filler(08) TYPE c,
field2(10) TYPE c,
filler3(01) TYPE c,
field3(10) TYPE c,
filler4(01) TYPE c,
field4(3) TYPE c,
filler5(02) TYPE c,
field5(15) TYPE c,
filler6(02) TYPE c,
field6(30) TYPE c,
filler7(43) TYPE c,
field7(10) TYPE c,
END OF vlist.
select-options: sl_werks for s031-werks.
select-options: sl_lgort for s031-lgort.
SUBMIT RMCB0300 EXPORTING LIST TO MEMORY and return
WITH SL_WERKS in sl_werks "Plant
WITH SL_LGORT in sl_lgort "Storage Location
WITH VA EQ 'X' .
* recover YVREE025 report and display
CALL FUNCTION 'LIST_FROM_MEMORY'
TABLES
LISTOBJECT = ABAPLIST
EXCEPTIONS
NOT_FOUND = 1
OTHERS = 2.
*CALL FUNCTION 'LIST_TO_ASCI'
* EXPORTING
* list_index = -1
* TABLES
* listasci = vlist
* listobject = ABAPLIST
* EXCEPTIONS
* empty_list = 1
* list_index_invalid = 2
* OTHERS = 3.
*
**if sy-batch = space.
CALL FUNCTION 'DISPLAY_LIST'
EXPORTING
FULLSCREEN = 'X'
* CALLER_HANDLES_EVENTS =
IMPORTING
USER_COMMAND = SY-UCOMM
TABLES
LISTOBJECT = ABAPLIST
EXCEPTIONS
EMPTY_LIST = 1
OTHERS = 2.
Hola,
No se me ocurren muchas cosas, pero intenta probar este otro SUBMIT.
SUBMIT RMCB0300 EXPORTING LIST TO MEMORY and return
WITH sl_werks BETWEEN sl_werks-low AND sl_werks-high
WITH sl_lgort BETWEEN sl_lgort-low AND sl_lgort-high.
Nos comentas que tal fue o si ya lo solucionaste... ¿como lo hiciste?
Saludos.
gracias amigo por responder ..... ya probe lo que me hiciste favor de enviarme .. pero nada .. sigue igual .... la verdad ya no se que hacer ... alguna otra opcion?
mira lo que necesito es tomar el resultado de esta transaccion parea poderlo manipular desde mi programa ...
saludos !!