How to Include CA IDMS DML Statements

The Transparency Environment › How to Include CA IDMS DML Statements

How to Include CA IDMS DML Statements

For each CA IDMS DML statement you want to include in a bridge program, do the following:

Build a three-field argument in the program variable storage of the bridged DBOMP program.
Pass the arguments to the bridge program. The transparency converts the values in the arguments to CA IDMS DML statements.

Step 1— Build the argument

Use the information in the following table to build the three-field argument for the DML statement.

Field	Usage	Length	Contents
1	Character	8	The literal value of the CA IDMS verb issued by the bridged program. Acceptable values are: @BIND @COMMIT @ROLLBAK @ACCEPT PL/I or COBOL equivalents are also acceptable.
2	Character	8	The literal value of the CA IDMS keyword associated with the CA IDMS verb entered in field 1. Acceptable values are as shown in the list following this table.
3	Character	1-256	The variable data passed by : @BIND PROC @ACCEPT PROC or @ACCEPT STATS This field is necessary only if one of these DML statements is issued.

Field

Usage

Length

Contents

Character

The literal value of the CA IDMS verb issued by the bridged program. Acceptable values are:

@BIND
@COMMIT
@ROLLBAK
@ACCEPT

PL/I or COBOL equivalents are also acceptable.

Character

The literal value of the CA IDMS keyword associated with the CA IDMS verb entered in field 1. Acceptable values are as shown in the list following this table.

Character

1-256

The variable data passed by :

@BIND PROC
@ACCEPT PROC

@ACCEPT STATS

This field is necessary only if one of these DML statements is issued.

The acceptable values for field 2 (shown in the preceding table) are:

Name of the database procedure, if @BINDing to or @ACCEPTing from a data procedure
STATS, if @ACCEPTing database statistics
ALL, if issuing the @COMMIT verb and releasing locks on current records; enter spaces if issuing an unqualified @COMMIT verb
CONTINUE, if issuing the @ROLLBAK verb and terminating the run unit; enter spaces if issuing an unqualified @ROLLBAK verb

In the following example, the bridged DBOMP Assembler program builds the argument IDMSREQ to issue the CA IDMS DML statement @ACCEPT STATS:

IDMSREQ         DS      OD
IDMSVERB        DC      CL8'@ACCEPT '
IDMSKEY         DC      CL8'STATS   '
IDMSAREA        DS      CL256

Step 2— Pass the argument to the bridge program

Bridged DBOMP Assembler program

Include this statement in a bridged DBOMP Assembler program to pass the CA IDMS DML statement argument to the bridge program:

CA$LL BMP$IO,argument-name

Bridged DBOMP PL/I program

Include this statement in a bridged DBOMP PL/I program to pass the CA IDMS DML statement argument to the bridge program:

CALL CA$LL(argument_name,'END.')

Bridged DBOMP COBOL program

Include this statement in a bridged DBOMP COBOL program to pass the CA IDMS DML statement argument to the bridge program:

CALL BMPCALL USING argument-name.