/:IF condition
..
ELSE
..
/:ENDIF
CASE ... ENDCASE
It si similar to multiple
IF.. ENDIF's but is much cleaner.
/:CASE condition
/:WHEN value1
...
/:WHEN value2
...
...
/:ENDCASE
TIME/DATE/COUNTRY Formats
These commands are used for specifying
the format of date and
time and setting the default country.
/:SET DATE MASK = 'MM.DD.YYYY'
/:SET TIME MASK = 'HH:MM'
/:SET COUNTRY 'DN'
PERFORM ... IN PROGRAM .... USING.. CHANGING ..
ENDPERFORM
To call ABAP subroutines from within
a form we use the
PERFORM... IN PROGRAM ... statement , the
advantage of
using it is that the print program is
not required to cahnge and we
can get the new data from the subroutine which
is placed in a Z
report . To pass and get the values from th
subroutine the
parameters are passed which are of type
structure ITCSY.
e.g. /:PERFORM get_date IN PROGRAM zreport
/:USING &SALESORDER&
/:CHANGING
&S_DATE&
/:ENDPERFORM
The date &S_DATE& ....
The ABAP Code would be
REPORT zreport.
TABLES ztab.
FORM get_date TABLES in_tab STRUCTURE
ITCSY out_tab
STRUCTURE ITCSY .
READ TABLE in_tab INDEX 1.
SELECT some_date FROM ztab WHERE salesorder
= in_tab-value.
IF sy-subrc EQ 0.
READ TABLE out-tab INDEX 1.
MOVE ztab-somedate TO out_tab-value
MODIFY out_tab INDEX 1.
ENDIF.
ENDFORM.
In the above code USING is
used to pass the value to the
subroutine while changing is used to recieve
the value from th
subroutine ,for further paramters we
can use either USING or
CHANGING .
In the subroutine the type of paramter
is always an internal table of
type ITCSY irrespective of
the value passed.The VALUE field
of the internal table is used to fill and
recieve the values .