c****************************************** c Common structure for PBW_PRTSMB. * c This data is common for a particular * c file currently printing. * c****************************************** parameter (PSM$M_EOF='0106803A'x) parameter (PSM$M_FUNNOTSUP='01068001'x) include 'PBW_UTILITIES:USER$FORSYSDEF($PSMDEF)' include 'PBW_UTILITIES:USER$FORSYSDEF($SMBDEF)' structure /COMMON_DATA/ integer*4 form_length integer*4 form_width character*15 account integer*2 accountlen character*12 user integer*2 userlen character*128 file integer*2 filelen character*31 filename integer*2 filenamelen character*31 extention integer*2 extentionlen character*31 queue ! Queue file is printed on integer*2 queuelen ! integer*2 classtype ! Classification type character*8 time ! Time file printed character*9 date ! Date file printed character*31 logtable ! Special logname table integer*2 logtablelen endstructure