Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Wrong page format error in smartform

DurgeshPandey
Explorer

‎2016 Apr 29 6:13 AM

0 Likes
1,185

For single entry sheet printing correctly but while printing for multiple entrysheet it giving error FORM HAS WRONG PAGE FORMAT.

*&---------------------------------------------------------------------*
*& Report  ZML_SERVICE_DRIVER
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ZML_SERVICE_DRIVER.

TYPE-POOLS : SLIS .
TABLES: LFA1,EKKO,ESSR,ESLL,ESKL,ESKN,VBAK.

***for vendor detail
TYPES:BEGIN OF TY_LFA1,
       LIFNR  TYPE LIFNR,
       LAND1  TYPE LAND1,
       NAME1  TYPE LFA1-NAME1,
       NAME2  TYPE LFA1-NAME2,
       NAME3  TYPE LFA1-NAME3,
       NAME4  TYPE LFA1-NAME4,
       ORT01  TYPE LFA1-ORT01,
       ORT02  TYPE LFA1-ORT02,
*      STR_SUPPL1 type lfa1-STR_SUPPL1,
       PFACH  TYPE LFA1-PFACH,
       PSTL2  TYPE LFA1-PSTL2,
       PSTLZ  TYPE LFA1-PSTLZ,
       REGIO  TYPE LFA1-REGIO,
       STRAS  TYPE LFA1-STRAS,
       ANRED  TYPE LFA1-ANRED,
   END OF TY_LFA1.

***  For Contact Person
TYPES: BEGIN OF TY_KNVK,
        PARNR    TYPE PARNR,
        KUNNR    TYPE KUNNR,
        NAMEV_C  TYPE KNVK-NAMEV,
        NAME1_C  TYPE KNVK-NAME1,
        ORT01_C  TYPE KNVK-ORT01,
        TELF1_C  TYPE KNVK-TELF1,
   END OF TY_KNVK.


***    For Delivery Invoice adrees
TYPES: BEGIN OF TY_SADR,
        ADRNR_D   TYPE CADRNR,
        ANRED_D   TYPE SADR-ANRED,
        NAME1_D   TYPE SADR-NAME1,
        NAME2_D   TYPE SADR-NAME2,
        NAME3_D   TYPE SADR-NAME3,
        NAME4_D   TYPE SADR-NAME4,
        ORT01_D   TYPE SADR-ORT01,
        ORT02_D   TYPE SADR-ORT02,
        PFACH_D   TYPE SADR-PFACH,
        PSTL2_D   TYPE SADR-PSTL2,
        PSTLZ_D   TYPE SADR-PSTLZ,
        REGIO_D   TYPE SADR-REGIO,
        STRAS_D   TYPE SADR-STRAS,
        LAND1_D   TYPE SADR-LAND1,
   END OF TY_SADR.
***  Purchasing Doc.

TYPES:BEGIN OF TY_EKKO,
       EBELN  TYPE EBELN,
       BUKRS  TYPE BUKRS,
       BSTYP  TYPE EKKO-BSTYP,
       BSART  TYPE EKKO-BSART,
       AEDAT  TYPE EKKO-AEDAT,
       EKGRP  TYPE EKKO-EKGRP,
       LIFNR  TYPE LIFNR,
       BEDAT  TYPE EKKO-BEDAT,
       ANGDT  TYPE EKKO-ANGDT,
       BNDDT  TYPE EKKO-BNDDT,
       KDATB  TYPE EKKO-KDATB,
       KDATE  TYPE EKKO-KDATE,
   END OF TY_EKKO.

TYPES:BEGIN OF TY_ESKL,
       PACKNO  TYPE PACKNO,
       HPACKNO TYPE PACKNO,
       INTROW  TYPE INTROW,
   END OF TY_ESKL.

TYPES:BEGIN OF TY_ESLL,
       PACKNO   TYPE PACKNO,
       INTROW   TYPE INTROW,
       EXTROW   TYPE EXTROW,
       RANG     TYPE RANG,
       EXTSRVNO TYPE EXTSRVNO,
       MENGE    TYPE MENGEV,
       MEINS    TYPE MEINS,
