PERFORM dynpro format

Using BDC for HR.

Code Snippet

PERFORM dynpro USING 'X' 'SAPMP50A' '1000'.

FORM dynpro USING pa_dynbegin
pa_name
pa_value.

IF pa_dynbegin = 'X'.
CLEAR ta_bdcdata.
MOVE: pa_name TO ta_bdcdata-program,
pa_value TO ta_bdcdata-dynpro,
'X' TO ta_bdcdata-dynbegin.
APPEND ta_bdcdata.
ELSE.
CLEAR ta_bdcdata.
MOVE: pa_name TO ta_bdcdata-fnam,
pa_value TO ta_bdcdata-fval.
* CONDENSE ta_bdcdata-fval no-gaps.
APPEND ta_bdcdata.
ENDIF.

ENDFORM.