7.123.3 TRANSFER の使用例

例1:デフォルトの次ファンクションに制御を渡します。情報は交換されません。
TRANSFER  
例2:INPUTというファンクションに制御を渡します。情報は交換されません。
TRANSFER  TOFUNCTION(INPUT)  
例3:INPUTというファンクションに制御を渡します。INPUTファンクションとの間で、フィールド#CUSTNO、#BATCH、および#USERの値を交換します。
TRANSFER  TOFUNCTION(INPUT) EXCHANGE(#CUSTNO #BATCH #USER)  
例4:WEBROUTINE ORDERに制御を渡します。
TRANSFER      TOROUTINE(ORDER)  
ORDER WEBROUTINEでFOR(*INPUT)に指定されたすべてのフィールドおよびリストの値が渡されます。
例5:ORDERS WAM内のWEBROUTINE ORDERに制御を渡します。
TRANSFER      TOROUTINE(#ORDERS.ORDER)  
ORDER WEBROUTINEでFOR(*INPUT)に指定されたすべてのフィールドおよびリストの値が渡されます。
例6:フィールドから、制御を渡す先のWEBROUTINEの名前を指定します。
#WEBRTN := 'ORDERS.ORDER' TRANSFER      TOROUTINE(*EVALUATE #WEBRTN)