Re: Problem in Enabling the Standard toolbar of Secondary list

hello sir

Actually i have just set the PF Status and put a Back Button to it through  menu painter.

here's the code as-

SELECT-OPTIONS: S_EBELN FOR EKKO-EBELN.


  INITIALIZATION.


START-OF-SELECTION.


LOOP AT it_EKKO INTO wa_EKKO.
   WRITE :      /5     wa_FINAL-EBELN,
                 20    wa_FINAL-LOEKZ,
                 30    wa_FINAL-STATU,
                 40    wa_FINAL-AEDAT,
                 60    wa_FINAL-TXZ01,
                 110   wa_FINAL-MATNR,
                 125   wa_FINAL-EMATN,
                 135   wa_FINAL-BUKRS,
                 145   wa_FINAL-WERKS,
                 155   wa_FINAL-LGORT,
                 165   wa_FINAL-BEDNR.
   HIDE wa_EKKO-EBELN.
ENDLOOP.



CALL FUNCTION 'Z_KK_MODULE'
   TABLES
     IT_EKPO       = it_FINAL[]
     S_EBELN       = s_ebeln
           .












   IF SY-SUBRC = 0.


         WRITE: /5     'EBELN',
                 20    'LOEKZ',
                 30    'STATU',
                 40    'AEDAT',
                 60    'TXZ01',
                 110   'MATNR',
                 125   'EMATN',
                 135   'BUKRS',
                 145   'WERKS',
                 155   'LGORT',
                 165   'BEDNR'.


   LOOP AT it_FINAL INTO wa_FINAL.



         WRITE: /5     wa_FINAL-EBELN,
                 20    wa_FINAL-LOEKZ,
                 30    wa_FINAL-STATU,
                 40    wa_FINAL-AEDAT,
                 60    wa_FINAL-TXZ01,
                 110   wa_FINAL-MATNR,
                 125   wa_FINAL-EMATN,
                 135   wa_FINAL-BUKRS,
                 145   wa_FINAL-WERKS,
                 155   wa_FINAL-LGORT,
                 165   wa_FINAL-BEDNR.
        CLEAR wa_FINAL.
        ENDLOOP.
      ENDIF.
   AT LINE-SELECTION.
   SET PF-STATUS 'STATUS'.


   CASE sy-lsind.
     WHEN 1.
       IF it_FINAL[] IS NOT INITIAL.
         GET CURSOR FIELD fnam VALUE var.




     WRITE : /5    'EBELN',
              20   'MATKL',
              30   'INFNR',
              45   'NETPR',
              80   'NETWR',
              105  'BRTWR',
              120  'SPINF',
              130  'PRSDR',
              140  'PRDAT',
              155  'EFFWR'.

     ULINE.
     ENDIF.




  LOOP AT it_FINAL INTO wa_FINAL WHERE EBELN = var.
   WRITE:   /5     wa_FINAL-EBELN,
             20    wa_FINAL-MATKL,
             30    wa_FINAL-INFNR,
             40    wa_FINAL-NETPR,
             70    wa_FINAL-NETWR,
             100   wa_FINAL-BRTWR,
             120   wa_FINAL-SPINF,
             130   wa_FINAL-PRSDR,
             140   wa_FINAL-PRDAT,
             150   wa_FINAL-EFFWR.




    ENDLOOP.
    ENDCASE.

help.

Thanks

Regards

karan