プログラム間を標識での受渡方法AS400,iSerise

プログラム間を標識で受け渡す方法(バッチジョブにも受け渡す事も出来ます。）

　　この方法を利用すれば、パラメータが必要無く使用出来る事が出来ます。

　　ＲＰＧでの使用方法

　　　　　　　標識　　Ｕ１〜Ｕ８

　　ＣＬＰでの使用方法

　　　　　　　設定方法　　ＣＨＧＪＯＢ　ＳＷＳ（０１００００００）

　　　　　　　　　　　　　　　　　　　左からＵ１，Ｕ２〜Ｕ８となります。（上記例だとＵ２がオンになります）

　　　　　　　判断方法　　IF (%SWITCH(X10XXXXX)) CALLPRC PROCA

　　　　　　　　　　　　　　  IF (%SWITCH(X00XXXXX)) CALLPRC PROCB

　　　　　　　　　　　　　　　IF (%SWITCH(X0１XXXXX)) CALLPRC PROCＣ

                                        X　:　判断対象外となります。
　

ＨＯＭＥ　　　戻る