*     IT_FINAL-WAERS   = ESLL-WAERS.
       BRTWR    TYPE BRTWR,
       NETWR    TYPE NETWR,
       KTEXT1   TYPE KTEXT1,
   END OF TY_ESLL.


*** service entry sheet header data
TYPES:BEGIN OF TY_FINAL,
      LBLNI      TYPE LBLNI,
      LBLNI_P    TYPE P,
      LBLNE      TYPE CHAR16,
      LZBIS      TYPE LZBIS,
      ERNAM      TYPE ERNAM,
      ERDAT      TYPE ERDAT ,
      SBNAMAG    TYPE SBNAMAG,
      SBNAMAN    TYPE SBNAMAN,
      DLORT      TYPE DLORT,
      LBLDT      TYPE LBLDT,
      LZVON      TYPE LZVON,
      PACKNO     TYPE PACKNO,
      KNTTP      TYPE KNTTP,
      TXZ01      TYPE ESSR-TXZ01,
      EBELN      TYPE EBELN,
      EBELP      TYPE EBELP,
      LOEKZ      TYPE ESSR-LOEKZ,
      KZABN      TYPE ESSR-KZABN,
      LIFNR      TYPE LIFNR,
      LAND1      TYPE LAND1,
      NAME1      TYPE LFA1-NAME1,
      NAME2      TYPE LFA1-NAME2,
      NAME3      TYPE LFA1-NAME3,
      NAME4      TYPE LFA1-NAME4,
      ORT01      TYPE LFA1-ORT01,
      ORT02      TYPE LFA1-ORT02,
*     STR_SUPPL1  type lfa1-STR_SUPPL1,
      PFACH      TYPE LFA1-PFACH,
      PSTL2      TYPE LFA1-PSTL2,
      PSTLZ      TYPE LFA1-PSTLZ,
      REGIO      TYPE LFA1-REGIO,
      STRAS      TYPE LFA1-STRAS,
      ANRED      TYPE LFA1-ANRED,
      PARNR      TYPE PARNR,
      KUNNR      TYPE KUNNR,
      NAMEV_C    TYPE KNVK-NAMEV,
      NAME1_C    TYPE KNVK-NAME1,
      ORT01_C    TYPE KNVK-ORT01,
      TELF1_C    TYPE KNVK-TELF1,
      ADRNR_D    TYPE CADRNR,
      ANRED_D    TYPE SADR-ANRED,
      NAME1_D    TYPE SADR-NAME1,
      NAME2_D    TYPE SADR-NAME2,
      NAME3_D    TYPE SADR-NAME3,
      NAME4_D    TYPE SADR-NAME4,
      ORT01_D    TYPE SADR-ORT01,
      ORT02_D    TYPE SADR-ORT02,
      PFACH_D    TYPE SADR-PFACH,
      PSTL2_D    TYPE SADR-PSTL2,
      PSTLZ_D    TYPE SADR-PSTLZ,
      REGIO_D    TYPE SADR-REGIO,
      STRAS_D    TYPE SADR-STRAS,
      LAND1_D    TYPE SADR-LAND1,
      BUKRS      TYPE BUKRS,
      BSTYP      TYPE EKKO-BSTYP,
      BSART      TYPE EKKO-BSART,
      AEDAT      TYPE EKKO-AEDAT,
      EKGRP      TYPE EKKO-EKGRP,
      BEDAT      TYPE EKKO-BEDAT,
      ANGDT      TYPE EKKO-ANGDT,
      BNDDT      TYPE EKKO-BNDDT,
      KDATB      TYPE EKKO-KDATB,
      KDATE      TYPE EKKO-KDATE,
      HPACKNO    TYPE PACKNO,
      INTROW     TYPE NUMZEILE,
      EXTROW     TYPE EXTROW,
      DEL        TYPE DEL,
      WAERS      TYPE WAERS,
      RANG       TYPE RANG,
      EXTSRVNO   TYPE EXTSRVNO,
      MENGE      TYPE MENGEV,
      MEINS      TYPE MEINS,
      BRTWR      TYPE SBRTWR,
      NETWR      TYPE NETWR,
      KTEXT1     TYPE KTEXT1,
      SAKTO      TYPE SAKNR,
      GSBER      TYPE GSBER,
      LV_NUM     TYPE ESKN-PACKNO,
      LWERT      TYPE ESSR-LWERT,
      XBLNR      TYPE ESSR-XBLNR,
      BKTXT      TYPE BKTXT,
      TDLINE     TYPE TDLINE,
      PACK_NO    TYPE PACKNO,
      TBTWR      TYPE ESLL-TBTWR,
      VBELN      TYPE CHAR16,
      VKORG      TYPE VKORG,
      VTEXT      TYPE VTEXT,
      SALES_ORDER TYPE CHAR10,
      SO         TYPE CHAR16,
