1 /* START OF: pnotice_target_info.incl.pl1 * * * * * * * * * * * * * * * * */ 2 3 4 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ 5 /* */ 6 /* This include file is used by the software protection tools. It describes a source */ 7 /* segment in terms of a target where a new comment box containing software protection */ 8 /* notices will be placed. */ 9 /* STATUS: */ 10 /* 0) Created August 1981 by JM Stansbury */ 11 /* */ 12 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ 13 14 15 /****^ HISTORY COMMENTS: 16 1) change(85-09-27,LJAdams), approve(85-09-27,MCR7150), 17 audit(86-02-07,Wallman), install(86-02-13,MR12.0-1017): 18 Added sort_field, date ,seq, and name to notice. 19 END HISTORY COMMENTS */ 20 21 22 dcl 1 target_info aligned, 23 2 version fixed bin, 24 2 long_output bit (1), /* used by display_pnotice to decide output format */ 25 2 archive_name char (32) unal, /* name of an archive, if one being processed. */ 26 2 Parchive ptr, /* pointer to archive, or null. */ 27 2 Larchive fixed bin (21), /* length of archive or zero. */ 28 2 dir char (168) unal, /* containing directory */ 29 2 entry char (32) unal, /* name of the source segment */ 30 2 Pentry ptr, /* pointer to the source segment */ 31 2 Lentry fixed bin (21), /* length of the source segment, */ 32 /* including the new comment box */ 33 2 Pnew_box ptr, /* pointer to beginning of the new comment box */ 34 2 Lnew_box fixed bin (21), /* length of new comment box */ 35 2 Pstar_box ptr, /* pointer to temporary box */ 36 2 Lstar_box fixed bin (21), /* length of the temporary box */ 37 2 Nnotices fixed bin, /* number of notices going into target segment */ 38 2 notice (10), 39 3 sort_field unal, 40 4 date char (4), 41 4 seq char (2), 42 3 name char (32) unal; 43 dcl V_target_info_1 fixed bin int static options (constant) init (1); 44 45 46 /* END OF: pnotice_target_info.incl.pl1 * * * * * * * * * * * * * * * * */