Spooler Programmer's Guide

Sample Perusal Process
Spooler Programmer’s Guide—522287-002
B-2
?page
! This structure is used to get the status of jobs in a device queue
STRUCT .job^status;
BEGIN
INT state,
device^name [0:15],
sequence^number,
job^number;
STRUCT location;
BEGIN
STRING group [0:7],
destination [0:7];
END;
INT copies,
pages,
reserved,
total^lines;
STRING form^name [0:15];
INT owner^id;
END;
?page
! This structure is used to get the status of jobs in a device queue
STRUCT .job ;
BEGIN
INT number,
state;
STRUCT location;
BEGIN
STRING group [0:7],
destination [0:7];
END;
STRING form^name [0:15],
report^name [0:15];
INT flags,
page^size,
owner^id,
copies,
pages,
lines,
time^opened [0:2],
time^closed [0:2];
STRUCT data^file;
BEGIN
INT volume [0:3],
subvolume [0:3],
filename [0:3];
END;
STRING collector^process^name [0:5];
END;
?page
! This structure receives the TACL Startup message from $RECEIVE