1 2 /* BEGIN INCLUDE FILE opr_query_info.incl.pl1 */ 3 4 /* created 10/20/78 by J. A. Bush. 5 Modified by Rick Fakoury to increase size of the allowable answer. 6 */ 7 8 dcl 1 opr_query_info aligned, /* info structure for the opr_query_ subroutine */ 9 2 version fixed bin, /* version of this structure, currently = to 1 */ 10 2 q_sw bit (1) aligned, /* = "1"b if aswer is expected from operator */ 11 2 prim char (8), /* primary expected operators response */ 12 2 alt char (8), /* alternate expected operator response */ 13 2 answer char (80) varying, /* operators answer */ 14 2 r_comment char (64), /* comment to be output with respond message */ 15 2 err_code fixed bin (35); /* standard system status code */ 16 17 /* END INCLUDE FILE opr_query_info.incl.pl1 */ 18