Es-cobol-cobol-string-handling

COBOL-マネホデカデナス

アカデミックアカデミアとCOBOLを使用して、アカデミアを操作します。 マネホカデナの継続的な指標

• Inspeccionar
• カデナ
• 紐を外す

Inspeccionar

専門用語の詳細は、アカデナのレプラザールロスカラクテレスでご確認ください。 Cadena de operaciones que se pueden llevar a cabo elalfanumérico、numérico、alfabéticoo valores。 特別な操作は必要ありません。 アカデナ・デ・ラ・シギエンテ・マネラのオペラ

コンプート

カターナデラカクタレスデコンパラオプティコンラオプシオンラカピステレスデラカデナ。

シンタクシス

コンプトゥトオプションのシンタクシスの続き：

INSPECT input-string
TALLYING output-count FOR ALL CHARACTERS

Copy

• Losparámetrosutilizados son los siguientes：*
• カデナ入門：コンタールのカデナ・クヨスのキャラクター。
• サリダ・デ・コンタル：エレクト・デ・ダトス・ケ・セ・バ・ア・セレブレラー・エル・レキュエント・デ・カラクテレス。

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-CNT1 PIC 9(2) VALUE 0.
   01 WS-CNT2 PIC 9(2) VALUE 0.
   01 WS-STRING PIC X(15) VALUE 'ABCDACDADEAAAFF'.

PROCEDURE DIVISION.
   INSPECT WS-STRING TALLYING WS-CNT1 FOR ALL CHARACTERS.
   DISPLAY "WS-CNT1 : "WS-CNT1.
   INSPECT WS-STRING TALLYING WS-CNT2 FOR ALL 'A'.
   DISPLAY "WS-CNT2 : "WS-CNT2

STOP RUN.

Copy

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

Copy

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

Copy

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

WS-CNT1 : 15
WS-CNT2 : 06

Copy

サスティトゥシオン

カステナデラカステリェスの公共施設の利用。

シンタクシス

続きを読むsintituci desustitución：

INSPECT input-string REPLACING ALL char1 BY char2.

Copy

エルメトロユーティリザドエスエルシギエンテ：

アカデナ・デ・カデナ：ラ・カデナ・クヨス・キャラクスト・セ・バン・アンド・カンビア・デ・チャル1

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-STRING PIC X(15) VALUE 'ABCDACDADEAAAFF'.

PROCEDURE DIVISION.
   DISPLAY "OLD STRING : "WS-STRING.
   INSPECT WS-STRING REPLACING ALL 'A' BY 'X'.
   DISPLAY "NEW STRING : "WS-STRING.

STOP RUN.

Copy

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

Copy

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

Copy

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

OLD STRING : ABCDACDADEAAAFF
NEW STRING : XBCDXCDXDEXXXFF

Copy

カデナ

Cadena verbo se utiliza para concatenar las cadenas。 アカデナ大学、アカデミア大学のカデナレス、スペイン語の組み合わせ、カデナデマスナラーガ。 'Delimitado por' lacláusulaes obligatoria。

シンタクシス

La sintaxis siguiente es verbo de cadena：

STRING ws-string1 DELIMITED BY SPACE
   ws-string2 DELIMITED BY SIZE
   INTO ws-destination-string
   WITH POINTER ws-count
   ON OVERFLOW DISPLAY message1
   NOT ON OVERFLOW DISPLAY message2
END-STRING.

Copy

継続的な使用、ロスの詳細な説明：

• WS-cadena1 y ws-cadena2：コントラデナート・センター・デ・エントラーダ
• WS-string：カサデナデサリダ
• WS-：ヌエバカデナコンカテナダの縦横線
• Delimitado especifica el final de la cadena
• Puntero y el desborde Son opcionales

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-STRING PIC A(30).
   01 WS-STR1 PIC A(15) VALUE 'finddevguides'.
   01 WS-STR2 PIC A(7) VALUE 'Welcome'.
   01 WS-STR3 PIC A(7) VALUE 'To AND'.
   01 WS-COUNT PIC 99 VALUE 1.

PROCEDURE DIVISION.
   STRING WS-STR2 DELIMITED BY SIZE
      WS-STR3 DELIMITED BY SPACE
      WS-STR1 DELIMITED BY SIZE
      INTO WS-STRING
      WITH POINTER WS-COUNT
      ON OVERFLOW DISPLAY 'OVERFLOW!'
   END-STRING.

   DISPLAY 'WS-STRING : 'WS-STRING.
   DISPLAY 'WS-COUNT : 'WS-COUNT.

STOP RUN.

Copy

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

Copy

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

Copy

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

WS-STRING : WelcomeTofinddevguides
WS-COUNT : 25

Copy

紐を外す

ストリングを非表示にします。cadena en varias sub-cadenasを使用します。 ラ・クラウスラ・エス・オブリガトリアのデリミタード。

シンタクシス

Unstring verboの継続性の提示：

UNSTRING ws-string DELIMITED BY SPACE
INTO ws-str1, ws-str2
WITH POINTER ws-count
ON OVERFLOW DISPLAY message
NOT ON OVERFLOW DISPLAY message
END-UNSTRING.

Copy

エジェプロ

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-STRING PIC A(30) VALUE 'WELCOME TO finddevguides'.
   01 WS-STR1 PIC A(7).
   01 WS-STR2 PIC A(2).
   01 WS-STR3 PIC A(15).
   01 WS-COUNT PIC 99 VALUE 1.

PROCEDURE DIVISION.
   UNSTRING WS-STRING DELIMITED BY SPACE
      INTO WS-STR1, WS-STR2, WS-STR3
   END-UNSTRING.

   DISPLAY 'WS-STR1 : 'WS-STR1.
   DISPLAY 'WS-STR2 : 'WS-STR2.
   DISPLAY 'WS-STR3 : 'WS-STR3.

STOP RUN.

Copy

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

Copy

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

Copy

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

WS-STR1 : WELCOME
WS-STR2 : TO
WS-STR3 : finddevguides

Copy