Pathmaker Programming Guide

Coding Custom Services
Creating Services and Servers
067868 Tandem Computers Incorporated 4–49
Figure 4-11. Generating INVOKE Statements for IPCs
048
Server Generation
SQL table object
name from the SQL
Table Registration
screen
DEFINE name
from SQL Table
Registration
screen
=PARTS
===========================
PARTS
DATA DIVISION.
EXEC SQL
INVOKE =PARTS
AS PARTS
LEVEL 02
END-EXEC
01 T9154-REQUEST
02 T9154-REQUEST-HEADER
02 PARTS
03 column-1
PARTS
===========================
Output of
COBOL Compile
• • •
• • •
• • •
PARTS
SQL Table Registration Screen
Table Object Name Define Name
IPC Definition Screen
Request Copy Of
Reference Object
Reply Copy Of
Reference Object