MFPDCTAB

(GIN Macro)
MFPDCTAB.mac.txt
 ?4FG ...[??? MFPDCTAB SECT CENT FGN 56 DOC  
 ?4FQ ...#   
 ?4F^ ...#     PDC TABLE 
 ?4G8 ...#     TOP 9 BITS GIVE MAX LENGTH AFTER CONV(CHARS)  
 ?4GC ...#     BOTTOM 15 BITS RELATIVE ADDRESS OF CONVERSION ROUTINE 
 ?4GL ...#     B0 SET->A WELL KNOWN PDC (EG TIME)
 ?4GT ...#     B1 SET->VARIABLE LENGTH (EG PROPERTIES)   
 ?4H4 ...#MAC  MFPDCTAB  
 ?4H? ...#DEF  PDCTAB=0? 
 ?4HG ...      +0                           [0 NOTJOURN  
 ?4HP ...      PDCSET   DATENOW,8,KNOWN  
 ?4HY ...      PDCSET   TIMENOW,8,KNOWN  
 ?4J7 ...      PDCSET   USERNAME,13,KNOWN
 ?4JB ...      PDCSET   LOCNAME,12   
 ?4JK ...      PDCSET   GENNUM,4 
 ?4JS ...      PDCSET   LANGUAGE,4   
 ?4K3 ...      PDCSET   JOBNAME,12,KNOWN 
 ?4K= ...      PDCSET   JOBTYPE,7
 ?4KF ...      PDCSET   PROGNAME,5   
 ?4KN ...      PDCSET   URGENCY,1
 ?4KX ...      PDCSET   PROGCORE,7,KNOWN 
 ?4L6 ...      PDCSET                       [<   
 ?4L* ...      PDCSET   PROGMILL,7,KNOWN 
 ?4LJ ...      PDCSET   PERITYPE,2   
 ?4LR ...      PDCSET   PERINAME,5   
 ?4M2 ...      PDCSET                       [SPACE -NOT USED 
 ?4M9 ...      PDCSET   TSNCSN,9 
 ?4MD ...      PDCSET   TRANSCT,7
 ?4MM ...      PDCSET   PROPS,13,,V  
 ?4MW ...      PDCSET   BUDGTYPE,8   
 ?4N5 ...      PDCSET                       [%   
 ?4N# ...      PDCSET   BUDGQUAN,8   
 ?4NH ...      PDCSET   INCNUM,7 
 ?4NQ ...      PDCSET   SKIP,0,KNOWN 
 ?4N^ ...      PDCSET   NULL,0,KNOWN 
 ?4P8 ...      PDCSET   BLOCKCT,7
 ?4PC ...      PDCSET   JOBMILL,14,KNOWN 
 ?4PL ...      PDCSET                       [COMMA   
 ?4PT ...      PDCSET   GEOPER,6,KNOWN   
 ?4Q4 ...      PDCSET   FAILCT,7 
 ?4Q? ...      PDCSET   REPEATS,7
 ?4QG ...      PDCSET   ERRMESS,4,,V        [ERROR MESSAGE   
 ?4QP ...      PDCSET   NUMA,8   
 ?4QY ...      PDCSET   NUMB,8   
 ?4R7 ...      PDCSET   NUMC,8   
 ?4RB ...      PDCSET   NUMD,8   
 ?4RK ...      PDCSET   VARCHAR,4,,V 
 ?4RS ...      PDCSET   PAGETURN,4   
 ?4S3 ...      PDCSET   QUOTA,4  
 ?4S= ...      PDCSET   DATETHEN,8   
 ?4SF ...      PDCSET   TIMETHEN,8   
 ?4SN ...      PDCSET   OCTA,9   
 ?4SX ...      PDCSET   OCTB,9   
 ?4T6 ...      PDCSET   VAROCT,10,,V 
 ?4T* ...      PDCSET   VARDEC,9,,V  
 ?4TJ ...      PDCSET   ENTRANT,4,,V 
 ?4TR ...      PDCSET   SWITCH,3 
 ?4W2 ...      PDCSET   GEOMILL,14   
 ?4W9 ...      PDCSET
 ?4WD ...      PDCSET   REELNUM,4
 ?4WM ...#DEF  20?=64-0?+PDCTAB  
 ?4WW ...#SKI  20?   
 ?4X5 ...(   
 ?4X# ...#REP  20?      [ZEROFILL TABLE  
 ?4XH ...      +0
 ?4XQ ...)   
 ?4X^ ... MFDEFS 
 ?4Y8 ...#NOR