Folgende Syntax wird für das SUBTRACT Statement erkannt:
.------------------.
V |
>>-SUBTRACT----+-identifier-1-+-+--FROM------------------------->
'-literal-1----'
.---------------------------.
V |
>----identifier-2--+---------+-+-------------------------------->
'-ROUNDED-'
>--+--------------------------------------------+--------------->
'-+----+--SIZE ERROR--imperative-statement-1-'
'-ON-'
>--+-------------------------------------------------+---------->
'-NOT--+----+--SIZE ERROR--imperative-statement-2-'
'-ON-'
>--+--------------+--------------------------------------------><
'-END-SUBTRACT-'
<html><hr/></html>
.------------------.
V |
>>-SUBTRACT----+-identifier-1-+-+--FROM--+-identifier-2-+------->
'-literal-1----' '-literal-2----'
.---------------------------.
V |
>--GIVING----identifier-3--+---------+-+------------------------>
'-ROUNDED-'
>--+--------------------------------------------+--------------->
'-+----+--SIZE ERROR--imperative-statement-1-'
'-ON-'
>--+-------------------------------------------------+---------->
'-NOT--+----+--SIZE ERROR--imperative-statement-2-'
'-ON-'
>--+--------------+--------------------------------------------><
'-END-SUBTRACT-'
<html><hr/></html>
>>-SUBTRACT--+-CORRESPONDING-+--identifier-1--FROM-------------->
'-CORR----------'
>--identifier-2--+---------+------------------------------------>
'-ROUNDED-'
>--+--------------------------------------------+--------------->
'-+----+--SIZE ERROR--imperative-statement-1-'
'-ON-'
>--+-------------------------------------------------+---------->
'-NOT--+----+--SIZE ERROR--imperative-statement-2-'
'-ON-'
>--+--------------+--------------------------------------------><
'-END-SUBTRACT-'