SAP Tutorials Blog

 


TABLES: pa0002, pa0001.


PARAMETERS: pernr type pa0002-pernr,

            perdet AS CHECKBOX DEFAULT 'X',

            orgdet AS CHECKBOX .

CASE perdet.

  WHEN 'X'.

    WRITE: 'Employee details' color 3.

    ULINE.

    SELECT * FROM pa0002 where pernr eq pernr .

      WRITE: / pa0002-pernr, pa0002-vorna, pa0002-nachn, pa0002-gbdat, pa0002-natio.

    ENDSELECT.

  WHEN ' '.

    WRITE: 'You have not selected employee details' color 6.

endcase.

uline.

case orgdet.

  WHEN 'X'.

    WRITE: 'Org details' color 3.

    ULINE.

    SELECT * FROM pa0001 where pernr eq pernr  .

      WRITE: / pa0001-pernr, pa0001-bukrs, pa0001-werks, pa0001-persg, pa0001-persk.

    ENDSELECT.

 WHEN ' '.

    WRITE: 'You have not selected org details' color 6.

 endcase.

uline.

if ( ( perdet = 'X' ) and ( orgdet eq 'X') ).

WRITE: 'You have selected selected both Employee and org details' color 7.

endif.

uline.


Serkan AKKAVAK

Computer Engineer BSc

SAP Department Manager

Contact : serkurumsal@yandex.com