*     lv_num     type i,
   END OF TY_FINAL.

TYPES:BEGIN OF TY_LINE,
       PACKNO   TYPE PACKNO,
       INTROW   TYPE NUMZEILE,
       RANG     TYPE RANG,
       EXTROW   TYPE EXTROW,
       EXTSRVNO TYPE EXTSRVNO,
       MENGE    TYPE MENGEV,
       MEINS    TYPE MEINS,
       TBTWR    TYPE SBRTWR,
       NETWR    TYPE SNETWR,
       KTEXT1   TYPE KTEXT1,
   END OF TY_LINE.

TYPES:BEGIN OF TY_ESKN,
       PACKNO TYPE PACKNO,
       SAKTO  TYPE SAKNR,
       GSBER  TYPE GSBER,
   END OF TY_ESKN.

TYPES:BEGIN OF TY_VBAK,
       VBELN  TYPE CHAR16,
       VBTYP  TYPE VBAK-VBTYP,
       VKORG  TYPE VBAK-VKORG,
   END OF TY_VBAK.

**Internal table Declaration

DATA: IT_FINAL TYPE STANDARD TABLE OF TY_FINAL WITH HEADER LINE ,
       IT_LFA1  TYPE STANDARD TABLE OF TY_LFA1  WITH HEADER LINE,
       IT_KNVK  TYPE STANDARD TABLE OF TY_KNVK  WITH HEADER LINE,
       IT_EKKO  TYPE STANDARD TABLE OF TY_EKKO  WITH HEADER LINE,
       IT_ESKN  TYPE STANDARD TABLE OF TY_ESKN  WITH HEADER LINE,
       IT_ESKL  TYPE STANDARD TABLE OF TY_ESKL  WITH HEADER LINE,
       IT_VBAK  TYPE STANDARD TABLE OF TY_VBAK  WITH HEADER LINE,
       IT_ESLL  TYPE STANDARD TABLE OF TY_ESLL  WITH HEADER LINE.


DATA : VARIABLEN TYPE MSFO_TAB_VARIABLEN WITH HEADER LINE,
        COUNT TYPE I.
DATA: T_ESLL    LIKE STANDARD TABLE OF ZLINE_ITEM WITH HEADER LINE,
       IT_RESULT TYPE STANDARD TABLE OF ZFINAL_T WITH HEADER LINE..

DATA: FORMEL   TYPE MSFO_FORMEL.
DATA: L_FMNAME TYPE RS38L_FNAM.
DATA: CONTROL  TYPE SSFCTRLOP,
       OUTPUT   TYPE SSFCOMPOP,
       W_BIN_FILESIZE TYPE I, " Binary File Size
       W_FILE_NAME TYPE STRING,
       W_FILE_PATH TYPE STRING,
       W_FULL_PATH TYPE STRING,
       W_OUTOPTIONS TYPE SSFCOMPOP,
       W_CPARAM TYPE SSFCTRLOP.

