NetBatch Management Programming Manual

NetBatch Procedure Calls
NetBatch Management Programming Manual—522462-003
7-30
Sample TAL Program
STRUCT in^file;
BEGIN STRING BYTE [0:35]; END;
STRUCT out^file;
BEGIN STRING BYTE [0:35]; END;
STRUCT defaults;
BEGIN STRING BYTE [0:25]; END;
FILLER 1;
STRING hold^flag;
STRING restart^flag;
STRUCT job^text;
BEGIN STRING BYTE [0:31]; END;
FILLER 1;
STRING stop^on^abend;
STRING highpin;
FILLER 6;
STRING hold^after^flag;
END;
END;
STRUCT .base^date;
BEGIN
INT after^date[0:2];
END;
STRUCT .masters;
BEGIN
STRUCT master^jobs[0:7];
BEGIN STRING BYTE [0:23]; END;
END;
INT purge^test^flag;
STRUCT .time^rec;
BEGIN
INT t^type;
STRUCT t^every;
BEGIN
INT edays;
INT hhmm;
FILLER 32;
END;
STRUCT calendar = t^every;
BEGIN STRING BYTE [0:35]; END;
END;
STRUCT .rt^time;
BEGIN
INT run^time[0:2];
END;
INT alter^flag;
STRUCT .open^table;
BEGIN
STRUCT table^entry[0:7];
(continued)