Submit results with two spool request

Question

Hi
I using the following submit code in my abap program.
CALL FUNCTION 'GET_PRINT_PARAMETERS'
EXPORTING
*  DESTINATION           = 'LOCL'
LIST_NAME             = 'TEST'
LIST_TEXT             = 'SUBMIT ... TO SAP-SPOOL'
IMMEDIATELY           = ' '
LINE_SIZE              = 1023
NO_DIALOG             = 'X'
IMPORTING OUT_PARAMETERS        = PARAMS
VALID                 = VALID.
SUBMIT (pgnam) USING SELECTION-SET vrint
TO SAP-SPOOL WITHOUT SPOOL DYNPRO
SPOOL PARAMETERS PARAMS AND RETURN.
This is working fine in my development system. But when i test this in testing server (QAS) it returns two spool one with 0 pages and second one with correct output. Can anyone help me with this?
points will be rewarded for useful answers.
thanks

Answer 1

REPORT demo NO STANDARD PAGE HEADING.
DATA: spfli_wa TYPE spfli,
      sflight_wa TYPE sflight.
DATA: print_parameters TYPE pri_params,
      valid_flag       TYPE c LENGTH 1.
START-OF-SELECTION.
  CALL FUNCTION 'GET_PRINT_PARAMETERS'
    IMPORTING
      out_parameters       = print_parameters
      valid                = valid_flag
    EXCEPTIONS
      invalid_print_params = 2
      OTHERS               = 4.
  IF valid_flag = 'X' AND sy-subrc = 0.
    SELECT carrid connid
           FROM spfli
           INTO CORRESPONDING FIELDS OF spfli_wa.
      WRITE: / spfli_wa-carrid, spfli_wa-connid.
      HIDE:    spfli_wa-carrid, spfli_wa-connid.
    ENDSELECT.
  ELSE.
  ENDIF.
AT LINE-SELECTION.
  NEW-PAGE PRINT ON PARAMETERS print_parameters
                    NO DIALOG.
  SELECT *
         FROM sflight
         INTO sflight_wa
         WHERE carrid = spfli_wa-carrid AND
               connid = spfli_wa-connid.
    WRITE: / sflight_wa-carrid, sflight_wa-connid,
             sflight_wa-fldate ...
  ENDSELECT.
  NEW-PAGE PRINT OFF.