* Internal table to hold the OTF data
DATA:
T_OTF TYPE ITCOO OCCURS 0 WITH HEADER LINE,

* Internal table to hold OTF data recd from the SMARTFORM
T_OTF_FROM_FM TYPE SSFCRESCL,

* Internal table to hold the data from the FM CONVERT_OTF
T_PDF_TAB LIKE TLINE OCCURS 0 WITH HEADER LINE.


DATA: FM_NAME  TYPE TDSFNAME.
DATA: LT_TLINE  TYPE TABLE OF TLINE."Table line
DATA: LS_TLINE  TYPE TLINE."Table line structure
DATA: LS_PRLINE TYPE TLINE."Previous table line structure
DATA: LV_NAME   TYPE TDOBNAME.
DATA:CONTROL_PARAMETERS  TYPE SSFCTRLOP,
      W_CNT TYPE I,
      W_CNT2 TYPE I,
      VBELN  TYPE VBAK-VBELN.
DATA:LV_INDEX TYPE SY-TABIX.
*****SELECTION SCREEN
SELECT-OPTIONS:S_LBLNI   FOR ESSR-LBLNI,
                S_SBNAM   FOR ESSR-SBNAMAG,
                S_SBNA    FOR ESSR-SBNAMAN,
                S_LBLDT   FOR ESSR-LBLDT,
                S_KZABN   FOR ESSR-KZABN,
                S_EBELN   FOR ESSR-EBELN,
                S_EKORG   FOR EKKO-EKORG,
                S_BSART   FOR EKKO-BSART,
                S_EKGRP   FOR EKKO-EKGRP,
                S_LIFNR   FOR EKKO-LIFNR,
                S_BEDAT   FOR EKKO-BEDAT.

*****Start of selection
*break-point.
SELECT  ESSR~LBLNI
         ESSR~LBLNE
         ESSR~ERNAM
         ESSR~ERDAT
         ESSR~SBNAMAG
         ESSR~SBNAMAN
         ESSR~DLORT
         ESSR~LBLDT
         ESSR~LZVON
         ESSR~LZBIS
         ESSR~PACKNO
         ESSR~TXZ01
         ESSR~EBELN
         ESSR~EBELP
         ESSR~PACKNO
         ESSR~LOEKZ
         ESSR~KZABN
         ESSR~WAERS
         ESSR~LWERT
         ESSR~XBLNR
         ESSR~BKTXT
         ESSR~KNTTP
         EKKO~BUKRS
         EKKO~BSTYP
         EKKO~BSART
         EKKO~AEDAT
         EKKO~LIFNR
         EKKO~BEDAT
         EKKO~BNDDT
         EKKO~KDATB
         EKKO~KDATE
  INTO CORRESPONDING FIELDS OF TABLE IT_FINAL
   FROM     ESSR INNER JOIN EKKO ON EKKO~EBELN = ESSR~EBELN
   WHERE    ESSR~LBLNI     IN   S_LBLNI
   AND      ESSR~SBNAMAG   IN   S_SBNAM
   AND      ESSR~SBNAMAN   IN   S_SBNA
   AND      ESSR~LBLDT     IN   S_LBLDT
   AND      ESSR~KZABN     IN   S_KZABN
   AND      ESSR~EBELN     IN   S_EBELN
   AND      EKKO~EKORG     IN S_EKORG
   AND      EKKO~EKGRP     IN S_EKGRP
   AND      EKKO~LIFNR     IN S_LIFNR
   AND      EKKO~BEDAT     IN S_BEDAT.


SORT IT_FINAL ASCENDING BY LBLNI.
IF IT_FINAL[] IS INITIAL.
   CALL FUNCTION 'POPUP_TO_INFORM'
     EXPORTING
       TITEL  = 'Process Discontinued'
       TXT1   = 'No  Results available for selected criteria'
       TXT2   = 'Try another one'
     EXCEPTIONS
       OTHERS = 1.
   EXIT.
