Problem with a SUBMIT exporting results to memory

Former Member · ‎2007 Oct 26

Hello.

Edit 30/10/2007

I'am having some difficulties launching the report for S_ALR_87013611 through a submit.

I want to know if it's possible to launch the report without opening it in SAP. All the results stored in Memory so i can retrieve it with my main program.
I have tried the option EXPORTING LIST TO MEMORY AND RETURN, but still, it opens the report as an excel sheet.
Is there a way to disable this opening ???

More details below

1- When i execute my program, it opens à popup to enable or disable macros in excel and the it opens the results of the report in a excel sheet SAP.

What i want is to disable the popup and the opening of the sheet. I want to store the results in the memory and then retrieve what i need.

Here are some screenshots :

2- After closing the sheet, my program continues processing. I'm trying to read the data in memory but the sy-subrs is different from 0. I don't understand why.

Thanks for the help if anybody as any idea on how i can resolve this.

Sample of code :


DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



KOKRE  EQ p_kokrs           
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



GJAHR   EQ p_gjhar             
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



PERIV    EQ '1'
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



PERIB    EQ '9'
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



VERP     EQ '0'
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



KOSET   EQ 'GFGGNX'
         WITH 
DATA  BEGIN OF itab_list OCCURS 0.
        INCLUDE STRUCTURE abaplist.
DATA  END OF itab_list.

******** ......... ******

  IF sy-mandt EQ '030'.
    SUBMIT GP4QLQKH46VZJ3P1A40A23S3HJG030
         WITH $1KOKRE  EQ p_kokrs           
         WITH $1GJAHR   EQ p_gjhar             
         WITH $1PERIV    EQ '1'
         WITH $1PERIB    EQ '9'
         WITH $1VERP     EQ '0'
         WITH $1KOSET   EQ 'GFGGNX'
         WITH $1KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.



KSTAR    EQ 'NCPR'
         EXPORTING LIST TO MEMORY
         AND RETURN.
  ENDIF.

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

  IF sy-subrc NE '0'.
    WRITE:/ 'Erreur de lecture LIST_FROM_MEMORY',
             sy-subrc.
  ENDIF.


  REFRESH vlist.

  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:/ 'Erreur reprise memory LIST_TO_ASCI. ',
            sy-subrc.
  ENDIF.

Message was edited by: Helder

Helder Da Costa

Former Member · ‎2007 Oct 26

I forgot the screens :

<a href="http://http://img142.imageshack.us/img142/48/popupcx4.jpg">Pop up macros</a>

<a href="http://http://img524.imageshack.us/img524/6339/submitresultsik3.jpg">Submit results as a sheet</a>

Former Member · ‎2007 Oct 30

Hi,

You are calling a Query using your program.

There must be default output set as the excel sheet in the query through SQ01.

Go to SQ01 and check that.

Regards,

Atish

Former Member · ‎2007 Oct 30

Hi.

In fact it's not a query, it's a report automaticly generated. How, i don't know.

The report informations header is like this :

*----------------------------------------------------------------------*
*         Executable for report group 1SIP                             *
*----------------------------------------------------------------------*
*         report group   : 1SIP Centres: Réel/P-bdgt/Ecart             *
*         program class  : RW_EXECUTION                                *
*         program version: 00000001                                    *
*         client         : 030                                         *
*----------------------------------------------------------------------*
*         user      :  PIL03                                           *
*         date      :  18.07.04                                        *
*         time      :  10:03.24                                        *
*         release   :  620                                             *
*----------------------------------------------------------------------*

The program for S_ALR_87013611 is generated (Report painter) with a name like : GP4QLQKH46VZJ3P1A40A23S3HJG and they add the client (in my example 030)

Message was edited by:

Helder Da Costa

Former Member · ‎2007 Oct 30

Hi,

It must be a query.

Most of the S_ALR_* are queries. Just check what is the t-code assigned to it and go to SE93 you will get the query details for this.

Regards,

Atish

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

Problem with a SUBMIT exporting results to memory