(GIN Macro)
Defined in: MACROS RJDG
Used in: BMXEMS83, CHTAB, GIVEA867, INKS, IPBLISTA867, LISTDIRF867, LISTINIT867, LISTINTC865, LISTSTAR867, MONOLITH864, OPER864, PCTLISTA867, QPRINT867, SETJD867, SETPF867, SETPRAMA867, SETUPARA867
38S8 ...[??? DATECON SECT CENT FGN 7 DOC 3942 [ MACRO FOR BINARY TO CHARACTER DATE CONVERSION 39HL #MAC DATECON 3=3= #STR EDATE,%A 3=GW ( 3?2G LDX 0 %A [VERSION IF NOT TODAYS DATE WANTED 3?G6 SMO FX2 3?^Q STO 0 EXEC1 3#FB DOWN DATECON,1 3#^2 ) 3*DL #STR EDATE,%A 3*Y= #SKI 3BCW ( 3BXG LDX 1 FX1 [VERSION IF TODAYS DATE WANTED 3CC6 LDX 2 FX2 3CWQ LDX 0 FDATE 3DBB STO 0 ACOMMUNE1(2) 3DW2 LDX 0 FDATE+1 3F*L STO 0 ACOMMUNE2(2) 3FT= ) 3G#W #NOR