Es-ims-db-ims-db-cobol-basics
IMS DB-コボル・バシコ
Incluimos DL/I、IMS共通ベースのCOBOLプログラムの共同開発。 DL/I宣言を使用したCOBOLパラグラフアクセラレータの基本的な定義：
- エントラダデクララシオン
- ゴーバックデクララシオン *InstrucciónCall
エントラダデクララシオン
COBOLのDL/I el programaの制御パラメータを制御します。 Esta es la sintaxis de entrada：
ENTRY 'DLITCBL' USING pcb-name1
[pcb-name2]Lafirmaciónanterior es codificada en el* procedimientodivisión* de un programa COBOL。 COBOLのプログラムの入門書の入門書：
- 制御プログラムを実行するためのプログラムを開始します。
- エルDL/Iカルガエルコントロールネセサリオとブロケーズとプログラムのプログラムとコントロール制御とロスプログラミングのアプリカシ。
- DLITCBL意味 DL/I de COBOL 。 La entrada se usa para definir el punto de entrada en el programa。
- COBOLのサブプログラムのプログラムと、プロビジョナンの詳細についてはこちらをご覧ください。 デル・ミスモ・モード、クアンデル・エルDL/Iエル・ダ・エル・コントロール・ア・ラ・アプリカシオン、タンビエン・プロポルシオナ・ラ・ディレクション・アンド・カダPCB定義、およびラジオ・プログラム・ビジョン。
- PCBのアプリケーションは、アプリケーションのプログラムを作成します。プログラムは、COBOLのPCB PCBがアプリケーションのプログラムを常駐します。 El PCB定義、elevador se llama como PCBMáscara*。
- マスカラとPCB PCBの相互関係は、PCB全体のPCBのリストを作成します。 PSBGENで登録されたすべてのコンテンツの登録および登録。
ゴーバックデクララシオン
IMSのプログラムを制御します。 Siguiente es la sintaxis del gobackdeclaración：
GOBACK継続的な列挙の基本原則は次のとおりです。
- プログラムの最後のプログラムを元に戻します。 Devuelve el control al DL/I del programa。
- DETENERを使用するデベモはありません。 Si utilizamos DETENER EJECUTAR、el DL/I nunca tiene la oportunidad de realizar sus funciones de cierre。 Esta es larazónpor la que、en el DL/I programas deaplicación、goback se usa。 *宣言を元に戻せない、DL/Iを使用しないと、アプリケーションの使用を禁止するCOBOLのプログラムをデベロッパーに提供する、コントラリオを使用する、プログラムの標準を使用する
InstrucciónCall
命令は、DL/Iの請求書を使用して、IMSの基本的な操作を実行します。 Esta es la sintaxis de lainstrucción電話：
CALL 'CBLTDLI' USING DLI Function Code
PCB Mask
Segment I/O Area
[Segment Search Arguments]ラシンタクシス前方ムエストラロスパラメトロスケプエデユーティリザーコンラインストルチオンコール。 Analizaremos cada uno de ellos en la siguiente tabla：
| S. No. | Descripción de los parámetros |
|---|---|
| 1 |
DL/I識別機能は実現可能です。 I/Oについて記述された文字列のリストを作成します。 |
| 2 |
Máscara PARA PCB エルPCBの定義PCBマスカラ。 Se utilizan en la entrada。 セレクシオナ、アシニャル、アブリール・オ・セラー・ラス・デクララシオンの息子は必要ありません。 |
| 3 |
Segmento Área de I/O Entrada/salidaáreade trabajo。 DL/Iセグメントのソリシタドを作成します。 |
| 4 |
Segmento Argumentos de Búsqueda エストスの息子は、コンボトーリアの機能性に関するオプションを提供します。 IMSの基本的なバスカーのセグメントを使用します。 |
継続的、継続的な発表：宣言書の提示：
- CBLTDLI de COBOL a DL/I。 プログラムのリンクを編集するためのインターフェイスのリンクを編集します。
- ラマダDL/I、エルILDアルマセナ、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語、スペイン語 El programa puede utilizar estecódigopara determinar si la llamada ha tenidoéxitoo no。
エジェプロ
COBOLのパラメタ、およびCOBOLのチュートリアル、http：//www.finddevguides.com/cobol/index [aquí]。 El ejemplo siguiente muestra la unstructa de un programa COBOL que utiliza base base de datos de IMS y DL/I、se pide。 詳細については、詳細な説明を参照してください。
IDENTIFICATION DIVISION.
PROGRAM-ID. TEST1.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 DLI-FUNCTIONS.
05 DLI-GU PIC X(4) VALUE 'GU '.
05 DLI-GHU PIC X(4) VALUE 'GHU '.
05 DLI-GN PIC X(4) VALUE 'GN '.
05 DLI-GHN PIC X(4) VALUE 'GHN '.
05 DLI-GNP PIC X(4) VALUE 'GNP '.
05 DLI-GHNP PIC X(4) VALUE 'GHNP'.
05 DLI-ISRT PIC X(4) VALUE 'ISRT'.
05 DLI-DLET PIC X(4) VALUE 'DLET'.
05 DLI-REPL PIC X(4) VALUE 'REPL'.
05 DLI-CHKP PIC X(4) VALUE 'CHKP'.
05 DLI-XRST PIC X(4) VALUE 'XRST'.
05 DLI-PCB PIC X(4) VALUE 'PCB '.
01 SEGMENT-I-O-AREA PIC X(150).
LINKAGE SECTION.
01 STUDENT-PCB-MASK.
05 STD-DBD-NAME PIC X(8).
05 STD-SEGMENT-LEVEL PIC XX.
05 STD-STATUS-CODE PIC XX.
05 STD-PROC-OPTIONS PIC X(4).
05 FILLER PIC S9(5) COMP.
05 STD-SEGMENT-NAME PIC X(8).
05 STD-KEY-LENGTH PIC S9(5) COMP.
05 STD-NUMB-SENS-SEGS PIC S9(5) COMP.
05 STD-KEY PIC X(11).
PROCEDURE DIVISION.
ENTRY 'DLITCBL' USING STUDENT-PCB-MASK.
A000-READ-PARA.
110-GET-INVENTORY-SEGMENT.
CALL ‘CBLTDLI’ USING DLI-GN
STUDENT-PCB-MASK
SEGMENT-I-O-AREA.
GOBACK.