Folgende Syntax wird für das CALL Statement erkannt:
>>-CALL--+-identifier-1--------+--------------------------------> +-literal-1-----------+ +-procedure-pointer-1-+ '-function-pointer-1--' >--+--------------------------------------------------------------------------------------------+--> | .---------------------------------------------------------------------------------. | | | .---------------------------------------------------. | | | V V | | | '-USING----+-+-------------------+----+-+------------+--identifier-2-+-+--------------+-+--+-+-' | '-+----+--REFERENCE-' | '-ADDRESS OF-' |-fixed-phrase-| | | '-BY-' +-file-name-1------------------+ | | '-OMITTED----------------------' | | .---------------------------------------------------. | | V | | +-+----+--CONTENT----+-+------------+--identifier-3-+-+--------------+-+--------+ | '-BY-' | +-ADDRESS OF-+ | |-fixed-phrase-| | | | '-LENGTH OF--' | | | +-literal-2--------------------+ | | '-OMITTED----------------------' | | .----------------------------------. | | V | | '-+----+--VALUE----+-+------------+--identifier-4-+-+---------------------------' '-BY-' | +-ADDRESS OF-+ | | '-LENGTH OF--' | '-literal-3--------------------' >--+-------------------------+--+-----------------------+---+----------+---->< '-RETURNING--identifier-5-' '-| exception-phrases |-' '-END-CALL-' fixed-phrase >-'AS FIXED LENGTH'--integer-4-->< exception-phrases |--+-----------------------------------------------------------------------------+--| +-+-------------------------------------------+--+--------------------------+-+ | '-+----+--EXCEPTION--imperative-statement-1-' '-| not-exception-phrase |-' | | '-ON-' | '-+----+--OVERFLOW--imperative-statement-3------------------------------------' '-ON-' not-exception-phrase |--+------------------------------------------------+-----------| '-NOT--+----+--EXCEPTION--imperative-statement-2-' '-ON-'