1 /* BEGIN INCLUDE FILE ... hasp_set_forms_info.incl.pl1 */
 2 /* Created:  25 December 1981 by G. Palter */
 3 
 4 /* Data structure required by the hasp_workstation_ set_forms control order */
 5 
 6 dcl 1 set_forms_info aligned based (sti_ptr),
 7       2 version fixed binary,
 8       2 forms character (32);                               /* the forms to use untill the next end_write_mode order */
 9 
10 dcl  sti_ptr pointer;
11 
12 dcl  SET_FORMS_INFO_VERSION_1 fixed binary static options (constant) initial (1);
13 
14 /* END INCLUDE FILE ... hasp_set_forms_info.incl.pl1 */