Es-cobol-cobol-loop-statements

COBOL-Bucleの宣言

ヘイ・アルグナス・タレアス・ケ・セ・デベン・リアライザー・ウナ・イ・オトラ・ベベズ・コモラ・レクチュチュラ・カダ・ウウノ・デ・ロス・レジストス・デ・アン・アーキボ・ハスタ・エル・ファイナル。 COBOLの息子のエル・ビークレ宣言：

• Realizar através
• ハスタ
• Realizar veces
• Realizar diferentes

Realizar através

公共交通機関の交通機関の実習は、セキュエンシアでのパラフォポルクエルエルプライムの基礎です。 デスプエルデエジェキュータルエルウルティモパーラフォセドゥエルブエルコントロール。

EnlíneaRealice

リアル宣言と実権を握ったカボ・ハスタ・デラ・デ・ラ・リアリス。

シンタクシス

EnLíneaのシンタクシスの続き：

PERFORM
   DISPLAY 'HELLO WORLD'
END-PERFORM.

Fuera delíneaRealice

スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、英語

シンタクシス

続きを読む

PERFORM PARAGRAPH1 THRU PARAGRAPH2

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

PROCEDURE DIVISION.
   A-PARA.
   PERFORM DISPLAY 'IN A-PARA'
   END-PERFORM.
   PERFORM C-PARA THRU E-PARA.

   B-PARA.
   DISPLAY 'IN B-PARA'.
   STOP RUN.

   C-PARA.
   DISPLAY 'IN C-PARA'.

   D-PARA.
   DISPLAY 'IN D-PARA'.

   E-PARA.
   DISPLAY 'IN E-PARA'.

*JCL* プログラムのCOBOLに似ています。

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO

プログラムの作成と編集、結果の生成：

IN A-PARA
IN C-PARA
IN D-PARA
IN E-PARA
IN B-PARA

ハスタ

現実的なハスタ」、海の状態のハシダラクダの条件 前もって決定された条件のコンラプルエバは、インストラクシオンとアンパルラフォの前に決定されました。

シンタクシス

継続的な現実性を促進するための手段：

PERFORM A-PARA UNTIL COUNT=5

PERFORM A-PARA WITH TEST BEFORE UNTIL COUNT=5

PERFORM A-PARA WITH TEST AFTER UNTIL COUNT=5

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-CNT PIC 9(1) VALUE 0.

PROCEDURE DIVISION.
   A-PARA.
   PERFORM B-PARA WITH TEST AFTER UNTIL WS-CNT>3.
   STOP RUN.

   B-PARA.
   DISPLAY 'WS-CNT : 'WS-CNT.
   ADD 1 TO WS-CNT.

*JCL* プログラムのCOBOLに似ています。

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO

プログラムの作成と編集、結果の生成：

WS-CNT : 0
WS-CNT : 1
WS-CNT : 2
WS-CNT : 3

Realizar veces

「現実の時代」では、パラソルセラエジェクタドエルヌメロデベセスエスペシャリド。

シンタクシス

現実のシンタクシスの続き：

PERFORM A-PARA 5 TIMES.

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

PROCEDURE DIVISION.
   A-PARA.
   PERFORM B-PARA 3 TIMES.
   STOP RUN.

   B-PARA.
   DISPLAY 'IN B-PARA'.

*JCL* COBOLプログラムの例：

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO

プログラムの作成と編集、結果の生成：

IN B-PARA
IN B-PARA
IN B-PARA

Realizar diferentes

さまざまな方法で、あなたは、スペイン語と英語の両方の言語を使用できます。

シンタクシス

さまざまな状況に対応するシンタクシスの続き：

PERFORM A-PARA VARYING A FROM 1 BY 1 UNTIL A=5.

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-A PIC 9 VALUE 0.

PROCEDURE DIVISION.
   A-PARA.
   PERFORM B-PARA VARYING WS-A FROM 1 BY 1 UNTIL WS-A=5
   STOP RUN.

   B-PARA.
   DISPLAY 'IN B-PARA ' WS-A.

*JCL* COBOLプログラムの例：

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO

プログラムの作成と編集、結果の生成：

IN B-PARA 1
IN B-PARA 2
IN B-PARA 3
IN B-PARA 4

IR ADeclaración

IRプログラムの宣言書の使用を宣言します。 ダイアローグIRの詳細異議を申し立てます。 サラフォ・デ・パラ・サル ロス・ディフェレンテスIR

*IR A Incondicional*

GO TO para-name.

• IR A条件付き*

GO TO para-1 para-2 para-3 DEPENDING ON x.

Si "x" es igual a 1、連続、el controlserátrasladado al primerpárrafoy si "x" es igual a 2、entonces el control se transfiere en el segundopárrafo、yasísucesivamente。

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-A PIC 9 VALUE 2.

PROCEDURE DIVISION.
   A-PARA.
   DISPLAY 'IN A-PARA'
   GO TO B-PARA.

   B-PARA.
   DISPLAY 'IN B-PARA '.
   GO TO C-PARA D-PARA DEPENDING ON WS-A.

   C-PARA.
   DISPLAY 'IN C-PARA '.

   D-PARA.
   DISPLAY 'IN D-PARA '.
   STOP RUN.

*JCL* COBOLプログラムの例：

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO

プログラムの作成と編集、結果の生成：

IN A-PARA
IN B-PARA
IN D-PARA