IMS DB - DL/I Funciones

Función DL/I es el primer parámetro que se utiliza en un DL/I. Esta función indica qué operación se va a realizar en la base de datos de IMS el IMS DL/I. La sintaxis de DL/I es función de la siguiente manera:

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 '.

Esta sintaxis representa los siguientes puntos clave:

Para este parámetro, podemos proporcionar cualquier nombre de cuatro caracteres como un campo de almacenamiento para almacenar el código de función.
DL/I parámetro de la función está codificada en la sección de almacenamiento de trabajo el programa COBOL.
Para especificar la función DL/I, el programador tiene que código en uno de los 05 nombres de datos nivel como DLI-GU en un DL/I llamada, desde COBOL no permite al código los literales en una instrucción CALL.
DL/I las funciones se dividen en tres categorías: obtener, actualizar y otras funciones. Analicemos cada uno de ellos en detalle.

Funciones Get

Consiga las funciones son similares a la operación de lectura compatible con cualquier lenguaje de programación. Función que se utiliza para obtener segmentos de IMS bases de datos DL/I. Las siguientes funciones Get se usa en IMS DB:

Obtener único
Obtener siguiente
Obtener siguiente dentro de padres
Conseguir única
Se celebrará el próximo
Se celebrará el próximo de padres

Consideremos la siguiente estructura de la IMS DB para comprender el DL/I llamadas de función:

Obtener único

'GU' se usa el código de la función única. Que funciona de forma similar a la lectura aleatoria declaración en COBOL. Que se utiliza para obtener un segmento particular ocurrencia basado en los valores de campo. Los valores de campo puede proporcionarse mediante segmento argumentos de búsqueda. La sintaxis de un GU llamada es la siguiente:

CALL 'CBLTDLI' USING DLI-GU
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Si se ejecuta la instrucción call, proporcionando valores adecuados para todos los parámetros en el programa COBOL, puede recuperar el segmento en el segmento área de I/O de la base de datos. En el ejemplo anterior, si se proporcionan los valores de campo de biblioteca, revistas, y de la Salud, se obtiene la deseada presencia de la Salud.

Obtener siguiente

'GN' se usa el código de la función siguiente. Que funciona de forma similar a la siguiente instrucción en COBOL. Que se utiliza para obtener segmento las apariciones en una secuencia. El modelo predefinido para tener acceso a los datos de las apariciones es hacia abajo en la jerarquía, y a la izquierda a la derecha. La sintaxis de la GN llamada es la siguiente:

CALL 'CBLTDLI' USING DLI-GN
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Si se ejecuta la instrucción call, proporcionando valores adecuados para todos los parámetros en el programa COBOL, puede recuperar la presencia en el segmento segmento área de I/O de la base de datos en un orden secuencial. En el ejemplo anterior, se inicia en el acceso a la Biblioteca, libros, segmento, y así sucesivamente. Realizamos el GN llamada una y otra vez, hasta llegar a la aparición de lo que queremos.

Obtener siguiente dentro de padres

'GNP' código se utiliza para obtener el siguiente dentro de sus padres. Esta función se utiliza para recuperar segmento apariciones en secuencia subordinada a un determinado segmento padre. La sintaxis de un GNP es el siguiente:

CALL 'CBLTDLI' USING DLI-GNP
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Conseguir única

'GHU' código se utiliza para obtener exclusivas. Función de retención especifica que vamos a actualizar el segmento después de recuperarlos. La única función que corresponde a la llamada. A continuación se muestra la sintaxis de una GHU llamada:

CALL 'CBLTDLI' USING DLI-GHU
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Se celebrará el próximo

'GHN' código se utiliza para obtener siguiente. Función de retención especifica que vamos a actualizar el segmento después de recuperarlos. La siguiente función que corresponde a la siguiente llamada. A continuación se muestra la sintaxis de una llamada GHN:

CALL 'CBLTDLI' USING DLI-GHN
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Se celebrará el próximo de padres

'GHNP' se utiliza el código siguiente para obtener dentro de sus padres. Función de retención especifica que vamos a actualizar el segmento después de recuperarlos. El próximo en función principal corresponde a la siguiente matriz de llamada. A continuación se muestra la sintaxis de una GHNP llamada:

CALL 'CBLTDLI' USING DLI-GHNP
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Funciones de actualización

Funciones de actualización son similares a re-escribir las operaciones de inserción o en cualquier otro lenguaje de programación. Funciones de actualización se utiliza para actualizar los segmentos de IMS bases de datos DL/I. Antes de utilizar la función de actualización, debe haber una llamada con éxito con cláusula en el segmento. La siguiente actualización se utilizan las funciones de IMS DB:

Insertar
Eliminar
Sustituir

Insertar

'ISRT' se utiliza el código de la función de insertar. El ISRT función se utiliza para agregar un nuevo segmento en la base de datos. Se utiliza para cambiar una base de datos existente o cargar una nueva base de datos. A continuación se muestra la sintaxis de una ISRT llamada:

CALL 'CBLTDLI' USING DLI-ISRT
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Eliminar

'DLET' código se utiliza para la función Eliminar. Se utiliza para eliminar un segmento de la IMS bases de datos DL/I. A continuación se muestra la sintaxis de una DLET llamada:

CALL 'CBLTDLI' USING DLI-DLET
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Sustituir

"Sustitución" se usa el código siguiente para obtener dentro de sus padres. La función de sustitución se utiliza para sustituir un segmento en el IMS bases de datos DL/I. A continuación se muestra la sintaxis de una REPL llamada:

CALL 'CBLTDLI' USING DLI-REPL
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Otras funciones

Las siguientes funciones se usa en IMS DL/I, se pide:

Checkpoint
Reinicie
PCB

Checkpoint

'CHKP' código se utiliza para la función de control. Se utiliza en las funciones de recuperación de las inversiones. A continuación se muestra la sintaxis de una CHKP llamada:

CALL 'CBLTDLI' USING DLI-CHKP
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Reinicie

'XRST' código se utiliza para la función de reinicio. Se utiliza en el reinicio de IMS. A continuación se muestra la sintaxis de una XRST llamada:

CALL 'CBLTDLI' USING DLI-XRST
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

PCB

PCB función se utiliza en los programas de la CICS IMS bases de datos DL/I. A continuación se muestra la sintaxis de un PCB llamada:

CALL 'CBLTDLI' USING DLI-PCB
                     PCB Mask
                     Segment I/O Area
                     [Segment Search Arguments]

Puede encontrar más detalles acerca de estas funciones en la recuperación capítulo.