Write the PBO sub-programme

We will first see the PBO sub-program for both screens.

PBO modules are used for initializing variables, assigning the pf-statuses and titlebars for dynpros, and other screen processing to be done before the screen is displayed and re-displayed. 

            Include MZTRYO01 

Module status_0100.

Clear : ztryemp, ztrydept, ztryrate, ztrytxn, v_date.

Set pf-status ‘STAT_100’.

Set titlebar ‘100’.

Endmodule.

Module status_0200 output.

If not v_emp_exist is initial.

  Set pf-status ‘STAT_200’ excluding c_save.

  Set titlebar ‘200’.

  Loop at screen.

  If screen-group1 eq ‘GR1’.

    Screen-active = c_0.

    Modify screen.

  Endif.

 Endloop.

Else.

  Set pf-status ‘STAT_0200’.

  Loop at screen.

  If screen-group2 eq ‘GR2’.

    Screen-active = c_0.

    Modify screen.

   Endif.

  Endloop.

 Endif.

Move v_empno to ztryemp-empno.

Endmodule.

Double click on the pf-status and the titlebar to create the respective objects.

Note that the pushbuttons have been assigned groups to enable/disable them depending on certain conditions. 

We will now see the PAI sub-program for both screens.