*    SELECT * FROM VBAK INTO CORRESPONDING FIELDS OF TABLE IT_VBAK
*  WHERE VBELN = IT_FINAL-LBLNE.
ENDIF.
*SELECT  VBELN VBTYP VKORG FROM VBAK INTO CORRESPONDING FIELDS OF TABLE IT_VBAK
*   FOR ALL ENTRIES IN IT_FINAL
*     WHERE VBELN EQ IT_FINAL-LBLNE AND VBTYP EQ 'C'.

SELECT LIFNR
         LAND1
         NAME1
         NAME2
         NAME3
         NAME4
         ORT01
         ORT02
*       STR_SUPPL1
         PFACH
         PSTL2
         PSTLZ
         REGIO
         STRAS
         ANRED
   FROM LFA1
     INTO CORRESPONDING FIELDS OF TABLE IT_LFA1
     FOR ALL ENTRIES IN IT_FINAL
     WHERE LIFNR = IT_FINAL-LIFNR.

SELECT  PACKNO HPACKNO INTROW
          FROM ESKL
          INTO CORRESPONDING FIELDS OF TABLE IT_ESKL
          FOR ALL ENTRIES IN IT_FINAL
          WHERE HPACKNO = IT_FINAL-PACKNO.

LOOP AT IT_FINAL .

   READ TABLE IT_LFA1  WITH KEY LIFNR = IT_FINAL-LIFNR.
   IF SY-SUBRC = 0.
     IT_FINAL-LAND1 = IT_LFA1-LAND1.
     IT_FINAL-NAME1 = IT_LFA1-NAME1.
     IT_FINAL-NAME2 = IT_LFA1-NAME2.
     IT_FINAL-NAME3 = IT_LFA1-NAME3.
     IT_FINAL-NAME4 = IT_LFA1-NAME4.
     IT_FINAL-ORT01 = IT_LFA1-ORT01.
     IT_FINAL-ORT02 = IT_LFA1-ORT02.
     IT_FINAL-PFACH = IT_LFA1-PFACH.
     IT_FINAL-PSTL2 = IT_LFA1-PSTL2.
     IT_FINAL-PSTLZ = IT_LFA1-PSTLZ.
     IT_FINAL-REGIO = IT_LFA1-REGIO.
     IT_FINAL-STRAS = IT_LFA1-STRAS.
     IT_FINAL-ANRED = IT_LFA1-ANRED.
   ENDIF.
   READ TABLE IT_ESKL  WITH KEY  HPACKNO = IT_FINAL-PACKNO.
   IF SY-SUBRC = 0.
     IT_FINAL-HPACKNO = IT_ESKL-PACKNO.
     IT_FINAL-INTROW = IT_ESKL-INTROW.
   ENDIF.
   SELECT: SINGLE  SAKTO  GSBER VBELN
           FROM ESKN
           INTO (IT_FINAL-SAKTO ,IT_FINAL-GSBER,IT_FINAL-SALES_ORDER)
           WHERE PACKNO = IT_FINAL-LBLNI.

   SELECT SINGLE  VKORG FROM VBAK INTO (IT_FINAL-VKORG)
     WHERE VBELN EQ IT_FINAL-SALES_ORDER.

   MODIFY IT_FINAL.
*  CLEAR IT_FINAL.
ENDLOOP.


LOOP AT IT_FINAL.
   SELECT: SINGLE VTEXT FROM TVKOT INTO IT_FINAL-VTEXT
     WHERE VKORG = IT_FINAL-VKORG AND SPRAS = 'E'.
   MODIFY IT_FINAL.
ENDLOOP.

SELECT PACKNO INTROW EXTROW  EXTSRVNO  MENGE MEINS TBTWR NETWR KTEXT1 RANG
   FROM ESLL
   INTO CORRESPONDING FIELDS OF TABLE T_ESLL
   FOR ALL ENTRIES IN IT_ESKL
   WHERE PACKNO = IT_ESKL-PACKNO AND INTROW = IT_ESKL-INTROW.


