topic Re: in interactive reporting in Application Development and Automation Discussions

in interactive reporting

Former Member — Thu, 19 Jul 2007 05:51:32 GMT

to display the 21st secondary list in interactive reorting how to submit the 20th list to the new program using submit keyword

Re: in interactive reporting

Former Member — Thu, 19 Jul 2007 05:53:36 GMT

Check the system variable sy-lsind. If it is equal to 20, use the SUBMIT command to start a new report.

Syntax: SUBMIT <progname> USING <Sel. Screen parameters>

Re: in interactive reporting

Former Member — Thu, 19 Jul 2007 05:54:33 GMT

Hi,

*Submit report but export resultant list to memory, rather than 
*it being displayed on screen
 SUBMIT zreport EXPORTING LIST TO MEMORY.
*  Once report has finished and control has returned to calling 
*  program, use function modules LIST_FROM_MEMORY, WRITE_LIST and 
*  DISPLAY_LIST to retrieve and display report.

*Example Code (Retrieving list from memory)
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

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.

SUBMIT zreport EXPORTING LIST TO MEMORY.

CALL FUNCTION 'LIST_FROM_MEMORY'
  TABLES
    listobject = itab_list
  EXCEPTIONS
    not_found  = 4
    OTHERS     = 8.

CALL FUNCTION 'LIST_TO_ASCI'
  EXPORTING
    list_index         = -1
  TABLES
    listasci           = vlist
    listobject         = itab_list
  EXCEPTIONS
    empty_list         = 1
    list_index_invalid = 2
    OTHERS             = 3.

IF sy-subrc NE '0'.
  WRITE:/ 'LIST_TO_ASCI error !! ', sy-subrc.
ENDIF.

Regards

Sudheer

Re: in interactive reporting

Former Member — Thu, 19 Jul 2007 05:55:59 GMT

IF sy-lsind eq 20.

SUBMIT {rep|(name)} [selscreen_options]

[ list_options ]

[ job_options]

[AND RETURN].

endif.

Regards,

Pavan.