Previous Topic Next topic Print topic


Fast Path Data Communication Calls

Perform Fast Path data communication calls.
Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.

Target:

IMS DC for single-platform applications

Syntax:

$IM-CHNG altview [destination]
$IM-CMD [PCBname] [msgarea]
$IM-GCMD [PCBname] [msgarea]
$IM-GN PCBname SSA1 [... SSA15]
$IM-GU PCBname SSA1 [... SSA15]
$IM-ISRT [PCBname]altview] SSA1 [... SSA15]
$IM-PURG [PCBname] [msgarea] [mod]

Parameters:

altview Alternate view or IO PCB name.
destina-tion Terminal destination; can be data name or literal in an 8-byte field.
msgarea Area where IMS returns the message segment being processed; AMB treats this area as the first segment of a new message.
mod Data name or literal in an 8-byte field naming the message output description.
pcbname Data view (maximum 20 characters); default is IO-PCB.
SSA Segment Search Argument, which triggers COBOL MOVEs to or from the generated I/O area IM-IO-AREA; default is IM-IO-AREA with a length of 32,000 bytes. To override the length, set IM-IO-AREA-LEN in your program or the DDISYMB member.
  Specify only one SSA per hierarchical level along a path. These arguments generate 8-byte records in Working-Storage to hold the corresponding values.

Examples:

The following code:
$IM-CHNG ("ALT-IO", "YOUR-TERMINAL-NAME")
Generates in Working-Storage:
01  IM-DESTINATION-NAME    PIC X(8).
Generates in the Procedure Division:
MOVE YOUR-TERMINAL-NAME
... TO IM-DESTINATION-NAME
CALL 'CBLTDLI' USING
... IM-CHNG ALT-IO-PCB
... IM-DESTINATION-NAME
MOVE ALT-IO-STATUS
... TO IM-STATUS
The following code:
$IM-CHNG ("AOT-IO", "'YOURTERM'")
Generates in Working-Storage
01  IM-DESTINATION-NAME    PIC X(8).
Generates in the Procedure Division
 MOVE 'YOURTERM'
 ... TO IM-DESTINATION-NAME
 CALL 'CBLTDLI' USING
 ... IM-CHNG ALT-IO-PCB
 ... IM-DESTINATION-NAME
 MOVE ALT-IO-STATUS
 ... TO IM-STATUS
Previous Topic Next topic Print topic