DESCRIBE TABLE IT_FINAL LINES COUNT.


FM_NAME = 'ZML_SERVICE_ENTRY'.
LOOP AT IT_FINAL INTO IT_FINAL.
   IT_RESULT-DLORT   = IT_FINAL-DLORT.
   IT_RESULT-EBELN   = IT_FINAL-EBELN.
   IT_RESULT-LBLNI   = IT_FINAL-LBLNI.
   IT_RESULT-LBLDT   = IT_FINAL-LBLDT.
   IT_RESULT-BEDAT   = IT_FINAL-BEDAT.
   IT_RESULT-EBELP   = IT_FINAL-EBELP.
   IT_RESULT-LIFNR   = IT_FINAL-LIFNR.
   IT_RESULT-TXZ01   = IT_FINAL-TXZ01.
   IT_RESULT-LAND1   = IT_FINAL-LAND1.
   IT_RESULT-NAME1   = IT_FINAL-NAME1.
   IT_RESULT-NAME2   = IT_FINAL-NAME2.
   IT_RESULT-NAME3   = IT_FINAL-NAME3.
   IT_RESULT-NAME4   = IT_FINAL-NAME4.
   IT_RESULT-ORT01   = IT_FINAL-ORT01.
   IT_RESULT-ORT02   = IT_FINAL-ORT02.
   IT_RESULT-PFACH   = IT_FINAL-PFACH.
   IT_RESULT-WAERS   = IT_FINAL-WAERS.
   IT_RESULT-PSTLZ   = IT_FINAL-PSTLZ.
   IT_RESULT-REGIO   = IT_FINAL-REGIO.
   IT_RESULT-STRAS   = IT_FINAL-STRAS.
   IT_RESULT-ANRED   = IT_FINAL-ANRED.
   IT_RESULT-LBLDT   = IT_FINAL-LBLDT.
   IT_FINAL-WAERS    = IT_FINAL-WAERS.
   IT_RESULT-SAKTO   = IT_FINAL-SAKTO.
   IT_RESULT-GSBER   = IT_FINAL-GSBER.
   IT_RESULT-LWERT   = IT_FINAL-LWERT.
   IT_RESULT-MEINS   = IT_FINAL-MEINS.
   IT_RESULT-LBLNE   = IT_FINAL-LBLNE.
   IT_RESULT-LZVON   = IT_FINAL-LZVON.
   IT_RESULT-LZBIS   = IT_FINAL-LZBIS.
   IT_RESULT-XBLNR   = IT_FINAL-XBLNR.
   IT_RESULT-BKTXT   = IT_FINAL-BKTXT.
   IT_RESULT-TDLINE  = IT_FINAL-TDLINE.
   IT_RESULT-PACKNO  = IT_FINAL-PACKNO.
   IT_RESULT-HPACKNO = IT_FINAL-HPACKNO.
   IT_RESULT-LBLNE   = IT_FINAL-LBLNE.
   IT_RESULT-SALES_ORDER = IT_FINAL-SALES_ORDER.
   IT_RESULT-KNTTP   = IT_FINAL-KNTTP.
   IT_RESULT-VTEXT   = IT_FINAL-VTEXT.
   APPEND IT_RESULT.
ENDLOOP.

**break-point.
SORT IT_RESULT ASCENDING BY LBLNI.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
   EXPORTING
     FORMNAME           = 'ZML_SERVICE_ENTRY'
*   VARIANT            = ' '
*   DIRECT_CALL        = ' '
   IMPORTING
     FM_NAME            = L_FMNAME
   EXCEPTIONS
     NO_FORM            = 1
     NO_FUNCTION_MODULE = 2
     OTHERS             = 3.
IF SY-SUBRC <> 0.
   MESSAGE I398(00) WITH 'Error in displaying form output'(004).
ENDIF.

* OUTPUT_OPTIONS
W_OUTOPTIONS-TDDEST = 'LP01'.

DATA:LV_RECORD TYPE I.
LV_RECORD = COUNT.

