Printing issue of report output list display

Question

Dear All,
I need to print the report output display list. So, for this I have used the following code. But it's not printing.
Will you please check the below code and kindly let me where should I change/modify in the code.
START-OF-SELECTION.
  SET PF-STATUS 'ZGUI_STATUS1'.
END-OF-SELECTION.
AT USER-COMMAND.
  CASE sy-ucomm.
    WHEN 'PRNT'.
     DATA: l_params TYPE pri_params,
           l_valid TYPE c,
           l_arc_params TYPE arc_params.
     CALL FUNCTION 'GET_PRINT_PARAMETERS'
       EXPORTING
         destination            = l_v_usr01-spld
         copies                 = 1
         list_name              = 'TEST'
         list_text              = 'Test NEW-PAGE PRINT ON'
         immediately            = 'X'
         line_size              = 220
         release                = 'X'
         mode                   = 'CURRENT'
         no_dialog              = 'X'
       IMPORTING
         out_archive_parameters = l_arc_params
         out_parameters         = l_params
         valid                  = l_valid
       EXCEPTIONS
         archive_info_not_found = 1
         invalid_print_params   = 2
         invalid_archive_params = 3
         OTHERS                 = 4.
NEW-PAGE PRINT ON PARAMETERS l_params ARCHIVE PARAMETERS
                          l_arc_params NO DIALOG.
      PERFORM display_data.
      NEW-PAGE PRINT OFF.
  ENDCASE.
Many Thanks,
Ranjan

Answer 1

Dear Amit,
The font size is not increasing, in-fact, if I use the code like the below, it's not even printing, I am checking different ways,
DATA: lay   TYPE pri_params-paart,
      lines TYPE pri_params-linct,
      rows  TYPE pri_params-linsz.
AT USER-COMMAND.
  CASE sy-ucomm.
    WHEN 'PRNT'.
      lay = 'X_60_85'.
      lines = 60.
      rows  = 85.
      DATA: l_params TYPE pri_params,
            l_valid TYPE c,
            l_arc_params TYPE arc_params.
      CALL FUNCTION 'GET_PRINT_PARAMETERS'
        EXPORTING
         destination            = l_v_usr01-spld
          destination            = 'LPIN'
          copies                 = 1
          list_name              = 'TEST'
          list_text              = 'Test NEW-PAGE PRINT ON'
          immediately            = 'X'
          layout                 = lay
          line_count             = lines
          line_size              = rows
         line_size              = 220
          release                = 'X'
          mode                   = 'CURRENT'
          no_dialog              = 'X'
        IMPORTING
         out_archive_parameters = l_arc_params
          out_parameters         = l_params
          valid                  = l_valid
        EXCEPTIONS
          archive_info_not_found = 1
          invalid_print_params   = 2
          invalid_archive_params = 3
          OTHERS                 = 4.
      NEW-PAGE PRINT ON   PARAMETERS l_params NO DIALOG.
      PERFORM display_data.
      NEW-PAGE PRINT OFF.
  ENDCASE.
Kindly let me know if you have some new answer?
Kind Regards,
Ranjan