Initialize TABLE-ONE Replacing Numeric Data By 3 National Data By N"X" REPLACING NUMERIC句は、浮動小数点データ項目も初期化します。 INITIALIZEステートメントのREPLACING句を同様に使用して、テーブル内の基本データ項目ALPHABETIC、DBCS、ALPHANUMERIC-EDITED、NATIONAL-EDITED、およびNUMERIC-EDITEDのすべ...
DIVIDE SAMPL1 BY SAMPL2 GIVING SAMPL3 REMAINDER SAMPL4 INITIALIZE 命令用 INITIALIZE 进行集団項目的初期化。複数項目初期化时、項目分行写、开始位置对齐。- 35 - GO TO 命令 GO TO 命令原則上禁止使用。只有在 SECTION 内省略一部分后续处理等情况下程序流程仍很明确时才可使用。返回前面的 GOTO 命令(循环...
要对内部变量初始化,例: INITIALIZE WK-UPDATETIME. △ 子程序的退出 子程序的退出用EXIT PROGRAM语句。例: WSL0001-RTN SECTION. *---初期処理 PERFORM INIT-RTN. *---主処理 PERFORM MAIN-RTN. *---終了処理 PERFORM END-RTN. WSL0001-EXT. EXIT PROGRAM. 中的EXIT PROGRAM. 也可用GOBACK语句。●...
ゾーンおよびパック数字データの省略時の正符号として16進数のCが使用されます。これは,VALUE文節の結果の他にMOVE, ADD, SUBTRACT, MULTIPLY, DIVIDE, COMPUTE,およびINITIALIZEステートメントのすべての結果に適用されます。 *NOEVENTF クライアント・ツールで使用するイベント・ファイルを作...
これは,VALUE文節の結果の他にMOVE, ADD, SUBTRACT, MULTIPLY, DIVIDE, COMPUTE,およびINITIALIZEステートメントのすべての結果に適用されます。 *NOEVENTF クライアント・ツールで使用するイベント・ファイルを作成しません。クライアント・ツールは,統合エラー・フィードバックを提供す...