DESCRIBE TABLE IT_RESULT LINES W_CNT.

LOOP AT IT_RESULT INTO IT_RESULT.

   W_CNT2 = SY-TABIX .
   CASE W_CNT2.
     WHEN 1.
       IF LV_RECORD = 1.
         CONTROL_PARAMETERS-NO_OPEN = SPACE.
         CONTROL_PARAMETERS-NO_CLOSE  = SPACE .
       ELSE.
         CONTROL_PARAMETERS-NO_OPEN = SPACE.
         CONTROL_PARAMETERS-NO_CLOSE  = 'X' .
       ENDIF.

*      control_parameters-no_open   = space.

     WHEN W_CNT .
       CONTROL_PARAMETERS-NO_OPEN   = 'X' .
       CONTROL_PARAMETERS-NO_CLOSE  = SPACE .
     WHEN OTHERS.
       CONTROL_PARAMETERS-NO_OPEN   = 'X' .
       CONTROL_PARAMETERS-NO_CLOSE  = 'X' .
   ENDCASE.
   CALL FUNCTION L_FMNAME
     EXPORTING
       CONTROL_PARAMETERS = CONTROL_PARAMETERS
*     OUTPUT_OPTIONS     = W_OUTOPTIONS
*     itab_select        = s_lblni
*     LBLNI_LOW          = S_LBLNI-LOW
*     LBLNI_HIGH         = S_LBLNI-HIGH
*     LBLDT_FR           = S_LBLDT-LOW
*     LBLDT_TO           = S_LBLDT-HIGH
*     SBNAM_LOW          = S_SBNAM-LOW
*     SBNAM_HIGH         = S_SBNAM-HIGH
*     SBNA_LOW           = S_SBNA-LOW
*     SBNA_HIGH          = S_SBNA-HIGH
*     KZABN_LOW          = S_KZABN-LOW
*     KZABN_HIGH         = S_KZABN-HIGH
*     EBELN_LOW          = S_EBELN-LOW
*     EBELN_HIGH         = S_EBELN-HIGH
*     EKORG_LOW          = S_EKORG-LOW
*     EKORG_HIGH         = S_EKORG-HIGH
*     BSART_LOW          = S_BSART-LOW
*     BSART_HIGH         = S_BSART-HIGH
*     EKGRP_LOW          = S_EKGRP-LOW
*     EKGRP_HIGH         = S_EKGRP-HIGH
*     LIFNR_LOW          = S_LIFNR-LOW
*     LIFNR_HIGH         = S_LIFNR-HIGH
     TABLES
       IT_RESULT          = IT_RESULT
       IT_LINE            = T_ESLL
*     itab_select        = s_lblni
*     s_lblni            = s_lblni
     EXCEPTIONS
       FORMATTING_ERROR   = 1
       INTERNAL_ERROR     = 2
       SEND_ERROR         = 3
       USER_CANCELED      = 4
       OTHERS             = 5.
   IF SY-SUBRC <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO.
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
   ENDIF.

*CALL FUNCTION 'SSFCOMP_CLOSE'.
ENDLOOP.

*CALL FUNCTION 'SSF_CLOSE'
**   IMPORTING
**     JOB_OUTPUT_INFO        =
*    EXCEPTIONS
*      FORMATTING_ERROR       = 1
*      INTERNAL_ERROR         = 2
*      SEND_ERROR             = 3
*      OTHERS                 = 4.
*
*IF SY-SUBRC <> 0.
**   error handling
*  MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*          WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
*ENDIF.

zml_service_entry.xml
2 REPLIES 2
Read only

former_member196331
Active Contributor

‎2016 Apr 29 6:23 AM

0 Likes
805

Please check it , Are u calling any page or next page as other page. in this scenario please check it.

Read only

DurgeshPandey
Explorer
In response to former_member196331

‎2016 Apr 29 6:38 AM

0 Likes
805

Command is used if line item exceeded more than 12 then it will display on page2.Printing correctly for single entry sheet no having any no.of pages.