Data Build Manual

SQL-LOAD Conversion Program
Sample Conversion Programs
B–36 099331 Tandem Computers Incorporated
49 ":" W2-DATE-TIME6.
50 DISPLAY "RUN: Stop -> " W2-DATE-TIME2 "/" W2-DATE-TIME3
51 "/" W2-DATE-TIME1 " " W2-DATE-TIME4 ":" W2-DATE-TIME5
52 ":" W2-DATE-TIME6 UPON LOG.
53 TIME-STOP-EXIT. EXIT.
9180 *
9200 *COPY U-USER-ROUTINES OF USERLIB.
9200 <
9220 *
9240 * Tandem Data Build - T9515D20 - 01JUN93 - D-series Operating System
9260 * Copyright Tandem Computers Incorporated 1992, 1993
9280 * Tandem Data Build - SQL-LOAD Version
TABLE OF SLT ENTRIES
RTDU NAME SLT INDEX LINE NUMBER FILE NUMBER
CONVERT-DATA 0 4100.00 1
CONVERT-DATA 1 4120.00 1
CONVERT-DATA 2 4140.00 1
TABLE OF SOURCE FILES
FILE NUMBER FILE NAME
1 $DATA01K.KOD2016.ZZPROGM
4 $DATA02Z.ZDATABLD.COBSOURC
7 $DATA01K.KOD2016.COBDEFS
8 $DATA01K.KOD2016.COBDEFS
9 $DATA01K.KOD2016.COBDEFS
10 $DATA01K.KOD2016.PROCLIB
11 $DATA01K.KOD2016.PROCLIB
12 $DATA01K.KOD2016.PROCLIB
13 $DATA02Z.ZDATABLD.COBSOURC
14 $DATA02Z.ZDATABLD.COBSOURC
15 $DATA02Z.ZDATABLD.COBSOURC
ENTRY POINT MAP BY NAME FOR FILE: \D00.$DATA01.KOD2016.ZZPROGMX
SP PEP BASE LIMIT ENTRY ATTRS NAME DATE TIME LANGUAGE SOURCE FILE
00 014 017251 017256 017251 CLOSE^RECEIVE 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 004 012400 013071 013000 V CONVERT 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 002 000017 012135 000065 M CONVERT-DATA 1993-08-09 16:08 COBOL85
\D00.$DATA01.KOD2016.ZZPROGM
00 003 012136 012377 012170 FIND^FILE 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 011 013722 013725 013722 INT32^TO^INT 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 006 013614 013625 013614 MOVE^REC 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 010 013700 013721 013700 MOVE^REC^TO^BUFF 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 007 013626 013677 013642 OPEN^RECEIVE 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 005 013072 013613 013405 PTOB 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 012 013726 017026 016505 X READ^FROM^SQLUTIL 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 015 017257 017706 017257 READ^SQLMSGS 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 013 017027 017250 017027 X REPLY^TO^SQLUTIL 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
00 016 017707 020076 017715 V ZSNUM 1993-07-21 13:26 TAL $DATA3.DATABLD.STALLIB
DATA BLOCK MAP BY NAME FOR FILE: \D00.$DATA01.KOD2016.ZZPROGMX