ICL George 3 - george:macro If Carlsberg made operating systems.... https://www.george3.co.uk/ 2026-05-06T18:27:04+00:00 ICL George 3 https://www.george3.co.uk/ https://www.george3.co.uk/_media/wiki/dokuwiki.svg text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ABANDCOM https://www.george3.co.uk/george/macro/abandcom?rev=1705492539&do=diff ABANDCOM (GIN Macro) Defined in: MACRO COMPRO Used in: ATTACHB866, ATTACHC867, COMPRESS864, DETACH867, DUMMYB867, HOWBIG867, INCOM864, INITJOB867, INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, LISTDIR867, LISTMOP867, LISTRING864, MACDEF8, MOPCOMB865, ONLINCL864, ONLINEC867, PRINT70, READBULK867, SETPRAMA867, SWITCH867, TIDYREAD850, TRAPLIST864, VIPBFREE865, WA864, WAIT867, WHATJBS867, WHATRVSA867, WHTSTAT867, WLA867, WLAA867, WLB867, WLC867 #CPN ...[??? ABANDCOM SECT CENT FGN 21 DOC #C^G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ABSA https://www.george3.co.uk/george/macro/absa?rev=1705492539&do=diff ABSA (GIN Macro) Defined in: ROBSMACA Used in: 0000 [??? ABSA SECT FILE FGN 25 DOC 22FL #MAC ABSA 22^= #STR ON,%A 23DW #STR 23YG ( 24D6 #MEN GETBAX 24XQ #TRA K80GETBAX 25CB CALL 5 K81GETBAX 25X2 #END 26BL ... RBS FIXED,,BABSA 26W= #EXI 27*W ) 27TG #STR OFF,%A 28*6 #STR 28SQ ( 29#B #MEN GETBAX 29S2 #TRA K80GETBAX 2=?L CALL 5 K82GETBAX 2=R= #END 2?=W ... RBC FI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ABSAPAR https://www.george3.co.uk/george/macro/absapar?rev=1705492539&do=diff ABSAPAR (GIN Macro) Defined in: ROBSMACB Used in: 0000 [??? ABSAPAR SECT FILE FGN 25 DOC 22FL #MAC ABSAPAR 22^= #MEN GETBAX 23DW #TRA K81GETBAX 23YG #STR %A 24D6 LDN 0 %A 24XQ #STR %A 25CB #STR 25X2 LDN 0 165 26BL #STR %B 26W= LDN 1 %B 27*W #STR %B 27TG #STR 28*6 LDN 1 3 28SQ #END 29#B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ABSMENDS https://www.george3.co.uk/george/macro/absmends?rev=1705492539&do=diff ABSMENDS (GIN Macro) Defined in: MACINTLUDES Used in: GBC= [??? ABSMENDS SECT DIAG FGN 9 DOC GBWW #MAC ABSMENDS [M.C.D. MANN AND J.T. WIFFEN GCBG [ GCW6 [ GD*Q [ ************** GDTB [ * ABSMENDS * GF*2 [ ************** GFSL [ GG#= [ GGRW [ IN GIN511 ON, PRINTS A LIST OF MENDS NOT COMPILED WHOSE STATUS GH?G [ WOULD ALLOW THEM TO BE COMPILED. GHR6 [ %A LISTING LEVEL GJ=Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ACCINS https://www.george3.co.uk/george/macro/accins?rev=1705492539&do=diff ACCINS (GIN Macro) Defined in: MACROS RJH Used in: 57RS ...[??? ACCINS SECT CENT FGN 71 DOC 583L # THIS MACRO TEST IF A SPEC. LOCATION IS AN ACC OR NOT. 58H= #MAC ACCINS 592W #ACC %B 59GG ( 5=26 LDX 0 %B 5=FQ #STR %D 5=^B MOD %A 0 %C,%D 5?F2 #STR %D 5?YL #SKI 5#D= %A 0 %C 5#XW ) 5*CG #ACC %B 5*X6 #SKI 5BBQ ( 5BWB #STR %D 5CB2 MOD %A %B %C,%D 5CTL #STR %D 5D*… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ACCSTO https://www.george3.co.uk/george/macro/accsto?rev=1705492539&do=diff ACCSTO (GIN Macro) Defined in: MACROS RJH Used in: 5G3Y ...[??? ACCSTO SECT CENT FGN 71 DOC 5G?Q #MAC ACCSTO 5GRB ACCINS STO,%A,%B,%C 5H?2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ACROSS https://www.george3.co.uk/george/macro/across?rev=1705492539&do=diff ACROSS (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ABANDONA867, ADDICT865, ADJCHECK85, ADJUNCTS85, ALAS822, ALASB867, ANALYSE865, ANALYSEA3, APPEND864, ARCHIVE867, ASSIGN860, ASTONIF867, ATTACHA8, ATTACHB866, ATTACHC867, BACKMAP864, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMSAVJOB864, BMSJRNL866, BRADDATA867, BRADSPLT867, BSALFAIL, BUDGET84, CARTCONT867, CDCIPB864, CHARGESC867, CHINERR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ACROSSVAR https://www.george3.co.uk/george/macro/acrossvar?rev=1705492539&do=diff ACROSSVAR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ALASB867, CANCOM863, EDITOR867, EDITPT867, HLSEVENT867, KEEPCHAP863, OPERATOR867, PERION867 25M8 ...[??? ACROSSVA SECT CENT FGN 32 DOC 25X2 #MAC ACROSSVAR 26BL LDN 1 %A 26W= BRN (CHAPK) 27*W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ACROSSX https://www.george3.co.uk/george/macro/acrossx?rev=1705492539&do=diff ACROSSX (GIN Macro) Defined in: CHCHCOORMAC2 Used in: MONFILE867, SETMON70 2=3S ...[??? ACROSSX SECT CENT FGN 32 DOC 2=?L # 2=R= #MAC ACROSSX 2?=W #SKI %A 2?QG LDX 0 %A 2#=6 SLL 0 12 2#PQ ORN 0 %B 2*9B LDN 1 0 2*P2 BRN (CHAPK) 2B8L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDEND https://www.george3.co.uk/george/macro/addend?rev=1705492539&do=diff ADDEND (GIN Macro) Defined in: MACROS MSYS Used in: 9#KS ...[??? ADDEND SECT CENT FGN 56 DOC 9#TL # 9**= # 9*SW # HERE FOLLOWS ADDEND. **** ADDEND 9B#G # IT IS USED TO TERMINATE A SERIES OF MESSMON(A)'S. 9BS6 # INTRODUCED BY ADDMESS. 9C?Q # IT HAS NO PARAMETERS. 9CRB # 9D?2 #MAC ADDEND 9D#C ...#SKI 21?-0? 9D*S ...( 9DC9 ...! WRONG LENGTH (PREVIOUS PART) 9DDL ...#DEF 0?=21? 9DG3 ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDINMODE https://www.george3.co.uk/george/macro/addinmode?rev=1705492539&do=diff ADDINMODE (GIN Macro) Defined in: OPEN-MACROS Used in: ASSIGN860, COMPOST867, HOWBIG867, MACRALAS864, OLMTC85, PREPREAD867 5PB# ...[??? ADDINMOD SECT FILE FGN 20 DOC 5PL6 [ 5Q5Q # 5QKB #MAC ADDINMODE 5R52 #DEF M1ADD=A%C^A%D^A%E^A%F^A%G^A%H^A%I^A%J 5RJL #DEF M2ADD=E%C^E%D^E%E^E%F^E%G^E%H^E%I^E%J 5S4= #STR %A 5SHW #SKI 5T3G ( 5TH6 #SKI M1ADD 5W2Q ! "A" MODE USED BUT NO %A ! 5WGB ) 5X22 #STR %B 5XFL #SKI 5X^… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDJOB https://www.george3.co.uk/george/macro/addjob?rev=1705492539&do=diff ADDJOB (GIN Macro) Defined in: MACRO COMPRO Used in: CHTAB, CONNECT867, INITJOB867, INKS 9898 ...[??? ADDJOB SECT CENT FGN 21 DOC 98F2 #MAC ADDJOB 98YL DOWN ADDJOB,1 99D= BRN %A 99XW BRN %B 9=CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDJOBJ https://www.george3.co.uk/george/macro/addjobj?rev=1705492539&do=diff ADDJOBJ (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECT867, DSCNCT867, INITJOB867 9=M# ...[??? ADDJOBJ SECT CENT FGN 21 DOC 9=X6 #MAC ADDJOBJ 9?BQ DOWN ADDJOB,5 9?WB BRN %A 9#B2 BRN %B 9#TL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDJOBW https://www.george3.co.uk/george/macro/addjobw?rev=1705492539&do=diff ADDJOBW (GIN Macro) Defined in: MACRO COMPRO Used in: INITJOB867 9#Y6 ...[??? ADDJOBW SECT CENT 9#YQ ...[ THIS MACRO IS USED TO IMPLEMENT DS8214 9#^B ...#MAC ADDJOBW 9*22 ... DOWN ADDJOB,11 9*2L ... BRN %A 9*3= ... BRN %B 9*3W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDMESS https://www.george3.co.uk/george/macro/addmess?rev=1705492539&do=diff ADDMESS (GIN Macro) Defined in: MACROS MSYS Used in: 8S^S ...[??? ADDMESS SECT CENT FGN 56 DOC 8T9L # 8TP= # HERE FOLLOWS ADDMESS **** ADDMESS 8W8W # IT IS USED TO INTRODUCE (BY MEND) A SERIES OF 8WNG # MESSMON(A)'S FOR ADDITIONAL MESSAGES. 8X86 # IT HAS NO PARAMETERS 8XMQ # 8Y7B #MAC ADDMESS 8YM2 #OPT ADDMESS=0 8^6L ...#SKI ADDMESS&#37777777<1$1 8^L= ( 925W MESSAGES 0 9… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDMODE https://www.george3.co.uk/george/macro/addmode?rev=1705492539&do=diff ADDMODE (GIN Macro) Defined in: OPEN-MACROS Used in: ASSIGN860, COPYA867, COPYB867, ERASEA867, INSTPARA867, LISTPARS867, OPENFILE867, OPENREL865, OPENTWO867, ORELHALF82, ORELMAIN867, PERFPASS864, USEREXCP860, USERONE867, USEROPEN867, USERSTRM867 45L4 ...[??? ADDMODE SECT FILE FGN 20 DOC 45TW # 46*G #MAC ADDMODE 46T6 #DEF M1ADDMODE=A%B^A%C^A%D^A%E^A%F^A%G^A%H^A%I 47#Q #DEF M2ADDMODE=E%B^E%C^E%D^E%E^E%F^E%G^E%H^E%I 47SB #SKI M2ADDMODE 48#2 ! "E" MO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDREC https://www.george3.co.uk/george/macro/addrec?rev=1705492539&do=diff ADDREC (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867, EDITOR867, EDITORA865, INMOP867, INPUTJDF82, SETPC867, SETPRAMA867 ?C2S ...[??? ADDREC SECT CENT FGN 21 DOC ?C=L [ THIS MACRO ADDS 1 TO THE COUNT OF RECORDS READ IN THE FILE ?CQ= #MAC ADDREC ?D9W LDN %B #100 ?DPG ADS %B CPBFSD(%A) ?F96 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDRECS https://www.george3.co.uk/george/macro/addrecs?rev=1705492539&do=diff ADDRECS (GIN Macro) Defined in: MACRO COMPRO Used in: LOADERR70, LOADFIN860, LOADPROG865 ?#54 ...[??? ADDRECS SECT CENT FGN 21 DOC ?##W [ THIS MACRO ADDS A GIVEN NO. TO THE COUNT OF RECORDS READ IN THE F ?#SG #MAC ADDRECS ?*#6 MHUNTW %A,CPB,CALAS ?*RQ SLL %B 6 ?B?B ADS %B CPBFSD(%A) ?BR2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDRELT https://www.george3.co.uk/george/macro/addrelt?rev=1705492539&do=diff ADDRELT (GIN Macro) Defined in: COREMACROS Used in: GETNO865, IPBCCD867, ONLINCL864 C#2S ...[??? ADDRELT SECT CENT FGN 32 DOC C#=L # C#Q= # THIS INITIALISES THE NEW ELEMENT, SPACE HAVING BEEN PROVIDED BY ALTLEN C*9W # ARINGNO IS UPDATED AND THE ELEMENT ENRINGED AS SPECIFIED C*PG # CB96 #MAC ADDRELT CBNQ #STR %A,1 CC8B LDX 1 %A [BLOCK ADDR CCN2 STO 1 GEN0 CD7L #STR 2,%B CDM= ( CF6W #STR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDRESS https://www.george3.co.uk/george/macro/address?rev=1705492539&do=diff ADDRESS (GIN Macro) Defined in: MACROS JSR Used in: BSTS867, CHARGESC867, GIVE867, LOADERPM867, MESSAA, MESSBH, MESSC, PMCRABS860, PMOBJIII860, PMSUMA867, PROFLAG83, PROGISH850 3*DL #MAC ADDRESS [CONVERT AN OBJECT PROGRAM ADDRESS TO A GEORGE ADDRESS 3*Y= SMO %A 3BCW LDX 0 ADATUM 3BXG ADX 0 %B 3CC6 STO 0 %C 3CKB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADDSKIP https://www.george3.co.uk/george/macro/addskip?rev=1705492539&do=diff ADDSKIP (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, DELETE864, FBUFF860, FREEBUFF860, GETDIR860, INSERT6, INSERTBL6, INSERTHR6, INSERTWO6, OFFREL867, PERUSFIL84, READFILE84, REWRITE864, STEP864 3BMN ...[??? ADDSKIP SECT FILE FGN 20 DOC 3BXG #MAC ADDSKIP 3CC6 # ADD IN ONE TO VARIOUS STASTISTICAL LOCATIONS 3CWQ #SKI %A 3DBB ( 3DW2 LDN 0 1 3F*L #STR %B 3FT= ADS 0 %B 3G#W #STR %C 3GSG ADS 0 %C … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ADJUSTLK https://www.george3.co.uk/george/macro/adjustlk?rev=1705492539&do=diff ADJUSTLK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BSQ867, BSTS867, COMPCHAN84, COREALL865, FHLIST867, INMOP867, SETUPA867 34CJ ...[??? ADJUSTLK SECT CENT FGN 32 DOC 34MB # 3572 #MAC ADJUSTLK 35LL MOD ADS 0 ALINK1,%A 366= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALASHUNT https://www.george3.co.uk/george/macro/alashunt?rev=1705492539&do=diff ALASHUNT (GIN Macro) Defined in: MACRO COMPRO Used in: EDITET7, EDITOR867, EDITORA865, SETPC867, SETPRAMA867 BDMS ...[??? ALASHUNT SECT CENT FGN 21 DOC BDXL [ THE FOLLOWING MACRO IS TO SEARCH FOR THE CPB/CALAS BLOCK BFC= [ AT COMMAND PROCESSOR LEVEL ONE BFWW # BGBG #MAC ALASHUNT BGW6 MHUNTW %A,CPB,CALAS BH*Q MALAS1 BHTB LDEX %B CPBCPLEV(%A) BJ*2 ERN %B 1 BJSL BZE %B MALAS2 BK#= HUNT2 %A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALIEN https://www.george3.co.uk/george/macro/alien?rev=1705492539&do=diff ALIEN (GIN Macro) Defined in: MACROS SHFS Used in: MESSDA, MONFILEA864 4XQ2 [??? ALIEN SECT FILE FGN 1 DOC 4Y9L #MAC ALIEN 4YP= #STR %B 4^8W JBS %A,%B,FSHALIEN 4^NG #STR %B 5286 #STR 52MQ JBS %A,FX2,FSHALIEN 537B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALIENDIR https://www.george3.co.uk/george/macro/aliendir?rev=1705492539&do=diff ALIENDIR (GIN Macro) Defined in: DUMP-MACROS Used in: C5*7 ...[ C5SR ...[ C5SY ...[??? ALIENDIR SECT FILE FGN 67 DOC C5T5 ...#MAC ALIENDIR C5T= ...#STR %A C5TC ...( C5TJ ...#DEF MALDIRLST=1? C5TP ...#LIS 0 C5TW ...#ORD C5W3 ...#INT C5W8 ...XNAME 12H%A C5W* ...[ C5WG ...XSTART C5WM ... LDN 1 XNAME C5WS ... LDX 7 2(1) C5W^ ... ANDN 7 #00007777 [LAST TWO CHARACTERS MUST BE SPACES C5X6 ... SBN 7 #2020 C5X? .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALLTIME https://www.george3.co.uk/george/macro/alltime?rev=1705492539&do=diff ALLTIME (GIN Macro) Defined in: MACS SPC Used in: 29#B #MAC ALLTIME 29S2 #STR %B 2=?L ALLTIME %B 2=R= #STR CENTRAL,%A 2?=W #SKI 2?QG ( 2#=6 #MEN CONSOLE 2#PQ #TRA K8CONSOLE 2*9B NULL 2*P2 #END 2B8L ) 2BN= #STR REMOTE,%A 2C7W #SKI 2CMG ( 2D76 #MEN CONSROOT 2DLQ #TRA K8CONSROOT 2F6B NULL 2FL2 #TRA K9CONSROOT 2G5L NULL 2GK= #END 2H4W ) 2HJG #N… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTBOTH https://www.george3.co.uk/george/macro/altboth?rev=1705492539&do=diff ALTBOTH (GIN Macro) Defined in: COREMACROS Used in: 3G54 ...[??? ALTBOTH SECT CENT FGN 32 DOC 3G#W [ 3GSG [ENTRY SEQUENCE FOR CHANGING A BLOCK LENGTH ROUTINE 3H#6 [ 3HRQ #MAC ALTBOTH [DEFINING MACRO FOR ALTLEN,ALTLEND 3J?B #STR %C%D 3JR2 ( 3K=L BRN MALT2 3KQ= MALT1 MHUNT 2,%C,%D 3L9W EXIT 1 0 3LPG MALT2 ALTLENG%F %A,%B,MALT1 3M96 #EXI 3MNQ ) 3N8B #STR FX2,%A 3NN2 #SKI 3P7L ( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTDEPTH https://www.george3.co.uk/george/macro/altdepth?rev=1705492539&do=diff ALTDEPTH (GIN Macro) Defined in: IFMACS Used in: B2=W [ B2QG [ B3=6 [??? ALTDEPTH SECT DEVT FGN 1 DOC B3PQ [ B49B #MAC ALTDEPTH B4P2 [ ======== B58L [ B5N= [ B67W [ %A - +1 OR -1 B6MG [ B776 [ ALTERS 'NESTDEPTH' AND SHIFTS STACK IDENTIFIERS 'NESTEITHERS' B7LQ [ AND 'NESTFLAG' APPROPRIATELY B86B [ B8L2 #ALT NESTDEPTH=NESTDEPTH%A B95L #STR +,%A B9K= ( B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTEND https://www.george3.co.uk/george/macro/altend?rev=1705492539&do=diff ALTEND (GIN Macro) Defined in: MACROS MSYS Used in: 6^CJ ...[??? ALTEND SECT CENT FGN 56 DOC 6^MB # 7272 # 72LL # HERE FOLLOWS ALTEND **** ALTEND 736= # IT IS USED TO TERMINATE A SERIES OF ALTMESS'S. 73KW # IT HAS NO PARAMETERS. 745G # 74K6 #MAC ALTEND 754Q #SKI ALTMESS+2 [SKIP IF PREVIOUS ERROR 75JB ( 7642 #SKI 21?-0? 76HL MFERROR 1 [WRON… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLEN https://www.george3.co.uk/george/macro/altlen?rev=1705492539&do=diff ALTLEN (GIN Macro) Defined in: COREMACROS Used in: ADJUNCTS85, ALAS822, ALASB867, ANALYSEA3, APPEND864, ATTACHA8, BACKMAP864, BCAST867, BEXTRA83, BMINDEX866, BMJLCONV860, BMSTREAM853, BSBLFAIL867, BSPRUNE867, BSUJSTAT867, BSUNJAM867, BUDGONE83, CANCRVX864, CANTDO867, CHANG867, CHNUMCON867, CIOUT8, CLOSBAC867, CLOSEFUL867, CONTEND867, CONTRACT866, CORE867, COREALL865, CROBJ6, DATUM, DECODE860, DELETE864, DISPCOM867, DOC867, DOXCODE867, DROBJ864, DTQUEST860, DTSTART867, DTSUBS867, DTSUBSA867, D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLEND https://www.george3.co.uk/george/macro/altlend?rev=1705492539&do=diff ALTLEND (GIN Macro) Defined in: COREMACROS Used in: BEXTSJ84, DELCOM5, DTSCAN860, EDIT867, EDITORA865, FAIL5, FILEMAP, HALT5, INPCT84, IPBSCANB867, LDSTART850, LIBCOM867, LIBTSN867, LISTDEV866, LISTDIR867, LISTEND867, LISTINIT867, LISTLOOP867, LISTPREP865, LOAD60, LOADX60, MTSTART864, NEWDIR867, OPENTWO867, PERCON867, QUESCOM867, READBULK867, SCAN865, SETPRAMB867, TRANFAIL866, USELEX5 3WR# ...[??? ALTLEND SECT CENT FGN 32 DOC 3X36 # 3XGQ #MAC ALTLEND [TO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLENG https://www.george3.co.uk/george/macro/altleng?rev=1705492539&do=diff ALTLENG (GIN Macro) Defined in: COREMACROS Used in: ADDICT865, ADJUNCTS85, ALAS822, ALASB867, ASSOC867, BACKROOM865, BMAPDIR865, BMAPONE867, BMFIXIT864, BMQUEST866, BMSAVJOB864, CDCIPB864, CHANG867, COMPRESS864, CONIPB8, CONMXA85, CONMXC8, COPYB867, DEWELL867, DICTWELL867, DOXCODE867, DUMP860, ERASE867, ERASEA867, FHOBJDIR860, FILEMAP, GETFREE867, GLOBALS867, GOTO867, HOWBIG867, IDFCONF867, IDFLINE867, IDFPER867, INCEND865, INCEOT865, INCSTART865, INCTAPES867, INCVFCHK850, INCWRITE865, INLOOP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLENGD https://www.george3.co.uk/george/macro/altlengd?rev=1705492539&do=diff ALTLENGD (GIN Macro) Defined in: COREMACROS Used in: BMAPDIR865, BMAPTWO860, BMQUEST866, EDSTART860, INCTAPES867, JWELLONE867, LISTFREE867, MTCODE864, SCEDITAR84, SCEDITOR84, SCHEDULE867, UMMENDS867, WLB867, WLF862 493D ...[??? ALTLENGD SECT CENT FGN 32 DOC 49?= # 49QW #MAC ALTLENGD 4==G LDX 1 %A 4=Q6 LDN 2 %B 4?9Q CALL 0 (CHANGEG) 4?PB #STR %C,£ 4#92 +%C [SUBROUTINE ADDRESS 4#NL #ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLENGR https://www.george3.co.uk/george/macro/altlengr?rev=1705492539&do=diff ALTLENGR (GIN Macro) Defined in: COREMACROS Used in: IPBCCD867 4CW8 ...[??? ALTLENGR SECT CENT FGN 32 DOC 4D62 # 4DKL #MAC ALTLENGR [ALTLENR VERSION AVOIDING LOCK 4F5= MOD LDX %B ARINGNO,%A 4FJW SRL %B 15 4G4G MOD ADX %B ALOGLEN,%A 4GJ6 ALTLENG %A,%B,%C 4H3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTLENR https://www.george3.co.uk/george/macro/altlenr?rev=1705492539&do=diff ALTLENR (GIN Macro) Defined in: COREMACROS Used in: GETNO865, ONLINCL864, OPENEND865 C85S ...[??? ALTLENR SECT CENT FGN 32 DOC C8*L # C8T= # MAKES ROOM FOR AN ADDITIONAL RING ELEMENT C9#W #MAC ALTLENR C9SG MOD LDX %B ARINGNO,%A [CALCULATE AMT TO NEEDED C=#6 SRL %B 15 C=RQ MOD ADX %B ALOGLEN,%A C??B ALTLEN %A,%B,%C,%D [ALTLEN C?R2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALTMESS https://www.george3.co.uk/george/macro/altmess?rev=1705492539&do=diff ALTMESS (GIN Macro) Defined in: MACROS MSYS Used in: 5B6Y ...[??? ALTMESS SECT CENT FGN 56 DOC 5BBQ # 5BWB # 5CB2 # 5CTL # HERE FOLLOWS ALTMESS **** ALTMESS 5D*= # IT IS USED TO ALTER (BY MEND) AN EXISTING MESSAGE. 5DSW # AN ALTMESS IS GIVEN FOR EACH PART (OPTIONALLY 5F#G # FOLLOWED ON THE NEXT LINE BY THE NEW TEXT OF THE 5FS6 # PART). THE SERIES OF ALTMESS'S IS TERMINATED BY 5G?Q # … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ALWAYSDUMP https://www.george3.co.uk/george/macro/alwaysdump?rev=1705492539&do=diff ALWAYSDUMP (GIN Macro) Defined in: BMAP MACROS Used in: BACKMARK850 3#9J ...[??? ALWAYSDU SECT FILE FGN 36 DOC 3#^2 #MAC ALWAYSDUMP 3*68 ...#STR %A,*OFF 3*?B ...( 3*DL #SKI ALWAYSDUMP-ALWAYSEND 3*Y= #SKI 3BCW ( 3BXG #CON ALWAYSDUMP USED TOO OFTEN 3CC6 #EXI 3CWQ ) 3DBB #STR %A 3DW2 #SKI 3F*L ( 3FT= #CON ALWAYSDUMP USERNAME MISSING 3G#W #EXI 3GSG ) 3H#6 #STR %B 3HRQ #SKI 3J?B ( 3JR2 #CON AL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AMXTRACE https://www.george3.co.uk/george/macro/amxtrace?rev=1705492539&do=diff AMXTRACE (GIN Macro) Defined in: MACROS CBK Used in: QUESCOM867 5S#4 ...[??? AMXTRACE SECT CENT FGN 2 DOC 5SHW # 5T3G # 5TH6 #MAC AMXTRACE [V.BHARWANI 5W2Q SMO FX2 5WGB LDX 0 AMXMSK 5X22 ANDX 0 %A 5XFL BZE 0 %B 5X^= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANAMONST https://www.george3.co.uk/george/macro/anamonst?rev=1705492539&do=diff ANAMONST (GIN Macro) Defined in: MACROS BJE Used in: LOGOUT867 45L4 ...[??? ANAMONST SECT CENT FGN 3 DOC 45TW # 46*G # 46T6 # 47#Q # 47SB # MACRO TO ANALYSE MONITORING STYLE PARAMETERS AND CREATE MASK 48#2 # 48RL #MAC ANAMONST 49?= DOWN REPORT,8 49QW BRN %A [J IF COMMAND ERROR IN PARAMETERS 4==G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AND https://www.george3.co.uk/george/macro/and?rev=1705492539&do=diff AND (GIN Macro) Defined in: IFMACS Used in: CONSET864, EDITER867, FORMLOOP865, GETFREE867, GETFREEB864, IDFASAT867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTAST867, LISTOPEN867, LISTPARS867, LISTRING864, MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAF, MESSAG, MESSAI, MESSBA, MESSBB, MESSBE, MESSBH, MESSBJ, MESSCA, MESSCB, MESSCD, MESSCI, MESSDC, MESSDJ, MESSE, MESSF, MESSI, OPER864, OPERA864, OPERAPP864, OPERIN867, PERCON867, PMACT867, PMCHECK867, SHOWCOMM864, TPOBJ867, TROBJ867, WA864, WHATP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANDR https://www.george3.co.uk/george/macro/andr?rev=1705492539&do=diff ANDR (GIN Macro) Defined in: IFMACS Used in: OPER864, OPERIN867 8T#B ...[ 8T#L ...[ 8T#W ...[??? ANDR SECT COMM FGN 1 DOC 8T*6 ...[ 8T*B ...#MAC ANDR 8T*L ...[ ==== 8T*W ...[ 8TB6 ...[ CONTRACTION OF 'AND EITHER' 8TBB ...[ 8TBL ... AND EITHER,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, - 8TBW ... %Q,%R,%S,%T 8TC6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANOTHER https://www.george3.co.uk/george/macro/another?rev=1705492539&do=diff ANOTHER (GIN Macro) Defined in: MACROS LEF Used in: LISTFREE867, LISTOPEN867, MESSAF, MESSBF, MESSBJ, MESSCB 2YPR ...[??? ANOTHER SECT DEVT FGN 2 DOC 2YQB #MAC ANOTHER 2^=2 [ THIS MACRO CREATES AN EXACT COPY OF A GIVEN BLOCK %A/%B. 2^PL [ 329= #STR %C 32NW #SKI 338G ( 33N6 #STR %B 347Q MHUNT 3,%A,%B 34MB #STR %B 3572 #SKI 35LL MHUNT 3,%A 366= ) 36KW #STR %C 375G ( 37K6 #STR %C,3 384Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANQ https://www.george3.co.uk/george/macro/anq?rev=1705492539&do=diff ANQ (GIN Macro) Defined in: REPLY-MACROS Used in: ANSWERS 3X=Y ...[??? ANQ SECT FILE FGN 2 DOC 3XGQ #MAC ANQ 3Y2B #DEF ANQ%A=%B 3YG2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANQOK https://www.george3.co.uk/george/macro/anqok?rev=1705492539&do=diff ANQOK (GIN Macro) Defined in: REPLY-MACROS Used in: 4H?J ...[??? ANQOK SECT FILE FGN 2 DOC 4HHB #MAC ANQOK 4J32 SMO FX2 4JGL STOZ ACOMMUNE2 4K2= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANQOK2 https://www.george3.co.uk/george/macro/anqok2?rev=1705492539&do=diff ANQOK2 (GIN Macro) Defined in: REPLY-MACROS Used in: 4K=4 ...[??? ANQOK2 SECT FILE FGN 2 DOC 4KFW #MAC ANQOK2 4K^G STOZ ACOMMUNE2(2) 4LF6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANS https://www.george3.co.uk/george/macro/ans?rev=1705492539&do=diff ANS (GIN Macro) Defined in: REPLY-MACROS Used in: ANSWERS 3TS4 ...[??? ANS SECT FILE FGN 2 DOC 3W3W #MAC ANS 3WHG #DEF ANS%A=%B 3X36 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANSOK https://www.george3.co.uk/george/macro/ansok?rev=1705492539&do=diff ANSOK (GIN Macro) Defined in: REPLY-MACROS Used in: ORELEND860, RETRIEVE864, STEP864, USELEX5 4CW8 ...[??? ANSOK SECT FILE FGN 2 DOC 4D62 #MAC ANSOK 4DKL SMO FX2 4F5= STOZ ACOMMUNE9 4FJW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANSOK2 https://www.george3.co.uk/george/macro/ansok2?rev=1705492539&do=diff ANSOK2 (GIN Macro) Defined in: REPLY-MACROS Used in: ALAS822, COMPOST867, DTREST860, GETDIR860, GETDIRX860, LOCATE84, MACRALAS864, USERDIR842, USEREXCP860, USERONE867, USEROPEN867, USERSTRM867 4FSN ...[??? ANSOK2 SECT FILE FGN 2 DOC 4G4G #MAC ANSOK2 4GJ6 STOZ ACOMMUNE9(2) 4H3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANYRCTPS https://www.george3.co.uk/george/macro/anyrctps?rev=1705492539&do=diff ANYRCTPS (GIN Macro) Defined in: RCTPMACS Used in: CHARGESC867 3WHG # THIS MACRO TESTS WHETHER THERE ARE 3X36 # ANY EXTANT RCTP JOBS 3XGQ #MAC ANYRCTPS 3Y2B LDX 0 CTRCTP 3YG2 BNZ 0 %A 3Y^L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANYUSERS https://www.george3.co.uk/george/macro/anyusers?rev=1705492539&do=diff ANYUSERS (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867 PX6B # PXL2 [??? ANYUSERS PY5L # ******** PYK= #MAC ANYUSERS P^4W # P^JG LDX 0 %B Q246 LDX 1 FX2 Q2HQ STO 0 ACOMMUNE9(1) Q33B MFINDSU 1,ACOMMUNE9(1) Q3H2 LADDP HUNIT(1),1 Q42L JDED 1,%E Q4G= LDX 0 %A Q4^W LDX 2 FX2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ANYWH https://www.george3.co.uk/george/macro/anywh?rev=1705492539&do=diff ANYWH (GIN Macro) Defined in: MACROS RJH Used in: #5^8 ...[??? ANYWH SECT CENT FGN 71 DOC #692 # #6NL # TO TEST IF ANY OUTPUT IS REQUIRED TO THE MONITORING #78= # FILE AND/OR MOP CONSOLE #7MW #MAC ANYWH #87G MOD LDX 0 AMXMSK,%A #8M6 MOD ORX 0 AMFMSK,%A #96Q ANDX 0 %B #9LB BZE 0 %C #=62 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APCHANGE https://www.george3.co.uk/george/macro/apchange?rev=1705492539&do=diff APCHANGE (GIN Macro) Defined in: ICTMACS Used in: EDITOR867, EDITORA865 7#C6 [??? APCHANGE SECT CENT FGN DOC 7#WQ ...#MAC APCHANGE 7*BB ... LDX 2 FX2 7*W2 ... JBC M1APCH,,ICTSW 7B*L ...#STR DOWN,%A 7BT= ...#SKI 7C#W ...( 7CSG ... LDX 1 ACRIT(2) 7D#6 ... LDN 0 1 7DRQ ... ANDX 0 1 7F?B ... BNZ 0 M1APCH 7FR2 ... SRL 1 6 7G=L ... STO 1 ACRIT(2) 7GQ= ... LDX 0 ASFNO1 7H9W ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APCOMPRO https://www.george3.co.uk/george/macro/apcompro?rev=1705492539&do=diff APCOMPRO (GIN Macro) Defined in: ICTMACS Used in: COMPROA867 4#92 [??? APCOMPRO SECT CENT FGN DOC 4#NL #MAC APCOMPRO 4*8= LDX 2 FX2 4*MW JBC M2APCOMPRO,,ICTSW 4B7G SEGENTRY %A 4BM6 LDN 1 1 [NO USER CENTRAL 4C6Q LDX 0 JSOURCE3(2) 4CLB BZE 0 M1APCOMPRO [J IF CENTRAL 4D62 LDN 1 2 4DKL M1APCOMPRO 4F5= DCH 1 ACRIT(2) 4FJW M2APCOMPRO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APGA https://www.george3.co.uk/george/macro/apga?rev=1705492539&do=diff APGA (GIN Macro) Defined in: ICTMACS Used in: COOR865 3?2G [??? APGA SECT CENT FGN DOC 3?G6 #MAC APGA 3?^Q LDN 1 %B+%A 3#FB CALL 0 (APGAR) 3#^2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APGAX https://www.george3.co.uk/george/macro/apgax?rev=1705492539&do=diff APGAX (GIN Macro) Defined in: ICTMACS Used in: 3*DL [??? APGAX SECT CENT FGN DOC 3*Y= #MAC APGAX 3BCW LDX 1 %A 3BXG SRL 1 12 3CC6 CALL 0 (APGAR) 3CWQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APJOBRESET https://www.george3.co.uk/george/macro/apjobreset?rev=1705492539&do=diff APJOBRESET (GIN Macro) Defined in: ICTMACS Used in: 5PL6 [??? APJOBRESET SECT CENT FGN DOC 5Q5Q #MAC APJOBRESET 5QKB #SKI %B>3-3 5R52 ( 5RJL !NUMBER MUST BE >0 AND <4 5S4= #EXI 5SHW ) 5T3G #SKI %B 5TH6 #SKI 5W2Q ( 5WGB !NUMBER MUST BE >0 AND <4 5X22 #EXI 5XFL ) 5X^= #MEN ACTPRI 5YDW #STR EXPRESS,%A 5YYG #SKI 5^D6 #TRA K90ACTPRI 5^XQ #STR REALTIME,%A 62CB #SKI 62X2 #TRA K92ACTPRI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APJOBSET https://www.george3.co.uk/george/macro/apjobset?rev=1705492539&do=diff APJOBSET (GIN Macro) Defined in: ICTMACS Used in: LOGANAL864, SCHDJOBA867, SCHEDJOB867, SETJOBQ867 44WL [??? APJOBSET SECT CENT FGN DOC 45B= #MAC APJOBSET 45TW ACCSTO %A,ACOMMUNE1,FX2 46*G ACCSTO %B,ACOMMUNE2,FX2 46T6 LDX 1 FX1 47#Q LDX 2 FX2 47SB JBC M1APJOBSET,,ICTSW 48#2 DOWN ACTPRI,1 48RL #STR %C 49?= #SKI 49QW BRN (GEOERR) 4==G #STR %C 4=Q6 BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APMP https://www.george3.co.uk/george/macro/apmp?rev=1705492539&do=diff APMP (GIN Macro) Defined in: ICTMACS Used in: 5CB2 [??? APMP SECT CENT FGN DOC 5CTL #MAC APMP 5D*= #STR %A,HIPRI 5DSW ( 5F#G !1ST PARAMETER MUST BE HIPRI OR ABSENT 5FS6 #EXI 5G?Q ) 5GRB ...#MEN CONSTANT 5H?2 #TRA GAMR0 5HQL #STR %A 5J== APMPH %A 5JPW #STR %A 5K9G #SKI 5KP6 -1 5L8Q #TRA GAMR0+1 5LNB APMPH %B 5M82 APMPH %C 5MML APMPH %D 5N7= ... APMPH … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APMPH https://www.george3.co.uk/george/macro/apmph?rev=1705492539&do=diff APMPH (GIN Macro) Defined in: ICTMACS Used in: 58H= [??? APMPH SECT CENT FGN DOC 592W #MAC APMPH 59GG #STR %A 5=26 #SKI 5=FQ ( 5=^B ... +0 5?F2 #EXIT 5?YL ) 5#D= #STR %A,HIPRI 5#XW #SKI 5*CG #37777777 5*X6 #STR %A,HIPRI 5BBQ +%A*64 5BWB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APPCUBS https://www.george3.co.uk/george/macro/appcubs?rev=1705492539&do=diff APPCUBS (GIN Macro) Defined in: LOBS-MACROS Used in: APPEND864, REWRITE864 6HQ4 ...[??? APPCUBS SECT FILE FGN 5 DOC 6H^W [ 6JFG #MAC APPCUBS 6J^6 SETREP2 OK 6KDQ ... JBS M2APPCUBS,%B,BACOMM [J IF OPEN COMMUNALLY 6KYB ... JBC M1APPCUBS,%B,BACUBS [J IF PUBLIC 6LD2 LDX 0 ACOMMUNE1(2) 6LXL ... BZE 0 M2APPCUBS [GEOERR IF NO BREAK-IN ADDRESS, "ANSW 6MC= LDX 0 JOBNO(2) 6MWW LDN 1 BJOBQ 6NB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APPEND https://www.george3.co.uk/george/macro/append?rev=1705492539&do=diff APPEND (GIN Macro) Defined in: ACCESSMACROS Used in: APPEND864, BMAPTWO860, BMOUTPUT867, BSUJSTAT867, CHTAB, DOC867, INKS, LIBLOAD867, LISTAST867, LISTCONK83, LISTDEV866, LISTDIR867, LISTDIRF867, LISTIDF867, LISTPROP867, LISTSTAR867, NEWINST867, PERFCHAP866, PROPERTY867, QPRINT867, REDONMT867, RESTLIMB864, SYSPROP867, TIDYREAD850, WA864, WHATRVSA867, WLD864, WLOUT865, WSPERIS867 38S8 ...[??? APPEND SECT FILE FGN 19 DOC 3942 #MAC APPEND 39HL #STR %A 3=3= #SKI 3=GW ( 3?… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APREALT https://www.george3.co.uk/george/macro/aprealt?rev=1705492539&do=diff APREALT (GIN Macro) Defined in: ICTMACS Used in: REALTIME867 4H3Q [??? APREALT SECT CENT FGN DOC 4HHB #MAC APREALT 4J32 LDX 1 FX1 4JGL LDX 2 FX2 4K2= JBC M1APREALT,,ICTSW 4KFW #STR %A,ON 4K^G #SKI 4LF6 DOWN ACTPRI,2 4LYQ #STR %A,OFF 4MDB #SKI 4MY2 DOWN ACTPRI,3 4NCL #STR %A,HIGH 4NX= #SKI 4PBW DOWN ACTPRI,4 4PWG M1APREALT 4QB6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APROPNAME https://www.george3.co.uk/george/macro/apropname?rev=1705492539&do=diff APROPNAME (GIN Macro) Defined in: MACROS SAR Used in: IPDBATCH867, LISTAST867, LISTIDF867, LISTPROP867, SPEAK8, UMMENDS867, WHATPERA867, WHATPROP865 2YQB #MAC APROPNAME 2^=2 [ THIS MACRO GIVES THE PROPERTY NAME OF THE PROPERTY NUMBER FOUND IN %A 2^PL [ IN ACOMMUNE1,2,AND 3 329= [ :SYSTEM.PROPERTY IS FOUND OPEN AND LEFT OPEN 32NW ... ACCSTO %A,ACOMMUNE1,FX2 [PROPERTY NUMBER 347Q LDN 1 %B 34CJ ... SMO FX2 34MB STO 1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APSETTAB https://www.george3.co.uk/george/macro/apsettab?rev=1705492539&do=diff APSETTAB (GIN Macro) Defined in: ICTMACS Used in: CASCODE 3942 [??? APSETTAB SECT CENT FGN DOC 39HL #MAC APSETTAB 3=3= #HAL AP%AL*64+#4000,AP%A 3=GW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) APVSF https://www.george3.co.uk/george/macro/apvsf?rev=1705492539&do=diff APVSF (GIN Macro) Defined in: ICTMACS Used in: CLOSEND867, ORELHALF82, ORELMAIN867 7Q4L ...[??? APVSF SECT CENT FGN DOC 7QJ= ...#MAC APVSF 7R3W ...[ TO ADJUST ACT PRI WHEN OPEN/CLOSE VITAL SYS FILE 7RHG ...#STR %A,UP 7S36 ...#SKI 7SGQ ...( 7T2B ... LDX 2 FX2 7TG2 ... JBC M1APVSF,,ICTSW 7T^L ... LDEX 0 ACRIT(2) 7WF= ... ANDN 0 #76 [COUNT OF TIMES DONE 7WYW ... BNZ 0 M3APVSF [J IF ALREADY DONE 7XDG ... LDX 1 AC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASCEDIT https://www.george3.co.uk/george/macro/ascedit?rev=1705492539&do=diff ASCEDIT (GIN Macro) Defined in: MACS JIB Used in: SCEDIT84, SCEDITAR84 33?Y ...#MAC ASCEDIT 33#L ... MHUNTW 1,AMXOR,ADCB 33*# ...#STR %A,OFF 33B2 ...( 33BN ... LDCT 0 #200 33CB ... ORS 0 ICURSOR(1) 33D4 ...) 33DQ ...#STR %A,ON 33FD ...( 33G6 ... LDX 0 GSIGN 33GS ... ORX 0 BITS22LS 33HG ... ANDS 0 ICURSOR(1) 33J8 ...) 33JW ... LDX 1 FX1 33KJ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASFNUMBER https://www.george3.co.uk/george/macro/asfnumber?rev=1705492539&do=diff ASFNUMBER (GIN Macro) Defined in: ICTMACS Used in: 38N3 ...[??? ASFNUMBER SECT CENT FGN DOC 38ND ...#MAC ASFNUMBER 38NT ...#SKI %A<1$1 38P= ...( 38PM ...! PARAMETER MUST BE 1,2 OR 3 38Q4 ...#EXI 38QF ...) 38QW ...#MEN CASCODE 38R? ...#TRA ASFNO 38RN ... +%A+1 38S5 ...#TRA ASFNO1 38SG ... +%A 38SX ...#TRA GMEL%A 38T# ... +BPROG 38TP ...#END 38W6 ...#MEN CONSTANT 38WH ...#TRA GMELRTAB 38WY ... +BPROG,+GMEL,+GMEL1,+GMEL2,+GMEL3,+… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASSILO https://www.george3.co.uk/george/macro/assilo?rev=1705492539&do=diff ASSILO (GIN Macro) Defined in: MACROS RMD10 Used in: LOADFIN860 =#5L ...[??? ASSILO SECT FILE FGN 16 DOC =*4W # THIS MACRO EFFECTS AN ASSIGN FOR LOAD =*JG #MAC ASSILO =B46 DOWN ASSIGN,10 =BHQ BRN %A =C3B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASSMESS https://www.george3.co.uk/george/macro/assmess?rev=1705492539&do=diff ASSMESS (GIN Macro) Defined in: MACROS RJH Used in: BCAST867, BMOUTPUT867, DIRENT867, PRINT70, QPRINT867, READFAIL866, READFALE866, WA864, WHATRVSA867, WLC867, WLD864, WLOUT865, WSPERIS867 93SJ ...[??? ASSMESS SECT CENT FGN 71 DOC 944B # MACRO TO ASSEMBLE A MESSAGE,BUT NOT OUTPUT 94J2 #MAC ASSMESS 953L #STR %A,0 95H= LDX 0 %A 962W SMO FX2 96GG STO 0 HMON1 9726 DOWN MONFILE,9 97FQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASSOCTAB https://www.george3.co.uk/george/macro/assoctab?rev=1705492539&do=diff ASSOCTAB (GIN Macro) Defined in: MACS PW Used in: ASSOC867 2K*Q [??? ASSOCTAB SECT COMM FGN 9 DOC 2KH2 # 2L2L #MAC ASSOCTAB [P WARNER 2LG= %B [TO SET UP A COMMAND TABLE ENTRY 2L^W 12H%A [FOR ASSOCIATE COMMAND (SEG ASSOC) 2MFG 4H%C00 2M^6 #FID 12 23 IV%C/4096 2NDQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASTABLES https://www.george3.co.uk/george/macro/astables?rev=1705492539&do=diff ASTABLES (GIN Macro) Defined in: OLPMACROS Used in: ASSIGN860 8#KK ...[??? ASTABLES SECT FILE FGN 7 DOC 8#LB # ASTABLES - SET UP (EMPTY) COMPACT TABLE OF ALLOWABLE PERIPHERAL TYPES 8*62 # 8*KL #MAC ASTABLES 8B5= #DEF M1ASTABLES=0? 8BJW #REP 16 8C4G +0 8CJ6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ASTYPE https://www.george3.co.uk/george/macro/astype?rev=1705492539&do=diff ASTYPE (GIN Macro) Defined in: OLPMACROS Used in: ASSIGN860 8CRY ...[??? ASTYPE SECT FILE FGN 7 DOC 8D3Q # 8DHB # ASTYPE - FILL IN ABOVE TABLE & APPEND 4 WD ENTRY TO PERIPHERAL DATA 8F32 # TABLE 8FGL #MAC ASTYPE 8G2= #OPT M1ASTYPE=0? 8GFW #DEF 19?+0=0? 8G^G #TRA %A/4+M1ASTABLES+1 8HF6 #FID %A&3*6,%A&3+1*6-1,19?+0]-M1ASTYPE+1 8HYQ #TRA 19?+0] 8JDB +%C 8JY2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ATT7020 https://www.george3.co.uk/george/macro/att7020?rev=1705492539&do=diff ATT7020 (GIN Macro) Defined in: MACS PCT Used in: ATTACHB866 2L^W #MAC ATT7020 2MFG HUNT2B 2,A7020,INFORM,1 [HUNT BACK FROM THE A7020/ALCB. 2M^6 LDX 1 APCTACT(2) [J. OUT IF SOME PCT IS STILL ACTIVE, 2NDQ BNZ 1 %A 2NYB LDXC 0 ALINESTAT(2) [OR IF ALREADY CLOSING DOWN FOR SOME 2PD2 BCS %A [OTHER REASON, 2PXL LDX 1 FPTPCT(2) [OR IF SOME ACTIVITIES STILL R… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ATTACH https://www.george3.co.uk/george/macro/attach?rev=1705492539&do=diff ATTACH (GIN Macro) Defined in: MACS JIB Used in: ATTACHB866, ATTACHC867, MESSAI 33XF ...[??? ATTACH SECT COMM FGN 25 DOC 348N ...# 34FX ...[THIS MACRO ATTACHES A SPECIFIC LINE OF A REAL UNIT TO ANY,OR ONE OF 34R6 ...[A SELECTION OF SPECIFIC LINES,ON A CONCEPTUAL MULTIPLEXOR 354* ...#MAC ATTACH 35*J ... DOWN XATTACH,1 35LR ... BRN %A [BREAK IN - ABANDCOM 35Y2 ... BRN %B [CONCEPTUAL DOESN'T EXIST 3699 ... BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ATTONL https://www.george3.co.uk/george/macro/attonl?rev=1705492539&do=diff ATTONL (GIN Macro) Defined in: MACS CONC Used in: 2G5L #MAC ATTONL 2GK= #MEN XATTACH 2H4W #TRA K61XATTACH 2HJG NULL 2J46 #END 2JHQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUTFAIL https://www.george3.co.uk/george/macro/autfail?rev=1705492539&do=diff AUTFAIL (GIN Macro) Defined in: OLPMACROS Used in: PERION867 67HD ...[??? AUTFAIL SECT FILE FGN 7 DOC 67R= # 68=W # TERMINATES AN OLPA AFTER A FAIL HAS OCCURRED WHILST (POSSIBLY) 68QG # RUNNING IN AUTONOUOUS MODE 69=6 # 69PQ #MAC AUTFAIL 6=9B ... LDX 5 %A [LOAD REPLY 6=P2 LDX 2 FX2 6?8L LDX 1 APETADDR(2) [GET PCA ADDR 6?N= LDX 3 EVENT2(2) [GET PNTR TO CONTROL AREA 6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUTFIN https://www.george3.co.uk/george/macro/autfin?rev=1705492539&do=diff AUTFIN (GIN Macro) Defined in: OLPMACROS Used in: DROBJ864, EDOBJ864, FHOBJBL860, MTOBJ864, PERION867 57#8 ...[??? AUTFIN SECT FILE FGN 7 DOC 57J2 # 583L # TERMINATES AN OLPA WHICH MAY BE RUNNING IN AUTONOMOUS MODE 58H= # 592W #MAC AUTFIN 59GG ... LDX 5 %A [LOAD REPLY 5=26 #STR %B 5=^B LDX 6 %B [GET SPECIFIED LINK PAIR 5#XW LDX 2 FX2 5*CG LDX 1 APETADDR(2) [GET PC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUTMOP https://www.george3.co.uk/george/macro/autmop?rev=1705492539&do=diff AUTMOP (GIN Macro) Defined in: MACS IPB Used in: 2NDQ #MAC AUTMOP 2NYB #MEN IPBSCANB 2PD2 #TRA K30IPBSCANB+INLBUFF+1-IDELE 2PXL #76037613 2QC= #TRA K30IPBSCANB+INOCHS-IDELE 2QWW +8 2RBG #TRA K30IPBSCANB 2RW6 +8 2S*Q #TRA K30IPBSCANB+IDELE+1-IDELE 2STB #76737673 2T*2 #END 2TSL #MEN IPBSCAN 2W#= #TRA K30IPBSCAN+INLBUFF+1-IDELE 2WRW #76037… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUTSTART https://www.george3.co.uk/george/macro/autstart?rev=1705492539&do=diff AUTSTART (GIN Macro) Defined in: OLPMACROS Used in: DROBJ864, EDOBJ864, FHOBJBL860, MTOBJ864, PERION867 4X^S ...[??? AUTSTART SECT FILE FGN 7 DOC 4Y9L [ 4YP= # PUTS OLPA INTO AUTONOMOUS MODE OF OPERATION 4^8W # 4^NG #MAC AUTSTART 5286 LDX 2 FX2 52MQ LDX 1 EVENT2(2) [GET PNTR TO CONTROL AREA 537B ADN 1 1 [GET PNTR TO REPLY WORD 53M2 FADDRESS APETADDR(2),1,HLOCK1,2 [CONVERT TO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUTWIN https://www.george3.co.uk/george/macro/autwin?rev=1705492539&do=diff AUTWIN (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSBAC867, CLOSDEL867, REQCART866 PM#B # PMS2 [??? AUTWIN PN?L # ****** PNR= #MAC AUTWIN PP=W # PPQG LDN 0 %A PQ=6 SMO FX2 PQPQ STO 0 ACOMMUNE8 PR9B #STR %B PRP2 ( PS8L LDX 0 %B PSN= SMO FX2 PT7W STO 0 ACOMMUNE9 PTMG ) PW76 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AUXILMF https://www.george3.co.uk/george/macro/auxilmf?rev=1705492539&do=diff AUXILMF (GIN Macro) Defined in: MACROS MSYS Used in: MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAE, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSBA, MESSBB, MESSBC, MESSBD, MESSBE, MESSBF, MESSBG, MESSBH, MESSBI, MESSBJ, MESSC, MESSCA, MESSCB, MESSCC, MESSCD, MESSCE, MESSCF, MESSCG, MESSCH, MESSCI, MESSCJ, MESSD, MESSDA, MESSDB, MESSDC, MESSDJ, MESSE, MESSF, MESSG, MESSH, MESSI 48#2 ...[??? AUXILMF SECT CENT FGN 56 DOC 4J32 # 4JGL # 4K2= # HERE FOLLOWS AUXILM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) AWAITSS https://www.george3.co.uk/george/macro/awaitss?rev=1705492539&do=diff AWAITSS (GIN Macro) Defined in: MACROS JSRG4 Used in: LOADPROG865, TPINS861 KB5Q #MAC AWAITSS [JSRAYNER G4ONLY KBKB ON G4SWAIT KC52 LONGWAIT %A,HSWAPSPWT KCJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BACKREAD https://www.george3.co.uk/george/macro/backread?rev=1705492539&do=diff BACKREAD (GIN Macro) Defined in: MACROS Used in: BACKMAP864, BACKMASS860, BMCNTRL866, BMFIXIT864, BMSJRNL866, BSALFAIL, CLOSEMAS863, COPYFILA867, FINDRUM866, GETBACK865, GETBAX865, GETWORD867, HLSREAD867, KARTCONT867, RESTOREG864, SETIDF867, TRANFAIL866 76?S ...[??? BACKREAD SECT FILE FGN 9 DOC 76HL #MAC BACKREAD 773= #SKI BSOKAY 77GW ( 782G #STR %A 78G6 ( 78^Q #DEF M1BACKREAD=%A$FLAW 79FB #DEF M2BACKREAD=%A&BSETBUSE-BSETBUSE<M1BACKREAD 79^2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BACKSPACE https://www.george3.co.uk/george/macro/backspace?rev=1705492539&do=diff BACKSPACE (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, ALLOCATE867, ANTIC867, ARCHIVE867, ARCHIVNW83, BACKMARK850, BEXTRA83, BMAPDIR865, BMAPONE867, BMAPTWO860, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEND7, CLOSEAB863, CLOSEONE867, CLOSFREZ867, CREALEX864, CROBJ6, DOIHEMS867, DOXCODE867, DTREST860, DTSUBSS867, EDIT867, EDITET7, EDITPT867, EDWRITE867, ERASEA867, FHOBJ860, FHOBJDIR860, FHOBJIND860, FILESECU83, FREEZE864, GOTO867, INCEOT865, INCS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BACKTRAN https://www.george3.co.uk/george/macro/backtran?rev=1705492539&do=diff BACKTRAN (GIN Macro) Defined in: MACROS Used in: BRADDATA867, BRADEMUL867, ERASEX866, FLAW866, FLAWMAP866, PATCH, PERION867, SPERION867, SWAP865, TRANSFER70 636S ...[??? BACKTRAN SECT FILE FGN 9 DOC 63BL #MAC BACKTRAN 63W= #SKI BSOKAY 64*W ( 64TG #DEF M1BACKTRAN=%B&BSET 65*6 #DEF M4BACKTRAN=%B&ASWAPFLA-ASWAPFLA<M1BACKTRAN 65SQ #DEF M5BACKTRAN=%B&ASWAPBON-ASWAPBON<M4BACKTRAN 66#B #DEF M7BACKTRAN=%B$FLAW$BOBJ$BSET<M5BACKTRAN 66FJ ...#UNSET ERRR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BACKWAIT https://www.george3.co.uk/george/macro/backwait?rev=1705492539&do=diff BACKWAIT (GIN Macro) Defined in: MACROS Used in: BMXEND7, CHANFILE8, CLOSEDIR867, COPYA867, COPYFILA867, CORE867, CREATE867, DROBJ864, DTREST860, EDOBJ864, GIVE867, INCEOT865, INCMON865, MTCODE864, RESTLIMB864, SJOPEN863, SUICIDE864, SWAP865 2QC= ...[??? BACKWAIT SECT FILE FGN 9 DOC 2QWW # 2RBG #MAC BACKWAIT 2RW6 #STR %B 2S*Q ( 2STB LDX 0 %B 2T*2 STO 0 BSP11 2TSL LDX 0 %C 2W#= STO 0 BSP12 2WRW #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BACKWRITE https://www.george3.co.uk/george/macro/backwrite?rev=1705492539&do=diff BACKWRITE (GIN Macro) Defined in: MACROS Used in: BMFIXIT864, BSALFAIL, BSBLFAIL867, GETBACK865, GETBAX865, GETWORD867, RESTOREG864, TRANFAIL866 8DR8 ...[??? BACKWRIT SECT FILE FGN 9 DOC 8F32 #MAC BACKWRITE 8FGL #SKI BSOKAY 8G2= ( 8GFW #STR %A 8G^G ( 8HF6 #DEF M1BACKWRIT=%A$FLAW 8HYQ #DEF M2BACKWRIT=%A$BOBJ$FLAW<M1BACKWRIT 8JDB #DEF M3BACKWRIT=%A&BONLFAIL-BONLFAIL<M2BACKWRIT 8JY2 #DEF M4BACKWRIT=%A&FREEBOBJ-FREEBOBJ<M3BACKWRIT 8KCL #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BADBLOCK https://www.george3.co.uk/george/macro/badblock?rev=1705492539&do=diff BADBLOCK (GIN Macro) Defined in: MACROS Used in: FINDRUM866, FLAW866, PERION867, SPERION867 BSBS ...[??? BADBLOCK SECT FILE FGN 9 DOC BSLL #MAC BADBLOCK BT6= LDX 0 %A BTKW SMO FX2 BW5G STO 0 ACOMMUNE1 BWK6 ... DOWN RITEFAIL,3 BX4Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BANAMONST https://www.george3.co.uk/george/macro/banamonst?rev=1705492539&do=diff BANAMONST (GIN Macro) Defined in: MACROS RJH Used in: ATTACHC867 5LDJ ...[??? BANAMONS SECT CENT FGN 71 DOC 5LNB # MACRO TO ANALYSE ACTION ON MONITORING FILE PARAMETER OMITTING 5M82 # PARAMETER WHOSE NUMBER IS %B OF MACRO,LEAVING MASK IN ADATA/AREPOR 5MML # 5N7= #MAC BANAMONST 5NLW ACCSTO %B,ACOMMUNE1,FX2 5P6G DOWN REPORT,10 5PL6 BRN %A 5Q5Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BASEFCB https://www.george3.co.uk/george/macro/basefcb?rev=1705492539&do=diff BASEFCB (GIN Macro) Defined in: RING-MACROS Used in: BACKROOM865, OPENREL865, OPENWAIT867, ORELMAIN867, PERFPASS864, RENAME864, USERSTRM867 =7F8 ...[??? BASEFCB SECT FILE FGN 20 DOC =7P2 [ =7S7 ...#MAC BASEFCB =7X# ...[ =82F ...[ SET UP FOR SEARCH VIA FCB RING =85L ...[ %A MODIFIER FOR FCB RING =88R ...[ %B FILE,HALF,DIR OR WORK =8?Y ...[ %C LABEL IF NO FCBS =8C5 ...[ %D SPARE ACC NULL TAKES X0 =8KC ...#STR %D =8NJ ...#STR =8RP ... BA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BBREAKIN https://www.george3.co.uk/george/macro/bbreakin?rev=1705492539&do=diff BBREAKIN (GIN Macro) Defined in: MACS MISW Used in: MOPOUT85 3H#6 #MAC BBREAKIN 3HRQ LDCT 0 #100 [SET BREAK-IN BIT 3J?B ANDX 0 GWAIT(%A) 3JR2 BNZ 0 %B [BRANCH IF BROKEN-IN ON 3K=L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BBS https://www.george3.co.uk/george/macro/bbs?rev=1705492539&do=diff BBS (GIN Macro) Defined in: MACROS JSR Used in: ALLOCATE867, BMAPTWO860, BMINDEX866, BSQ867, CANCRVX864, COMPOST867, DTSCAN860, DTSUBS867, DTSUBSS867, DTWRONG867, ERASE867, ERASEA867, GETNO865, GETWORD867, HLSEVENT867, INCFIN864, INCSET865, INCSTART865, INCTAPES867, INCVFCHK850, IPALL864, IPCOPENA83, RENAME864, RETRIEVE864, SCHEDMTX867, TRAPGO864, UNPLUG867, USERDIR842, USERLIB867, USERONE867, USEROPEN867, USERSTRM867 96=N ...[??? BBS SECT CENT FGN 9 DOC 96GG # 9726 # THIS M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BBUS https://www.george3.co.uk/george/macro/bbus?rev=1705492539&do=diff BBUS (GIN Macro) Defined in: MACROS JSR Used in: ADJCHECK85, ANTIC867, ARCHIVNW83, BMINDEX866, CANCRVX864, CLEAN867, COMPOST867, COMPROB867, DTSCAN860, DTSTART867, DTWRONG867, EVENTS864, FHDIRTWO864, FHOBJDIR860, FHOBJIND860, GETWORD867, INCEND865, INCRCUBS860, INCSTART865, IPBCONS867, IPCEN8, IPCOPENA83, NORMERR860, PMJOURNL866, RESTOREG864, RETRIEVE864, SETPRAMA867, UNPLUG867, USERDIR842, USERLIB867, USERONE867, USERSTRM867 99N4 ...[??? BBUS SECT CENT FGN 9 DOC 99XW # 9=CG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BC https://www.george3.co.uk/george/macro/bc?rev=1705492539&do=diff BC (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ABANDONA867, ALLOW84, APPEND864, ARCHIVE867, BACKMASS860, BCAST867, BEXTRA83, BEXTSJ84, BMAPONE867, BMAPTWO860, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMSAVJOB864, BSPRUNE867, BSUNJAM867, BUDGONE83, BUDGTWO84, CANTDO867, CHARGESC867, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEND867, COMPRESS864, COMPROB867, CONNECT867, COOR865, COPYFILA867, COREALL865, COREALLF867, CORESHED861, CREALEX864, DTQUEST860, DTREST860, DTSCAN860, D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BCALL https://www.george3.co.uk/george/macro/bcall?rev=1705492539&do=diff BCALL (GIN Macro) Defined in: CENTCSSMACS Used in: 4NMD ...[??? BCALL SECT CENT FGN 18 DOC 4NX= ...# 4PBW ...[ RESTORE TIME MACRO TO PROHIBIT 4PWG ...[ 'ALL' AS A DEFAULT TO BROADCAST 4PXX ...#MAC BCALL 4P^# ...#MEN BCAST 4Q2P ...#TRA K50BCAST 4Q46 ...#STR OFF,%A 4Q5H ... BRN K51BCAST 4Q6Y ...#STR OFF,%A 4Q8* ...#SKI 4Q9Q ... BRN K53BCAST 4Q?7 ...#END 4Q#J ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BCASTX https://www.george3.co.uk/george/macro/bcastx?rev=1705492539&do=diff BCASTX (GIN Macro) Defined in: MACROS RJH Used in: DTSUBSS867 9F2D ...[??? BCASTX SECT CENT FGN 71 DOC 9F== # 9FPW # BCASTX=BROADCAST EXCEPT THAT %A CONTAINS MESSAGE IDENTIFIER 9G9G # 9GP6 #MAC BCASTX 9H8Q LDX 2 FX2 9HNB STO %A ACOMMUNE1(2) 9J82 #STR %B 9JML ( 9K7= LDX 0 %B 9KLW STO 0 ACOMMUNE2(2) 9L6G ) 9LL6 #STR %B 9M5Q #STR 9MKB STOZ ACOMMUNE2(2) 9N52 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BCMILL https://www.george3.co.uk/george/macro/bcmill?rev=1705492539&do=diff BCMILL (GIN Macro) Defined in: MACROS RJH Used in: 9NJY ...[??? BCMILL SECT CENT FGN 9NK= ...#MAC BCMILL 9NKJ ...[ RESTORE TIME MACRO TO SET BROADCAST ENHANCEMENT DS8216 9NKW ...[ ON OR OFF. IT IS ON BY DEFAULT. 9NL8 ...[ 9NLG ...#STR ON,%A 9NLS ...#SKI 9NM6 ...( 9NMD ...#MEN BCAST 9NMQ ...#TRA K55BCAST 9NN4 ...SBC +0 9NNB ...#END 9NNN ...#EXI 9NP2 ...) 9NP# ...#STR OFF,%A 9NPL ...! PARAMETER MUST BE ON OR OFF 9NPY ...#STR O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BCONTEXT https://www.george3.co.uk/george/macro/bcontext?rev=1705492539&do=diff BCONTEXT (GIN Macro) Defined in: MACRO COMPRO Used in: FHOBJIND860, HOWBIG867, INCOM864, INCRCUBX860, LIST867, LISTFILE867, WHATGENS867 F75D ...[??? BCONTEXT SECT CENT FGN 21 DOC F7*= # F7SW [ THIS MACRO BRANCHES TO %A IF JOB IS IN %C CONTEXT F8#G # F8S6 #MAC BCONTEXT F9?Q LDBIT ECV%C,0 F9RB #STR %B F=?2 #STR F=QL ( F?== SMO FX2 F?PW ... ANDX 0 CONTEXT F#9G ) F#P6 #STR %B F*8Q MO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BFALSE https://www.george3.co.uk/george/macro/bfalse?rev=1705492539&do=diff BFALSE (GIN Macro) Defined in: IFMACS Used in: C#Q= [??? BFALSE SECT DEVT FGN 1 DOC C*9W [ C*PG #MAC BFALSE CB96 [ ====== CBNQ [ I.E. BRN IF FALSE I.E. DO NOTHING CC8B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BFCBX https://www.george3.co.uk/george/macro/bfcbx?rev=1705492539&do=diff BFCBX (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, BMINDEX866, CHANFILE8, CLOSEDIR867, CLOSEONE867, CLOSTIDY860, COMMFILE82, DELETE864, FBUFF860, INCRCUBS860, INCRCUBX860, INDEX85, INSERT6, INSERTBL6, INSERTFR6, INSERTHR6, INSERTWO6, LOCATE84, MTCHECK860, MTCODE864, MTOBJ864, MTSTART864, OFFREL867, OPENWAIT867, PERUSFIL84, READFAIL866, READFALE866, READFILE84, REWRITE864, STEP864 998D ...[??? BFCBX SECT FILE FGN 20 DOC 99D= #MAC BFCBX [GIVEN FSTACK P… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BI https://www.george3.co.uk/george/macro/bi?rev=1705492539&do=diff BI (GIN Macro) Defined in: MACROS SJ Used in: ADDICT865, INCCHECK860, INCTAPES867, SCHEDIN867, UNJAMMER866 5DGD ...[ 5DML ...[ 5DSW ...[??? BI SECT FILE FGN 24 DOC 5GRB #MAC BI [P,I 5GSC ...[ %A IS THE BIT IDENTIFIER, %B POINTS TO THE START OF DATA 5GTD ...[ %C IS THE INSTRUCTION 5GWF ...[ NOW SOME USEFUL MACROS 5GXG ...[ BI P,I BIT INVERT 5GYJ #STR %C%D 5H5Q !!-TOO MANY PARAMS FOR SINGLE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BICE https://www.george3.co.uk/george/macro/bice?rev=1705492539&do=diff BICE (GIN Macro) Defined in: MACRO COMPRO Used in: CANCOM863, OPERATOR867, VCLASTWO867, VERBCLAS867 =9CN ...[??? BICE SECT CENT FGN 21 DOC =9MG [ THIS MACRO ASSEMBLES THE ENTRY FOR EACH COMMAND IN THE ==76 [ BUILT IN COMMAND DICTIONARY. ==LQ #MAC BICE =?6B 4H%A [ABBREVIATED VERSION OF VERB =?L2 ... 12H%B [FULL VERSION OF VERB =#5L %C [CONTEXT BITS =#K= PA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BILA https://www.george3.co.uk/george/macro/bila?rev=1705492539&do=diff BILA (GIN Macro) Defined in: MACROS MACB Used in: 6P5Y ...[??? BILA SECT CENT FGN 2 DOC 6P*Q #MAC BILA 6PKJ ...#ALT BILA=1 6PTB #MEN LOGOUT 6Q*2 #TRA K50LOGOUT 6QSL #STR ON,%A 6R#= #SKI 6RRW ( 6S?G DOWN BLOGNAL,1 6SR6 ...#ALT BILA=0 6T=Q #END 6TQB #MEN OUTPER 6W=2 #TRA K51OUTPER 6WPL LDN 3 #65 ["U". 6X9= #END 6XNW #MEN CONNECT 6Y8G #TRA K50CONNECT 6YN6 DOWN BLO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BITALTS https://www.george3.co.uk/george/macro/bitalts?rev=1705492539&do=diff BITALTS (GIN Macro) Defined in: COMPMACMOON Used in: 29CB ...[??? BITALTS SECT FILE FGN 11 DOC 29CW ...#MAC BITALTS 29DB ...#STR %C 29DW ...#ALT %C=%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A- 29FB ...+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%A+%B[ 29FW ...#STR %D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X%Y%Z 29GB ... BITALTS %A,%B+1,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,- 29GW ...%T,%U,%V,%W,%X,%Y,%Z [ 29HB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BITDEFS https://www.george3.co.uk/george/macro/bitdefs?rev=1705492539&do=diff BITDEFS (GIN Macro) Defined in: COMPMACMOON Used in: ABANDON867, ABANDONA867, ARCHIVE867, BMPRCHEK860, BMSTREAM853, BSPRUNE867, BSUNJAM867, CANTDO867, CLOSEAB863, CLOSEDIR867, CLOSEMAS863, CLOSEND867, CLOSEONE867, COMPS ACTBLK, COMPS BMAP, COMPS COMPRO, COMPS CORE, COMPS FIXD, COMPS IDF, COMPS MW, COMPS OPER, COMPS PERI, COMPS RMD13, COMPS RME7A, COMPS SAR9, COMPS SHFS, COMPS SIB, COMPS SJ, COMPS WELL, COMPSDUMP, COMPSFILE, CONNECT867, CONNECTA867, COPYFILA867, COPYFILE867, DFCOMPS, DIRENT867… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BITMASK https://www.george3.co.uk/george/macro/bitmask?rev=1705492539&do=diff BITMASK (GIN Macro) Defined in: MACROS JSR Used in: SWAP865 8**S ...[??? BITMASK SECT CENT FGN 9 DOC 8*KL # 8B5= # THIS MACRO SETS UP A MASK OF THE SPECIFIED BITS 8BJW # 8C4G #MAC BITMASK 8CJ6 +0 8D3Q BITMASKZ %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M 8DHB #STR %N 8F32 BITMASKZ %N,%O,%P,%Q,%R,%S,%T,%U,%V,%W,%X 8FGL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BITMASKZ https://www.george3.co.uk/george/macro/bitmaskz?rev=1705492539&do=diff BITMASKZ (GIN Macro) Defined in: MACROS JSR Used in: 8L74 ...[??? BITMASKZ SECT CENT FGN 9 DOC 8LBW # 8LWG # THIS IS AN ITERATIVE MACRO ONLY USED IN DEFINING BITMASK/NBITMASK 8MB6 # 8MTQ #MAC BITMASKZ 8N*B #STR %A 8NT2 ( 8P#L #SKIP %A>23-23 8PS= ! %A EXCEEDS 23 OR IS UNDEFINED 8Q?W #FID %A %A 1 8QRG BITMASKZ %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M 8R?6 #STR %N 8RQQ BITMASKZ %N,%O,%P,%Q,%R,%S,%T,%U,%V… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLAM https://www.george3.co.uk/george/macro/blam?rev=1705492539&do=diff BLAM (GIN Macro) Defined in: MACROS RMD10 Used in: CLOSEDIR867, EDOBJ864, MTCODE864, MTOBJ864 =NRW ...[??? BLAM SECT FILE FGN 16 DOC =PR6 ...# MACRO TO CONVERT BLOCK NO IN USAGE BLOCK TO FREADBLOCK TYPE POINTE =Q=Q ...# BLOCK MUST BE CHAINED BEHIND CURRENT ACTIVITY UNLESS %B GIVEN =QQB ...#MAC BLAM =R=2 ...#STR %A =RPL ...#SKI =S9= ...( =SNW ...#STR %B =T8G ... MOD LDX 0 BACK2,%B =TN6 ... LDX 2 FX2 =W7Q ...#STR %B =WMB ...#SKI =X72 ...( =XLL .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCK https://www.george3.co.uk/george/macro/block?rev=1705492539&do=diff BLOCK (GIN Macro) Defined in: IFMACS Used in: COPYFILA867, EXOPEN867, INSERT6, INSERTBL6, INSERTFR6, INSERTHR6, INSERTWO6, MESSAD, MESSAJ, MESSBC, MESSBG, MESSBI, MESSCB, MESSCF, MESSCG, MESSDA, MESSDJ, MESSF, MESSG, PMCHAINS864, PMDUMPDA85, PMFILE860, PMFS85, PMSUMA867, RESTERR864, WRITEFIP867, WTSTAT867 HD5B ...[ HDK2 ...[ HF4L ...[ 'BLOCK' GROUP OF MACROS HFJ= ...[ ======================= HG3W ...[ HGHG ...[ HH36 ...[ HHGQ ...[ HJ2B ...[ HJG2 ...[ A B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKBITS https://www.george3.co.uk/george/macro/blockbits?rev=1705492539&do=diff BLOCKBITS (GIN Macro) Defined in: MACROSBRBS Used in: 2=3S ...[??? BLOCKBIT SECT FILE FGN 14 DOC 2=?L #MAC BLOCKBITS 2=R= RESON BSBITS 2?=W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKCOPY https://www.george3.co.uk/george/macro/blockcopy?rev=1705492539&do=diff BLOCKCOPY (GIN Macro) Defined in: COREMACROS Used in: CHCH865, COREALLF867, COREALLG82 55JR ...[??? BLOCKCOP SECT CENT FGN 32 DOC 55KG #MAC BLOCKCOPY [COPIES BLOCK FROM OLD TO NEW SITES 5656 [ & FREES OLD SITE 56JQ CALL 0 (BCOPY) 574B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKDOWN https://www.george3.co.uk/george/macro/blockdown?rev=1705492539&do=diff BLOCKDOWN (GIN Macro) Defined in: RING-MACROS Used in: COMMFILE82 62M8 ...[??? BLOCKDOW SECT FILE FGN 20 DOC 62X2 #MAC BLOCKDOWN 63BL # SUBTRACTS ONE FROM EACH FREADBLOCK IN THE FSTACK BLOCK POINTED TO 63W= # %A. %B IS AN ACCUMULATOR FOR USE BY(AND OVERWRITTEN BY)THE MACRO. 64*W LDEX %B ARINGNO(%A) [CT FOR LOOP 64TG LDX 0 %B 65*6 M3BLOCKDOWN 65SQ ADN %A FELLEN 66#B BCT 0 M3BLOCKDOWN 66S2 M2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKMAP https://www.george3.co.uk/george/macro/blockmap?rev=1705492539&do=diff BLOCKMAP (GIN Macro) Defined in: BMAP MACROS Used in: BMAPDIR865, BMAPONE867, BMFIXIT864 54W4 ...[??? BLOCKMAP SECT FILE FGN 36 DOC 55*N ...#MAC BLOCKMAP 55KG [ X1=FX1, X2=FX2, X3-> BLOCKS RECORD, X4=NO OF BLOCKS IN FILE (FROM ECOP 5656 [ X5=BLOCKS RECORD HEADER 574B SBN 5 2 57#8 ... STO 4 ACOMMUNE1(2) 57RS ... STO 6 ACOMMUNE3(2) 583L BXU 4 5,M97BLOCKMAP 58H= LDX 0 1(3) 592W SBN 0 3 59GG BNG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKMOVE https://www.george3.co.uk/george/macro/blockmove?rev=1705492539&do=diff BLOCKMOVE (GIN Macro) Defined in: COREMACROS Used in: COREALLF867, COREALLJ865 57#8 ...[??? BLOCKMOV SECT CENT FGN 32 DOC 57J2 # 583L #MAC BLOCKMOVE [MOVES [X3] WORDS FROM BLOCK AT 58H= [ X1 TO X2 ,UPDATING RINGS ETC 592W CALL 0 (BMOVE) 59GG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BLOCKTRACE https://www.george3.co.uk/george/macro/blocktrace?rev=1705492539&do=diff BLOCKTRACE (GIN Macro) Defined in: MACROS HFD8 Used in: BACKROOM865, FORMLOOP865, INCDTA865, INCTAPES867 3LPG ...[??? BLOCKTRA SECT FILE FGN 22 DOC 3NN2 #MAC BLOCKTRACE 3NRX ...[ BLOCKTRACE TRACES [%C] WORDS OF BLOCK %A + SOME RED TAPE 3NXS ...[ %B IS THE CHARACTER STRING (%A IS A I. R.) 3P3P ...[ %C IS OPTIONALLY ALOGLEN(%A) 3P7L STO %A BATEMAN1 3PM= #STR %C 3Q6W ( 3QLG SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMAPSEG https://www.george3.co.uk/george/macro/bmapseg?rev=1705492539&do=diff BMAPSEG (GIN Macro) Defined in: BMAP MACROS Used in: BACKMARK850 22FL ...[??? BMAPSEG SECT FILE FGN 36 DOC 292D ...#MAC BMAPSEG 29*6 ...#OPT K0%A=K0BMAP 29MS ...#OPT K6%A=K6BMAP 2=2G ...#LIS K0%A 2=*8 ...#SEG %A%B 2=MW ... 8H%A 2?2J ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMCHECKRF https://www.george3.co.uk/george/macro/bmcheckrf?rev=1705492539&do=diff BMCHECKRF (GIN Macro) Defined in: BMAP MACROS Used in: BMSJRNL866 69^J ...[??? BMCHECKR SECT FILE FGN 36 DOC 6=P2 #MAC BMCHECKRF 6?8L DOWN BMSJRNL,2 6?9R ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMINDEX https://www.george3.co.uk/george/macro/bmindex?rev=1705492539&do=diff BMINDEX (GIN Macro) Defined in: INDEX-MACROS Used in: ADDICT865, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, CHTAB, INKS 2H#N ...[??? BMINDEX SECT FILE FGN 9 DOC 2HJG #MAC BMINDEX 2J46 #ACC %A 2JHQ LDX 0 %A 2K3B SMO FX2 2KH2 #ACC %A 2L2L STO 0 ACOMMUNE9 2LG= #ACC %A 2L^W #SKI 2MFG STO %A ACOMMUNE9 2M^6 DOWN BMINDEX,2 2NDQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMJWLOSE https://www.george3.co.uk/george/macro/bmjwlose?rev=1705492539&do=diff BMJWLOSE (GIN Macro) Defined in: BMAP MACROS Used in: 2?FN ...[??? BMJWLOSE SECT CENT FGN 72 DOC 2?YS ...[ 2#CY ...#MAC BMJWLOSE 2#X4 ...#UNS FUJP 2*B8 ...( 2*T# ...#MEN BMJLSLAV 2B#D ...#TRA K50BMJLSLAV 2BRJ ...) 2C=N ...#UNS FUJP 2CPS ...#SKI 2D8Y ...( 2DN4 ...#MEN BMJLIST 2F78 ...#TRA K50BMJLIST 2FL# ...) 2G5D ...#STR %A 2GJJ ...#SKI 2H3N ... LDN 0 1 2HGS ...#STR OFF,%A 2H^Y ...#SKI 2JF4 ... LDN 0 0 2JY8 ...#STR GE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMOPENDIR https://www.george3.co.uk/george/macro/bmopendir?rev=1705492539&do=diff BMOPENDIR (GIN Macro) Defined in: BMAP MACROS Used in: 4S4S ...[??? BMOPENDI SECT FILE FGN 36 DOC 4S#L [ %A-BREAKIN. %B-LABEL IF NOT OK. %C-LABEL IF BACKMAP MARKER SET(X1->FIL 4SS= [& DIRECTORY IS OPEN 4T?W [ %D-LABEL IF FILE OFFLINE(OPTIONAL) 4TRG #MAC BMOPENDIR 4W?6 OPENDIR %A,GENERAL,CAREFUL,QUERY 4WQQ TESTRPN2 OK,%B 4X=B MHUNTW 1,FILE,ENT 4XQ2 LDEX 0 ECOPS(1) 4Y9L #STR %D 4YP= BZE 0 %D 4^8W #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMOPENRELN https://www.george3.co.uk/george/macro/bmopenreln?rev=1705492539&do=diff BMOPENRELN (GIN Macro) Defined in: BMAP MACROS Used in: 3T4L ...[??? BMOPENRE SECT FILE FGN 36 DOC 4KFW [ %A-BREAKIN & ERROR LABEL. %B-UNCAREFUL. X1->FILE,ENT 4K^G #MAC BMOPENRELN 4LF6 MHUNTW 2,FILE,FLOCNB 4LYQ LDX 0 ELAN(1) 4MDB STO 0 A1+5(2) 4MY2 ADN 1 ELOC1 4NCL ADN 2 A1 4NX= MOVE 1 5 4PBW #STR %B 4PWG ... OPENRELN %A,CLEAN,DIROPEN,QUERY 4QB6 #STR %B 4QTQ #SKI 4R*B ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMSAOFF https://www.george3.co.uk/george/macro/bmsaoff?rev=1705492539&do=diff BMSAOFF (GIN Macro) Defined in: MACROS FIXD Used in: 33D# ...[??? BMSAOFF SECT CENT FGN 11 DOC 33N6 [ 347Q #MAC BMSAOFF 34MB JMBAC %A,,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,- 3572 %V,%W 35LL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMSAON https://www.george3.co.uk/george/macro/bmsaon?rev=1705492539&do=diff BMSAON (GIN Macro) Defined in: MACROS FIXD Used in: 2^28 ...[??? BMSAON SECT CENT FGN 11 DOC 2^=2 [ 2^PL #MAC BMSAON 329= ... JMBAS %A,,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,- 32NW %V,%W 338G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BMSTATS https://www.george3.co.uk/george/macro/bmstats?rev=1705492539&do=diff BMSTATS (GIN Macro) Defined in: BMAP MACROS Used in: ADDICT865, BACKMAP864, BACKMASS860, BACKROOM865, BMAPTWO860, BMJLIST864, BMOUTPUT867, CHTAB, INKS 6?=* ...[??? BMSTATS SECT FILE FGN 36 DOC 6#MG ...#MAC BMSTATS 6*76 ...[NEEDS X2=FX2 6*LQ ... ACCSTO %A,ACOMMUNE1(2) 6B6B ...#STR %B 6BL2 ...#SKI 6C5L ...( 6CK= ... DOWN BMSTATS,1 6D4W ...#EXI 6DJG ...) 6F46 ... ACCSTO %B,ACOMMUNE2(2) 6FHQ ...#STR %C 6G3B ...#SKI 6GH2 ...( 6H2L ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BNSJ https://www.george3.co.uk/george/macro/bnsj?rev=1705492539&do=diff BNSJ (GIN Macro) Defined in: MACROS MACB Used in: BACKMAP864, LOGOUT867 7KD8 ...[??? BNSJ SECT CENT FGN 2 DOC 7KN2 #MAC BNSJ 7L7L BSOFF JNLBIT,%A 7LM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BODGECOM https://www.george3.co.uk/george/macro/bodgecom?rev=1705492539&do=diff BODGECOM (GIN Macro) Defined in: MACROS SHFSB Used in: 22FL # 22^= # 23DW # 23YG # MACROS SHFSB IS FOR MISCELLANEOUS SHARED FILESTORE MACROS. 24D6 # IT CONTAINS THE FOLLOWING MACROS : 24XQ # 25CB # 25X2 [??? BODGECOM SECT FILE FGN 1 DOC 26BL # 26W= [??? NOBOPCM SECT FILE FGN 1 DOC 27*W # 27TG [??? FSHMOVE SECT FILE FGN 1 DOC 28*6 # 28SQ [??? INSBLKS SECT FILE FGN 1 DOC 29#B # 29S2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BOOKSS https://www.george3.co.uk/george/macro/bookss?rev=1705492539&do=diff BOOKSS (GIN Macro) Defined in: MACROS JSRG4 Used in: LOADPROG865, TPINS861 K6?Q #MAC BOOKSS [JSRAYNER G4 ONLY K6RB MBOOKSS1 K7?2 LDX 0 %A K7QL ADX 0 EBSWAPSP K8== TXL 0 EFSWAPSP K8PW BCS MBOOKSS2 K99G BSON G4SUDBIT,%B [EXIT IF NO SUD TO DELETE K9P6 DOWN PROGDEL,5 [OTHERWISE FREE SUD & TRY AGAIN K=8Q BRN MBOOKSS1 K=NB MBOOKSS2 K?82 S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BOP https://www.george3.co.uk/george/macro/bop?rev=1705492539&do=diff BOP (GIN Macro) Defined in: MACROS SJ Used in: =RC8 ...[ =RJB ...[ =RPL ...[??? BOP SECT FILE FGN 24 DOC =^K6 #MAC BOP =^MP ...[ THE FOLLOWING MACROS OPERATE ON THE BITS IN AN ACC,CORRESPONDING =^Q# ...[ TO THE BIT IDS GIVEN =^SX ...[ BOP,MBOP ARE THE PRIMITIVES =^XG ...[ BSXD SETS THE BITS IN AN ACC, OVWERWRITING PREV CONTETS ?225 ...[ MBSXD IS THE MULTI CASE ?24Q #SKI %A&#37>11-11 ?2JB ( [B12-23 ?342 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BRANCHIF https://www.george3.co.uk/george/macro/branchif?rev=1705492539&do=diff BRANCHIF (GIN Macro) Defined in: IFMACS Used in: 8TNB ...[ 8TNL ...[ 8TP= [ HERE FOLLOW THE UTILITY MACROS 8W8W [ ================================ 8WNG [ 8X86 [ 8XMQ [??? BRANCHIF SECT DEVT FGN 1 DOC 8Y7B [ 8YM2 #MAC BRANCHIF 8^6L [ ======== 8^L= [ 925W [ 92KG [ %A - LABEL ROOT 9356 [ %B - BRANCH DEFINER 93JQ [ %C - (OPTIONAL) ACCUMULATOR, OR STORE LOCATION TO BE LOADED INTO X0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BREADYON https://www.george3.co.uk/george/macro/breadyon?rev=1705492539&do=diff BREADYON (GIN Macro) Defined in: MACRO COMPRO Used in: FRKN ...[??? BREADYON SECT CENT FGN 21 DOC FRTG #MAC BREADYON [ B.L. VICKERY FS*6 LDN 0 #400 FSSQ SMO FX2 FT#B ANDX 0 EXT+11 FTS2 BNZ 0 %A FW?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BRINDEX https://www.george3.co.uk/george/macro/brindex?rev=1705492539&do=diff BRINDEX (GIN Macro) Defined in: INDEX-MACROS Used in: BMINDEX866, FHOBJIND860, INSERT6 73B4 ...[??? BRINDEX SECT FILE FGN 9 DOC 73KW [ 782G #MAC BRINDEX 783X ...[ THIS MACRO BRANCHES TO %B UNINDEXED 785# ...[ %C FOR DIRS 786P ...[ %D FOR DICT #IF %D EJ AL MISSING,ASSU-* 7886 ...[ %E FOR SERIAL #UMES ALL SAME 789H ...[ %F FOR INCINDEX 78=Y ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BRKINOFF https://www.george3.co.uk/george/macro/brkinoff?rev=1705492539&do=diff BRKINOFF (GIN Macro) Defined in: MACS MISW Used in: EDITET7, SCEDITOR84 3N8B #MAC BRKINOFF 3NN2 LDX 2 FX2 3P7L LDX 0 JOBEVENTS(2) 3PM= BZE 0 MBRK 3Q6W LDCT 0 #300 3QLG ERX 0 BITS22LS 3R66 ANDX 0 JOBEVENTS(2) 3RKQ BNZ 0 %A 3S5B FJOCA 2,FX2 3SK2 LDCT 0 #100 3T4L ERS 0 JMISC(2) 3TJ= LDX 2 FX2 3W3W STOZ JOBEVENTS(2) 3WHG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BROADCAST https://www.george3.co.uk/george/macro/broadcast?rev=1705492539&do=diff BROADCAST (GIN Macro) Defined in: MACROS RJH Used in: FINISH867, FINISHB867, MESSCA 97PJ ...[??? BROADCAS SECT CENT FGN 71 DOC 97^B # TO BROADCAST A SPECIFIED MESSAGE TO ONE 98F2 # OR ALL MOP CONSOLES LOGGED IN 98YL # 99D= # %A IS A UNIVERSAL IDENTIFIER OF THE 99XW # MESSAGE TO BE OUT PUT 9=CG # 9=X6 # %B IF PRESENT, A WORD CONTAINING THE JOB NUMBER 9?BQ # OF THE MOP … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BROKIN https://www.george3.co.uk/george/macro/brokin?rev=1705492539&do=diff BROKIN (GIN Macro) Defined in: MACS MISW Used in: COMPROB867 42DG #MAC BROKIN 42Y6 LDX 2 FX2 43CQ LDCH 0 JSOURCE1(2) 43XB SBN 0 10 44C2 BZE 0 MUX 44WL BCT 0 MNUXMX 45B= MUX MOPWAIT 45TW MNUXMX 46*G LDX 2 ACTRING(2) 46T6 LDX 1 FX1 47#Q SBN 2 ACTRING 47SB MBROKIN1 48#2 LDX 2 BPTR(2) 48RL BXE 2 FX2,MBROKIN4 49?= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BRUSEN https://www.george3.co.uk/george/macro/brusen?rev=1705492539&do=diff BRUSEN (GIN Macro) Defined in: MACRO COMPRO Used in: ALAS822, ASTONIF867, CHEKPRIV867, COMHOOK867, COMPROB867, COOR865, DIRENT867, DISPCOM867, DOXCODE867, HOWBIG867, LISTDIRF867, LISTFILE867, LOGACC863, LOGOUT867, MAKEFILE863, MONFILEA864, MOPCOM867, MOPCOMB865, OPENWAIT867, OWNERCHE84, PREPREAD867, PROCONTX867, PROFLAG83, RETRIEVE864, SCHEDENX860, SETPC867, SETPF867, SETPN867, SETPR867, SETPRAMA867, TIDYREAD850, TRACE867, TRAPCHEC867, TRAPPARA3, USEREXCP860, USERLIB867, USEROPEN867, VCLASTWO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BS https://www.george3.co.uk/george/macro/bs?rev=1705492539&do=diff BS (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ABANDONA867, ADJUNCTS85, ALAS822, ANTIC867, APPEND864, ARCHIVE867, ASSIGN860, BACKMAP864, BACKMASS860, BCAST867, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSTREAM853, BMXEND7, BSPRUNE867, BSUNJAM867, BUDGONE83, CANTDO867, CHARGESC867, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEND867, CLOSEONE867, COMMFILE82, COMPOST867, COMPRESS8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSCHECK https://www.george3.co.uk/george/macro/bscheck?rev=1705492539&do=diff BSCHECK (GIN Macro) Defined in: ACCESSMACROS Used in: C??B ...# THIS IS A RESTORE TIME MACRO TO SWITCH CORRUPTION CHECKING C?R2 ...# DURING READ TRANSFERS ON AND OFF. C#=L ...#MAC BSCHECK C#Q= ...#STR %A,ON C*9W ...#SKI C*PG ...( CB96 ...#STR %B CBNQ ...( CC8B ...#CON ILLEGAL USE OF PARAMETERS CCN2 ...#EXI CD7L ...) CDM= ...) CF6W ...#MEN STEP CFLG ...#STR %A,ON CG66 ...#SKI CGKQ ...( CH5B ...#TRA K1STEP+1 CHK2 ... BRN K1STEP+4 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSCLEAR https://www.george3.co.uk/george/macro/bsclear?rev=1705492539&do=diff BSCLEAR (GIN Macro) Defined in: MACROS HFD8 Used in: 5SFL ...[??? BSCLEAR SECT FILE FGN 22 DOC 5SX2 ...#MAC BSCLEAR 5T#B ...[MEND MACRO TO ZEROIZE BS FOR RANDOM FILES FOR SECURITY PURPOSES 5TPQ ...#MEN CREATE 5W76 ...#TRA BSCLEARX 5WJG ... NULL 5W^W ...#TRA BSCLEARY 5XC= ... NULL 5XSL ...#END 5Y=2 ...#MEN EDSTART 5YMB ...#TRA BSCLEARZ 5^4Q ... NULL 5^G6 ...#END 5^XQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSJ https://www.george3.co.uk/george/macro/bsj?rev=1705492539&do=diff BSJ (GIN Macro) Defined in: MACROS MACB Used in: ADDICT865, BMOUTPUT867, CONNECTA867, HLSEMS864, LOGOUT867 7H^# ...[??? BSJ SECT CENT FGN 2 DOC 7J96 #MAC BSJ 7JNQ BSON JNLBIT,%A 7K8B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSOFF https://www.george3.co.uk/george/macro/bsoff?rev=1705492539&do=diff BSOFF (GIN Macro) Defined in: MACROS FIXD Used in: ADDICT865, BMCNTRL866, BMFIXIT864, CARTCONT867, CONNECTA867, CONSOLE867, COREALL865, DSCNCT867, EXPRESS864, GETBACK865, GETBAX865, IDFPROP867, LOADERR70, PERFLOGS866, PLUGIN867, SETLIST864, SWAP865, UNPLUG867, WHATPER867, WHTSTAT867 2X3N ...[??? BSOFF SECT CENT FGN 11 DOC 2X?G [ 2XR6 #MAC BSOFF 2Y=Q JBC %B,,%A 2YQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSON https://www.george3.co.uk/george/macro/bson?rev=1705492539&do=diff BSON (GIN Macro) Defined in: MACROS FIXD Used in: ABANDON867, BMFIXIT864, BMSAVJOB864, BSALFAIL, BSTS867, CARTCONT867, CHARGESC867, COMPROB867, CONNECT867, CONNECTA867, CONSOLE867, COREALL865, DSCNCT867, EMSENTER867, EVENTS864, GETBACK865, GETBAX865, HLSEMS864, IDFOFF867, KARTCONT867, MONFILE867, MONFILEA864, MONJRNAL850, READFAIL866, READFALE866, RUNPROG840, SCHEDIN867, UNJAMMER866, WA864, WHATRVSA867, WLC867 2T58 ...[??? BSON SECT CENT FGN 11 DOC 2T*2 [ 2TSL #MAC BSON 2W… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSPRI https://www.george3.co.uk/george/macro/bspri?rev=1705492539&do=diff BSPRI (GIN Macro) Defined in: ICTMACS Used in: 8D3Q ...[??? BSPRI SECT CENT FGN DOC 8DHB ...#MAC BSPRI 8F32 ...[ TO SWITCH ALTERNATIVE OPTIMISING ROUTINE IN 8FGL ...[ BSQ ON OR OFF 8G2= ...#STR ON,%A 8GFW ...#SKI 8G^G ...( 8HF6 ...#MEN BSTS 8HYQ ...#TRA ASFBSTS 8JDB ... BRN ASFBSTS2 8JY2 ...#TRA ASFBSTS1 8KCL ... BRN ASFBSTS2 8KX= ...#END 8LBW ...#MEN BSQ 8LWG ...#TRA ASFP13 8MB6 ... BRN ASFBS1 8MTQ ...#END 8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSSTAT https://www.george3.co.uk/george/macro/bsstat?rev=1705492539&do=diff BSSTAT (GIN Macro) Defined in: DUMP-MACROS Used in: 8MKY ...[??? BSSTAT SECT FILE FGN 65 DOC 8NT2 [ MEND TYPE MACRO TO SWITCH ON UNJAMMER STATISTICS 8P#L #MAC BSSTAT 8PS= #MEN BSUNJAM 8Q?W #TRA BSUJSW 8QRG +1 8R?6 #END 8RQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSUJ https://www.george3.co.uk/george/macro/bsuj?rev=1705492539&do=diff BSUJ (GIN Macro) Defined in: DUMP-MACROS Used in: BSPRUNE867, BSUNJAM867 F2T6 ...[??? BSUJ F3#Q ...# F3SB ...# THIS MACRO IS USED BY BSUJFORM MACRO. F4#2 ...# %A = PARAMETER TO BSUJFORM F4RL ...# %B = NUMBER OF PARAMETER %A F5?= ...# %C = MAXIMUM VALUE ALLOWED FOR %A F5QW ...# %D = DEFAULT VALUE FOR %A F6=G ...# F6Q6 ...#MAC BSUJ F79Q ...#STR %A F7PB ...( F892 ...#ALT BSUSKIP = 1 F8NL ...#SKI %A&#40000000 F98= ...#SKI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSUJDUMP https://www.george3.co.uk/george/macro/bsujdump?rev=1705492539&do=diff BSUJDUMP (GIN Macro) Defined in: DUMP-MACROS Used in: ?DFN ...[??? BSUJDUMP SECT FILE FGN 65 DOC ?DPG #MAC BSUJDUMP ?F96 LDX 0 BSNDUMP(1) ?FNQ BXL 0 BSLEFT(1),M2BSUJDUMP ?G8B #STR %B ?GN2 #SKI %B ?H7L ( ?HM= STO 6 ACOMMUNE1(2) ?J6W LDN 2 0 ?JLG LDX 6 BSAB ?K66 LDX 3 BMISC [PICK UP BASE OF MISC CHAIN ?KKQ M1BSUJDUMP ?L5B LDX 3 FPTR(3) [… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSUJFORM https://www.george3.co.uk/george/macro/bsujform?rev=1705492539&do=diff BSUJFORM (GIN Macro) Defined in: DUMP-MACROS Used in: FLB6 ...[??? BSUJFORM FLTQ ...# FM*B ...# THIS RESTORE TIME MACRO PROVIDES VALUES FMT2 ...# FOR PARAMETERS IN THE FORMULA USED BY THE FN#L ...# BACKING STORE UNJAMMER WHEN DECIDING WHICH FNS= ...# FILES TO THROW OFF-LINE. FP?W ...# SEE DESIGN SPECIFICATION DS8424 FPRG ...# FQ?6 ...#MAC BSUJFORM FQQQ ...#ALT BSUVAL = 0 FR=B ...#ALT BSUSKIP = 0 FRQ2 ... BSUJ %A,1,999,0 FS9L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BSXD https://www.george3.co.uk/george/macro/bsxd?rev=1705492539&do=diff BSXD (GIN Macro) Defined in: MACROS SJ Used in: CLOSEDIR867, CLOSEND867, IDFPER867, IDFSCON867, INCCHECK860, INCEND865, INCPTRES864, INCRCUBS860, INCSTART865, JWELLONE867, LIBPROPS, LISTEND867, LISTOPEN867, LISTRING864, SCHEDMTX867, UNPLUG867, WLF862, WLOUT865 #?7T ...[ #?=D ...[ #?*4 ...[??? BSXD SECT FILE FGN 24 DOC #?JW #MAC BSXD ##4G BOP %B,LD,%A ##J6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BTRUE https://www.george3.co.uk/george/macro/btrue?rev=1705492539&do=diff BTRUE (GIN Macro) Defined in: IFMACS Used in: C9SG [??? BTRUE SECT DEVT FGN 1 DOC C=#6 [ C=RQ #MAC BTRUE C??B [ ===== C?R2 BRN %A C#=L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGBITS https://www.george3.co.uk/george/macro/budgbits?rev=1705492539&do=diff BUDGBITS (GIN Macro) Defined in: MACROS MACB Used in: 3X=Y ...[??? BUDGBITS SECT CENT FGN 2 DOC 3XGQ # 3Y2B # BUDGET CONVERSION 3YG2 #MAC BUDGBITS 3Y^L SMO FX1 3^F= LDX 0 MBUDGBITS1 3^YW SMO FX2 42DG STO 0 EXEC1 42Y6 DOWN BUDGONE,2 43CQ BRN MBUDGBITS2 43XB MBUDGBITS1 +%A 44C2 MBUDGBITS2 44WL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGBITX https://www.george3.co.uk/george/macro/budgbitx?rev=1705492539&do=diff BUDGBITX (GIN Macro) Defined in: MACROS MACB Used in: BLOGNAL865, JDWRITE867 456D ...[??? BUDGBITX SECT CENT FGN 2 DOC 45B= #MAC BUDGBITX 45TW LDX 0 %A 46*G SMO FX2 46T6 STO 0 EXEC1 47#Q DOWN BUDGONE,2 47SB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGCHAR https://www.george3.co.uk/george/macro/budgchar?rev=1705492539&do=diff BUDGCHAR (GIN Macro) Defined in: MACROS MACB Used in: BMJLIST864, BUDGTWO84, INITJOB867 4R5J ...[??? BUDGCHAR SECT CENT FGN 2 DOC 4R*B #MAC BUDGCHAR 4RT2 DOWN BUDGTWO,2 4S#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGERASE https://www.george3.co.uk/george/macro/budgerase?rev=1705492539&do=diff BUDGERASE (GIN Macro) Defined in: MACROS MACB Used in: ADDICT865, ERASEA867 6DS# ...[??? BUDGERAS SECT CENT FGN 2 DOC 6F46 # 6FHQ # BUDGERASE 6G3B # MECRO TO RETURN TO HIS SUPERIOR ALL OF A USER'S BUDGETS. 6GH2 # IT IS ASSUMED THAT THE DICTIONARY IS OPEN IN GENERAL MODE, 6H2L # AND THAT THE FIRST FILE,ADICTENT BLOCK IN THE CHAIN IS THAT 6HG= # OF THE USER WHOSE BUDGETS ARE TO BE ERASED. 6H^W #MAC BUDGERASE 6JFG DOWN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGINCR https://www.george3.co.uk/george/macro/budgincr?rev=1705492539&do=diff BUDGINCR (GIN Macro) Defined in: MACROS MACB Used in: DEAD867, GET6, LIBQUERY, NEWOWN865, REALTIME867, RETURNIT867 4FSN ...[??? BUDGINCR SECT CENT FGN 2 DOC 4G4G #MAC BUDGINCR 4GJ6 LDX 0 %B 4H3Q LDX 2 FX2 4HHB STO 0 EXEC2(2) [AMOUNT OF INCREMENT 4J32 SMO FX1 4JGL LDX 0 MBUDGINCR1 4K2= STO 0 EXEC1(2) [BUDGET TYPE 4KFW DOWN BUDGONE,3 4K^G BRN MBUDGI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGINCX https://www.george3.co.uk/george/macro/budgincx?rev=1705492539&do=diff BUDGINCX (GIN Macro) Defined in: MACROS MACB Used in: BEXTRA83, BEXTSJ84, BLOGNAL865 4848 ...[??? BUDGINCX SECT CENT FGN 2 DOC 48#2 # 48RL #MAC BUDGINCX 49?= #STR 0,%B 49QW ( 4==G LDX 0 %A 4=Q6 SMO FX2 4?9Q STO 0 EXEC1 4?PB LDX 0 %B 4#92 ) 4#NL SMO FX2 4*8= STO 0 EXEC2 4*MW #STR 0,%B 4B7G #SKI 4BM6 ( 4C6Q LDX 0 %A 4CLB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGPAR https://www.george3.co.uk/george/macro/budgpar?rev=1705492539&do=diff BUDGPAR (GIN Macro) Defined in: BUDGPAR Used in: ALLOW84, BQUERY84, BUDGET84 0000 [??? BUDGPAR SECT FILE FGN 1 DOC 338G #MAC BUDGPAR 33N6 #STR %A,BQ 347Q #SKI 34MB DOWN BUDGTWO,9 3572 #STR %A,BT 35LL #SKI 366= DOWN BUDGTWO,10 36KW #STR %A,AW 375G #SKI 37K6 DOWN BUDGTWO,11 384Q BRN %B 38JB BRN %C 3942 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGSTART https://www.george3.co.uk/george/macro/budgstart?rev=1705492539&do=diff BUDGSTART (GIN Macro) Defined in: MACROS MACB Used in: DICTJOB82 6LD2 #MAC BUDGSTART 6LXL DOWN BUDGTWO,7 6MC= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGUSE https://www.george3.co.uk/george/macro/budguse?rev=1705492539&do=diff BUDGUSE (GIN Macro) Defined in: MACROS MACB Used in: ALLOW84, BEXTRA83, BLOGNAL865, BQUERY84, BUDGET84, BUDGTWO84, JDWRITE867 3QW# ...[??? BUDGUSE SECT CENT FGN 2 DOC 3R66 # 3RKQ # TO READ A USER'S BUDGET RECORD TO A JBUDGET,JBUDGUSER BLOCK 3S5B # 2) IF %A IS THE ADDRESS OF A WORD CONTAING THE BUDGET TYPE(BITS) 3SK2 #MAC BUDGUSE 3T4L LDX 0 %A 3TJ= SMO FX2 3W3W STO 0 EXEC1 3WHG DOWN BUDGONE,1 3X36 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGUSEN https://www.george3.co.uk/george/macro/budgusen?rev=1705492539&do=diff BUDGUSEN (GIN Macro) Defined in: MACROS MACB Used in: BEXTRA83, BEXTSJ84, BUDGTWO84 3J3J ...[??? BUDGUSEN SECT CENT FGN 2 DOC 3J?B # 3JR2 # TO READ A USER'S BUDGET RECORD TO A JBUDGET,JBUDGUSER BLOCK 3K=L # 1) IF %A IS THE BUDGET TYPE BIT PATTERN 3KQ= #MAC BUDGUSEN 3L9W SMO FX1 3LPG LDX 0 MBUDGUSEN1 3M96 SMO FX2 3MNQ STO 0 EXEC1 3N8B DOWN BUDGONE,1 3NN2 BRN MBUDGUS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUDGWRITE https://www.george3.co.uk/george/macro/budgwrite?rev=1705492539&do=diff BUDGWRITE (GIN Macro) Defined in: MACROS MACB Used in: ALLOW84, BEXTRA83, BLOGNAL865, BUDGET84, BUDGTWO84 4N7S ...[??? BUDGWRIT SECT CENT FGN 2 DOC 4NCL #MAC BUDGWRITE 4NX= DOWN BUDGONE,4 4PBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUSACT https://www.george3.co.uk/george/macro/busact?rev=1705492539&do=diff BUSACT (GIN Macro) Defined in: MACROS LEF Used in: 3SSS ...[??? BUSACT SECT DEVT FGN 2 DOC 3T4L #MAC BUSACT 3TJ= #SKI G%AACT 3W3W ( 3WHG LDXC 0 B%AACT 3X36 BCS %B 3XGQ ) 3Y2B #SKI 1<G%AACT$1 3YG2 BBUS B%AACT,FLAGACT,%B 3Y^L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUTTON https://www.george3.co.uk/george/macro/button?rev=1705492539&do=diff BUTTON (GIN Macro) Defined in: MACS SPC Used in: RESTOREA866, WTSTAT867 2NYB #MAC BUTTON 2PD2 #STR %B,0 2PXL LDX 0 %B 2QC= SMO FX2 2QWW STO 0 ACOMMUNE9 2RBG DOWN EMSENG,3 2RW6 LDX %A ACOMMUNE9(2) 2S*Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUTTONOLE https://www.george3.co.uk/george/macro/buttonole?rev=1705492539&do=diff BUTTONOLE (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867, KARTCONT867 QD9= # QDNW [??? BUTTONOLE QF8G # ********* QFN6 #MAC BUTTONOLE QG7Q # QGMB AUTWIN GBOLE,%A QH72 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BUTTONUP https://www.george3.co.uk/george/macro/buttonup?rev=1705492539&do=diff BUTTONUP (GIN Macro) Defined in: MACROS BSONL Used in: BSTS867, CDUM866, ENGAGE867, MOVCART867, RELIEF866, TWINSET866 2PD2 ...[??? BUTTONUP SECT FILE FGN 4 DOC 2^PL [ 329= [ MACRO FOR USE BY BSTS AND UNCART - SIMULATES AN ENGAGE BUTTON 32NW #MAC BUTTONUP 338G LDX 0 %A 33N6 #STR %B 347Q SMO %B 34MB #STR %B 3572 #SKI 35LL SMO 1+%A 366= #SKI GENIE 36KW ORS 0 EBA 375G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BWNZ https://www.george3.co.uk/george/macro/bwnz?rev=1705492539&do=diff BWNZ (GIN Macro) Defined in: MACROS HFD8 Used in: ADDICT865, BACKMAP864, BMAPDIR865, BMAPONE867, BMCNTRL866, BMJLSLAV864, COPYA867, COPYB867, DUMP860, ERASEA867, FHOBJBL860, FHOBJDIR860, FREEZE864, INCCHECK860, INCSTART865, INCTAPES867, INCVFCHK850, INCWRITE865, RESTERR864, RESTLIMB864, RESTMERG864, SETPRAMA867, USERDIR842 2MFG ...[??? BWNZ SECT FILE FGN 22 DOC 2NDQ #MAC BWNZ 2NNJ ...[ BWNZ BRANCHES TO %B IF WORD %A IS NON-ZERO 2NYB LDX 0 %A 2PD2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BWZ https://www.george3.co.uk/george/macro/bwz?rev=1705492539&do=diff BWZ (GIN Macro) Defined in: MACROS HFD8 Used in: ADDICT865, BACKMAP864, BMAPTWO860, BMJLIST864, FHOBJDIR860, FHOBJIND860, FREEZE864, INCCHECK860, INCEOT865, INCMON865, INCSET865, INCSTART865, INCVFCHK850, INCWRITE865, RESTLIMB864, RESTMERG864, RESTOREG864, SETPRAMA867 2JHQ ...[??? BWZ SECT FILE FGN 22 DOC 2KH2 #MAC BWZ 2KQS ...[ BWZ BRANCHES TO %B IF WORD %A IS ZERO 2L2L LDX 0 %A 2LG= BZE 0 %B 2L^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BXE https://www.george3.co.uk/george/macro/bxe?rev=1705492539&do=diff BXE (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDON867, ACCESS867, ADDICT865, ADJCHECK85, ADJUNCTS85, ALAS822, ALASB867, APPEND864, ARCHIVE867, ASSIGN860, ASSOC867, ATTRIBUT867, BACKROOM865, BCAST867, BEXTRA83, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEMS83, BRADDATA867, BRADEMUL867, BSPRUNE867, BSQ867, BSTS867, BSUJSTAT867, BSUNJAM867, BUDGONE83, BUDGTWO84, CAFSINF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BXGE https://www.george3.co.uk/george/macro/bxge?rev=1705492539&do=diff BXGE (GIN Macro) Defined in: REPLY-MACROS Used in: ADDICT865, ADJCHECK85, ADJUNCTS85, ALAS822, ALASB867, ANSCOM865, APPEND864, ATTACHA8, ATTACHC867, BEXTRA83, BMAPDIR865, BMCNTRL866, BMFIXIT864, BMINDEX866, BMQUEST866, BMSJRNL866, BMSTREAM853, BRADDATA867, BRADEMUL867, BSPRUNE867, BSQ867, BSUJSTAT867, BSUNJAM867, BUDGONE83, CAFSCTRL866, CAFSPERI867, CASCODE, CHANFILE8, CHARGESC867, CLOSEFUL867, CMEMILL866, COMPOST867, CONCEPT85, CONMXB8, CONMXC8, COOR865, COPYB867, COPYFILA867, CORE867, COREA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BXL https://www.george3.co.uk/george/macro/bxl?rev=1705492539&do=diff BXL (GIN Macro) Defined in: REPLY-MACROS Used in: ACTPRI867, ADDICT865, ADDJOB867, ADJCHECK85, ADJUNCTS85, ALAS822, ALTINST60, ANSCOM865, APPEND864, ASSOC867, BACKROOM865, BCAST867, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMOUTPUT867, BMQUEST866, BSPRUNE867, BSQ867, BSTS867, BSUJSTAT867, BSUNJAM867, CAFSCTRL866, CAFSPERI867, CANCRVX864, CASCODE, CHANFILE8, CHARGESC867, CHCH865, CHNUMCON867, CIOUT8, CLOSEND867, CMEMILL866, COMMFILE82, C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) BXU https://www.george3.co.uk/george/macro/bxu?rev=1705492539&do=diff BXU (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDON867, ACCESS867, ACTPRI867, ADDICT865, ADJCHECK85, ADJUNCTS85, ALASB867, ALLOCATE867, ALTINST60, ANSCOM865, APPEND864, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ASTONIF867, ATTACHA8, BACKROOM865, BCAST867, BEXTRA83, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMCNTRL866, BMFIXIT864, BMINDEX866, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEMS83, BSPRUNE867, BSQ867, BSUJSTAT867, BSUNJAM867, BUDGONE83, BUDGTWO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CAFSINFO https://www.george3.co.uk/george/macro/cafsinfo?rev=1705492539&do=diff CAFSINFO (GIN Macro) Defined in: MACROS CAFS Used in: CARTCONT867, CHINTEG867, CHTAB, CLOSBAC867, INKS, KARTCONT867, SQOPEN867, WRITEFIP867 2L2L ...[??? CAFSINFO SECT BACK FGN 1 DOC 2LG= ...#MAC CAFSINFO 2L^W ...#UNS CF%A 2MFG ...( 2M^6 ...#ACC %B 2NDQ ...( 2NYB ... LDX 0 %B 2PD2 ... SMO FX2 2PXL ... STO 0 ACOMMUNE2 2QC= ...) 2QWW ...#ACC %B 2RBG ...#SKI 2RW6 ...( 2S*Q ... SMO FX2 2STB ... STO %B ACOMMUN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CAFSPRIV https://www.george3.co.uk/george/macro/cafspriv?rev=1705492539&do=diff CAFSPRIV (GIN Macro) Defined in: MACROS CAFS Used in: 3572 ...[??? CAFSPRIV SECT BACK FGN 1 DOC 35LL ...#MAC CAFSPRIV 366= ...#MEN CAFSPERI 36KW ...#TRA K50CAFSPERI 375G ... 8H%A 37K6 ...#END 384Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANAMONST https://www.george3.co.uk/george/macro/canamonst?rev=1705492539&do=diff CANAMONST (GIN Macro) Defined in: MACROS BJE Used in: CONNECT867 4=G# ...[??? CANAMONS SECT CENT FGN 3 DOC 4=Q6 # 4?9Q # ANAMONST FOR CONNECT-IGNORES FIRST PARAMETER(JOBNAME) 4?PB # 4#92 #MAC CANAMONST 4#NL DOWN REPORT,9 4*8= BRN %A 4*MW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANDCNT https://www.george3.co.uk/george/macro/candcnt?rev=1705492539&do=diff CANDCNT (GIN Macro) Defined in: LLSMACROS Used in: SCHEDIN867 9898 ...[??? CANDCNT SECT CENT FGN 6 DOC 98F2 #MAC CANDCNT 98YL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANDINIT https://www.george3.co.uk/george/macro/candinit?rev=1705492539&do=diff CANDINIT (GIN Macro) Defined in: LLSMACROS Used in: SCHEDIN867 979Y ...[??? CANDINIT SECT CENT FGN 6 DOC 97FQ #MAC CANDINIT 97^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANTNOW https://www.george3.co.uk/george/macro/cantnow?rev=1705492539&do=diff CANTNOW (GIN Macro) Defined in: MACROS RJH Used in: SAVEJOB865, SCHEDJOB867 2*F8 ...[??? CANTNOW SECT CENT FGN 71 DOC 2*P2 # THIS MACRO SETS 'CANT BE SAVED NOW BIT' IN HLSQ BLOCK 2B8L #MAC CANTNOW 2BN= LDCT 0 #40 2C7W MOD ORS 0 HLSYONQ,%A 2CMG #STR CLEAR,%B 2D76 #STR 2DLQ MOD ERS 0 HLSYONQ,%A 2F6B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANTR https://www.george3.co.uk/george/macro/cantr?rev=1705492539&do=diff CANTR (GIN Macro) Defined in: MACROSIPC Used in: IPCPERI83 229S ...[ THIS MACRO SUBFILE BELONGS TO :- 22FL ...[ 1) KEITH MARTIN :COMM 22PD ...[ 2) OWEN N JOHN :CENT 22^= ...[ 2394 ...[ LOCATION 8-OPAW (BRA) 23DW ...[ 23NN ...[ 23YG [ 24D6 [CONTENTS LIST:- 24XQ [ 25CB [ CANTR [CANCELS A STORED TRANSFER 25X2 [ CIPCM 26BL [ CLINK 26W= [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CANTSAVE https://www.george3.co.uk/george/macro/cantsave?rev=1705492539&do=diff CANTSAVE (GIN Macro) Defined in: MACROS RJH Used in: SAVEJOB865 2=QH ...[??? CANTSAVE SECT CENT FGN 71 DOC 2=R= # 2?=W # THIS MACRO SETS 'CANT EVER BE SAVED' BIT IN HLS BLOCK 2?QG #MAC CANTSAVE 2#=6 LDCT 0 #100 2#PQ MOD ORS 0 HLSYONQ,%A 2*9B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CAPCA https://www.george3.co.uk/george/macro/capca?rev=1705492539&do=diff CAPCA (GIN Macro) Defined in: MACROS BJE Used in: BCAST867, BEXTSJ84, CAFSPERI867, CHTAB, CIMOP867, CLOSBAC867, COMPCHAN84, DISEVENT65, EVENTS864, EXINONE867, EXTEND866, FHLIST867, GETONA867, GIVE867, INKS, INMOP867, IPCOPENA83, MONEVENT867, OLMTB867, OLMTC85, OLMTD65, OLMTE85, OLPODD865, OPCA867, OPCAXCOD5, OPILLS70, PERFAIL866, PERION867, PROGISH850, READSPEC867, RELPER867, RENAMEX867, REQESLIP861, RUNPROG840, SCHDJOBA867, SCRATCH866, SOUP867, SPERION867, SQOPEN867, TPINS861 34CJ ...[???… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CAPCAX https://www.george3.co.uk/george/macro/capcax?rev=1705492539&do=diff CAPCAX (GIN Macro) Defined in: MACROS JSRG4 Used in: INMOP867 2H4W #MAC CAPCAX 2HJG #STR %A 2J46 #SKI 2JHQ DOWN CAPCA,4 2K3B #STR %A 2KH2 ( 2L2L LDN 0 %B+%A 2LG= #STR %C 2L^W ( 2MFG SLL 0 12 2M^6 ORN 0 %D+%C 2NDQ ) 2NYB SMO FX2 2PD2 STO 0 ACOMMUNE1 2PXL DOWN CAPCA,3 2QC= ) 2QWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CASFID https://www.george3.co.uk/george/macro/casfid?rev=1705492539&do=diff CASFID (GIN Macro) Defined in: MACROS SFC Used in: 2*9B #MAC CASFID 2*P2 #SKI 22? 2B8L ( 2BN= #ALT 22?=22?-1 2C7W #TRA 21?/4+CASTAB+1 2CMG #FID 21?&3*6,21?&3*6+5,20? 2D76 #ALT 21?=21?+1 2DLQ #TRA CASMID+20? 2F6B +23? 2FL2 CASFID 2G5L ) 2GK= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CASRDSPLIT https://www.george3.co.uk/george/macro/casrdsplit?rev=1705492539&do=diff CASRDSPLIT (GIN Macro) Defined in: MACROS SFC Used in: 3P7L #MAC CASRDSPLIT 3PM= #STR %A 3Q6W ( 3QLG #DEF 20?=IROUND 3R66 #ALT IROUND=%A 3RKQ #ALT INROUND=-%A 3S5B ) 3SK2 #ALT 21?=CSPLITLN 3T4L #STR %B 3TJ= #ALT CSPLITLN=%B 3W3W #SKI IROUND&7 3WHG ( 3X36 #ALT IROUND=20? 3XGQ #ALT INROUND=-IROUND 3Y2B !I NOT AMULTIPLE OF 8 3YG2 #EXI 3Y^L ) 3^F= #ALT 23?=CSPLITLN/IROUND 3^YW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CAT https://www.george3.co.uk/george/macro/cat?rev=1705492539&do=diff CAT (GIN Macro) Defined in: MACROS MSYS Used in: =CQS ...[??? CAT SECT CENT FGN 56 DOC =D2L # =DG= # =D^W # HERE FOLLOWS CAT. **** CAT =FFG # IT IS USED BY CATEGORISE =F^6 # =GDQ #MAC CAT =GYB #STR %A,X =HD2 #SKI =HXL #SKI ADDMESS =JC= ( =JWW #MEN MESS%A =KBG #DEF 22?=0 =KW6 MFLOCAL 22?,25? =L*Q MOUSE =LTB #END =M*2 ) =MSL #DEF 2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CATEGORISE https://www.george3.co.uk/george/macro/categorise?rev=1705492539&do=diff CATEGORISE (GIN Macro) Defined in: MACROS MSYS Used in: 9WD6 ...[??? CATEGORI SECT CENT FGN 56 DOC =9MG # ==76 # ==LQ # HERE FOLLOWS CATEGORISE. **** CATEGORI =?6B # IT IS USED TO 'OR' SPECIFIED BITS (%B) INTO ALL =?L2 # MESSAGES THAT HAVE CATERORIES AS IN %A. =#5L # =#K= #MAC CATEGORISE =*4W #DEF 24?=%A&#77777 =*JG #DEF 23?=%B&#77777 =B46 #OPT ADDMESS=0 =BHQ #DEF 21?=AMFNUMBER+1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CATMASK https://www.george3.co.uk/george/macro/catmask?rev=1705492539&do=diff CATMASK (GIN Macro) Defined in: MACROS RJH Used in: ALASB867, CANTDO867, FIXED867, HLSEVENT867, INMOP867, INSTPARA867, LISTMOP867, MEXTSJ70, MONFIL865, MONFILE867, MONFILEA864, MONJRNAL850, REPORT865, RESTERR864, SCEDIT84, SCEDITAR84, SCEDITOR84, SJMESS867, TRAPGO864, TRAPLIST864, WLD864 7G=L ...[??? CATMASK SECT CENT FGN 71 DOC 8WNG # 8X86 #MAC CATMASK [SET UP CATEGORIES 8X=* ...#STR NONE,%A 8X#J ...#SKI 8XBR ...( 8XF2 ... +0 8XH9 ...#EXI 8XKD ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCBB https://www.george3.co.uk/george/macro/ccbb?rev=1705492539&do=diff CCBB (GIN Macro) Defined in: MACROS LLS Used in: GETNO865, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPQUAKE83, IPQUAKER865, TRIPB83, VIPBPERI864 D5C# ...[??? CCBB SECT CENT FGN 3 DOC D5M6 # D66Q # THIS MACRO CLEARS THE CHANNEL BUSY BIT IN THE APPROPRIATE OLPA D6LB # D762 #MAC CCBB D7KL #SKI IPCV2 D85= ( D8JW LDBIT 2,0 D94G #STR %A D9J6 ( D=3Q MOD ANDX 0 BFSTATE,%A D=HB MOD E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCBRKIN https://www.george3.co.uk/george/macro/ccbrkin?rev=1705492539&do=diff CCBRKIN (GIN Macro) Defined in: MACS MISW Used in: PROCONTX867 4NX= #MAC CCBRKIN [R.WEYAND 4PBW [THIS MACRO MARKS A CC MOP ACTIVITY AS BEING BROKEN IN ON BY GEORGE 4PWG [%A=ADDRESS OF A MODIFIER WHEREIN IS THE ADDRESS OF THE CPAT TO BE 4QB6 [BROKEN IN ON 4QTQ HUNT2 %A,AMXOR,ADCB 4R*B LDCT 0 #10 [SET G3 BI BIT 4RT2 ORS 0 IWAIT(%A) 4S#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCERROR https://www.george3.co.uk/george/macro/ccerror?rev=1705492539&do=diff CCERROR (GIN Macro) Defined in: MACS JIB Used in: COMPS MW, IPBCONS867, IPBIN867, IPBINB867, IPBINC865, IPBLOG866, IPBOUT867, IPBSCAN867, IPBSCANB867, IPBSTARB867, IPBSTART867, MOPCOM867, MOPCOMB865, READBULK867 38H9 ...[??? CCERROR SECT COMM FGN 28 DOC 38HF ...#MAC CCERROR 38HP ... LDX 1 FX2 38H^ ...#STR %B 38J9 ... ACCSTO %B,ACOMMUNE2,1 38JF ...[ STORE EXTRA DATA IF ANY 38JP ...#ACC %A 38J^ ...#SKI 38K9 ...( 38KF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCILL https://www.george3.co.uk/george/macro/ccill?rev=1705492539&do=diff CCILL (GIN Macro) Defined in: MACS IPB Used in: 37K6 #MAC CCILL [R.WEYAND 384Q [RESTORE TIME MACRO TO EFFECT AN IPB ERROR ON RECEIPT OF AN ILLEGAL 38JB [SUPERVISORY SEGMENT MEANING "ALREADY OPENED" FOR A 7023 IDENTIFIER 3942 #MEN IPBIN 39HL #TRA K37IPBIN 3=3= NULL 3=GW #END 3?2G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCOFF https://www.george3.co.uk/george/macro/ccoff?rev=1705492539&do=diff CCOFF (GIN Macro) Defined in: MACROS RJH Used in: COMPRO867, ENTRUST 6BTS ...[??? CCOFF SECT CENT FGN 71 DOC 6C5L # THIS MACRO UNSETS THE BIT(IF SET) INDICATING THE ISSUE OF A CANCEL 6CK= # COMMAND 6D4W #MAC CCOFF 6D=4 ...#SKI JSKI15<1$1 6DC= ...( 6DJG LDCT 0 #10 6F46 SMO FX2 6FHQ ERX 0 EXT+11 6G3B SMO FX2 6GH2 ANDS 0 EXT+11 6GLX ...) 6GQS ...#SKI JSKI15 6GWP ... MBC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCON https://www.george3.co.uk/george/macro/ccon?rev=1705492539&do=diff CCON (GIN Macro) Defined in: MACROS RJH Used in: CANCOM863, OPERATOR867 6?DD ...[??? CCON SECT CENT FGN 71 DOC 6?N= # THIS MACRO SETS A BIT TO INDICATE A CANCEL COMMAND HAS BEEN GIVEN 6#7W # 6#MG #MAC CCON 6#SN ...#SKI JSKI15<1$1 6#^W ...( 6*76 LDCT 0 #10 6*LQ SMO FX2 6B6B ORS 0 EXT+11 6B=? ...) 6BB8 ...#SKI JSKI15 6BG5 ... BS FX2,EXCANISS 6BL2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCOUT https://www.george3.co.uk/george/macro/ccout?rev=1705492539&do=diff CCOUT (GIN Macro) Defined in: MACS JIB Used in: ATTACHB866, ATTACHC867, CDCIPB864, DUMMYB867, FREEPER867, IPBIN867, ONLINCL864, RIGHT867, SWITCH867, VIPBFREE865 38S8 ...[??? CCOUT SECT COMM FGN 25 DOC 3942 # 39HL # 3=3= # 3=GW #MAC CCOUT 3?2G [THIS MACRO OUTPUTS A SUPERVISORY SEGMENT TO THE 7901 3?G6 LDX 0 %A 3?^Q SMO FX2 3#FB STO 0 ACOMMUNE2 3#^2 LDX 0 %B 3*DL SMO FX2 3*Y= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CCSTOP https://www.george3.co.uk/george/macro/ccstop?rev=1705492539&do=diff CCSTOP (GIN Macro) Defined in: MACS JIB Used in: FREEPER867, REDON867 3C7# ...[??? CCSTOP SECT COMM FGN 25 DOC 3CC6 #MAC CCSTOP 3CWQ [THIS MACRO OUTPUTS STOP INPUT & CLEAR SS CODE 3DBB LDN 0 #124 3DW2 SMO FX2 3F*L STO 0 ACOMMUNE1 3FT= CCOUT %A,%B 3G#W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CDRVTAPE https://www.george3.co.uk/george/macro/cdrvtape?rev=1705492539&do=diff CDRVTAPE (GIN Macro) Defined in: DUMP-MACROS Used in: CANTDO867 B#QX ...[??? CDRVTAPE SECT FILE FGN 72 DOC B#R5 ...[ ****************************************************************** B#RD ...[ B#RR ...[ THIS MACRO WILL SET BIT BIFDTCL FOR A TSN IN THE FDT, IT EXPECTS A B#S6 ...[ BE PRESENT CONTAINING THE PARAMETER (SINE SPACES) FROM THE 'CD' CO B#SF ...[ THE VALIDITY OF THE MESSAGE AND SETS THE BIT IF APPROPRIATE. B#SS ...[ %A IS A LABEL TO BRANCH TO IF TH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHADCON https://www.george3.co.uk/george/macro/chadcon?rev=1705492539&do=diff CHADCON (GIN Macro) Defined in: MACROS RJDG Used in: JOBDATAB867 3GJN ...[??? CHADCON SECT CENT FGN 7 DOC 3GSG [ MACRO FOR CHARACTER TO BINARY DATE CONVERSION 3H#6 #MAC CHADCON 3HRQ DOWN DATECON,2 3J?B BRN %A 3JR2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAIN https://www.george3.co.uk/george/macro/chain?rev=1705492539&do=diff CHAIN (GIN Macro) Defined in: COREMACROS Used in: ABANDON867, ADDICT865, ADJUNCTS85, ANALYSE865, APPEND864, ASSIGN860, ATTACHB866, ATTACHC867, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BMAPDIR865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMQUEST866, BMSJRNL866, BMXEND7, BSBLFAIL867, BSQ867, BSTS867, CAFSPERI867, CAPCA50, CARTCONT867, CDCIPB864, CDUM866, CHANFILE8, CHANG867, CIMOP867, CLOSBAC867, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEMAS8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAINACT https://www.george3.co.uk/george/macro/chainact?rev=1705492539&do=diff CHAINACT (GIN Macro) Defined in: MACS MISW Used in: INCDTA865, LOADPROG865 4X=B #MAC CHAINACT [M WILSON & D PLATTEN 4XQ2 SMO FX2 4Y9L LDX 0 BPTR 4YP= CHAIN %A,0 4^8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAIND https://www.george3.co.uk/george/macro/chaind?rev=1705492539&do=diff CHAIND (GIN Macro) Defined in: COREMACROS Used in: BACKMAP864, BMSJRNL866, BSTS867, CLOSEALT864, CLOSEND867, COREALLF867, OPERA864 2YGJ ...[??? CHAIND SECT CENT FGN 32 DOC 2YQB [ 2^=2 [ENTRY SEQUENCE FOR CHAIN ROUTINE WHEN %B=THE BASE OF A CHAIN 2^PL [ 329= #MAC CHAIND 32NW #STR %A,1 338G LDX 1 %A [LOAD ADDRESS OF BLOCK TO BE CHAINED 33N6 LDN 2 %B [LOAD ADDRESS OF BASE 347Q CALL 0 (GCH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAINJRN https://www.george3.co.uk/george/macro/chainjrn?rev=1705492539&do=diff CHAINJRN (GIN Macro) Defined in: MACS IPB Used in: 3?G6 [??? CHAINJRN SECT COMM FGN 40 DOC 3?^Q [ 3#FB [ THIS MACRO WILL CHAIN AMXOR AJOURN BLOCK AT END OF LIST BEHIND 3#^2 [ AMOP AJOURN ACTIVITY AND THEN FPUT ACTIVITY IF NECESSARY 3*DL [ 3*Y= #MAC CHAINJRN 3BCW LDX 2 FX2 3BXG FINDACTFB 2,,AMOP,AJOURN,MCONTU,BPTR 3CC6 MAGAIN 3CWQ HUNT2J 2,AMXOR,AJOURN,2,MENDAJOURN 3DBB BRN MAGAIN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAINJWELL https://www.george3.co.uk/george/macro/chainjwell?rev=1705492539&do=diff CHAINJWELL (GIN Macro) Defined in: MACROS WELL Used in: DSCNCT867, SETJOBQ867 2^^D ...[??? CHAINJWE SECT CENT FGN 72 DOC 329= [ 32NW [ 338G [ 33N6 [ 347Q #MAC CHAINJWELL 34MB HUNT 1,JWELL,JPARAMS 3572 BNG 1 MNEWJ2 35LL CHAIN 1,3 366= MNEWJ2 36KW HUNT 1,JWELL,AJDF 375G BNG 1 MNEWJ3 37K6 CHAIN 1,3 384Q MNEWJ3 38JB HUNT 1,JWELL,ACLB 3942 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAINSWOP https://www.george3.co.uk/george/macro/chainswop?rev=1705492539&do=diff CHAINSWOP (GIN Macro) Defined in: MACROS SHFSA Used in: 3KQ= [??? CHAINSWOP SECT FILE FGN 1 DOC 3L9W # SWOPS OVER CHAINS ATTACHED TO TWO SPECIFIED CHAIN BASES 3LPG #MAC CHAINSWOP 3M96 LDN 1 %A 3MNQ LDX 3 %A+BPTR 3N8B LDN 4 %B 3NN2 CHAIN 1,4 3P7L LDN 1 %A 3PM= BXE 1 3,MCHEMPTY 3Q6W CHAIN 4,3 3QLG BRN MCHSWEND 3R66 MCHEMPTY 3RKQ DERI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANASAT https://www.george3.co.uk/george/macro/chanasat?rev=1705492539&do=diff CHANASAT (GIN Macro) Defined in: MACS PW Used in: LOGOUT867 3F5# # 3F5K # THIS MACRO COPIES ASSOCS FROM ASSOCS0 BLOCK(AT LT TIME) 3F5W # 3F67 #MAC CHANASAT 3F6D HUNTW 2,APERI,ASSOCS0 3F6P BNG 2 MFIN 3F72 VFREEW APERI,ASSOCS 3F7? MHUNTW 2,APERI,ASSOCS0 3F7J LDX %A ALOGLEN(2) 3F7T SBN %A 1 3F86 BZE %A MC1 [J IF ONLY JSOURCE3 3F8C SETUPCORE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANBASE https://www.george3.co.uk/george/macro/chanbase?rev=1705492539&do=diff CHANBASE (GIN Macro) Defined in: MACROS FIXD Used in: CASCODE, FIXED867 2764 ...[??? CHANBASE SECT CENT FGN 11 DOC 27*W # 27TG # 28*6 #MAC CHANBASE [DEFINES CHAIN BASES IN FIXED SEGMENT 28SQ X +X 29#B +X 29S2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANBLOK https://www.george3.co.uk/george/macro/chanblok?rev=1705492539&do=diff CHANBLOK (GIN Macro) Defined in: MACROS HL Used in: RESTBLOK850, UNSAVE867 2#^J ...[??? CHANBLOK SECT CENT FGN 5 DOC 2*9B # 2*P2 # 2B8L # CHAMBLOK MACRO 2BN= # WILL RENAME THE FILE/FRB BLOCK,MOVE THE RECORDS UP OVER 2C7W # THE RECORD RED TAPE AND REDUCE THE LOGICAL LENGTH OF THE 2CMG # BLOCK 2D76 #MAC CHANBLOK 2DLQ LDEX 4 FRH(3) 2F6B SBN 4 3 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANG https://www.george3.co.uk/george/macro/chang?rev=1705492539&do=diff CHANG (GIN Macro) Defined in: MACS MISW Used in: CHTAB, CONSOLE867, INKS, IPBCONS867, IPBMOP867, MOPOUT85, READOPLN867 546L #MAC CHANG 54L= DOWN CHANG,1 555W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGALL https://www.george3.co.uk/george/macro/changall?rev=1705492539&do=diff CHANGALL (GIN Macro) Defined in: MACS MISW Used in: OPERIN867 574B #MAC CHANGALL 57J2 [ 583L [ CONVERT INPUT FROM OPER TO GRAPHIC 58H= [ 592W DOWN CHANG,3 59GG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGE https://www.george3.co.uk/george/macro/change?rev=1705492539&do=diff CHANGE (GIN Macro) Defined in: MACRO COMPRO Used in: MESSB, MESSCB, MESSCF, MESSH, WTSTAT867 CMPS ...[??? CHANGE SECT CENT FGN 21 DOC CM^L #MAC CHANGE CNF= #MEN VERBCLAS CNYW 4H%A CPDG #DEF 0?=0 CPY6 #DEF 20?=34?+0]&#37777777 CQCQ 8HVERBCLAS CQXB #SKI 20?/#1000000<14-14 CRC2 #DEF 0?=20?/#1000000+34?+K90VERBCLAS-1] CRWL #SKI 20?/#1000000>13-13 CSB= ( CSTW #END CT*G #MEND VCLASTWO CTT6 #DEF 0?=20?/#1000000+3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGEACT https://www.george3.co.uk/george/macro/changeact?rev=1705492539&do=diff CHANGEACT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CONTXCOD60, FREEBUFF860, LOADERR70, LOADPROG865, MTDUMP860, OFFREL867, OLMTB867, OLMTE85, OPILLS70, RENAMEMT867, SAVEFILE860, SUICIDE864 K7QL ...[??? CHANGEAC SECT CENT FGN 32 DOC K8== ...# K8PW ...# MACRO TO CHANGE TO ACTIVITY SPECIFIED AS %A K99G ...# K9P6 ...#MAC CHANGEACT K=8Q ...#STR %A,2 K=NB ... LDX 2 %A K?82 ... LDX 1 FX2 K?ML ... STO 2 FX2 K#7= ... LDX 1 ALIN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGECC https://www.george3.co.uk/george/macro/changecc?rev=1705492539&do=diff CHANGECC (GIN Macro) Defined in: MACRO COMPRO Used in: DF6# ...[??? CHANGECC SECT CENT FGN 21 DOC DFB6 #MAC CHANGECC DFTQ #MEN CANCOM DG*B 4H%A DGT2 #DEF 20?=34?+0] DH#L #DEF 0?=0 DHS= 8HCANCOM DJ?W #DEF 0?=K90CANCOM DJRG #DEF 22?=K91CANCOM-K90CANCOM/BICESIZE DK?6 FINDBICE %A DKQQ #SKI 22? DL=B ( DLQ2 #STR #,%B DM9L #DEF 20?=CTX%B+CTX%C+CTX%D+CTX%E+CTX%F+CTX%G+CTX%H+CTX%I+CTX%J+CTX%K DMP= #STR #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGEFILE https://www.george3.co.uk/george/macro/changefile?rev=1705492539&do=diff CHANGEFILE (GIN Macro) Defined in: RING-MACROS Used in: CONTXCOD60, INCEOT865, LIBREQCA867, LOADERR70, LOADFIN860, LOADPROG865, RETURN867, SAVEFILE860, SJOPEN863 F298 ...[??? CHANGEFI SECT FILE FGN 20 DOC F2F2 # F2YL # THIS MACRO CHANGES A FILE OF GIVEN LEVEL TO CURRENT ACTIVITY TO F3D= # A GIVEN LEVEL OF A SPECIFIED ACTIVITY. F3XW # F4CG #MAC CHANGEFILE F4X6 #ACC %A F5BQ #SKI F5WB ( F6B2 SMO FX2 F6TL ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGEOP https://www.george3.co.uk/george/macro/changeop?rev=1705492539&do=diff CHANGEOP (GIN Macro) Defined in: MACRO COMPRO Used in: F44T ...[??? CHANGEOP SECT CENT FGN 21 DOC F44Y ...#MAC CHANGEOP F456 ...#MEN OPERATOR F45# ... 4H%A F45G ...#DEF 20?=34?+0] F45N ...#DEF 0?=0 F45W ... 8HOPERATOR F464 ...#DEF 0?=K90OPERATOR F46= ...#DEF 22?=K91OPERATOR F46D ... FINDBICX %A F46L ...#SKI 22? F46S ...( F472 ...#STR #,%B F478 ...#DEF 20?=CTX%B+CTX%C+CTX%D+CTX%E+CTX%F+CTX%G+CTX%H+CTX%I+CTX%J+CTX%K F47B ...#STR #,%B F47J … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGEPER https://www.george3.co.uk/george/macro/changeper?rev=1705492539&do=diff CHANGEPER (GIN Macro) Defined in: MACROS RME10 Used in: CLOSEMT867, LIBREQCA867, NETOFLNE867, OFFREL867, OLMTA85, RENAMEMT867 6KXC ...[??? CHANGEPE SECT FILE FGN 4 DOC 6KY2 ...#MAC CHANGEPER 6KYK ... LDN 1 CPPTR(%A) 6K^8 ... LDX 2 FX2 6K^R ... LDN 0 CPPTR(2) 6L2B ... MOVE 0 4 6L2^ ... STOZ CPPTR(2) 6L3J ... STOZ CPRW1(2) 6L47 ... STOZ CPRW2(2) 6L4Q ... STOZ CPRSW(2) 6L5* ... LDX 1 FX1 6L5Y .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGESTREAM https://www.george3.co.uk/george/macro/changestream?rev=1705492539&do=diff CHANGESTREAM (GIN Macro) Defined in: RING-MACROS Used in: G7#N ...[??? CHANGEST SECT FILE FGN 20 DOC G7JG #MAC CHANGESTREAM G846 #ACC %A G8HQ LDX 0 %A G93B SMO FX2 G9H2 #ACC %A G=2L #SKI G=G= STO %A ACOMMUNE1 G=^W #ACC %A G?FG STO 0 ACOMMUNE1 G?^6 DOWN CHANFILE,2 G#DQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGEUP https://www.george3.co.uk/george/macro/changeup?rev=1705492539&do=diff CHANGEUP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CAPCA50 J?Y2 ...[??? CHANGEUP SECT CENT FGN 32 DOC J#CL ...# J#X= ...# J*BW ...#MAC CHANGEUP J*WG ... LDX 2 %A [ADDRESS OF NEW ACTIVITY BLOCK JBB6 ... FINDLINK 1 [FIND LINK OF CURRENT ACTIVITY JBTQ ...#STR %B JC*B ...( JCT2 ... LDN 0 %B JD#L ... ADJUSTLK 1 JDS= ...) JF?W ... LDN 4 ACC3(1) JFRG ... LDN 5 ACC3(2) JG?6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGMOD https://www.george3.co.uk/george/macro/changmod?rev=1705492539&do=diff CHANGMOD (GIN Macro) Defined in: MACS IPB Used in: 3RKQ [ THIS MACRO CHANGES THE MODE OF THE CURRENT DEVICE 3S5B [ 3SK2 #MAC CHANGMOD 3T4L SMO FX2 3TJ= STO %A ACOMMUNE1 [MODE AND,OR NPU SIZE 3W3W DOWN IPBSCAN,7 3WHG BRN %B [MOPPING OFF 3X36 BRN %C [MODE NOT AVAILABLE 3XGQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHANGVD https://www.george3.co.uk/george/macro/changvd?rev=1705492539&do=diff CHANGVD (GIN Macro) Defined in: MACS IPB Used in: IPBMOP867 44WL #MAC CHANGVD [R.WEYAND 45B= [THIS MACRO CONVERTS A MOP DISPLAY INPUT MESSAGE TO GRAPHIC FORMAT AND 45TW [UPDATES THE CURSOR POSITIONING COUNTS IN THE AMXOR/ADCB BLOCK(UNLESS 46*G [BREAK-IN OCCURS). 46T6 DOWN CHANG,2 47#Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAPENT https://www.george3.co.uk/george/macro/chapent?rev=1705492539&do=diff CHAPENT (GIN Macro) Defined in: MACROS DTP Used in: CHTAB CT*G ...[??? CHAPENT SECT DIAG FGN 569 DOC CTT6 #MAC CHAPENT [M. DRUKKER CW#Q [ CWSB [ CX#2 [ ************* CXRL [ * CHAPENT * CY?= [ ************* CYQW [ C^=G [ C^Q6 #SKI GCOMP [INCLUDE FOR INITIAL COMPILATION ONLY D29Q ( D2PB #DEF K%A=0? D392 -1 D3NL #EXI D48= ) D4MW #UNS K%A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAPLOW https://www.george3.co.uk/george/macro/chaplow?rev=1705492539&do=diff CHAPLOW (GIN Macro) Defined in: COREMACROS Used in: 2?=Y ...[??? CHAPLOW SECT CENT FGN 32 DOC 2??2 ...# 2??6 ...# 2?BG ...#MAC CHAPLOW 2?BH ...#ALT CHAPLOW=%A+INSTPARAM 2?BJ ... FCMEND 2?BK ... FIXTRA CHAPLOW2 2?BL ... STO 0 GL2 2?BM ... LDX 0 CHAPLOW 2?BN ... BXGE 0 CHAPQUOTA,XIT1 2?BP ... BXL 0 ACHAP,XIT1 2?BQ ... BRN XIT 2?BR ...XIT1 2?BS ... LDN 0 1 2?BT ... ADS 0 GL2 2?BW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAPMOVE https://www.george3.co.uk/george/macro/chapmove?rev=1705492539&do=diff CHAPMOVE (GIN Macro) Defined in: COREMACROS Used in: 2?C? ...[??? CHAPMOVE SECT CENT FGN 32 DOC 2?C# ...# 2?C* ...# 2?CB ...#MAC CHAPMOVE 2?CC ...#DEF 20?=0 2?CD ...#STR OFF,%A 2?CF ...#DEF 20?=1 2?CG ...#SKI 20? 2?CJ ...( 2?CQ ... FCMEND 2?CW ...XCMF 2?D2 ... LDX 1 BDESTN 2?D6 ... NGNC 2 1 2?D= ... FIXTRA CHAPMOVE 2?DB ... LDN 2 0 2?DG ... STO 0 GL2 2?DL ... LDX 0 AFLAG(1) 2?DQ ... ANDN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAPRETRY https://www.george3.co.uk/george/macro/chapretry?rev=1705492539&do=diff CHAPRETRY (GIN Macro) Defined in: CHAPRETRY Used in: 0000 [??? CHAPRETR SECT FILE FGN 30 DOC 22FL ...#MAC CHAPRETRY 22^= ... FCMEND 23DW ... FIXTRA FCPCHEC1 23YG ... LDX 1 FPTR(2) 24D6 ... LDN 5 A1(1) 24XQ ... LDX 0 ALOGLEN(1) 25CB ... LDN 1 0 25X2 ... TXL 0 B513 26BL ... BCS XONE 26W= ... SUM 4 0 27*W ... STO 4 1 27TG ... SBN 0 512 28*6 ... ADN 5 512 28SQ ...XONE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHAREA https://www.george3.co.uk/george/macro/charea?rev=1705492539&do=diff CHAREA (GIN Macro) Defined in: MACROS EWDAS Used in: EXINTWO866, SCEXEND867 N6^G # N7F6 [??? CHAREA N7YQ # ****** N8DB #MAC CHAREA N8Y2 # N9CL STO 1 EX4 N9X= STO 2 EX5 N=BW LDX 0 %B N=WG SMO FX2 N?B6 STO 0 ACOMMUNE9 N?TQ HUNT 1,EWDAS,ITCH N#*B BNG 1 MCHAREA1 N#T2 LDX 0 ENSUSN(1) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHARMOVE https://www.george3.co.uk/george/macro/charmove?rev=1705492539&do=diff CHARMOVE (GIN Macro) Defined in: MACRO COMPRO Used in: ALAS822, IFEXPAN867, INITJOB867, JOBDATA867, PARAM865, PARAMA865, PARAMB865, PSPLIT82, WHENEVER867, WHTSTAT867 229S ...[??? CHARMOVE SECT CENT FGN 21 DOC 22FL [ BILL IZATT : CENT 22^= [ PARAMETER PASSING AND ANALYSING MACROS 23DW [ 23YG #MAC CHARMOVE 24D6 [ MOVE ANY NUMBER OF CHARS. NO OF CHARS IN %B. ADDRESSES IN %A, %A+1 24XQ NGX 0 %B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHARS https://www.george3.co.uk/george/macro/chars?rev=1705492539&do=diff CHARS (GIN Macro) Defined in: MACROS JSR Used in: OPILLSA206, SCEDITAR84 FX9C ...[??? CHARS SECT CENT FGN 9 DOC FX9H ...#MAC CHARS [JSRAYNER.THIS MACRO GENERATE A WORD OF 4 CHARS GIVEN BY FX=W +0 FXQG #STR %A FY=6 ( FYPQ #FID 0 5 %A F^9B #SKIP %A>63-63 F^P2 !JSR CHARS1 G28L ) G2N= #STR %B G37W ( G3MG #FID 6 11 %B G476 #SKIP %B>63-63 G4LQ !JSR CHARS2 G56B ) G5L2 #STR %C G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHCHCOOR https://www.george3.co.uk/george/macro/chchcoor?rev=1705492539&do=diff CHCHCOOR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHCH865 5L^P ...[??? CHCHCOOR SECT CENT FGN DOC 5L^Q ...#MAC CHCHCOOR 5M24 ... LDN 3 K8 5M2B ... TXU 3 K8 5M2N ... TRANSFIX BCS,FLIST 5M32 ... LDN 3 K3 5M3# ... TXU 3 K3 5M3L ... TRANSFIX BCS,FLIST 5M3Y ... FIXTRA K90CHCH 5M4= ... LDX 1 FX2LAST 5M4J ...M1CHCHCOOR LDX 3 ACTLIS(1) 5M4W ... TXU 3 FPTR(3) 5M58 ... TRANSFIX BCS,FLIST 5M5G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHCHDELAY https://www.george3.co.uk/george/macro/chchdelay?rev=1705492539&do=diff CHCHDELAY (GIN Macro) Defined in: CHCHCOORMAC2 Used in: Q9BG ...[??? CHCHDELA SECT CENT FGN 32 DOC Q9W6 ...# MACRO TO DELAY UNTIL SPEC CHAPTER,AT SPEC ENTRY PT ENTERED (COMMAN Q=*Q ...# MUST BE USED AFTER CHECKCHP CHCH OR SC Q=TB ...#MAC CHCHDELAY Q?*2 ...#MEN %A Q?SL ...#TRA K%B%A Q##= ... ON CHCHSW Q#RW ... ENDCOM Q*?G ...#END Q*R6 ...#MEN CEND QB=Q ...#TRA FCCH+1 QBQB ... BSOFF CHCHSW,(FCCHSUM1) QC=2 ...#END QCPL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKA https://www.george3.co.uk/george/macro/checka?rev=1705492539&do=diff CHECKA (GIN Macro) Defined in: MACROS JSR Used in: CONMXA85, CONMXB8, CPOBJ6, CROBJ6, DRUM852, EDOBJ864, EDSTART860, LOAD60, LPOBJ6, MONEVENT867, MONRESUM850, MTOBJ864, MTSTART864, OPCA867, SIMULPTR60, TPOBJ867, TROBJ867 2YGJ ...[??? CHECKA SECT CENT FGN 9 DOC 2YQB #MAC CHECKA [CHECK THAT AN OBJ PROGRAM AREA IS WITHIN RESERVATIONS 2^=2 CHECKB %A,%B,%C,%D,%E,%F,%G,%H,%I,%J 2^PL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKATT https://www.george3.co.uk/george/macro/checkatt?rev=1705492539&do=diff CHECKATT (GIN Macro) Defined in: MACS SPC Used in: IPCONA864 2Y=Q #MAC CHECKATT 2YQB DOWN GETFREE,5 2^=2 NULL 2^PL NULL 329= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKB https://www.george3.co.uk/george/macro/checkb?rev=1705492539&do=diff CHECKB (GIN Macro) Defined in: MACROS JSR Used in: CAFSPERI867, CIMOP867, CONIPB8, CONMXB8, CONMXC8, DROBJ864, FHLIST867, FHOBJ860, GETWORD867, HLSREAD867, IPCEN8, IPCOPENB83, IPCPERI83, LOAD60, LOADPROG865, LOADX60, LPTWO7, MEXTSJ70, NETOFLNE867, OLMTE85, OPCA867, OPCAXCOD5, PERION867, PROGISH850, REQESLIP861, SPERION867, TPINS861, VIPBPERI864 3=GW #MAC CHECKB [CHECK RESERVATIONS FOR AN UNPLUGGED PROG 3?2G CHECKBX %A,%B,%C,%D 3?8Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKBL https://www.george3.co.uk/george/macro/checkbl?rev=1705492539&do=diff CHECKBL (GIN Macro) Defined in: ACCESSMACROS Used in: BACKMAP864, BMCNTRL866 C6WQ ...# THIS CALLS A SUBROUTINE IN STEP TO CHECK RECORD HEADERS C7BB ...#MAC CHECKBL C7W2 ...#STR %A,1 C8*L ... LDX 1 %A [SKIPPED IF %A=1 C8T= ...#STR %B,2 C9#W ... LDX 2 %B [SKIPPED IF %B=2 C9SG ... CALL 0 (HCHBL) C=#6 ... BRN %C C=RQ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKBX https://www.george3.co.uk/george/macro/checkbx?rev=1705492539&do=diff CHECKBX (GIN Macro) Defined in: MACROS JSR Used in: ILLEXC70, ILLPERI70, LOADX60, OPILLS70, TPINS861 2^^D ...[??? CHECKBX SECT CENT FGN 9 DOC 329= #MAC CHECKBX [CHECK RESERVATIONS-NO COORDS-PRIVATE USED BY ILLPERI ETC 32NW LDX 0 %A 338G ANDX 0 JWCON1 33N6 DATUMSMO %D,FX2,TXL 0 ALIMIT 347Q BCC %C 34MB #STR %B 3572 ( 35LL ADX 0 %B 366= BZE 0 M2 36KW SBN 0 1 375… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKCHP https://www.george3.co.uk/george/macro/checkchp?rev=1705492539&do=diff CHECKCHP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: NLKG ...[??? CHECKCHP SECT CENT FGN 32 DOC NM56 ...# MACRO TO CHECKSUM CHAPTERS AT SPECIFIED INTERVALS NMJQ ...#MAC CHECKCHP NN4B ...#STR %A,READ NNJ2 ...( NP3L ...#STR %A,SC NPH= ...( NQ2W ...#STR %A,CHCH NQGG ...! %A MUST BE READ,SC OR CHCH ! NR26 ...) NRFQ ...) NR^B ...#STR %A,READ NSF2 ...( NSYL ... FCMENDV NTD= ... FIXTRA FCCHSUM1 NTXW ... +0 NWCG ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKEXT https://www.george3.co.uk/george/macro/checkext?rev=1705492539&do=diff CHECKEXT (GIN Macro) Defined in: MACROS JSR Used in: ANTIC867, BEXTRA83, CAFSPERI867, CLOSBAC867, CONMXB8, CONMXC8, DROBJ864, DRSTART6, DRUM852, EXINONE867, EXTEND866, GETONA867, IPCOPENA83, IPCPERI83, OLMTC85, OLMTD65, OPCAXCOD5, PERION867, READSPEC867, RENAMEX867, SCRATCH866, SOUP867, SQOPEN867, VIPBPERI864 3?^Q #MAC CHECKEXT [EXTEND AREA-PART OF WHICH IS ALREADY CHECKED 3#FB CHECKB %A,%B,%C,%D,%E,%F,%G 3#ML ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKFLAG https://www.george3.co.uk/george/macro/checkflag?rev=1705492539&do=diff CHECKFLAG (GIN Macro) Defined in: MACS SPC Used in: ONLINEC867, OPCA867, UNPLUG867 366= #MAC CHECKFLAG 36KW MODD LDX 0 JK52F,%A,CPPTR(2) 375G SLL 0 2 37K6 BPZ 0 %B 384Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKLFN https://www.george3.co.uk/george/macro/checklfn?rev=1705492539&do=diff CHECKLFN (GIN Macro) Defined in: MACRO COMPRO Used in: ANSCOM865, GLOBALS867, INSTPARA867, SETJD867, WORKFILE860 8S^S ...[??? CHECKLFN SECT CENT FGN 21 DOC 8T9L #MAC CHECKLFN [CHECK FOR LOCAL FILE NAME 8TP= DOWN LOCALNAM,1 8W8W BRN %A 8WNG BRN %B 8X86 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKOWNER https://www.george3.co.uk/george/macro/checkowner?rev=1705492539&do=diff CHECKOWNER (GIN Macro) Defined in: MACROS RM59B Used in: ALLOW84, BQUERY84, BUDGET84, DEAD867, LIBCOM867, TAPERING867 338G ...[??? CHECKOWN SECT FILE FGN 6 DOC 347Q #MAC CHECKOWNER 34#Y ...[ THIS MACRO CHECKS IF THE ENTRANT,WHOSE NAME IS IN THE 1ST FABSNB 34G6 ...[ IS OWNED BY THE PROPER USER. 34MB DOWN OWNERCHE,2 3572 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKPTE https://www.george3.co.uk/george/macro/checkpte?rev=1705492539&do=diff CHECKPTE (GIN Macro) Defined in: MACROS JSRG4 Used in: GX2G #MAC CHECKPTE [JSRAYNER G4 ONLY GXG6 LDCT 1 #600 GX^Q MOD ANDX 1 ASEGTAB,%D GYFB LDCH 0 BLENCH(1) GY^2 LDX 1 %B G^DL SRL 1 6 G^Y= ANDX 0 1 H2CW BNZ 0 MCHECKPTE3 [J IF SEG TABLE TOO SHORT H2XG MOD ADX 1 ASEGTAB,%D [ADDR OF SEG TABLE ENTRY H3C6 LDCT 0 #600 H3WQ ANDX 0 0(1) H… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKSTATE https://www.george3.co.uk/george/macro/checkstate?rev=1705492539&do=diff CHECKSTATE (GIN Macro) Defined in: OLPMACROS Used in: OPCA867 2R6N ...[??? CHECKSTA SECT FILE FGN 7 DOC 2RBG # THIS MACRO CHECKS THE STATE OF AN OFF-LINE PERI CHANNEL FOR ALLOT 2RW6 #MAC CHECKSTATE 2S*Q SMO 1(%A) 2STB LDX %B ALTMARK-CHAINADD 2T*2 ANDX %B GSIGN 2TSL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKSTR https://www.george3.co.uk/george/macro/checkstr?rev=1705492539&do=diff CHECKSTR (GIN Macro) Defined in: MACROS PRS Used in: 43MJ ...[??? CHECKSTR SECT CENT FGN 1 DOC 43XB # CHECKSTRING TESTS WHETHER THE STRING %A IS IDENTICALLY (NOT JUST IN- 44C2 # CLUDING OR INCLUDED BY) ONE OF THE STRINGS %B TO %<N>. IF NOT, 44WL # FLAG %<N+1> IS OBEYED. (FLAG CAUSES ITS PARAMETER (A LOCAL IDENTIFIER) 45B= # TO BE REDEFINED INCREMENTED BY ONE.) 45TW # 46*G # REPETITIONS IN THE STRINGS %B TO %<N> DO NOT AFFECT THE RESULT EXCEPT 46T6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKTRAP https://www.george3.co.uk/george/macro/checktrap?rev=1705492539&do=diff CHECKTRAP (GIN Macro) Defined in: MACROS RM57 Used in: 2DBY ...[??? CHECKTRA SECT FILE FGN 6 DOC 2DLQ #MAC CHECKTRAP 2F6B #STR %A 2FL2 #SKI 2G5L DOWN TRAPCHEC,5 2GK= #STR %A 2H4W ( 2HJG SMO FX2 2J46 STO %A ACOMMUNE3 2JHQ DOWN TRAPCHEC,7 2K3B ) 2KH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKUNI https://www.george3.co.uk/george/macro/checkuni?rev=1705492539&do=diff CHECKUNI (GIN Macro) Defined in: MACINTLUDES Used in: 3T4P ...[??? CHECKUNI SECT DIAG FGN 11 DOC 3T4S ...#MAC CHECKUNI [M. DRUKKER 3T4X ...[ 3T52 ...[ 3T55 ...[ ************** 3T58 ...[ * CHECKUNI * 3T5? ...[ ************** 3T5B ...[ 3T5F ...[ 3T5J ...[ CHECKUNI - THIS MACRO CHECKS THE EXISTENCE, SETTING, 3T5M ...[ AND VALUE OF EACH (UNIVERSAL) PARAMETER 3T5Q ...[ 3T5T ...[ THIS MACRO CAN ONLY BE USED WITH GIN 513 ONWAR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKXF https://www.george3.co.uk/george/macro/checkxf?rev=1705492539&do=diff CHECKXF (GIN Macro) Defined in: MACS SPC Used in: 3?^Q #MAC CHECKXF 3#FB MODD LDX 0 JK52F,%A,CPPTR(2) 3#^2 SLC 0 3 3*DL ANDN 0 3 3*Y= BZE 0 %B 3BCW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHECKXOT https://www.george3.co.uk/george/macro/checkxot?rev=1705492539&do=diff CHECKXOT (GIN Macro) Defined in: MACS SPC Used in: FREEPER867, OPCA867, SETUPA867 3G#W #MAC CHECKXOT 3GSG MODD LDX 0 JK52F,%A,CPPTR(2) 3H#6 SLL 0 1 3HRQ BPZ 0 %B 3J?B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHEKLFN2 https://www.george3.co.uk/george/macro/cheklfn2?rev=1705492539&do=diff CHEKLFN2 (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, ATTACHA8, ATTACHC867, ATTRIBUT867, BCAST867, CONCEPT85, CONNECT867, ENWELL867, EXPRESS864, IFEXPAN867, INITJOB867, LISTNIP865, LISTPARS867, ONLINEA867, PROPERTY867, REGEN865, REPORT865, SCHEDULE867, WHATRVS867, WLB867, WSPARAM867 8XCY ...[??? CHEKLFN2 SECT CENT FGN 21 DOC 8XMQ #MAC CHEKLFN2 8Y7B #STR %C 8YM2 #SKI 8^6L MHUNT 3,CPB,CUNI 8^L= #STR %C 925W ( 92KG #SKI %C-3 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHEKPASWRD https://www.george3.co.uk/george/macro/chekpaswrd?rev=1705492539&do=diff CHEKPASWRD (GIN Macro) Defined in: MACROS HL Used in: ATTACHC867, CONNECT867, LIST867, PREPREAD867 4=^Y ...[??? CHEKPASW SECT CENT FGN 5 DOC 4?9Q #MAC CHEKPASWRD 4?PB DOWN ADDJOB,3 4#92 BRN %A 4#NL BRN %B 4*8= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHEKPRIV https://www.george3.co.uk/george/macro/chekpriv?rev=1705492539&do=diff CHEKPRIV (GIN Macro) Defined in: BUDGMAC Used in: ACCESS867, ARCHIVE867, BEXTSJ84, CAFSPERI867, CHTAB, ENTRUST, FREEZE864, INKS, IPCOPENA83, IPCOPENB83, LOADPROG865, MACRALAS864, MEXTSJ70, NEWDIR867, OLMTC85, ONLINEC867, OPERATOR867, OWNERCHE84, RETRIEVE864, SJMESS867, USEREXCP860, USERONE867 229S ...[??? CHEKPRIV SECT FILE FGN 1 DOC 22FL #MAC CHEKPRIV 22^= #STR JOB,%A 23DW ( 23YG SMO FX1 24D6 LDN 1 %B 24XQ SMO FX2 25… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHERRMESS https://www.george3.co.uk/george/macro/cherrmess?rev=1705492539&do=diff CHERRMESS (GIN Macro) Defined in: MACROS GLJ Used in: LOADERR70, OPILLSA206 4T?W # CHERRMESS - THIS MACRO CHECKS THE ERROR REPLY WORD GIVEN 4TRG # BY THE CHECKPTE MACRO AND OUTPUTS THE APPROPRIATE 4W?6 # MESSAGE TO THE MONITORING FILE. %A IF PRESENT SHOULD 4WQQ # CONTAIN THE REPLY WORD ITSELF. IF %A IS NOT GIVEN, 4X=B # AN ADATA/ERREPLY BLOCK CONTAINING THE REPLY WILL BE 4XQ2 # LOCATED AND SUBSE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHFILE https://www.george3.co.uk/george/macro/chfile?rev=1705492539&do=diff CHFILE (GIN Macro) Defined in: MACROS EWDAS Used in: CHINTEG867 NL5W # NLKG [??? CHFILE NM56 # ****** NMJQ #MAC CHFILE NN4B # NNJ2 LDX 0 %B NP3L LDX 1 FX2 NPH= STO 0 ACOMMUNE9(1) NQ2W MFINDSU 1,ACOMMUNE9(1) NQGG LADDP HUNIT(1),1 NR26 JDED 1,%G NRFQ LDX 1 FX2 NR^B LDX 0 %A NSF2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHJOBLOCK https://www.george3.co.uk/george/macro/chjoblock?rev=1705492539&do=diff CHJOBLOCK (GIN Macro) Defined in: MACROS HL Used in: UNSAVE867 2^^D ...[??? CHJOBLOC SECT CENT FGN 5 DOC 329= # 32NW # CHJOBLOCK MACRO 338G # SEARCHES DOWN JOB QUEUE AND CHAINS JOB BLOCK IN JOB 33N6 # NUMBER ORDER.FINALLY UPDATES FIRST BLOCK IN QUEUE 347Q # 34MB #MAC CHJOBLOCK 3572 LDX 1 %A 35LL LDN 2 BJOBQ 366= MCHJOBLOCK1 36KW LDX 2 FPTR(2) 375G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHKBREAK https://www.george3.co.uk/george/macro/chkbreak?rev=1705492539&do=diff CHKBREAK (GIN Macro) Defined in: MACS MISW Used in: PROFLAG83 5#XW #MAC CHKBREAK 5*CG LDCT 0 #440 5*X6 ANDX 0 JOBEVENTS(%A) 5BBQ BNZ 0 %B 5BWB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHNUMCO1 https://www.george3.co.uk/george/macro/chnumco1?rev=1705492539&do=diff CHNUMCO1 (GIN Macro) Defined in: MACROS ICB Used in: ALTINST60, FFFNORM7, LDSTART850, PERCON867, QUOTA850, SCHEDULE867, SETPRAMB867, SJMESS867 4QB6 #MAC CHNUMCO1 4QTQ # 4R*B ...[ ROUTINE FOR CONVERTING A SINGLE NUMERICAL EXPRESSION 4RT2 # 4S#L #STR %A 4SS= #SKI 4T?W DOWN CHNUMCON,4 4TRG #STR %A 4W?6 DOWN CHNUMCON,5 4WQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHNUMCOD https://www.george3.co.uk/george/macro/chnumcod?rev=1705492539&do=diff CHNUMCOD (GIN Macro) Defined in: MACROS ICB Used in: ANSCOM865, ATTACHA8, BCAST867, CMEMILL866, CONCEPT85, CONNECT867, CORE867, DATECON37, DETACH867, EXPRESS864, HARDWARA8, INSTPARA867, LINECTRL864, LISTDEV866, LISTFILE867, MAKEVCC867, ONOFFALT60, PAGES867, PERCON867, PERFPASS864, PREPREAD867, PROSTART867, PSPLIT82, REGEN865, REPERT867, RESET83, SCHEDULE867, SETPARAM867, SETPC867, SETPE867, SETPG867, SETPN867, SETPR867, SHOWCOMM864, WSPARAM867 5C3J ...[??? CHNUMCOD SECT CENT FGN 2 DOC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHNUMCON https://www.george3.co.uk/george/macro/chnumcon?rev=1705492539&do=diff CHNUMCON (GIN Macro) Defined in: MACROS ICB Used in: ADJUNCTS85, ALLOCATE867, BUDGTWO84, CHTAB, DOXCODE867, DUMP860, IFNUMS867, INCOM864, INKS, JOBDATAB867, MODE866, NORMALUS864, PRINT70, REALTIME867, SCRATCH866, SETDISC866, SETPR867, SETPRAMB867 44C2 #MAC CHNUMCON 44WL # 45B= ...[ ROUTINE FOR CONVERTING A SERIES OF NUMERICAL EXPRESSIONS 45TW # 46*G #STR %A 46T6 #SKI 47#Q DOWN CHNUMCON,1 47SB #STR %A 48#2 DOWN CHNUMCON,3 4… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHNUMCOO https://www.george3.co.uk/george/macro/chnumcoo?rev=1705492539&do=diff CHNUMCOO (GIN Macro) Defined in: MACROS ICB Used in: LISTFILE867 5W=J ...[??? CHNUMCOO SECT CENT FGN 2 DOC 5WGB #MAC CHNUMCOO 5X22 # 5XFL ...[ ROUTINE FOR USE WHEN A SINGLE OCTAL NUMBER IS TO BE CONVERTED 5X^= # 5YDW STO 3 GEN0 5YYG #STR %B 5^D6 #SKI 5^XQ MHUNT 2,CPB,CUNI 62CB #STR %B,2 62X2 LDX 2 %B 63BL LDEX 3 ANUM(2) 63W= LDCH 1 APARA(2) 64*W SBN 1 #23 64TG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHNUMCOX https://www.george3.co.uk/george/macro/chnumcox?rev=1705492539&do=diff CHNUMCOX (GIN Macro) Defined in: MACROS ICB Used in: ONOFFALT60, WHATRVS867, WLB867 6F?Y ...[??? CHNUMCOX SECT CENT FGN 2 DOC 6FHQ #MAC CHNUMCOX 6G3B # 6GH2 ...[ ROUTINE FOR CONVERTING A SINGLE OCTAL OR DECIMAL NUMBER 6H2L # 6HG= STO 3 GEN0 6H^W #STR %B 6JFG #SKI 6J^6 MHUNT 2,CPB,CUNI 6KDQ #STR %B,2 6KYB LDX 2 %B 6LD2 LDEX 3 ANUM(2) 6LXL LDCH 1 APARA(2) 6MC= SBN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHTEND https://www.george3.co.uk/george/macro/chtend?rev=1705492539&do=diff CHTEND (GIN Macro) Defined in: CHCHCOORMAC2 Used in: HJ^L ...[??? CHTEND SECT CENT FGN 32 DOC HKF= ...# HKYW ...# HLDG ...# HLY6 ...# THIS IS A RECURSIVE MACRO WHICH STEPS THROUGH THE CHAPTER TABLE GAP HMCQ ...# AREA UNTIL IF FINDS AN ENTRY CONTAINING -1 (FREE) WHICH IT USES HMXB ...# -1 IS USED RATHER THAN ZERO AS A FORWARD REF WILL INITIALLY GENERATE 0 HNC2 ...# HNWL ...#MAC CHTEND HPB= ...#SKI 34?+0?+M+0]+1 HPTW ...( HQ*G ...#DEF 0?=0?+1 HQT6 ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHTERM https://www.george3.co.uk/george/macro/chterm?rev=1705492539&do=diff CHTERM (GIN Macro) Defined in: CHTERM Used in: 0000 [??? CHTERM SECT FILE FGN 1 DOC 22FL ...#MAC CHTERM 22^= ...#STR #,%A 23DW ...#STR 23YG ...( 24D6 ...#SKI GTERM>KTAB-KTAB 24XQ ...#MEN CHTABLE 25CB ...#SKI GTERM<KTAB-KTAB 25X2 ...#MEN FIXED 26BL ...#TRA GTERM 26W= ...#DEF 20?=34?+0?+0] 27*W ... 4H%A 27TG ...#TRA GTERM 28*6 ...#SKI 34?+0?+0]&#747474+#40404&#1010100<1$1 28SQ ...( 29#B ...#END 29S2 ...#EXI 2=?L ...) 2=R= ... +20? 2?=W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHTRAN https://www.george3.co.uk/george/macro/chtran?rev=1705492539&do=diff CHTRAN (GIN Macro) Defined in: MACROS EWDAS Used in: FLAWMAP866, KARTCONT867, PATCH, PERION867, SPERION867, TRANSFER70 H9=L # H9Q= # ********************************************************************** H=9W # * H=PG # * CHECK BS TRANSFERS H?96 # * CHTRAN,CHTRANX H?NQ # * … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHTRANX https://www.george3.co.uk/george/macro/chtranx?rev=1705492539&do=diff CHTRANX (GIN Macro) Defined in: MACROS EWDAS Used in: ERASEX866, FLAW866 H^MW # J27G [??? CHTRANX J2M6 # ******* J36Q #MAC CHTRANX [FLAWS TRANSFER CHECK MACRO J3LB # J462 #STR %E J55= ( J5JW LDX 0 %E J64G SRL 0 18 J6J6 ) J73Q #STR %E J7HB #SKI J832 LDCH 0 ACOMMUNE9(2) J8GL LDX 1 %A J92= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHUCK https://www.george3.co.uk/george/macro/chuck?rev=1705492539&do=diff CHUCK (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTRACT866, EXINTWO866, SCEXEND867 F3D= # F3XW [??? CHUCK F4CG # ***** F4X6 #MAC CHUCK F5BQ # F5WB #OPT MCHUCK1=0 F6B2 #OPT MCHUCK2=0 F6TL #STR C,%A F7*= #SKI F7SW CALL 0 MCHUCK3 F8#G #STR W,%A F8S6 #SKI F9?Q CALL 0 MCHUCK4 F9RB LDX 0 %B F=?2 #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CHUCKWR https://www.george3.co.uk/george/macro/chuckwr?rev=1705492539&do=diff CHUCKWR (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTRACT866, EXINTO867, EXINTWO866 G?FG # G?^6 [??? CHUCKWR G#DQ # ******* G#YB #MAC CHUCKWR G*D2 # G*XL STO 3 EWK+3(3) GBC= #STR C,%A GBWW #SKI GCBG CALL 0 MWRITESTX3 GCW6 #STR W,%A GD*Q #SKI GDTB CALL 0 MWRITESTX4 GF*2 LDX 1 %B GFSL #STR %D G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CIBRKIN https://www.george3.co.uk/george/macro/cibrkin?rev=1705492539&do=diff CIBRKIN (GIN Macro) Defined in: MACS MISW Used in: PROCONTX867 5F#G #MAC CIBRKIN [SETIB3 IF B.I EFFECTED OK.P.WARNER 5FS6 HUNT2OPT %A,AMXOR,CILCB 5G?Q BNG %A MCIBRKIN 5GRB LDCT 0 8 5H?2 ORS 0 CIREADY(%A) 5HQL MCIBRKIN 5J== #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CIDFAS https://www.george3.co.uk/george/macro/cidfas?rev=1705492539&do=diff CIDFAS (GIN Macro) Defined in: MACS JIB Used in: ASSOC867 3GJN ...[??? CIDFAS SECT COMM FGN 25 DOC 3GSG # 3LBL ...#MAC CIDFAS 3LCS ... LDX 2 FX2 3LF2 ... STO %B ACOMMUNE1(2) 3LG8 ... STO %C ACOMMUNE2(2) 3LHB ... DOWN IDFCANC,2 3LJJ ... BRN %A [BRK-IN 3LKQ ... BRN %D 3LLY ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CILLEGAL https://www.george3.co.uk/george/macro/cillegal?rev=1705492539&do=diff CILLEGAL (GIN Macro) Defined in: MACROS2JSR Used in: DISEVENT65 229S ...[??? CILLEGAL SECT CENT FGN 2 DOC 22FL # 22^= # RUTH HEAP ROOM F6 23DW # 23YG # 24D6 # MACROS:- 24XQ # 25CB # CILLEGAL 25X2 # MONITOR 26BL # ILLEGAL ETC. 26W= # TOPCA/1 27*W # PERTYPNO 27TG # RELOFP 28*6 # PERCOUNT 28SQ # FPERENT/A/B 29#B # 29S2 # PLEASE RETURN TO F5 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CIOUT https://www.george3.co.uk/george/macro/ciout?rev=1705492539&do=diff CIOUT (GIN Macro) Defined in: MACS MISW Used in: CHTAB, INKS, MONFILEA864, PNTLAST860 5M82 #MAC CIOUT [P.WARNER 5MML #STR %A,0 5N7= LDX 0 %A [NO OF CHARS 5NLW #STR %A 5P6G #SKI 5PL6 NGN 0 1 5Q5Q SMO FX2 5QKB STO 0 ACOMMUNE7 5R52 DOWN CIOUT,1 5RJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CIPCM https://www.george3.co.uk/george/macro/cipcm?rev=1705492539&do=diff CIPCM (GIN Macro) Defined in: MACROSIPC Used in: IPCONA864, IPCOND864, IPCONE865 2X3N ...[??? CIPCM SECT COMM FGN 19 DOC 2X?G #MAC CIPCM 2XR6 NGN 0 1+IPCMR%A 2Y=Q #STR %B 2YQB ( 2^=2 SMO %B 2^PL ANDS 0 IPCMKR 329= ) 32NW #STR %B 338G #SKI 33N6 ANDS 0 IPCMKR(2) 347Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CIPRIV https://www.george3.co.uk/george/macro/cipriv?rev=1705492539&do=diff CIPRIV (GIN Macro) Defined in: MACS MISW Used in: CYQW [??? CIPRIV SECT COMM FGN 41 DOC C^=G #MAC CIPRIV C^Q6 #MEN ONLINEC D29Q #TRA CIPRIVA D2PB 8H%A D392 #TRA CIPRIVB D3NL NULL D48= #END D4MW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CJOBLOCK https://www.george3.co.uk/george/macro/cjoblock?rev=1705492539&do=diff CJOBLOCK (GIN Macro) Defined in: MACRO COMPRO Used in: ATTACHC867, BLOGNAL865, BQUERY84, BUDGTWO84, COMPRO867, COMPROB867, CONMXA85, CONNECT867, CONNECTA867, DISPCOM867, LIBCOM867, LOGOUT867, NAMEPRIV, NEWPASSW867, OPENWAIT867, QUESCOM867, RELPER867, RETURN867, TIME6, TRAPCHEC867, TRAPPARA3 *J*J ...[??? CJOBLOCK SECT CENT FGN 21 DOC *JKB # *K52 # *KJL #MAC CJOBLOCK *L4= FJOCA 1,FX2 *LHW #STR %A,1 *M3G ( *MH6 STO 1 %A *N2Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLALLOC https://www.george3.co.uk/george/macro/clalloc?rev=1705492539&do=diff CLALLOC (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, DRUM852, ENGAGE867, LIBLOAD867, LIBMANY867, LIBREQC867, LIBSEC867, MODE866, MOPCOM867, MOPCOMB865, NEWOWN865, NEWPW867, REDONMT867, SETUP867, SETUPA867, UNLOADMT867 28SQ #MAC CLALLOC 29#B NGN 0 2 29S2 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 2=?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLAUTFAIL https://www.george3.co.uk/george/macro/clautfail?rev=1705492539&do=diff CLAUTFAIL (GIN Macro) Defined in: OLPMACROS Used in: 7XN# ...[??? CLAUTFAI SECT FILE FGN 7 DOC 7XY6 # 7YCQ # CLEAR PERIPHERAL CHANNEL FAILED MARKER IN OLPA 7YXB # 7^C2 #MAC CLAUTFAIL 7^WL NGN 0 2 82B= #STR %A 82TW ( 83*G #MOD 83T6 ( 84#Q SMO %A 84SB ANDS 0 BFSTATE 85#2 ) 85RL #MOD %A 86?= #SKI 86QW ANDS 0 BFSTATE(%A) 87=G ) 87Q6 #STR %A 889Q #SKI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLBGROP https://www.george3.co.uk/george/macro/clbgrop?rev=1705492539&do=diff CLBGROP (GIN Macro) Defined in: MACROS PERI Used in: GROPE867, SWITCH867 2B8L #MAC CLBGROP 2BN= NGN 0 33 2C7W MODD ANDS 0 JPSTATE,%A,CPPTR(2) 2CMG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLCOUNT https://www.george3.co.uk/george/macro/clcount?rev=1705492539&do=diff CLCOUNT (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, FREEPER867, IPCONE865, LIBLOAD867, MOPCOM867, MOPCOMB865, RELPER867, UNLOADMT867 2HJG #MAC CLCOUNT 2J46 #STR %B,GEORGE 2JHQ #SKI 2K3B MODD STOZ JK52H,%A,CPPTR(2) 2KH2 #STR %B,OBJECT 2L2L #SKI 2LG= MODD STOZ JK52I,%A,CPPTR(2) 2L^W #STR %B,REPEAT 2MFG #SKI 2M^6 MODD STOZ JK52J,%A,CPPTR(2) 2NDQ #STR %B,FAIL 2NYB #SKI 2PD2 MODD STOZ JK52K,%A,CPP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLDRM https://www.george3.co.uk/george/macro/cldrm?rev=1705492539&do=diff CLDRM (GIN Macro) Defined in: MACROS PERI Used in: FREEPER867, OPCA867, UNLOADMT867 2X?G #MAC CLDRM 2XR6 MODD LDX 0 JK52F,%A,CPPTR(2) 2Y=Q SLL 0 8 2YQB BNG 0 MCLDRM1 2^=2 NGN 0 5 2^PL MODD ANDS 0 JK52E,%A,CPPTR(2) 329= MCLDRM1 32NW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEANEND https://www.george3.co.uk/george/macro/cleanend?rev=1705492539&do=diff CLEANEND (GIN Macro) Defined in: MACRO COMPRO Used in: LOGOUT867 =WCJ ...[??? CLEANEND SECT CENT FGN 21 DOC =WMB [ =X72 [ THIS MACRO CLEANS UP TO LEVEL ZERO (USED IN LOGOUT) =XLL [ AND SETS CPLEV ACCORDINGLY. =Y6= #MAC CLEANEND =YKW LDX 2 FX2 =^5G STOZ CPLEV(2) =^K6 LDCT 0 #010 ?24Q STO 0 EXT+3(2) ?2JB DOWN CLEAN,1 ?2MG ... MHUNTW 2,CPB,CALAS ?2QL ... NGN 0 1 ?2TQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEANUP https://www.george3.co.uk/george/macro/cleanup?rev=1705492539&do=diff CLEANUP (GIN Macro) Defined in: MACRO COMPRO Used in: COMPROB867, CONTINUE867, GOTO867, QUIT4 =G8Y ...[??? CLEANUP SECT CENT FGN 21 DOC =GDQ # =GYB [ THIS MACRO DELETES ALL CP LEVELS UPTO A CERTAIN LEVEL. =HD2 [ THIS LEVEL IS SPECIFIED AS A PARAMETER OF THE MACRO =HXL #MAC CLEANUP =JC= LDX 2 FX2 =JWW STOZ EXT+3(2) =KBG LDN 1 %B =KW6 DCH 1 EXT+3(2) =L*Q LDX 1 %A =LTB OR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEANX https://www.george3.co.uk/george/macro/cleanx?rev=1705492539&do=diff CLEANX (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867, COMPROB867, GOTO867 =N4D ...[??? CLEANX SECT CENT FGN 21 DOC =N#= [ THIS MACRO IS THE SAME AS CLEANUP,EXCEPT THAT THE 2ND PARAM IS =NRW [ ADDRESS CONTAINING AMOUNT TO BE CLEARED OUT =P?G # =PR6 #MAC CLEANX =Q=Q LDX 2 FX2 =QQB STOZ EXT+3(2) =R=2 #SKI %B-1 =RPL LDX 1 %B =S9= DCH 1 EXT+3(2) =SNW LDX 1 %A =T8G OR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEAR https://www.george3.co.uk/george/macro/clear?rev=1705492539&do=diff CLEAR (GIN Macro) Defined in: MACROS JSR Used in: CAPCA50, COMPCHAN84, CONIPB8, CONMXB8, CONMXC8, EVENTFN, FHOBJIND860, GETWORD867, HLSREAD867, INMOP867, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPCOPENB83, IPCPERI83, LOAD60, LOADERR70, LOADFIN860, LOADX60, MONEVENT867, MONRESUM850, OLMTE85, RUNPROG840, TRIPB83, WTSTAT867 DY^W ...#MAC CLEAR D^34 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARALL https://www.george3.co.uk/george/macro/clearall?rev=1705492539&do=diff CLEARALL (GIN Macro) Defined in: MACROS JSR Used in: GETNO865, IPCPERI83, IPQUAKE83, IPQUAKER865, TRIPB83 F36Q ...#MAC CLEARALL F37Y ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARFAIL https://www.george3.co.uk/george/macro/clearfail?rev=1705492539&do=diff CLEARFAIL (GIN Macro) Defined in: MACROS Used in: RESTOREG864 4Q6# ...[??? CLEARFAI SECT FILE FGN 9 DOC 4QB6 # 5T3G #MAC CLEARFAIL 5TH6 LDX 2 ATFAPTR 5W2Q HUNT2 2,BSTB,BFRAIL 5WGB SHORTEN 2,AFRAILLEN 5X22 LDN 0 A1(2) [CLEAR 5XFL LDN 1 A1+1(2) [OUT 5X^= STOZ A1(2) [BLOCK 5YDW MOVE 0 AFRAILLEN-1 5YYG NGN 0 1 5^D6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARFILE https://www.george3.co.uk/george/macro/clearfile?rev=1705492539&do=diff CLEARFILE (GIN Macro) Defined in: BMAP MACROS Used in: BACKMASS860 3=?4 ...[??? CLEARFIL SECT FILE FGN 36 DOC 3?2G #MAC CLEARFILE [WAITS FOR AUTCLOSES & EMPTIES HALFOP 3?G6 DOWN BACKROOM,3 3?^Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARJPS https://www.george3.co.uk/george/macro/clearjps?rev=1705492539&do=diff CLEARJPS (GIN Macro) Defined in: MACROS PERI Used in: FREEPER867 36KW #MAC CLEARJPS 375G NGN 0 #640 37K6 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 384Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARMODE https://www.george3.co.uk/george/macro/clearmode?rev=1705492539&do=diff CLEARMODE (GIN Macro) Defined in: OPEN-MACROS Used in: 4LNY ...[??? CLEARMOD SECT FILE FGN 20 DOC 4LYQ [ 4MDB #MAC CLEARMODE 4MY2 SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 4NCL ANDX 0 %A 4NX= ERS 0 %A 4PBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARPASS https://www.george3.co.uk/george/macro/clearpass?rev=1705492539&do=diff CLEARPASS (GIN Macro) Defined in: MACS IPB Used in: 4?PB #MAC CLEARPASS 4#92 #STR %A,ON 4#NL #SKI 4*8= ( 4*MW #MEN ADDJOB 4B7G #TRA K20ADDJOB 4BM6 NULL 4C6Q #END 4CLB #EXI 4D62 ) 4DKL #STR %A 4F5= #SKIP 4FJW ( 4G4G #MEN ADDJOB 4GJ6 #TRA K20ADDJOB 4H3Q NULL 4HHB #END 4J32 #EXI 4JGL ) 4K2= #STR OFF,%A 4KFW #SKI 4K^G ( 4LF6 #MEN ADDJOB 4LYQ #TRA K20ADD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARPE https://www.george3.co.uk/george/macro/clearpe?rev=1705492539&do=diff CLEARPE (GIN Macro) Defined in: MACROS JSRG4 Used in: INMOP867 2WRW #MACRO CLEARPE 2X?G STO 2 JWSP2 2XR6 FPCACA 2,FX2 2Y=Q CLEAR 2,2,,2,HLOCKN 2YQB LDX 2 JWSP2 2^=2 #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARSTA https://www.george3.co.uk/george/macro/clearsta?rev=1705492539&do=diff CLEARSTA (GIN Macro) Defined in: MACROS DTP Used in: 58GD ...[??? CLEARSTA SECT DIAG FGN 587 58GF ...#MAC CLEARSTA 58GG ...[ 58GH ...[ 58GJ ...[ ************** 58GK ...[ * CLEARSTA * 58GL ...[ ************* 58GM ...[ 58GN ...[ 58GP ...#STA %A,75?+1 58GQ ...#STA %B,75?+1 58GR ...#STA %C,75?+1 58GS ...#STA %D,75?+1 58GT ...#STA %E,75?+1 58GW ...#STA %F,75?+1 58GX ...#STA %G,75?+1 58GY ...#STA %H,75?+1 58G^ ...#STA %I,75… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLEARVDU https://www.george3.co.uk/george/macro/clearvdu?rev=1705492539&do=diff CLEARVDU (GIN Macro) Defined in: MACS IPB Used in: ADDJOB867, DOMONOP867 4SS= #MAC CLEARVDU 4T?W LDX 2 FX2 4TRG LDX 0 JSOURCE1(2) [GET PERIPHERAL TYPE 4W?6 SRL 0 18 4WQQ SBN 0 24 4X=B BZE 0 MMBS [J IF MOP ON IPB 4XQ2 SBN 0 36 4Y9L BZE 0 MACI [J IF MOP ON CI CHANNEL 4YP= BRN MFIN 4^8W MMBS 4^NG MHUNTW 2,AMXOR,AD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLFAIL https://www.george3.co.uk/george/macro/clfail?rev=1705492539&do=diff CLFAIL (GIN Macro) Defined in: MACROS PERI Used in: PERFAIL866, UNPLUG867 3?^Q #MAC CLFAIL 3#FB NGN 0 3 3#^2 MODD ANDS 0 JK52E,%A,CPPTR(2) 3*DL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLFAILTYPE https://www.george3.co.uk/george/macro/clfailtype?rev=1705492539&do=diff CLFAILTYPE (GIN Macro) Defined in: MACROS PERI Used in: 3F*L #MAC CLFAILTYPE 3FT= NGN 0 449 3G#W MODD ANDS 0 JK52E,%A,CPPTR(2) 3GSG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLHLFDON https://www.george3.co.uk/george/macro/clhlfdon?rev=1705492539&do=diff CLHLFDON (GIN Macro) Defined in: MACROS PERI Used in: LISTLOOP867, PERFAIL866, PMLP866, PMWHATA866, RELPER867 3LPG #MAC CLHLFDON 3M96 BC %A,HALFDONEBIT 3MNQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLINK https://www.george3.co.uk/george/macro/clink?rev=1705492539&do=diff CLINK (GIN Macro) Defined in: MACROSIPC Used in: BSQ867, BSTS867, CHCHCOORCOMP, IPCPERI83, LOADERII867, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEG, PMTABLEH, PMTABLEI, PMTABLEJ 34G7 ...[??? CLINK SECT COMM FGN 19 DOC 34SJ ...[ CLOSE A LINK 3572 #MAC CLINK 35LL #STR %A 366= STO %A ACOMMUNE9(2) 36KW #STR %A 375G #SKIP 37K6 STO 2 ACOMMUNE9(2) 384Q DOWN GETNO,4 38JB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLJOBLMT https://www.george3.co.uk/george/macro/cljoblmt?rev=1705492539&do=diff CLJOBLMT (GIN Macro) Defined in: MACROS PERI Used in: ADDJOB867 3RKQ #MAC CLJOBLMT 3S5B NGN 0 9 3SK2 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 3T4L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLO7 https://www.george3.co.uk/george/macro/clo7?rev=1705492539&do=diff CLO7 (GIN Macro) Defined in: MACROSAJE Used in: 437Y ...[??? CLO7 SECT DEVT FGN 8 DOC 43CQ # 43XB # 44C2 #MAC CLO7 [UNLOAD TAPE %A 44WL #INT 45B= MCLO7 #40501007,0 45TW LDN 7 %A 46*G PERI 7 MCLO7 46T6 EXIT 0 0 47#Q #JUM MCLO7+2 47SB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOBJPERIS https://www.george3.co.uk/george/macro/clobjperis?rev=1705492539&do=diff CLOBJPERIS (GIN Macro) Defined in: MACROS PERI Used in: PUTPER85 3Y^L #MAC CLOBJPERIS 3^F= CLCOUNT %A,OBJECT 3^YW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSBINC https://www.george3.co.uk/george/macro/closbinc?rev=1705492539&do=diff CLOSBINC (GIN Macro) Defined in: MACROS MACB Used in: BLOGNAL865 5D5D ...[??? CLOSBINC SECT CENT FGN 2 DOC 5D*= # 5DSW # CONCLUDING MACRO : TO DELETE AND APPEND ENTRY AND CLOSE DICTIONARY 5F#G #MAC CLOSBINC 5FS6 DOWN BUDGTWO,5 5G?Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSBUDG https://www.george3.co.uk/george/macro/closbudg?rev=1705492539&do=diff CLOSBUDG (GIN Macro) Defined in: MACROS MACB Used in: DEAD867, GET6, LIBQUERY, NEWOWN865, REALTIME867, RETURNIT867, SECURE5 5*M# ...[??? CLOSBUDG SECT CENT FGN 2 DOC 5*X6 # 5BBQ # CONCLUDING MACRO : TO RE-WRITE ENTRY AND CLOSE DICTIONARY 5BWB #MAC CLOSBUDG 5CB2 DOWN BUDGTWO,4 5CTL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSE https://www.george3.co.uk/george/macro/close?rev=1705492539&do=diff CLOSE (GIN Macro) Defined in: CLOSE-MACROS Used in: ALASB867, ALLOW84, ATTACHC867, ATTRIBUT867, BEXTSJ84, BLOGNAL865, BMJLSLAV864, BQUERY84, BSUJSTAT867, BUDGET84, BUDGTWO84, CLEAN867, CLOSFREZ867, COMHOOK867, COMPCHAN84, COMPOST867, CONCEPT85, CONNECT867, COPYA867, CREATE867, DELCON867, DEWELL867, DOC867, EDIT867, EDITER867, EDITET7, EDITMFO867, EDITORA865, ERASE867, FILELOG, FINDOC867, FORMLOOP865, GROPE867, HARDIDF867, HLSEMS864, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONFA867, IDFCONS8, ID… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEABANDON https://www.george3.co.uk/george/macro/closeabandon?rev=1705492539&do=diff CLOSEABANDON (GIN Macro) Defined in: CLOSE-MACROS Used in: COPYA867, EDIT867, EDITORA865, INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, INRESTAR84, PREPREAD867, READBULK867, SAVE864, SCEDIT84, SCEDITAR84, SETPRAMA867, TRAPLIST864, USEROPEN867 8*TD ...[??? CLOSEABA SECT FILE FGN 11 DOC 8B5= # 8BJW #MAC CLOSEABANDON 8C4G #STR %A 8CJ6 ...! NON-ZERO DEPTH NOT ALLOWED 8F32 DOWN CLOSEDIR,12 8MTQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEDIR https://www.george3.co.uk/george/macro/closedir?rev=1705492539&do=diff CLOSEDIR (GIN Macro) Defined in: CLOSE-MACROS Used in: ADDICT865, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, CHTAB, COMPOST867, COPYB867, DTWRONG867, INKS, LISTOPEN867, RENAMDIR 8N5J ...[??? CLOSEDIR SECT FILE FGN 11 DOC 8N*B # 8NT2 #MAC CLOSEDIR 8P#L DOWN CLOSEDIR,5 8PS= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEFRBS https://www.george3.co.uk/george/macro/closefrbs?rev=1705492539&do=diff CLOSEFRBS (GIN Macro) Defined in: CLOSE-MACROS Used in: BACKMAP864, BMCNTRL866, BMQUEST866, CREALEX864, RESTERR864, RESTLIMB864, RESTOREG864 93#Y ...[??? CLOSEFRB SECT FILE FGN 11 DOC 93JQ #MAC CLOSEFRBS 97FQ #STR %A 97^B ...! NON-ZERO DEPTH NOT ALLOWED 98F2 DOWN CLOSEDIR,27 98YL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEMULT https://www.george3.co.uk/george/macro/closemult?rev=1705492539&do=diff CLOSEMULT (GIN Macro) Defined in: MACROS RMD10 Used in: COMPOST867, COPYA867, INPCT84, INPUTJDF82, INPUTMOP82, INRESTAR84, OFFREL867, PRINT70, READBULK867, TIDYREAD850, USERSTRM867 #D9# ...[??? CLOSEMUL SECT FILE FGN 16 DOC #DF6 #MAC CLOSEMULT #DYQ DOWN COMPOST,7 #FDB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEOUT https://www.george3.co.uk/george/macro/closeout?rev=1705492539&do=diff CLOSEOUT (GIN Macro) Defined in: MACROS LEF Used in: LISTFNDA865, LISTSEAR867, WLC867 3^9D ...[??? CLOSEOUT SECT DEVT FGN 2 DOC 3^F= [ 3^YW #MAC CLOSEOUT 42DG CLOSE %A 42Y6 STARTACT OUT 43CQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSESET https://www.george3.co.uk/george/macro/closeset?rev=1705492539&do=diff CLOSESET (GIN Macro) Defined in: CLOSE-MACROS Used in: COPYFILA867, ORELEND860, USERSTRM867, WORKFILE860 8TFD ...[??? CLOSESET SECT FILE FGN 11 DOC 8TP= #MAC CLOSESET 8W8W #STR %A 8WNG ...! NON-ZERO DEPTH NOT ALLOWED 8X86 DOWN CLOSEDIR,16 9356 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSESHORT https://www.george3.co.uk/george/macro/closeshort?rev=1705492539&do=diff CLOSESHORT (GIN Macro) Defined in: CLOSE-MACROS Used in: ERASEA867 87^Y ...[??? CLOSESHO SECT FILE FGN 11 DOC 889Q #MAC CLOSESHORT 88PB #STR %A 8992 ...! NON-ZERO DEPTH NOT ALLOWED 89NL DOWN CLOSEDIR,23 8*KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEST https://www.george3.co.uk/george/macro/closest?rev=1705492539&do=diff CLOSEST (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTEND867, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FLAWMAP866, SCEX866, SCEXEND867, WRITEFIP867 ?MJ= # ?N3W [??? CLOSEST ?NHG # ******* ?P36 #MAC CLOSEST ?PGQ # ?Q2B STO 1 EWK+1(3) ?QG2 STO 2 EWK+2(3) ?Q^L LDX 0 ETMARK(3) ?RF= BNZ 0 MCLOSEST1 ?RYW MCLOSEST2 ?SDG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSESTREAM https://www.george3.co.uk/george/macro/closestream?rev=1705492539&do=diff CLOSESTREAM (GIN Macro) Defined in: MACROS RMD10 Used in: CANCRVX864, PRINT70 #*R8 ...[??? CLOSESTR SECT FILE FGN 16 DOC #B32 # #BGL # #C2= #MAC CLOSESTREAM #CFW DOWN COMPOST,7 #C^G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSETAPE https://www.george3.co.uk/george/macro/closetape?rev=1705492539&do=diff CLOSETAPE (GIN Macro) Defined in: MACROS RME10 Used in: DTSTART867, OFFREL867 37*# ...[??? CLOSETAP SECT FILE FGN 4 DOC 37K6 #MAC CLOSETAPE 384Q DOWN CLOSEMT,4 38JB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSETHAW https://www.george3.co.uk/george/macro/closethaw?rev=1705492539&do=diff CLOSETHAW (GIN Macro) Defined in: CLOSE-MACROS Used in: LISTNEXT867, LISTOPEN867 86H4 ...[??? CLOSETHA SECT FILE FGN 11 DOC 86QW #MAC CLOSETHAW 87=G DOWN CLOSFREZ,3 87Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSETHROW https://www.george3.co.uk/george/macro/closethrow?rev=1705492539&do=diff CLOSETHROW (GIN Macro) Defined in: CLOSE-MACROS Used in: BSPRUNE867, COMPRESS864, INCWRITE865 998D ...[??? CLOSETHR SECT FILE FGN 11 DOC 99D= #MAC CLOSETHROW 99XW DOWN CLOSEDIR,95 9=CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSETOP https://www.george3.co.uk/george/macro/closetop?rev=1705492539&do=diff CLOSETOP (GIN Macro) Defined in: CLOSE-MACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ALLOCATE867, ANTIC867, ARCHIVE867, ARCHIVNW83, ASTONIF867, BACKMARK850, BACKMASS860, BMAPTWO860, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEMS83, BSUNJAM867, BUDGTWO84, CAFSPERI867, CANCRVX864, CHEKPRIV867, CLEAN867, CLOSEAB863, CLOSEALT864, CLOSEFUL867, CLOSEMT867, CLOSEND867, CLOSEONE867, CLOSFREZ867, COMPRESS864, CONSERNO6, COPYA867, COPYB867, COPYFILA867, CREALEX8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLOSEWR https://www.george3.co.uk/george/macro/closewr?rev=1705492539&do=diff CLOSEWR (GIN Macro) Defined in: MACROS EWDAS Used in: BRADSPLT867, CHINTEG867, CLOSDEL867, CONTRACT866, EXINTO867, FINDFS867, WRITEFIP867 #2RL # #3?= [??? CLOSEWR #3QW # ******* #4=G #MAC CLOSEWR #4Q6 # #59Q LDX 0 %B #5PB STO 0 EBLOCK(3) #692 #STR %C #6NL LDCT 0 #600 #78= #STR %C #7MW #SKI #87G LDCT 0 #400 #8M6 STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLRGROP https://www.george3.co.uk/george/macro/clrgrop?rev=1705492539&do=diff CLRGROP (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867, GROPE867 45TW #MAC CLRGROP 46*G NGN 0 513 46T6 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 47#Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLSWOVER https://www.george3.co.uk/george/macro/clswover?rev=1705492539&do=diff CLSWOVER (GIN Macro) Defined in: MACROS PERI Used in: GROPE867 4?9Q #MAC CLSWOVER 4?PB NGN 0 2049 4#92 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 4#NL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLUDGEQUERY https://www.george3.co.uk/george/macro/cludgequery?rev=1705492539&do=diff CLUDGEQUERY (GIN Macro) Defined in: MACROS RMD10 Used in: 9N#S ...[??? CLUDGEQU SECT FILE FGN 16 DOC 9P4= [ %A MODIFIER POINTING TO FCB 9PHW [ %B LABEL TO JUMP TO IF CLUDGE 9Q3G [ %C & %D WORK ACCUMULATORS (X3->X7) 9QH6 #MAC CLUDGEQUERY 9R2Q LDX 1 FPTR(%A) 9RGB LDX 0 ATYPE(1) 9S22 SRL 0 12 9SFL SBN 0 FILE+FSTACK 9S^= BNZ 0 M3CLUDGEQUE 9TDW SMO FX2 9TYG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLWTBSW https://www.george3.co.uk/george/macro/clwtbsw?rev=1705492539&do=diff CLWTBSW (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, DUMMYB867, FREEPER867, IPBINB867, SWITCH867 4D62 #MAC CLWTBSW 4DKL NGN 0 65 4F5= MODD ANDS 0 JPSTATE,%A,CPPTR(2) 4FJW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CLWTBWR https://www.george3.co.uk/george/macro/clwtbwr?rev=1705492539&do=diff CLWTBWR (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867, IPBINB867, RIGHT867, SWITCH867 4KFW #MAC CLWTBWR 4K^G NGN 0 129 4LF6 MODD ANDS 0 JPSTATE,%A,CPPTR(2) 4LYQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CMENDIT https://www.george3.co.uk/george/macro/cmendit?rev=1705492539&do=diff CMENDIT (GIN Macro) Defined in: MACROS DTP Used in: GY^2 ...[??? CMENDIT SECT DIAG FGN 576 DOC G^DL #MAC CMENDIT [M.C.D. MANN G^Y= [ H2CW [ H2XG [ H3C6 [ ************* H3WQ [ * CMENDIT * H4BB [ ************* H4W2 [ H5*L [ H5T= #STR :,%A H6#W #SKI H6SG ( H7#6 #MEN %B H7RQ #ALT CMENDCH1=D%B&127+34?+L%B+30?] H8R2 #END H9=L MENDIT %A,%B,%C,%D,%E,%F,%G H9Q=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CMEPERF https://www.george3.co.uk/george/macro/cmeperf?rev=1705492539&do=diff CMEPERF (GIN Macro) Defined in: MACROS IAN Used in: 45TW ...[??? CMEPERF SECT DIAG FGN 22 46*G ...#MAC CMEPERF 46T6 ...[ THIS MACRO IS THE SAME AS IDLEPERF BUT GIVES EXTRA 47#Q ...[DATA FOR CME. IT ISSUES IDLEPERF. 47SB ...#STR %A,ON 48#2 ...( 48RL ...#STR OFF,%A 49?= ...#EXI 49QW ...#UNS CME01 4==G ...( 4=Q6 ...#MEN PERFCHAP 4?9Q ...#TRA APC9 4?PB ... BRN APC10 4#92 ...#END 4#NL ...#ALT CME01=0 4#YD ...#STR NOIDE,%B 4*8= ...#EXI 4*D4 ... I… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CNSOURCE https://www.george3.co.uk/george/macro/cnsource?rev=1705492539&do=diff CNSOURCE (GIN Macro) Defined in: MACS PW Used in: CONNECTA867, DSCNCT867 3F*3 [??? CNSOURCE SECT COMM FGN 9 DOC 3F*8 # 3F*D #MAC CNSOURCE 3F*N LDX %A ACTNUM(%A) 3F*Y #SKI JSKI27 3FB8 MOPASAT %B 3FBD LDX 2 FX2 3FBN LDCH %B JSOURCE1(2) 3FBY SBN %B 10 3FC8 BZE %B MCN1 [J IF UX 3FCD BCT %B MCN2 [J IF NOT MPX 3FCN MCN1 MOPWAIT 3FCY M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COBJUNUSE https://www.george3.co.uk/george/macro/cobjunuse?rev=1705492539&do=diff COBJUNUSE (GIN Macro) Defined in: COREMACROS Used in: CHARGESC867, COREALL865, COREALLF867, FIXED867, JAMSWAP865, PERFCHAP866, PERFPASS864, PLUGIN867, STRATEGY865, UNJAMMER866 HYHW ...#MAC COBJUNUSE H^3G ...[ H^H6 ...[ MACRO TO CALCULATE TOTAL FREE PROGRAM CORE/PAGES J22Q ...[ %A - ACCUMULATOR IN WHICH TO STORE RESULT J2GB ...[ - IF ABSENT X0 IS USED J322 ...#STR %A J3FL ...#SKI J3^= ... COBJUNUSE 0 [USE X0 J4DW ...#STR %A J4YG ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COBJUSE https://www.george3.co.uk/george/macro/cobjuse?rev=1705492539&do=diff COBJUSE (GIN Macro) Defined in: COREMACROS Used in: CHARGESC867, CORE867, COREALLF867, CORESHED861, FIXED867, GIVE867, LLSMESS867, PERFCHAP866, PERFPASS864, PLUGIN867, SCHEDOUT865, SETPC867, STRATEGY865, SWAP865, UNJAMMER866 HWGH ...[??? COBJUSE SECT CENT FGN 32 DOC HWGL ...#MAC COBJUSE HWGM ...[ HWGN ...[ MACRO TO CALCULATE CORE IN USE FOR PROGRAMS. HWGQ ...[ %A - ACCUMULATOR IN WHICH TO STORE RESULT. HWGS ...[ - IF ABSENT X0 IS USED HWGW ...[ HWGY ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COBJUSRT https://www.george3.co.uk/george/macro/cobjusrt?rev=1705492539&do=diff COBJUSRT (GIN Macro) Defined in: COREMACROS Used in: CORESHED861, FIXED867, PLUGIN867, PMFSADDA866, SETPC867, UNPLUG867 HWJ2 ...[??? COBJUSRT SECT CENT FGN 32 DOC HWJ5 ...#MAC COBJUSRT HWJ6 ...[ HWJ8 ...[ MACRO TO CALCULATE CORE IN USE FOR REALTIME PROGRAMS. HWJ= ...[ %A - ACCUMULATOR IN WHICH TO STORE RESULT. HWJ# ...[ - IF ABSENT X0 IS USED HWJB ...[ HWJD ...#STR %A HWJG ...#SKI HWJJ ... COBJUSRT 0 [USE X0 HWJL ...#STR %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMBRKIN https://www.george3.co.uk/george/macro/combrkin?rev=1705492539&do=diff COMBRKIN (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDON867, ACCESS867, ALASB867, ALLOCATE867, ALLOW84, ALTINST60, ASSIGN860, ASSOC867, ATTRIBUT867, BQUERY84, BUDGET84, CANCRVX864, CHINERR867, COMHOOK867, CONCEPT85, CONNECT867, COPYA867, CORE867, CREATE867, DEAD867, DELCON867, DRUM852, DSCNCT867, EDIT867, EDITORA865, FAIL5, FILESECU83, FREEZE864, GET6, GETON867, HARDIDF867, IFEXPAN867, IFXCODES864, INCOBS867, INCOM864, INCWAIT860, INITJOB867, INSTPARA867, JDTWO864, JDWRITE867, JOBDATA86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMERR https://www.george3.co.uk/george/macro/comerr?rev=1705492539&do=diff COMERR (GIN Macro) Defined in: MACRO COMPRO Used in: ALLOW84, ALTINST60, ANSCOM865, ASSOC867, ATTACHA8, BQUERY84, BUDGET84, CANCOM863, CANTDO867, CHINERR867, COMPRO867, CONCEPT85, CREATE867, DISPCOM867, DOC867, DOMONOP867, DOXCODE867, DUMP860, EDIT867, ENTRUST, EXPRESS864, FREEZE864, GET6, GETON867, GETONA867, GLOBALS867, IFEXPAN867, INPUTMOP82, INSTPARA867, IPCOPENB83, LABEL866, LIBCOM867, LINECTRL864, LISTFILE867, LISTNEXT867, LISTRING864, LOGOUT867, MACDEF8, MAKEVCC867, MODE866, MODEA65, N… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMERRX https://www.george3.co.uk/george/macro/comerrx?rev=1705492539&do=diff COMERRX (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDON867, ABANDONA867, ACCESS867, ALASB867, ALLOCATE867, ALLOW84, ASSIGN860, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BQUERY84, BUDGET84, CANCOM863, CHINERR867, CMEMILL866, CONCEPT85, CONTINUE867, CORE867, DATECON37, DELCON867, DRUM852, DUMMYB867, DUMP860, ENGAGE867, EXPRESS864, FILESECU83, FINISH867, FINISHB867, GOTO867, HARDIDF867, IDFSEG867, INCOM864, INPUTJDF82, INSTPARA867, IPBJOURN867, IPCOPENB83, JDWRITE867, JOBDATA867, JOBDATAB867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMP https://www.george3.co.uk/george/macro/comp?rev=1705492539&do=diff COMP (GIN Macro) Defined in: MACROS DTP Used in: BD9Q ...[??? COMP SECT DIAG FGN 571 DOC BD9Y ...#MAC COMP [M. DRUKKER BD=6 ...[ BD=# ...[ BD=G ...[ ********** BD=N ...[ * COMP * BD=W ...[ ********** BD?4 ...[ BD?= ...[ BD?D ...#ALT K0%B=%E+0 [SET THE SEGMENT LISTING LEVEL BD?L ...#STR *,%A BD?S ...#SKI BD#2 ...( BD#8 ...#SKI ADTP [IF THIS IS AN INTERNAL RESTORE BD#B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMPACT https://www.george3.co.uk/george/macro/compact?rev=1705492539&do=diff COMPACT (GIN Macro) Defined in: MACRO COMPRO Used in: LISTFILE867, LISTPARS867 53WS ...[??? COMPACT SECT CENT FGN 21 DOC 546L # 54L= #MAC COMPACT 555W ... DOWN PARAMB,1 55KG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMPERROR https://www.george3.co.uk/george/macro/comperror?rev=1705492539&do=diff COMPERROR (GIN Macro) Defined in: MACROS VB Used in: 6FRJ ...[??? COMPERRO SECT CENT FGN 7 DOC 6G3B # 6GH2 # 6H2L # MACRO TO REPORT ON COMPILATION ERRORS 6HG= # AND HALT FOR CHECKING IF NECESSARY 6H^W #MAC COMPERROR 6JFG #STR %A 6J^6 ( 6KDQ #DEF 20?=1? 6KYB #STR %B 6LD2 #LIS %B 6LXL #STR %B 6MC= #STR 6MWW #LIS 0 6NBG #INT 6NW6 #ORD 6P*Q XERR +33? 6PTB XDISP 16HERRORS SO FAR : 6Q*2 #SKI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMPILE https://www.george3.co.uk/george/macro/compile?rev=1705492539&do=diff COMPILE (GIN Macro) Defined in: MACROS DTP Used in: BD68 ...[??? COMPILE SECT DIAG FGN 552 DOC BD6B ...#MAC COMPILE [M.C.D. MANN BD6J ...[ BD6Q ...[ BD6Y ...[ ************* BD76 ...[ * COMPILE * BD7# ...[ ************* BD7G ...[ BD7N ...[ BD7W ...#STR :,%A BD84 ...( BD8= ...#STR *,%A BD8D ...( BD8L ... COMP ,%A,%B,%C,%D,%E BD8S ...#EXI BD92 ...) BD98 ...) BD9B ... COMP %A,%B,%C,%D,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMPQU https://www.george3.co.uk/george/macro/compqu?rev=1705492539&do=diff COMPQU (GIN Macro) Defined in: MACROS RMD10 Used in: CPOBJ6, CROBJ6, FHOBJ860, FHOBJBL860, LPOBJ6, LPTWO7, SIMULPTR60, TPOBJ867, TROBJ867 #8WY ...[??? COMPQU SECT FILE FGN 16 DOC #=62 #MAC COMPQU #=KL TOPFCA 0 #?5= SMO 0 #?JW LDX 0 FGENERAL1 ##4G SLL 0 8 ##J6 BPZ 0 %A #*3Q DOWN COMPCHAN,1 #*HB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMPROLINK https://www.george3.co.uk/george/macro/comprolink?rev=1705492539&do=diff COMPROLINK (GIN Macro) Defined in: MACRO COMPRO Used in: CORESHED861, PLUGIN867, PROCONTX867, SWAP865 #L4S ...[??? COMPROLI SECT CENT FGN 21 DOC #L#L #MAC COMPROLINK [LINK PAIR #LS= PAIR COMPRO,5 #M?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COMREADY https://www.george3.co.uk/george/macro/comready?rev=1705492539&do=diff COMREADY (GIN Macro) Defined in: MACS MISW Used in: COMPRO867, SETPRAMA867 5X22 #MAC COMREADY [ COMMAND ISSUER READY MACRO 5XFL MHUNTW 1,AMXOR,CILCB 5X^= BNG 1 M10 [ JUMP IF NO CILCB 5YDW LDCT 0 #40 5YYG ORS 0 CIREADY(1) [ SET BIT IN CILCB 5^D6 BRN MACI [MISS TRUEDORM & FREEBUFF 5^XQ M10 READY %A,COMR 62CB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONCISBY https://www.george3.co.uk/george/macro/concisby?rev=1705492539&do=diff CONCISBY (GIN Macro) Defined in: MACS MISW Used in: CDCIPB864, JAMSWAP865, UNPLUG867 65*6 #MAC CONCISBY 65SQ SMO IPBRING(%A) 66#B LDX 0 ICA-IPBRING 66S2 BNG 0 %B 67?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONCONS https://www.george3.co.uk/george/macro/concons?rev=1705492539&do=diff CONCONS (GIN Macro) Defined in: MACS PW Used in: CONSROOT867 3FRD [??? CONCONS SECT COMM FGN 9 DOC 3FRN # 3FRY # 3FT= #MAC CONCONS 3G#W GEOERR 1,SEC CONS 3GSG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONCURR https://www.george3.co.uk/george/macro/concurr?rev=1705492539&do=diff CONCURR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: SW*= ...# SWSW ...# SX#G ...[??? CONCURR SECT CENT FGN 1 DOC SXS6 ...#MAC CONCURR SY?Q ...#STR OFF,%A SYRB ...( S^?2 ...#UNS ICTON S^QL ...( T2== ...#MEN COOR T2PW ...#TRA CURFIXASF1 T39G ... LDX 0 FBIDMEM T3P6 ... BPZ 0 CURFIXASF2 T48Q ...#TRA CURFIXASF T4NB ... LDX 0 2 T582 ...#END T5ML ...) T67= ...#MEN CHCH T6LW ...#TRA CURFIX1 T76G ... BRN CURFI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONFURWB https://www.george3.co.uk/george/macro/confurwb?rev=1705492539&do=diff CONFURWB (GIN Macro) Defined in: MACROS RMD10 Used in: CLOSEDIR867 =GDQ ...[??? CONFURWB SECT FILE FGN 16 DOC =HD2 ...#MAC CONFURWB =HXL ...#STR %B =JC= ... ACCSTO %B,ACOMMUNE4,FX2 =JWW ...#STR %A =KBG ... CHAIN %A,FX2 =KW6 ...#STR %B =L*Q ... DOWN EDOBJ,21 =LTB ...#STR %B =M*2 ...#SKI =MSL ... DOWN EDOBJ,22 =N#= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONIN https://www.george3.co.uk/george/macro/conin?rev=1705492539&do=diff CONIN (GIN Macro) Defined in: MACS SPC Used in: IPBSTART867, SETIDF867 3Q6W #MAC CONIN 3QLG #STR %A 3R66 LDX 0 %A 3RKQ #STR %A 3S5B #SKI 3SK2 LDN 0 0 3T4L SMO FX2 3TJ= STO 0 ACOMMUNE9 3W3W DOWN EMSENG,2 3WHG #STR %A 3X36 ( 3XGQ LDX 0 ACOMMUNE9(2) 3Y2B BNZ 0 %A 3YG2 ) 3Y^L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONMOPOFF https://www.george3.co.uk/george/macro/conmopoff?rev=1705492539&do=diff CONMOPOFF (GIN Macro) Defined in: MACS JIB Used in: MOPCOM867 3XHR ...[ MOP OFF PROCEDURE FOR IDENT CONTROLLED BY IPBCCA ACT 3XJ6 ...#MAC CONMOPOFF 3XJF ... LDX 1 %A 3XJS ... ADX 1 BSTART(1) [TOP OF CONDCB 3XK7 ... LDX 2 1 3XKG ... HUNTACT AMOP,1 [IPBCCA 3XKT ... LDX 0 CONREL(1) 3XL8 ... ERX 0 CACT 3XLH ... ANDX 0 CACT 3XLW ... BZE 0 MCONMREL [J IF CONCEP BEING RELEASED… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONOWNAME https://www.george3.co.uk/george/macro/conowname?rev=1705492539&do=diff CONOWNAME (GIN Macro) Defined in: MACS JIB Used in: ATTACHC867 3XQJ ...[??? CONOWNAM SECT COMM FGN 25 DOC 3Y2B #MAC CONOWNAME 3YG2 DOWN XATTACH,21 3Y^L BRN %A 3^F= BRN %B 3^YW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSERNO https://www.george3.co.uk/george/macro/conserno?rev=1705492539&do=diff CONSERNO (GIN Macro) Defined in: MACROS RME10 Used in: CHTAB, DEAD867, DEADA867, DTSUBS867, DTSUBSA867, DTSUBSS867, FSERR867, GET6, INCTAPES867, INKS, LIBLOADB867, LIBQUERY, LIBREQ866, LIBSEC867, LISTDIR867, RETURNIT867, SETPF867, UNLOAD7, WHATPERA867, WHATPERB867, WHATRVSA867, XENON 26BL ...[??? CONSERNO SECT FILE FGN 4 DOC 26W= ...#MAC CONSERNO 27*W ...#STR %A,0 27TG ... LDX 0 %A 28*6 ... LDX 2 FX2 28SQ ... STO 0 ACOMMUNE1(2) 29#B ...#STR %B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSOLE https://www.george3.co.uk/george/macro/console?rev=1705492539&do=diff CONSOLE (GIN Macro) Defined in: MACS PW Used in: CHTAB, INKS, MESSAB, MESSAC, MESSBB, MESSBD, MESSBF, MESSBG, MESSBI, MESSBJ, MESSC, MESSCA, MESSCD, MESSCG, MESSCH, MESSDJ, MONFILEA864, PMBDTS863, READOPLN867, WTSTAT867 3H4# [??? CONSOLE SECT COMM FGN 9 DOC 3H#6 # 3HRQ # 3J?B # 3JR2 # DISTRIBUTE CONSOLE MESSA7ES 3K=L # 3KQ= #MAC CONSOLE 3L9W LDX 0 %B 3LPG ANDN 0 4 3M96 BZE 0 MLAB1 [BR IF NO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSOUT https://www.george3.co.uk/george/macro/consout?rev=1705492539&do=diff CONSOUT (GIN Macro) Defined in: MACS SPC Used in: CONSOLE867, CONSROOT867, IDFPROP867, OPERIN867, SHOWCOMM864 44WL #MAC CONSOUT 45B= #STR %A, 45TW #SKI 46*G ( 46T6 HUNT 1,CONBUFF, 47#Q CONSOUT 1 47SB ) 48#2 #STR %A, 48RL ( 49?= CHAIN %A,BCONSOUT+1 49QW FON #50 4==G ) 4=Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSPFIX https://www.george3.co.uk/george/macro/conspfix?rev=1705492539&do=diff CONSPFIX (GIN Macro) Defined in: MACROS SHFSB Used in: 7DRQ [??? CONSPFIX SECT FILE FGN 1 DOC 7F?B #MAC CONSPFIX 7FR2 FSHSKIP 7G=L ( 7GQ= ! THIS IS THE WRONG ENVIRONMENT 7H9W #EXI 7HPG ) [FSHSKIP 7J96 FSHSKIP B [TEMPORARILY MUST NOT COMPILE IN M/C B 7JNQ ( 7K8B #STR %A%B 7KN2 #SKI 7L7L ( 7LM= ! PARAMETER 1 ORR 2 MUST BE SET 7M6W #EXI 7MLG ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSTIME https://www.george3.co.uk/george/macro/constime?rev=1705492539&do=diff CONSTIME (GIN Macro) Defined in: MACS SPC Used in: CONSROOT867 4BM6 #MAC CONSTIME 4C6Q DOWN CONSOLE,2 4CLB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONSWIDTH https://www.george3.co.uk/george/macro/conswidth?rev=1705492539&do=diff CONSWIDTH (GIN Macro) Defined in: MACS SPC Used in: 4HHB #MAC CONSWIDTH [%A= MAX LINE LENGTH (CH).DEFAULT= 72 4J32 #MEND CONSOLE 4JGL #TRA K50CONSOLE 4K2= +%A>40<511 4KFW #END 4K^G #UNSET JWSNARROW 4LF6 ( 4LYQ #SKI +%A<70$70 4MDB WSNARROW OPERATOR 4MY2 ) 4NCL #UNSET JWLNARROW 4NX= ( 4PBW #SKI +%A<70$70 4PWG WLNARROW OPERATOR 4QB6 ) 4QTQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONVERT https://www.george3.co.uk/george/macro/convert?rev=1705492539&do=diff CONVERT (GIN Macro) Defined in: MACROS EWDAS Used in: ERASEX866, FLAW866, FLAWMAP866, KARTCONT867, TRANSFER70 GKPL # GL9= # GLNW # ********************************************************************** GM8G # * GMN6 # * ADDRESS CONVERSION GN7Q # * GNMB # * CON… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CONVERTX https://www.george3.co.uk/george/macro/convertx?rev=1705492539&do=diff CONVERTX (GIN Macro) Defined in: MACROS EWDAS Used in: PATCH, PERION867, SPERION867 H3C6 # H3WQ [??? CONVERTX H4BB # ******** H4W2 #MAC CONVERTX H5*L # H5T= LDX 0 %B H6#W LDX 1 %A H6SG LDX 2 %C H7#6 ANDN 2 #77 H7RQ STO 2 BSL1 H8?B CALL 2 (BSP3) H8R2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR1 https://www.george3.co.uk/george/macro/coor1?rev=1705492539&do=diff COOR1 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BMCNTRL866, BSQ867, BSTS867, CAFSCTRL866, CIOUT8, CLOSEND867, CLOSEONE867, CONSET864, CONSOLE867, COREALLF867, DRUM852, DTSTART867, EMSENG864, FHLIST867, HLSREAD867, INCMON865, INLOOP84, INRESTAR84, IPBCCB867, IPBCONS867, IPBERROR867, IPBIN867, IPBINB867, IPBJOURN867, IPBLISTB867, IPBLISTC867, IPBLISTD867, IPBLISTE867, IPBLOG866, IPBMOP867, IPBMOPB867, IPBOUT867, IPBSCAN867, IPBSTARB867, IPBSTART867, IPCEN8, IPCOND864, IPCONE865, IPCOPENB83,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR1X https://www.george3.co.uk/george/macro/coor1x?rev=1705492539&do=diff COOR1X (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CONMXC8, COOR865, EVENTFN, FHLIST867, INMOP867, LISTOPEN867, LOADERII867, MONRESUM850, PLUGIN867, RUNPROG840, SENTINEL8, SETUP867, SUICIDE864, SWAP865 69FY ...[??? COOR1X SECT CENT FGN 32 DOC 6=P2 #MAC COOR1X [ FOR INVARIACTS, SAME AS COOR1 6?8L #SKI %A 6?N= FON %A [WITHOUT DUMPING 6#7W CALL 0 (COOR1X) 6#MG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR1Y https://www.george3.co.uk/george/macro/coor1y?rev=1705492539&do=diff COOR1Y (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHARGESC867, CIMOP867, CIOUT8, NETOFLNE867, SCAN865 6#X# ...[??? COOR1Y SECT CENT FGN 32 DOC 6*LQ #MAC COOR1Y [SAME AS COOR1 WITHOUT ACCUM. DUMPING 6B6B #SKI %A 6BL2 FON %A 6C5L CALL 0 (COOR1Y) 6CK= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR2 https://www.george3.co.uk/george/macro/coor2?rev=1705492539&do=diff COOR2 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ATTACHB866, ATTACHC867, BACKROOM865, BSBLFAIL867, BSTS867, CARTCONT867, CHARGESC867, COREALLF867, COREALLJ865, DETACH867, EDITOR867, IPQUAKE83, LPTWO7, PARIDF8, RITEFAIL864, SETUP867, TRANFAIL866 6GQS ...[??? COOR2 SECT CENT FGN 32 DOC 6HG= #MAC COOR2 [ ENTRY AT END OF TIME QUOTA. 6H^W #SKI %A 6JFG FON %A 6J^6 ... ENVOKE (COOR2),%B 6KDQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR2P https://www.george3.co.uk/george/macro/coor2p?rev=1705492539&do=diff COOR2P (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BACKROOM865, BSTS867, GETNO865 5LSQ ...[??? COOR2P SECT CENT FGN DOC 5LT4 ...#MAC COOR2P 5LTB ... LDX 2 FX2 5LTN ... LDCH 0 ACRIT(2) 5LW2 ... SLL 0 12 5LW# ... ORS 0 ACRIT(2) 5LWL ... LDN 0 3 5LWY ... DCH 0 ACRIT(2) 5LX= ... COOR2 %A,%B 5LXJ ... LDX 0 ACRIT(2) 5LXW ... ANDX 0 HALFTOP 5LY8 ... ERS 0 ACRIT(2) 5LYG ... SLL 0 6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR3 https://www.george3.co.uk/george/macro/coor3?rev=1705492539&do=diff COOR3 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: APPEND864, ATTACHB866, ATTACHC867, BACKMAP864, BACKROOM865, BCAST867, BMAPTWO860, BMJLIST864, BMQUEST866, BSBLFAIL867, BSTS867, BSUNJAM867, CAFSPERI867, CARTCONT867, CDCIPB864, CLOSBAC867, CLOSEAB863, CLOSEDIR867, CLOSEND867, COMPROB867, CONMXA85, CONMXC8, CONNECT867, CONSET864, CONSOLE867, COREALL865, COREALLF867, CORESHED861, DETACH867, DEWELL867, DOXCODE867, DUMMYA867, DUMMYB867, EMSENG864, ENGAGE867, EXTEND866, FINISH867, FINISHB867, FRE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR3X https://www.george3.co.uk/george/macro/coor3x?rev=1705492539&do=diff COOR3X (GIN Macro) Defined in: CHCHCOORMAC2 Used in: COREALL865 GX?6 ...[??? COOR3X SECT CENT FGN 32 DOC GXB6 ...#MAC COOR3X GXF6 ...#SKI #62$%A GXJ6 ... LDN 1 %A GXM6 ...#SKI #62$%A GXQ6 ...#SKI GXT6 ...( GXY6 ... SMO FX2 GY36 ... STOZ CLONG3 GY66 ... LDN 1 #4000+%A GY96 ...) GY#6 ... CALL 0 (COOR3X) GYC6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR3Y https://www.george3.co.uk/george/macro/coor3y?rev=1705492539&do=diff COOR3Y (GIN Macro) Defined in: CHCHCOORMAC2 Used in: SETUP867 GYG6 ...[??? COOR3Y SECT CENT FGN 32 DOC GYK6 ...#MAC COOR3Y GYN6 ...#SKI #62$%A GYR6 ... LDN 1 %A GYW6 ...#SKI #62$%A GY^6 ...#SKI G^46 ...( G^76 ... SMO FX2 G^=6 ... STOZ CLONG3 G^*6 ... LDN 1 #4000+%A G^D6 ...) G^H6 ... CALL 0 (COOR3Y) G^L6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR4 https://www.george3.co.uk/george/macro/coor4?rev=1705492539&do=diff COOR4 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, APPEND864, COMMFILE82, COREALLH860, IPBERROR867, IPBMOPC867, IPCPERI83, IPQUAKER865, LISTNEXT867, MOPCOM867, MOPCOMB865, ONLINCL864, OPER864, PERFPASS864, REGEN865, RENGAGE851, SJOPEN863, TWINSETB866 G^P6 ...[??? COOR4 SECT CENT FGN 32 DOC G^S6 ...#MAC COOR4 G^X6 ... SMO FX2 H226 ... STOZ CLONG3 H256 ... LDN 1 #4000+%A H286 ... ENVOKE (COOR3),%B H2?6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR4X https://www.george3.co.uk/george/macro/coor4x?rev=1705492539&do=diff COOR4X (GIN Macro) Defined in: CHCHCOORMAC2 Used in: H2B6 ...[??? COOR4X SECT CENT FGN 32 DOC H2F6 ...#MAC COOR4X H2J6 ... SMO FX2 H2M6 ... STOZ CLONG3 H2Q6 ... LDN 1 #4000+%A H2T6 ... CALL 0 (COOR3X) H2Y6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COOR4Y https://www.george3.co.uk/george/macro/coor4y?rev=1705492539&do=diff COOR4Y (GIN Macro) Defined in: CHCHCOORMAC2 Used in: H336 ...[??? COOR4Y SECT CENT FGN 32 DOC H366 ...#MAC COOR4Y H396 ... SMO FX2 H3#6 ... STOZ CLONG3 H3C6 ... LDN 1 #4000+%A H3G6 ... CALL 0 (COOR3Y) H3K6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COORDINATE https://www.george3.co.uk/george/macro/coordinate?rev=1705492539&do=diff COORDINATE (GIN Macro) Defined in: COMMPRIVMACS Used in: MOPPM84 2CMG #MAC COORDINATE [THIS MACRO IS USED IN SEGMENT MOPPM 2D76 #STR %A 2DLQ ( 2F6B LDN 0 %A 2FL2 BRN XCOOR 2G5L ) 2GK= #STR %A 2H4W #SKI 2HJG CALL 0 XCOOR 2J46 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COPYCOMM https://www.george3.co.uk/george/macro/copycomm?rev=1705492539&do=diff COPYCOMM (GIN Macro) Defined in: OPEN-MACROS Used in: =BJ2 ...[??? COPYCOMM SECT FILE =BJ= ...#MAC COPYCOMM =BJG ...[ THIS IS A RESTORE-TIME MACRO TO ALLOW THE USE OF COMMUNE =BJQ ...[ AND GDR QUALIFIERS TO THE 2ND PARAMETER OF THE COPY COMMAND. =BK2 ...[ =BK= ...#STR ON,%A =BKG ...#SKI =BKQ ...( =BL2 ...#MEN COPYA =BL= ...#TRA K55COPYA =BLG ... NULL =BLQ ...#END =BM2 ...#MEN COPYB =BM= ...#TRA K55COPYB =BMG ... NULL =BMQ ...#END =BN2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COPYFILE https://www.george3.co.uk/george/macro/copyfile?rev=1705492539&do=diff COPYFILE (GIN Macro) Defined in: CLOSE-MACROS Used in: ALLOCATE867, CHTAB, DTREST860, INKS 9=M# ...[??? COPYFILE SECT FILE FGN 11 DOC 9=X6 #MAC COPYFILE 9?BQ LDX 0 %A 9?WB SMO FX2 9#B2 STO 0 EXEC2 9*SW DOWN COPYFILE,1 9C?Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COREFREEZE https://www.george3.co.uk/george/macro/corefreeze?rev=1705492539&do=diff COREFREEZE (GIN Macro) Defined in: COREMACROS Used in: COREALLF867 GYX6 ...[??? COREFREE SECT CENT FGN 32 DOC HG5B ...[ THE NEXT TWO MACROS ARE PRIVATE TO THE CORE ALLOCATION SYSTEM & HG5Q ...[ MAY ONLY BE CALLED IN COREALLF SEGMENT HG66 ...[ HG6G ...#MAC COREFREEZE HG6W ...#STR 6,%A HG7= ... LDX 6 %A [START OF FREEZE HG7L ...#STR 7,%B HG82 ... LDX 7 %B [LENGTH OF FREEZE HG8B ... CALL 0 RCORFREZ HG8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COREFREX https://www.george3.co.uk/george/macro/corefrex?rev=1705492539&do=diff COREFREX (GIN Macro) Defined in: COREMACROS Used in: HG#C ...[??? COREFREX SECT CENT FGN 32 DOC HG#G ...[ HG#H ...#MAC COREFREX HG#W ...#STR 6,%A HG*= ... LDX 6 %A [START OF FREEZE HG*L ...#STR 7,%B HGB2 ... LDX 7 %B [LENGTH OF FREEZE HGBB ... CALL 0 RCORFREZ HGBQ ... BRN %C [FAILURE EXIT HGC6 ...#STR %D HGCG ... LDX 0 %D [LOAD ABORT S/R NO FROM %D HGC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COREMOVE https://www.george3.co.uk/george/macro/coremove?rev=1705492539&do=diff COREMOVE (GIN Macro) Defined in: COREMACROS Used in: 229S ...[??? COREMOVE SECT CENT FGN 32 DOC 22FL ...[ DEK BEASLEY : CENT 23YG [ 24D6 [ RESTORE TIME MACRO TO ADJUST THE AMOUNT OF CORE THAT THE CORE 24XQ [ ALLOCATION SYSTEM IS PREPARED TO MOVE TO AMALGAMATE FREE CORE 25CB #MAC COREMOVE 25X2 #STR %A 26BL #SKI 4*%A-48*%A+23&#40000000<1$1 26W= ( 27*W #CON COREMOVE'S PARAMETER NOT IN RANGE 1-11.… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CORENMOVE https://www.george3.co.uk/george/macro/corenmove?rev=1705492539&do=diff CORENMOVE (GIN Macro) Defined in: ICTMACS Used in: 38JR ...[??? CORENMOVE SECT CENT FGN DOC 38K8 ...#MAC CORENMOVE 38KK ...#MEN COREALL 38L2 ...#TRA CORESET-1 38LC ... SBX 5 GEN4 38LS ... SLL 5 %A 38M9 ...#END 38ML ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COREQUST https://www.george3.co.uk/george/macro/corequst?rev=1705492539&do=diff COREQUST (GIN Macro) Defined in: COREMACROS Used in: COREALLF867, COREALLG82 FK=J ...[??? COREQUST SECT CENT FGN 32 DOC FKGB # FL22 # RE-ENTRY TO FIXED-CORE CORE ALLOCATION ROUTINES. FLFL # PRIVATE TO CORE ALLOCATION CHAPTERS. FL^= # FMDW #MAC COREQUST FMYG BRN (COREQUST%A) FND6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) COREWAKE https://www.george3.co.uk/george/macro/corewake?rev=1705492539&do=diff COREWAKE (GIN Macro) Defined in: MACROS RJDG Used in: COREALLF867, UNJAMMER866 4FJW ...[??? COREWAKE SECT CENT FGN 7 DOC 5656 [ 56JQ # MACRO TO WAKE UP ALL ACTIVITIES WAITING FOR CORE 574B # 57J2 #MAC COREWAKE 57L9 ...#SKI JPSCF 57ND ...( 57QM ... BSOFF FXCHAPIN,MWAKE 57SW ... FON FCXWAIT 57X5 ...MWAKE 57^# ...) 583L FON 1 58H= STOZ CWAIT 592W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CORRUPTB https://www.george3.co.uk/george/macro/corruptb?rev=1705492539&do=diff CORRUPTB (GIN Macro) Defined in: ACCESSMACROS Used in: COPYA867, INCMON865, MTCHECK860 BP9= ...# THIS DEALS WITH FILES IN WHICH CORRUPTION HAS BEEN FOUND BPNW ...#MAC CORRUPTB BQ8G ...#ACC %A BQN6 ...( BR7Q ... LDX 0 %A BRMB ... SMO FX2 BS72 ... STO 0 ACOMMUNE2 BSLL ...) BT6= ...#ACC %A BTKW ...#SKI BW5G ...( BWK6 ... SMO FX2 BX4Q ... STO %A ACOMMUNE2 BXJB ...) BY42 ...#ACC %B BYHL ...( B^3= ... L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CPHOOK https://www.george3.co.uk/george/macro/cphook?rev=1705492539&do=diff CPHOOK (GIN Macro) Defined in: MACROS IH Used in: ALASB867, COMPROA867, TRACE867 2S*Q # 2STB #MAC CPHOOK 2T*2 NGN 0 8 2TSL SLC 0 12 [ #77707777 2W#= MOD ANDS 0 CPBPROGLEV,%A 2WRW LDN 0 7 2X?G SLC 0 12 [ #00070000 2XR6 MODD ANDX 0 EXT+9,%B,FX2 2Y=Q MOD ORS 0 CPBPROGLEV,%A 2YQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CPIFORMR https://www.george3.co.uk/george/macro/cpiformr?rev=1705492539&do=diff CPIFORMR (GIN Macro) Defined in: LLSMACROS Used in: 96F6 ...[??? CPIFORMR SECT CENT FGN 35 96F7 ...#MAC CPIFORMR 96F8 ...[ 96F9 ...[ RESTORE TIME MACRO TO ALLOW THE RE-CALCULATION OF MILL RATINGS 96F= ...[ TO BE BASED UPON A JOBS CPI 96F? ...[ 96F# ...#STR %A 96F* ...#ALT AMRTIME=%A 96FB ...#STR %A 96FC ...#SKI 96FD ...#ALT AMRTIME=5 96FF ...#MEN CHARGESC 96FG ...#TRA K51CHARGESC 96FH ... SMO FX1 96FJ ... LDX 0 K50CHARGESC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CPIFORMS https://www.george3.co.uk/george/macro/cpiforms?rev=1705492539&do=diff CPIFORMS (GIN Macro) Defined in: LLSMACROS Used in: 99D= ...[???? CPIFORMS SECT CENT FGN 99XW ...[MACRO TO MAKE MILL SCHEDULER USE TIMESLOT 9=CG ...#MAC CPIFORMS 9=X6 ...#MEN CHARGESC 9?BQ ...#TRA K53CHARGESC 9?WB ... LDN 0 5 9#B2 ...#TRA K50CHARGESC 9#TL ... JBC (7),3,JBPLUG 9**= ... JBS (7),3,JBREEF 9*SW ... LDX 0 HMSLOT(3) 9B#G ... SBX 0 ATIMES(3) 9BS6 ... BNG 0 (7) 9C?Q ... LDX 2 FX2 9CRB ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CPIFORTIMES https://www.george3.co.uk/george/macro/cpifortimes?rev=1705492539&do=diff CPIFORTIMES (GIN Macro) Defined in: MACROS2JSR Used in: 5=9Y ...[??? CPIFORTI SECT CENT FGN 2 DOC 5=FQ #MAC CPIFORTIMES 5=^B RESON CPIBIT 5?F2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CREATEB https://www.george3.co.uk/george/macro/createb?rev=1705492539&do=diff CREATEB (GIN Macro) Defined in: MACROS RM59B Used in: ASSIGN860, BACKMASS860, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, COMPCHAN84, CONSET864, COPYB867, CREALEX864, CREATE867, DEWELL867, EDIT867, ENWELL867, INRESTAR84, LIBREQC867, LISTDEV866, LISTDIR867, LISTSTAR867, MAKEDIR84, NEWDIR867, NEWINST867, PERFCHAP866, PERFPASS864, PREPREAD867, PRINT70, SAVE864, SAVEJOB865, SCEDIT84, SETIDF867, SJOPEN863, TRAPLIST864, WA864, WHTSTAT867, WLC867 537B ...[??? CREATEB SECT FILE FGN 6 DOC 53M2 #MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CREATEWF https://www.george3.co.uk/george/macro/createwf?rev=1705492539&do=diff CREATEWF (GIN Macro) Defined in: WORK-MACROS Used in: LISTDEV866, LISTSTAR867 22FL ...[??? CREATEWF SECT FILE FGN 4 DOC 2F6B # THIS MACRO , ISSUED FROM A CPAT , SETS UP THE FILE/FCB AND A 2FL2 # FILE/FEXTRA BLOCK FOR A SERIAL WORKFILE AND CHAINS THEM IN THE 2G5L # WORKFILE RING. IT ALSO SETS UP A FILE/FABSNB IN THE CORRECT FORMAT 2GK= # FOR OPENWORK MACRO 2H4W #MAC CREATEWF 2HJG DOWN CREATE,2 2J46 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CRUNCHTIME https://www.george3.co.uk/george/macro/crunchtime?rev=1705492539&do=diff CRUNCHTIME (GIN Macro) Defined in: MACS MISW Used in: 6?N= #MAC CRUNCHTIME [%A = TIME (IN SECS) AFTER WHICH 6#7W #STR %A,0 6#MG ( 6*76 #MEN MOPSTART [UNTERMINATED MPXR AND UPXR TRANSFERS 6*LQ #TRA K50MOPSTART [ARE CRUNCHED WITH A MODE 4 6B6B 60000/K9*%A 6BL2 #END 6C5L #MEN MOPPM 6CK= #TRA K50MOPPM 6D4W 60000/K9*%A 6DJG #END 6F46 ) 6FHQ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSABPM https://www.george3.co.uk/george/macro/cssabpm?rev=1705492539&do=diff CSSABPM (GIN Macro) Defined in: CENTCSSMACS Used in: 4H3W ...[??? CSSABPM SECT CENT FGN 18 DOC 4H3Y ...[ 4H43 ...#MAC CSSABPM 4H46 ...#UNS ABPM 4H49 ...#SKI 4H4# ...( 4H4G ... FCMENDV 4H4K ...ABPM +0 4H4N ... FCENDV 4H4R ...) 4H4W ...#MEN ABANDON 4H4^ ...#TRA K79ABANDON 4H54 ... +ABPM 4H55 ...#END 4H56 ...#MEN ABANDONA 4H57 ...#TRA K80ABANDONA 4H5= ... NULL 4H5* ...#END 4H5D ...#MEN LOGOUT 4H5H ...#TRA K80LOGOUT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSARCHIVE https://www.george3.co.uk/george/macro/cssarchive?rev=1705492539&do=diff CSSARCHIVE (GIN Macro) Defined in: CSSDAB Used in: 3WR# ...[??? CSSARCHI SECT FILE FGN 8 DOC 3X36 #MAC CSSARCHIVE 3XGQ #STR %A,ON 3Y2B #SKI 3YG2 ( 3Y^L #MEND ARCHIVE 3^F= #TRA K1ARCHIVE 3^YW BRN K90ARCHIVE 42DG #TRA K2ARCHIVE 42Y6 BRN K91ARCHIVE 43CQ #END 43XB #EXI 44C2 ) 44WL #STR %A,OFF 45B= #SKI 45TW ( 46*G #MEND ARCHIVE 46T6 #TRA K1ARCHIVE 47#Q BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSBC https://www.george3.co.uk/george/macro/cssbc?rev=1705492539&do=diff CSSBC (GIN Macro) Defined in: CENTCSSMACS Used in: 4Q** ...[??? CSSBC SECT CENT FGN 18 DOC 4QB6 ...#MAC CSSBC 4QTQ ...#MEN BCAST 4R*B ...#TRA K52BCAST 4RT2 ... LDX 0 CONTEXT(2) 4S#L ...#TRA K50BCAST 4SS= ... BRN K51BCAST 4W?6 ...#END 4WQQ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSFILEPASS https://www.george3.co.uk/george/macro/cssfilepass?rev=1705492539&do=diff CSSFILEPASS (GIN Macro) Defined in: CSSDAB Used in: 2GK= ...[??? CSSFILEP SECT FILE FGN 8 DOC 2H4W #MAC CSSFILEPASS 2HJG #STR %A,ON 2J46 ( 2JHQ #STR %A,OFF 2K3B ( 2KH2 ! PARAMETER MUST BE ON OR OFF 2L2L #EXI 2LG= ) 2L^W #MEN USEROPEN 2MFG #TRA K98USEROPEN 2M^6 BRN K97USEROPEN 2NDQ #END 2NYB #MEN VERBCLAS 2PD2 #TRA K80VERBCLAS 2PXL BICE ??,??,2,FILESECU,2 2QC= #END 2QWW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSGIVE6 https://www.george3.co.uk/george/macro/cssgive6?rev=1705492539&do=diff CSSGIVE6 (GIN Macro) Defined in: CENTCSSMACS Used in: 4HCG ...[??? CSSGIVE6 SECT CENT FGN 18 DOC 4HCJ ...# 4HHB ...# 4J32 ...#MAC CSSGIVE6 4JGL ...# 4K2= ...[ SPECIAL MACRO FOR CSS BRA GIVE 6 IS FOR SPECIAL PRIVILEGED 4KFW ...[ READ-ACCESS TO GEORGE CODE 4K^G ...# 4L#Y ...#MEN GIVEA 4LNB ...#TRA K60GIVEA 4M3W ...#DEF MANAGER0 = INSTPARAM 4M72 ...#DEF MANAGER1 = INSTPARAM+1 4M=6 ...#DEF MANAGER2 = INSTPARAM+2 4M*= ...#DEF MANAGER3 = INSTP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSLIMUR https://www.george3.co.uk/george/macro/csslimur?rev=1705492539&do=diff CSSLIMUR (GIN Macro) Defined in: CENTCSSMACS Used in: 4H79 ...[??? CSSLIMUR SECT CENT FGN 18 DOC 4H7= ...[ RESTORE TIME MACRO TO LIMIT URGENCY RANGE 4H7# ...[ THE URGENCY RANGE IS SUPPLIED IN THE WORD SPEC.BY %A 4H7C ...#MAC CSSLIMUR 4H7G ...#STR OFF,%A 4H7K ...( 4H7N ...#UNS JDEW3 4H7R ...#SKI 4H7W ...( 4H7^ ... ADDMESS 4H84 ... MESSMONA 32,JDEW3,,CE 4H87 ... 4HERRO 4H8= ... #62202542 4H8* ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSMAKES https://www.george3.co.uk/george/macro/cssmakes?rev=1705492539&do=diff CSSMAKES (GIN Macro) Defined in: CENTCSSMACS Used in: 22FL [ 22^= ...[ THIS FILE CONTAINS RESTORE TIME MACROS TO TURN ON AND 23DW [ SOMETIMES OFF THE CSS FACILITIES. THOSE RESTRICTED 23YG [ TO CSS USE START "CSS". THE REST ARE FOR GENERAL USE. 24D6 [ 24MY ...[??? CSSMAKES SECT CENT FGN 18 DOC 24XQ #MAC CSSMAKES 25CB #MEN VERBCLAS 25X2 #TRA K81VERBCLAS 26BL BICE MS,MAKESPECIAL,#400002,PNTLAST,6 26W= #END 27*W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSNINCQ https://www.george3.co.uk/george/macro/cssnincq?rev=1705492539&do=diff CSSNINCQ (GIN Macro) Defined in: CSSDAB Used in: 4T?W ...[??? CSSNINCQ SECT FILE FGN 8 DOC 4W?6 ...#MAC CSSNINCQ 4WQQ ...#STR %A,ON 4X=B ...( 4XQ2 ...#STR %A,OFF 4Y9L ...( 4YP= ...! PARAMETER MUST BE ON OR OFF 4^8W ...#EXI 4^NG ...) 5286 ...#MEN INCRV 52MQ ...#TRA K80INCRV 537B ... NULL 53M2 ...#END 546L ...#EXI 54L= ...) 555W ...#MEN INCRV 55KG ...#TRA K80INCRV 5656 ... BRN K81INCRV 56JQ ...#END 574B ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CSSREDUMP https://www.george3.co.uk/george/macro/cssredump?rev=1705492539&do=diff CSSREDUMP (GIN Macro) Defined in: CSSDAB Used in: 22FL ...[??? CSSREDUM SECT FILE FGN 8 DOC 25CB #MAC CSSREDUMP 25X2 #STR %A,ON 26BL ( 26W= #STR %A,OFF 27*W ( 27TG ! PARAM MUST BE ON OR OFF 28*6 #EXI 28SQ ) 29#B #MEN DTREST 29S2 #TRA K98DTREST 2=?L NULL 2=R= #END 2?=W #MEN INCEND 2?QG #TRA K98INCEND 2#=6 BRN K96INCEND 2#PQ #END 2*9B #EXI 2*P2 ) 2B8L #MEN DTREST 2BN=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CTPRINTLN https://www.george3.co.uk/george/macro/ctprintln?rev=1705492539&do=diff CTPRINTLN (GIN Macro) Defined in: MACS IPB Used in: 5=26 [??? CTPRINTLN SECT COMM 5=FQ [ 5=^B [ RESTORE TIME MACRO TO CHANGE NO. OF TRANSFERS TO NO. OF PRINT 5?F2 [ LINES IN LF MESSAGES 80,81, & 82 5?YL [ 5#D= #MAC CTPRINTLN 5#XW #MEN IPBLISTB 5*CG #TRA K53IPBLISTB 5*X6 LDN 0 1 5BBQ SMO FX2 5BWB ADS 0 ALFTRANS 5CB2 #TRA K54IPBLISTB 5CTL NULL 5D*= #END 5DSW #N… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CUBSCHEC https://www.george3.co.uk/george/macro/cubschec?rev=1705492539&do=diff CUBSCHEC (GIN Macro) Defined in: LOBS-MACROS Used in: ALASB867 87Q6 ...[??? CUBSCHEC SECT FILE FGN 5 DOC 889Q ...[ 88PB ...#MAC CUBSCHEC 8992 ...#DEF CUBSCHEC=1 89NL ...#INC CUBSCHEC 8=8= ... SEG CUBSCHEC,,FILE,FILESTORE 8=MW ... SEGENTRY K1CUBSCHEC,X1 8?7G ... SEGENTRY K2CUBSCHEC,X2 8?M6 ...# 8#6Q ...# SUBROUTINE TO UPDATE X4 BY FILE SIZES OF ALL NON-PUBLIC 8#LB ...# FILES(EXCLUDING WORKFILES) OPEN TO THIS ACT.. 8*62 ...# ON ENTRY, X2-> … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CURTAIL https://www.george3.co.uk/george/macro/curtail?rev=1705492539&do=diff CURTAIL (GIN Macro) Defined in: ACCESSMACROS Used in: EDWRITE867, FHOBJIND860, NEWINST867, SCEDITAR84, SCEDITOR84 =6^J ...[??? CURTAIL SECT FILE FGN 19 DOC =79B # THIS RESETS THE APPEND POINTERS OF A FILE TO ITS READ POINTERS, =7P2 # UNLESS POSITIONED AT OR JUST BEFORE E.O.F. IN WHICH CASE THE APPEN =88L # POINTERS ARE UNALTERED. NB - THIS MACRO HAS A LARGE EXPANSION. =8N= #MAC CURTAIL =97W SFSTACK %A,1,2 =9MG BFCBX 2,2 ==… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CXCHANS https://www.george3.co.uk/george/macro/cxchans?rev=1705492539&do=diff CXCHANS (GIN Macro) Defined in: COREMACROS Used in: 8WDN ...[??? CXCHANS SECT CENT FGN 32 DOC 8WNG # 8X86 #MAC CXCHANS [CHECKS CHAINS 8XMQ #STR %A 8Y7B #SKI 8YM2 ( 8^6L LDN 1 0 8^L= LDN 6 CHCX 925W MCX1 LDX 3 CXSTART(1) 92KG ) 9356 #STR %A 93JQ ( 944B CALL 1 MCX2 94J2 MCX3 CXCQ %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S 953L MCX2 LDN 6 MCX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CXCQ https://www.george3.co.uk/george/macro/cxcq?rev=1705492539&do=diff CXCQ (GIN Macro) Defined in: COREMACROS Used in: 9JCS ...[??? CXCQ SECT CENT FGN 32 DOC 9JML # 9K7= #MAC CXCQ [RECURSIVE TABLE BUILDING MACRO USED IN CXCHAN 9KLW #STR %A 9L6G ( 9LL6 LDX 3 CX%A^0 [^0 SO GIN ERROR IF CX%A UNDEFINED 9M5Q CXCQ %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q, 9MKB ) 9N52 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CXEND https://www.george3.co.uk/george/macro/cxend?rev=1705492539&do=diff CXEND (GIN Macro) Defined in: COREMACROS Used in: 8LLN ...[??? CXEND SECT CENT FGN 32 DOC 8LWG # 8MB6 #MAC CXEND 8MTQ #DEF 20?=37?+0? [CURRENT TRANSFER ADDRESS 8N*B #SKI FC50A<1-1 [IF FIRST CXEND, FOLLOWING CODE COMPILES 8NT2 ( 8P#L NULL 8PS= FC50B LDX 2 FX2 8Q?W LDX 0 ACTNUM(2) 8QRG STO 0 AGEDACTY 8R?6 BRN FZCO+1 8RQQ ) 8S=B #SKI FC50A [IF NOT FIRST CXE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CXMEND https://www.george3.co.uk/george/macro/cxmend?rev=1705492539&do=diff CXMEND (GIN Macro) Defined in: COREMACROS Used in: 7MBN ...[??? CXMEND SECT CENT FGN 32 DOC 7MLG # 7N66 # THE FOLLOWING CX MACROS PROVIDE A RESTORE TIME CHECKING FACILITY 7NKQ #MAC CXMEND 7P5B #OPT FC50A=0 7PK2 #SKI FC50A<1-1 [IF FIRST CXMEND,FOLLOWING CODE COMPILES 7Q4L ( 7QJ= #STR DELAY,%A 7R3W #SKI 7RHG ( 7S36 RESOFF CHECK 7SGQ ) 7T2B #MEN CHCH 7TG2 #TRA FZCO 7T^L BRN JFCT … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) CXSIZE https://www.george3.co.uk/george/macro/cxsize?rev=1705492539&do=diff CXSIZE (GIN Macro) Defined in: COREMACROS Used in: 9?F* ...[ MACROS CXSELECT AND NOISY ARE DORMANT UNTILL 9?HY ...[ (IF EVER) NOISY CORE IS RESURECTED. 9?LJ ...[??? CXSELECT SECT CENT FGN 32 DOC 9#4L ...[# 9#GN ...[[ 9#YQ ...[#MAC CXSELECT 9*BS ...[#SKI FNOISE 9*SW ...[( 9B=Y ...[#STR %A 9BP2 ...[ RBS CHTABLE,KTAB+K%A,CXSELECT 9C74 ...[) 9CK6 ...[#NOR 9D38 ...[??? CXSIZE SECT CENT FGN 32 DOC 9D?2 [ 9DQL #MAC CXSIZE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATECON https://www.george3.co.uk/george/macro/datecon?rev=1705492539&do=diff DATECON (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… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATECON2 https://www.george3.co.uk/george/macro/datecon2?rev=1705492539&do=diff DATECON2 (GIN Macro) Defined in: MACROS RJDG Used in: 3G*5 ...[??? DATECON2 SECT CENT FGN DOC 3G*# ...[MACRO TO PUT CURRENT DATE IN %A 3G*H ...#MAC DATECON2 3G*Q ... LDX 0 FDATE 3G*^ ... ACCSTO 0,0,%A 3GB8 ... LDX 0 FDATE+1 3GBC ... ACCSTO 0,1,%A 3GBL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATUMA https://www.george3.co.uk/george/macro/datuma?rev=1705492539&do=diff DATUMA (GIN Macro) Defined in: MACROS JSR Used in: GIVE867, GIVEA867, PNTLAST860, UNPLUG867 2R6N ...[??? DATUMA SECT CENT FGN 9 DOC 2RBG #MAC DATUMA [FINDS DATUM OF A PLUGGED IN OBJ PROG 2RW6 #STR %B 2S*Q LDX 0 %B 2STB #STR %B 2T*2 #SKI 2TSL LDX 0 FX2 2W#= STO 0 %A 2WRW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATUMADD https://www.george3.co.uk/george/macro/datumadd?rev=1705492539&do=diff DATUMADD (GIN Macro) Defined in: MACROSBRBS Used in: BRADDATA867, BRADEMUL867, BSQ867, PATCH, PM, PMDR864, PMDUMPDA85 8K7S ...[??? DATUMADD SECT FILE FGN 14 DOC 8KCL #MAC DATUMADD 8KX= LDX 0 %A 8LBW STO 0 BSL1 8LWG LDX 0 %B 8MB6 STO 0 BSL2 8MTQ LDX 0 %C 8N*B STO 0 BSL3 8NT2 CALL 0 (BSP1) 8P#L #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATUMB https://www.george3.co.uk/george/macro/datumb?rev=1705492539&do=diff DATUMB (GIN Macro) Defined in: MACROS JSR Used in: GIVE867, PROGISH850 2X3N ...[??? DATUMB SECT CENT FGN 9 DOC 2X?G #MAC DATUMB [FINDS DATUM OF AN UNPLUGGED PROG 2XR6 DATUMA %A,%B 2Y=Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATUMBLK https://www.george3.co.uk/george/macro/datumblk?rev=1705492539&do=diff DATUMBLK (GIN Macro) Defined in: MACROSBRBS Used in: BSQ867, PMDR864, PMDUMP85, PMDUMPDA85, READFALE866, RITEFAIL864, TRANFAIL866 8PJD ...[??? DATUMBLK SECT FILE FGN 14 DOC 8PS= #MAC DATUMBLK 8Q?W LDX 0 %A 8QRG STO 0 BSL1 8R?6 LDX 0 %B 8RQQ STO 0 BSL2 8S=B #STR %C 8SQ2 #SKI 8T9L #SKI 8TP= ( 8W8W LDX 0 %C 8WNG STO 0 BSL3 8X86 ) 8XMQ #STR %C 8Y7B #SKI 8YM2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DATUMSMO https://www.george3.co.uk/george/macro/datumsmo?rev=1705492539&do=diff DATUMSMO (GIN Macro) Defined in: MACROS JSR Used in: 22^= # RUTH PORTER, 7OPAW 23DW ...[??? DATUMSMO SECT CENT FGN 9 DOC 2JHQ # 2K3B # THE MACROS ARE FOR ACCESSING SWAPPED IN OBJECT PROGRAMS. 2KH2 # THEY USE FIXED STORE LOCATIONS(IN CBWCORE):JWSP1,JWSP2,JWSP3,JWCON1 2L2L #MAC DATUMSMO [WORKING MACRO 2LG= OPTMOD %A,%B,%C 2L^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DCA https://www.george3.co.uk/george/macro/dca?rev=1705492539&do=diff DCA (GIN Macro) Defined in: MACS SPC Used in: ATTACHC867, BSQ867, BSTS867, CAFSINFO866, CAFSPERI867, CLOSEIPB864, CONMXA85, CONMXC8, CONSET864, CONSOLE867, CONTXCOD60, DETACH867, DOC867, DRUM852, EMSENG864, INCMON865, INLOOP84, INRESTAR84, IPBERROR867, IPBOUT867, IPBPM84, IPBSTARB867, IPBSTART867, IPCON864, IPCONA864, IPCONB8, IPCONC8, IPCONE865, IPCONG8, IPCSTART864, LABEL866, LIBLOAD867, LIBLOADB867, LISTDEV866, LISTEXCP865, LISTHEAD863, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNEXT867, L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEADWOOD https://www.george3.co.uk/george/macro/deadwood?rev=1705492539&do=diff DEADWOOD (GIN Macro) Defined in: DUMP-MACROS Used in: GKL6 ...# RESTORE-TIME MACRO TO CHOOSE 'MANAGER' INSTALLATION PARAMETER. GL5Q ...# %A MUST BE BETWEEN MANAGER0 AND MANAGER7 (IF BLANK, = MANAGER3). GLKB ...# THE CHOSEN I.P. IS SET TO THE MIN NO. OF DAYS OLD A FILE CAN BE BEFO GM52 ...# THE 'DEADWOOD' FEATURE OVERRIDES FORMULA FOR UNJAMMING GMJL ...# GN4= ...#MAC DEADWOOD GNHW ...#STR %A GP3G ...#STR GPH6 ...( GQ2Q ... DEADWOOD MANAGER3 GQGB ...#EXI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DECANTCT https://www.george3.co.uk/george/macro/decantct?rev=1705492539&do=diff DECANTCT (GIN Macro) Defined in: MACS SPC Used in: FLAW866, PUTPER85, RELPER867 53M2 #MAC DECANTCT 546L #STR %C,GEORGE 54L= #SKI 555W MODD SBS %B JK52H,%A,CPPTR(2) 55KG #STR %C,OBJECT 5656 #SKI 56JQ MODD SBS %B JK52I,%A,CPPTR(2) 574B #STR %C,REPEAT 57J2 #SKI 583L MODD SBS %B JK52J,%A,CPPTR(2) 58H= #STR %C,FAIL 592W #SKI 59GG MODD SBS %B JK52K,%A,CPPTR(2) 5=26 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DECF https://www.george3.co.uk/george/macro/decf?rev=1705492539&do=diff DECF (GIN Macro) Defined in: MACROS SJ Used in: OPER864 DKT* ...[ DKXY ...[ DL2J ...[??? DECF SECT FILE FGN 24 DOC DL=B #MAC DECF [P,F DLQ2 LA %B DM9L OP %A,%B,SBS DMP= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DECLINK https://www.george3.co.uk/george/macro/declink?rev=1705492539&do=diff DECLINK (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCGEO8, IPCON864, IPCONC8, IPCOND864, IPCONF865 38S8 ...[??? DECLINK SECT COMM FGN 19 DOC 3942 #MAC DECLINK 39HL DFLOAD %A,LKCT 3=3= SBN 0 1 3=GW DFSET %A,LKCT,0 3?2G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DECOM https://www.george3.co.uk/george/macro/decom?rev=1705492539&do=diff DECOM (GIN Macro) Defined in: MACROS EWDAS Used in: L8FG # L8^6 [??? DECOM L9DQ # ***** L9YB #MAC DECOM L=D2 # L=XL #STR %A L?C= #SKI L?WW !! MUST HAVE ON OR OFF PARAMETER !! L#BG #STR %A L#W6 ( L**Q #MEN TWINSET L*TB #TRA K4TWINSET LB*2 #STR ON,%A LBSL #SKI LC#= +0 LCRW #STR OFF,%A LD?G #SKI LDR6 -1 LF=Q #END LFQB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEDICATE https://www.george3.co.uk/george/macro/dedicate?rev=1705492539&do=diff DEDICATE (GIN Macro) Defined in: MACROS EWDAS Used in: CDUM866 LRGW # LS2G [??? DEDICATE LSG6 # ******** LS^Q #MAC DEDICATE LTFB # LT^2 #MEN CDUM LWDL #TRA ARES LWY= R %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V,%W LXCW #END LXXG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEF7502ID https://www.george3.co.uk/george/macro/def7502id?rev=1705492539&do=diff DEF7502ID (GIN Macro) Defined in: MACS PCT Used in: 366G ...[??? DEF7502ID SECT COMM FGN 13 DOC 366Q ...[ 3672 ...[ DEFINE IDENTIFIER AS 7502 LP 367= ...[ 367G ...#MAC DEF7502ID 367Q ...#STR CLEAR,%A 3682 ...( 368= ...#MEN IDFCONF 368G ...#TRA K90IDFCONF 368Q ...#DEF 20? = 34? + 0? ] + 1 3692 ...#SKI IDF7502IDS - 20? 369= ...#SKI 369G ...( 369Q ...!! TOO MANY IDENTIFIERS DEFINED 36=2 ...#EXI 36== ...) 36=G ... +20? 36=Q ...#TRA K90IDFCONF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEFMODE https://www.george3.co.uk/george/macro/defmode?rev=1705492539&do=diff DEFMODE (GIN Macro) Defined in: MACROS RME10 Used in: 59=N ...[??? DEFMODE SECT FILE FGN 4 DOC 59GG # THIS MACRO ALTERS THE INITIAL MODE SETTING 5=26 # ON MAGNETIC TAPE DECKS 5=FQ #MAC DEFMODE 5=LY ...#STR %A,OFF 5=S6 ...( 5?YL #MEN SETUPA 5#D= ...#TRA K50SETUPA 5#XW LPROP 3,0 5*CG ANDN 0 #200 5*X6 ... BNZ 0 K51SETUPA 5BBQ #STR 800,%B 5BWB #SKI 5CB2 ( 5CF6 ... JNOTMT21S 3,MSP4 5CJ= ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEFPRIV https://www.george3.co.uk/george/macro/defpriv?rev=1705492539&do=diff DEFPRIV (GIN Macro) Defined in: COMPMACMOON Used in: COMPS MACB 2T*2 ...[??? DEFPRIV SECT FILE FGN 9 DOC 2TSL ...#MAC DEFPRIV 2W#= ...#DEF G%B=%A&GPAND^GPOR 2WRW ...#SKI G%B&GPAND>23-23 2X?G ...!ILLEGAL PRIVILEGE 2XR6 ...#SKI G%B&GPAND<4-4 2Y=Q ...!ILLEGAL PRIVILEGE 2YQB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEFSTABLE https://www.george3.co.uk/george/macro/defstable?rev=1705492539&do=diff DEFSTABLE (GIN Macro) Defined in: COMPMACMOON Used in: COMPS MACB 2^=2 ...[??? DEFSTABL SECT FILE FGN 9 DOC 2^PL ...# 329= ...#MAC DEFSTABLE 32NW ...#DEF G%B=%A&GSAND^GSOR 338G ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEFTRANS https://www.george3.co.uk/george/macro/deftrans?rev=1705492539&do=diff DEFTRANS (GIN Macro) Defined in: COMPMACMOON Used in: COMPS MACB 33N6 ...[??? DEFTRANS SECT FILE FGN 9 DOC 347Q ...# 34MB ...#MAC DEFTRANS 3572 ...#DEF G%B=%A&GTAND^GTOR 35LL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELAY https://www.george3.co.uk/george/macro/delay?rev=1705492539&do=diff DELAY (GIN Macro) Defined in: MISCMACS Used in: 2DLQ #MAC DELAY [M.C.D. MANN 2F6B [ 2FL2 [ 2G5L [ *********** 2GK= [ * DELAY * 2H4W [ *********** 2HJG [ 2J46 [ 2JHQ #SKI K6TRACE>11-11 2K3B ( 2KH2 #MEND FIXED 2L2L #TRA BEGINT 2LG= +%A 2L^W #END 2MFG ) 2M^6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELBLKS https://www.george3.co.uk/george/macro/delblks?rev=1705492539&do=diff DELBLKS (GIN Macro) Defined in: MACROS SHFSB Used in: RITEFAIL864 3^F= [??? DELBLKS SECT FILE FGN 1 DOC 3^YW #MAC DELBLKS 42DG #STR ALLOWFAIL,%A 42Y6 #SKI 43CQ NGN 0 1 43XB #STR %A 44C2 #SKI 44WL LDN 0 0 45B= SMO FX2 45TW STO 0 ACOMMUNE4 46*G DOWN FSHBSAL,1 46T6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELETE https://www.george3.co.uk/george/macro/delete?rev=1705492539&do=diff DELETE (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, ARCHIVE867, ARCHIVNW83, BACKMASS860, BMAPTWO860, BMFIXIT864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BSPRUNE867, CHTAB, CLOSEAB863, COMPRESS864, CREALEX864, DEAD867, DEADA867, DELETE864, ERASEA867, FHOBJ860, FHOBJDIR860, FINDOC867, INCCHECK860, INCDTA865, INCEND865, INCOBS867, INCTAPES867, INKS, JOBLIST867, LIBLOAD867, LIBQUERY, LISTFNDA865, LPTWO7, MESSDC, MODE866, NEWINST867, PROPERTY867, RENAMDIR, RENAME864, RENAMEM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELETEWORK https://www.george3.co.uk/george/macro/deletework?rev=1705492539&do=diff DELETEWORK (GIN Macro) Defined in: WORK-MACROS Used in: 2J?Y ...[??? DELETEWO SECT FILE FGN 4 DOC 2JHQ #MAC DELETEWORK 2K3B DOWN WORKFILE,3 2KH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELFCB https://www.george3.co.uk/george/macro/delfcb?rev=1705492539&do=diff DELFCB (GIN Macro) Defined in: RING-MACROS Used in: BACKROOM865, BMINDEX866, CLOSEALT864, CLOSEND867 =M== ...[??? DELFCB SECT FILE FGN 22 DOC =M*W ...#MAC DELFCB =MK6 ...[ MACRO TO FREE AN FCB =MNQ ...[ %A IS POINTER TO FCB %B IS FILE HALF OR WORK =MSB ...[[ =N3L ... LDX 1 %A =N7= ...[ =N=W ...#STR WORK,%B =NBG ...( =NG6 ... LDN 0 1 [ADJUST COUNTS FOR HALF AND FILE =NKQ ...#STR HALF,%B =NPB ...( =NT2 ... LDX 2 BACK2(… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DELWORK https://www.george3.co.uk/george/macro/delwork?rev=1705492539&do=diff DELWORK (GIN Macro) Defined in: WORK-MACROS Used in: CLOSEND867 2KQS ...[??? DELWORK SECT FILE FGN 4 DOC 2L2L #MAC DELWORK 2LG= DOWN WORKFILE,13 2L^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMAND https://www.george3.co.uk/george/macro/demand?rev=1705492539&do=diff DEMAND (GIN Macro) Defined in: MACROS RJH Used in: CHTAB, INCSET865, INKS, IPBERROR867, IPBLISTC867, IPCOND864, LISTLOOP867, MOVCART867, PERFLOGS866, READBULK867, REQCART866, SETDISC866 =CQS ...[??? DEMAND SECT CENT FGN 71 DOC =D2L #MAC DEMAND =DG= LDX 1 FX1 =D^W LDX 2 FX2 =FFG #STR %A =F^6 ( =GDQ LDN 0 %A =GYB STO 0 ACOMMUNE1(2) =HD2 ) =HXL #STR %A =JC= #SKI =JWW STOZ ACOMMUNE1(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMANDQU https://www.george3.co.uk/george/macro/demandqu?rev=1705492539&do=diff DEMANDQU (GIN Macro) Defined in: MACROS VB Used in: 4FSN ...[??? DEMANDQU SECT CENT FGN 7 DOC 4G4G #MAC DEMANDQU 4GJ6 VFREE ADATA,ADEMAND 4GP# ... VFREEW GMON,AOUT 4GWG ... VFREEW GMON,ASET 4H3N ... LDCT 0 #100 4H8W ... ORS 0 CLONG1(2) 4HB4 ... ERS 0 CLONG1(2) 4HHB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMANDX https://www.george3.co.uk/george/macro/demandx?rev=1705492539&do=diff DEMANDX (GIN Macro) Defined in: MACROS RJH Used in: FORMLOOP865, GETFREEB864, IPBLISTA867, IPBLISTC867, IPBLISTD867, IPBSTARB867, QUESCOM867, RENGAGE851, TWINSETB866 ?4?4 ...[??? DEMANDX SECT CENT FGN 71 DOC ?4GW #MAC DEMANDX ?52G LDX 1 FX1 ?5G6 LDX 2 FX2 ?5^Q #STR %A ?6FB ACCSTO %A,ACOMMUNE1(2) ?6^2 #STR %A ?7DL #SKI ?7Y= STOZ ACOMMUNE1(2) ?8CW ACCSTO %B,EXEC1(2) ?8XG LDX 0 M1DEM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMANDY https://www.george3.co.uk/george/macro/demandy?rev=1705492539&do=diff DEMANDY (GIN Macro) Defined in: MACROS RJH Used in: ENGAGE867, IPBLISTC867, RENGAGE851 ?LSS ...[??? DEMANDY SECT CENT FGN 71 DOC ?M4L #MAC DEMANDY ?MJ= LDX 1 FX1 ?N3W LDX 2 FX2 ?NHG #STR %A ?P36 ACCSTO %A,ACOMMUNE1(2) ?PGQ #STR %A ?Q2B #SKI ?QG2 STOZ ACOMMUNE1(2) ?Q^L ACCSTO %B,EXEC1(2) ?RF= ACCSTO %F,EXEC2(2) ?RYW #STR %C ?SDG #SKI ?SY6 ( ?TCQ BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMMESS https://www.george3.co.uk/george/macro/demmess?rev=1705492539&do=diff DEMMESS (GIN Macro) Defined in: MACS SPC Used in: BMQUEST866, BMQUESTB866, BRADSPLT867, RESTOREA866 5=FQ [??? DEMMESS SECT COMM FGN 14 DOC 5=^B # 5?F2 # DEMMESS 5?YL # 5#D= # OUTPUT ON THE CONSOLE A MESSAGE WHICH DEMANDS A REPLY 5#XW # 5*CG #MAC DEMMESS 5*X6 MONOUT %A 5BBQ CONIN 5BWB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DEMMEX https://www.george3.co.uk/george/macro/demmex?rev=1705492539&do=diff DEMMEX (GIN Macro) Defined in: MACS SPC Used in: BMQUEST866 5CB2 [??? DEMMEX SECT COMM FGN 14 DOC 5CTL # 5D*= # DEMMEX 5DSW # 5F#G #MAC DEMMEX 5FS6 MONOUTX %A 5G?Q CONIN 5GRB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DERING https://www.george3.co.uk/george/macro/dering?rev=1705492539&do=diff DERING (GIN Macro) Defined in: COREMACROS Used in: BSQ867, BSTS867, CHANFILE8, COREALLF867, COREALLG82, COREALLJ865, FAILTWIN866, GETNO865, IDFPER867, INTWIN866, PCTSTART867, SETUP867, TWINSETA866, TWINSETB866, TWINSETD866 D6BJ ...[??? DERING SECT CENT FGN 32 DOC D6LB # D762 # DERINGS A SPECIFIED ELEMENT RENDERING IT NULL D7KL # D85= #MAC DERING D8JW #STR %A,1 D94G LDX 1 %A D9J6 CALL 0 (GDERING) D=3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DERINGD https://www.george3.co.uk/george/macro/deringd?rev=1705492539&do=diff DERINGD (GIN Macro) Defined in: COREMACROS Used in: CIMOP867, FAILTWIN866, IDFPER867, IPBOUT867, IPBSTARB867, IPBSTART867, MORNING867, READOPLN867, SAVEJOB865, TPINS861, TWINSETA866, TWINSETB866, TWINSETD866, VIPBPERI864 DNY# ...[??? DERINGD SECT CENT FGN 32 DOC DP86 # DPMQ #MAC DERINGD DQ7B LDN 1 %A DQM2 CALL 0 (GDERING) DR6L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DESUSPEND https://www.george3.co.uk/george/macro/desuspend?rev=1705492539&do=diff DESUSPEND (GIN Macro) Defined in: CHCHCOORMAC2 Used in: IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPCONG8, IPQUAKER865, TWINSET866, TWINSETB866 NBRG ...[??? DESUSPEN SECT CENT FGN 32 DOC NC?6 ...#MAC DESUSPEND NCQQ ... NGNC 0 1 ND=B ... ANDS 0 CHAINADD(2) NDQ2 ... LDX 0 CHAINADD(2) NF9L ... SBN 0 1 NFP= ... BNZ 0 MDESUSPEND NG8W ... FPUT NGNG ...MDESUSPEND NH86 ... LDX 1 FX1 NHMQ ... LDX 2 FX2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DETACH https://www.george3.co.uk/george/macro/detach?rev=1705492539&do=diff DETACH (GIN Macro) Defined in: MACS JIB Used in: ATTACHC867, CHTAB, DETACH867, INKS, IPBSCAN867 428N ...[??? DETACH SECT COMM FGN 25 DOC 42DG [THIS MACRO DETACHES A SINGLE LINE FROM A CONCEPTUAL MULTIPLEXOR 42Y6 #MAC DETACH 43CQ SMO FX2 43XB STO %D ACOMMUNE1 44C2 #STR %C 44WL #SKI 45B= ( 45TW LDX 0 GSIGN 46*G SMO FX2 46T6 STO 0 ACOMMUNE5 47#Q DOWN XATTACH,20 47SB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFCLEAR https://www.george3.co.uk/george/macro/dfclear?rev=1705492539&do=diff DFCLEAR (GIN Macro) Defined in: DFMACROS Used in: DEAD867, INCFIN864, IPCONE865, IPQUAKER865, LIBLOADB867, LIBREQC867, MODE866, OLMTB867, REDONMT867, TAPEWAIT65, UNLOADMT867 4?FJ ...[??? DFCLEAR SECT FILE FGN 3 DOC 4?PB # 4#92 #MAC DFCLEAR 4#NL DFLOCDEF %B 4*8= STO 1 GEN0 4*MW LADDP %A,1 4B7G #SKI MDF3%B<12$12^MDF2%B 4BM6 ( 4C6Q BRN M1 4CLB M0 +0 4D62 #SKI MDF2%B 4DKL #FID 0 MDF2%B-1 #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFDEF https://www.george3.co.uk/george/macro/dfdef?rev=1705492539&do=diff DFDEF (GIN Macro) Defined in: DFMACROS Used in: DFCOMPS 22FL ...[??? DFDEF SECT FILE FGN 3 DOC 23DW # 23YG #MAC DFDEF 24D6 #DEF APLMT%A=%B*#400+%C*#400+%D 24XQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFJUMPN https://www.george3.co.uk/george/macro/dfjumpn?rev=1705492539&do=diff DFJUMPN (GIN Macro) Defined in: DFMACROS Used in: CLOSEIPB864, CLOSEMT867, LIBREQC867, LIBSEC867, OLMTB867, OLMTE85, UNLOAD7, UNLOADMT867, WHATPER867 493D ...[??? DFJUMPN SECT FILE FGN 3 DOC 49?= # 49QW #MAC DFJUMPN 4==G DFLOAD %A,%B,0 4=Q6 BZE 0 %C 4?9Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFJUMPS https://www.george3.co.uk/george/macro/dfjumps?rev=1705492539&do=diff DFJUMPS (GIN Macro) Defined in: DFMACROS Used in: DUMMYB867, ENGAGE867, LABEL866, LIBINSEC864, LIBLOAD867, LIBREQC867, MODE866, MODEA65, OLMTB867, OLMTC85, REDON867, RENAMEMT867, RIGHT867, TAPEWAIT65, UNLOAD7, UNLOADMT867, WHATPER867 46K# ...[??? DFJUMPS SECT FILE FGN 3 DOC 46T6 # 47#Q #MAC DFJUMPS 47SB DFLOAD %A,%B,0 48#2 BNZ 0 %C 48RL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFLOAD https://www.george3.co.uk/george/macro/dfload?rev=1705492539&do=diff DFLOAD (GIN Macro) Defined in: DFMACROS Used in: GET6, GETONA867, HLSREAD867, IPCONE865, LIBLOAD867, LIBLOADB867, LIBMANY867, LIBREQC867, LIBSEC867, MODE866, NETOFLNE867, OLMTA85, OLMTC85, OLMTE85, PERFAIL866, PERFLOGS866, RENAMEMT867, RETURNIT867, RIGHT867, SETPC867, UNLOAD7, UNLOADMT867, WHATPER867 2=3S ...[??? DFLOAD SECT FILE FGN 3 DOC 2=?L # 2=R= #MAC DFLOAD 2?=W #STR %C 2?QG ( 2#=6 DFLOCDEF %B 2#PQ LADDP %A,%C 2*9B #SKI %C-1>2-2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFLOCDEF https://www.george3.co.uk/george/macro/dflocdef?rev=1705492539&do=diff DFLOCDEF (GIN Macro) Defined in: DFMACROS Used in: 257J ...[??? DFLOCDEF SECT FILE FGN 3 DOC 25CB # 25X2 #MAC DFLOCDEF 26BL #DEF MDF1%A=APLMT%A&#77600000/#200000 26W= #DEF MDF2%A=APLMT%A&#177400/#400 27*W #DEF MDF3%A=APLMT%A&#377 27TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFLOCFRE https://www.george3.co.uk/george/macro/dflocfre?rev=1705492539&do=diff DFLOCFRE (GIN Macro) Defined in: DFMACROS Used in: 285# ...[??? DFLOCFRE SECT FILE FGN 3 DOC 28*6 # 28SQ #MAC DFLOCFRE 29#B #FREE MDF1%A,MDF2%A,MDF3%A 29S2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DFSET https://www.george3.co.uk/george/macro/dfset?rev=1705492539&do=diff DFSET (GIN Macro) Defined in: DFMACROS Used in: DTSCAN860, INCSTART865, IPCONE865, IPCSTART864, LIBLOAD867, LIBREQC867, MODE866, MODEA65, NEWPW867, OLMTB867, REDONMT867, RETURNIT867, SETUPA867, TAPEWAIT65, UNLOAD7 2S5Y ...[??? DFSET SECT FILE FGN 3 DOC 2S*Q # 2STB #MAC DFSET 2T*2 DFLOCDEF %B 2TSL #STR %C 2W#= #SKI 2WRW ( 2X?G #SKI 23-MDF3%B^MDF2%B<1$1 2XR6 NGN 0 1 2Y=Q #SKI 23-MDF3%B^MDF2%B 2YQB ( 2^=2 #SKI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DICTJL https://www.george3.co.uk/george/macro/dictjl?rev=1705492539&do=diff DICTJL (GIN Macro) Defined in: MACROS WELL Used in: ALLOW84, BEXTSJ84, BUDGTWO84, FREEZE864, LOGANAL864, NAMEPRIV, PRIVLEG84 55G^ ...[??? DICTJL SECT CENT FGN 72 DOC 55H? ...#MAC DICTJL 55HN ... DOWN DICTWELL,1 55J5 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DICTJOB https://www.george3.co.uk/george/macro/dictjob?rev=1705492539&do=diff DICTJOB (GIN Macro) Defined in: MACROS RM59B Used in: BEXTSJ84, CHTAB, CONNECTA867, ERASE867, HLSEMS864, INITJOB867, INKS, LOGOUT867 38JB ...[??? DICTJOB SECT FILE FGN 6 DOC 3=3= #MAC DICTJOB 3=77 ...[ DICTJOB MACRO KEEPS A COUNT OF JOBS RUNNING IN A USER & DOES OTHER 3=?4 ...[ ENTRY POINTS: 1-JOB,ETC. 2-ENDJOB,ETC. 3-ERASE 3=B^ ...[ DICTJOB 3 IS THE SAME AS JOBQCHEC (WHICH WAS ALREADY IN USE) 3=GW #STR %A,5 3?2G #SKI 3?G6 ( 3?^Q LDX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DICTWELL https://www.george3.co.uk/george/macro/dictwell?rev=1705492539&do=diff DICTWELL (GIN Macro) Defined in: MACROS WELL Used in: ALLOW84, BEXTRA83, BEXTSJ84, BUDGTWO84, CHTAB, FREEZE864, INKS, NAMEPRIV, PRIVLEG84 4S#L ...#MAC DICTWELL 4SS= ... LDN 0 %A 4T?W ... LDX 2 FX2 4TRG ... LDN 1 ACOMMUNE1(2) 4W?6 ... MOVE 0 3 4WQQ ... LDX 0 %C 4X=B ... STO 0 ACOMMUNE4(2) 4XQ2 ...#STR MONEY,%B 4Y9L ...#SKI 4YP= ... DOWN REGEN,2 4^8W ...#STR PRIV,%B 4^NG ...#SKI 5286 ...( 52MQ ...#S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DIRENT https://www.george3.co.uk/george/macro/dirent?rev=1705492539&do=diff DIRENT (GIN Macro) Defined in: MACROS DTP Used in: CHTAB, INKS GG#= [??? DIRENT SECT DIAG FGN 552 DOC GGRW #MAC DIRENT [M.C.D. MANN GH?G [ GHR6 [ GJ=Q [ ************ GJQB [ * DIRENT * GK=2 [ ************ GKPL [ GL9= [ GLNW #STR %A,ON GM8G #SKI GMN6 ( GN7Q #MEN DIRENT GNMB #TRA K90DIRENT GP72 NULL GPLL #END GQ6= #EXI GQKW ) GR5G #STR %A,OF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DISCFAIL https://www.george3.co.uk/george/macro/discfail?rev=1705492539&do=diff DISCFAIL (GIN Macro) Defined in: ACCESSMACROS Used in: D2PB ...#MAC DISCFAIL D392 ...[ D3NL ...[ THERE ARE FRIGS IN THIS RESTORE TIME MACRO TO GENERATE TRANSFER FAILUR D48= ...[ D4MW ...[ IP MANAGER1 CAN BE SET TO THE FOLLOWING: D57G ...[ #1 FAIL ANY TRANSFER D5M6 ...[ #2 ANY AUTONOMOUS TRANSFER D66Q ...[ #4 A SWAP TRANSFER D6LB ...[ #10 ANY DUMPER TRANSFER D762 ...[ #20 TERMINAL FILE TRANSFER DURING DUMPING D7KL ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DISCONNECT https://www.george3.co.uk/george/macro/disconnect?rev=1705492539&do=diff DISCONNECT (GIN Macro) Defined in: MACROS HL Used in: COMPROB867 3CC6 # 3CWQ # THIS MACRO CAUSES A JOB TO ASSUME TRUE LIMBO CONDITION 3DBB # 3DW2 #MAC DISCONNECT 3F*L DOWN LOGOUT,8 3FT= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DISENGPER https://www.george3.co.uk/george/macro/disengper?rev=1705492539&do=diff DISENGPER (GIN Macro) Defined in: MACROS PERI Used in: BSQ867, BSTS867, CARTCONT867, CLOSEIPB864, CONSOLE867, ENGAGE867, FREEPER867, INLOOP84, IPBERROR867, IPBINB867, IPBSTARB867, IPBSTART867, KARTCONT867, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNEXT867, LISTPREP865, LISTTPCP867, LOADERMT867, MOPCOM867, MOVCART867, ONLINEC867, OPCA867, PMDR864, PREPREAD867, SETDISC866, SETUPA867, TIDYREAD850, UNPLUG867 4QTQ #MAC DISENGPER 4R*B #STR %A 4RT2 DIS 0 %A 4S#L #ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DLCA https://www.george3.co.uk/george/macro/dlca?rev=1705492539&do=diff DLCA (GIN Macro) Defined in: MACS SPC Used in: ATTACHC867, CONMXC8, DETACH867, MOPOUT85, MOPPM84, MOPSTART865, MULTIPLX864, PCTCIN8, PCTCON8, PCTCOUT8, PCTCRTR8, PCTLPTP851, PROFLAG83, SCAN865, SENTINEL8 5KP6 #MAC DLCA [C.E.WILKINSON : OPERATES ON LCA 5L8Q %B %C IL%D+JLCA(%A) 5LNB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DO https://www.george3.co.uk/george/macro/do?rev=1705492539&do=diff DO (GIN Macro) Defined in: IFMACS Used in: CONSET864, FORMLOOP865, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTOPEN867, LISTRING864, MESSA, MESSAA, MESSAB, MESSB, MESSCF, MESSCH, MESSDB, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, SHOWCOMM864, WA864, WHATPROP865, WHATRVS867, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLG862, WLOUT865 6R#= [ 6RRW [ 6S?G [??? DO SECT DEVT FGN 1 DOC 6SR6 [ 6T=Q #MAC DO 6TQB [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOCHKDIR https://www.george3.co.uk/george/macro/dochkdir?rev=1705492539&do=diff DOCHKDIR (GIN Macro) Defined in: MACROS IH Used in: 5MML # 5N7= #MAC DOCHKDIR 5NLW #MEN COMHOOK 5P6G #TRA G400HKD1 5PL6 12H%A 5Q5Q #END 5QKB #MEN DOXCODE 5R52 #TRA G400HKD2 5RJL 12H%A 5S4= #END 5SHW #MEN DOMONOP 5T3G #TRA G400HKD3 5TH6 12H%A 5W2Q #END 5WGB #MEN DOIHEMS 5X22 #TRA G400HKD4 5XFL 12H%A 5X^= #END 5YDW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOCOFF https://www.george3.co.uk/george/macro/docoff?rev=1705492539&do=diff DOCOFF (GIN Macro) Defined in: MACROS PERI Used in: 4^NG #MAC DOCOFF 5286 NGN 0 #21 52MQ MODD ANDS 0 JPSTATE,%A,CPPTR(2) 537B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOCON https://www.george3.co.uk/george/macro/docon?rev=1705492539&do=diff DOCON (GIN Macro) Defined in: MACROS PERI Used in: DOC867 57J2 #MAC DOCON 583L LDN 0 #20 58H= MODD ORS 0 JPSTATE,%A,CPPTR(2) 592W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DODEWELLHOOK https://www.george3.co.uk/george/macro/dodewellhook?rev=1705492539&do=diff DODEWELLHOOK (GIN Macro) Defined in: MACROS IH Used in: 4#NL #MAC DODEWELLHOOK 4*8= #MEN DEWELL 4*MW #TRA K60DEWELL 4B7G NULL 4BM6 #END 4C6Q #STR %A 4CLB ( 4D62 #MEN DOMONOP 4DKL #TRA G400DEWELL 4F5= 12H%A 4FJW #END 4G4G ) 4GJ6 #STR MOP,%B 4H3Q #SKI 4HHB ( 4J32 #MEN DEWELL 4JGL #TRA K61DEWELL+1 4K2= #STR BACK,%C 4KFW #FID 22,22,1 4K^G #STR BACK,%C 4LF6 #SKI 4LYQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOFINDGV https://www.george3.co.uk/george/macro/dofindgv?rev=1705492539&do=diff DOFINDGV (GIN Macro) Defined in: MACROS IH Used in: CHANG867, GLOBALS867, SETPG867, WAIT867 9*SW # 9B#G #MAC DOFINDGV 9BS6 #STR %C 9C?Q #SKI 9CRB ( 9D?2 DOHUNTGV %B 9DQL BNG %B MDOFINDGVX 9F== ) 9FPW #STR %C 9G9G LDX %B %C [LOAD GIVEN ADDRESS OF GV TABLE 9GP6 STO 7 GEN0 [SAVE X7 9H8Q LDX 7 VDATALEN(%B) 9HNB ADN 7 A1(%B) [P… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOFINDJV https://www.george3.co.uk/george/macro/dofindjv?rev=1705492539&do=diff DOFINDJV (GIN Macro) Defined in: MACROS IH Used in: GLOBALS867, SETPG867 8G^G #MAC DOFINDJV 8HF6 #STR %C 8HYQ #SKI 8JDB ( 8JY2 DOHUNTJV %B 8KCL BNG %B MDOFINDJVX 8KX= ) 8LBW #STR %C 8LWG LDX %B %C [LOAD GIVEN ADDRESS OF JV TABLE 8MB6 STO 7 GEN0 [SAVE X7 8MTQ LDX 7 VDATALEN(%B) 8N*B ADN 7 A1(%B) [POINTS TO WD AFTER LAST ENTRY 8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOHUNTGV https://www.george3.co.uk/george/macro/dohuntgv?rev=1705492539&do=diff DOHUNTGV (GIN Macro) Defined in: MACROS IH Used in: GLOBALS867 9WXQ # 9XCB #MAC DOHUNTGV 9XX2 LDN %A BMISC 9YBL MDOHUNTGV1 9YW= LDX %A BPTR(%A) 9^*W SMO FX1 9^TG TXU %A MDOHUNTGVA =2*6 BCS MDOHUNTGV2 =2SQ LDX %A GSIGN =3#B BRN MDOHUNTGVX =3S2 MDOHUNTGVA +BMISC =4?L MDOHUNTGV2 =4R= LDX 0 ATYPE(%A) =5=W SRL 0 12 =5QG SBN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOHUNTJV https://www.george3.co.uk/george/macro/dohuntjv?rev=1705492539&do=diff DOHUNTJV (GIN Macro) Defined in: MACROS IH Used in: GLOBALS867 93JQ # 944B #MAC DOHUNTJV 94J2 LDX %A FX2 953L LDX %A ACTRING(%A) 95H= SBN %A ACTRING 962W MDOHUNTJV1 96GG LDX %A BPTR(%A) 9726 TXU %A FX2 97FQ BCS MDOHUNTJV2 97^B LDX %A GSIGN 98F2 BRN MDOHUNTJVX 98YL MDOHUNTJV2 99D= LDX 0 ATYPE(%A) 99XW SRL 0 12 9=CG SBN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOJOBENDHOOK https://www.george3.co.uk/george/macro/dojobendhook?rev=1705492539&do=diff DOJOBENDHOOK (GIN Macro) Defined in: MACROS IH Used in: 4WQQ # 4X=B #MAC DOJOBENDHOOK 4XQ2 #MEN LOGOUT 4Y9L #TRA K60LOGOUT 4YP= NULL 4^8W #END 4^NG #STR %A 5286 ( 52MQ #MEN DOMONOP 537B #TRA G400JOBEND 53M2 12H%A 546L #END 54L= ) 555W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOLPMON https://www.george3.co.uk/george/macro/dolpmon?rev=1705492539&do=diff DOLPMON (GIN Macro) Defined in: MACROS IH Used in: COMPROB867, DISPCOM867, SETPC867 3R66 # 3RKQ #MAC DOLPMON 3S5B LDN %A 2 3SK2 SLC %A 12 [ #00020000 3T4L MODD ANDX %A EXT+9,%B,FX2 3TJ= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOMAXWT https://www.george3.co.uk/george/macro/domaxwt?rev=1705492539&do=diff DOMAXWT (GIN Macro) Defined in: MACROS IH Used in: =97W # =9MG #MAC DOMAXWT ==76 #MEN WAIT ==LQ #TRA G400WAIT =?6B +%A/FONINTP =?L2 #END =#5L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOPNPERI https://www.george3.co.uk/george/macro/dopnperi?rev=1705492539&do=diff DOPNPERI (GIN Macro) Defined in: MACROS IH Used in: 5YYG # 5^D6 #MAC DOPNPERI 5^XQ #STR *MT,%B 62CB #SKI 62X2 ( 63BL #MEND OPCA 63W= #TRA G400HKMT 64*W NULL 64TG #END 65*6 #STR %A 65SQ ( 66#B #MEND DOMONOP 66S2 #TRA G400OPNMT 67?L 12H%A 67R= #END 68=W ) 68QG ) 69=6 #STR *DA,%B 69PQ #SKI 6=9B ( 6=P2 #MEND OPCA 6?8L #TRA G400HKDA 6?N= NULL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOPSWDHK https://www.george3.co.uk/george/macro/dopswdhk?rev=1705492539&do=diff DOPSWDHK (GIN Macro) Defined in: MACROS IH Used in: 6F46 # 6FHQ #MAC DOPSWDHK 6G3B DOPSWDOFF LN 6GH2 DODEWELLHOOK %A,MOP 6H2L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOPSWDOFF https://www.george3.co.uk/george/macro/dopswdoff?rev=1705492539&do=diff DOPSWDOFF (GIN Macro) Defined in: MACROS IH Used in: 55KG # 5656 #MAC DOPSWDOFF 56JQ #STR %B%C%D 574B DOPSWDOFF %B,%C,%D 57J2 #STR RJ,%A 583L #STR 58H= ( 592W #MEN INITJOB 59GG #TRA G400PSWD 5=26 BRN G400PSWD+2 5=FQ #TRA G400PSWD+2 5=^B #FID 2,2,1 5?F2 #END 5?YL #EXI 5#D= ) 5#XW #STR JB,%A 5*CG #STR 5*X6 ( 5BBQ #MEN INITJOB 5BWB #TRA G400PSWD 5CB2 BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DORPMON https://www.george3.co.uk/george/macro/dorpmon?rev=1705492539&do=diff DORPMON (GIN Macro) Defined in: MACROS IH Used in: COMPROB867, DISPCOM867, SETPC867 3W3W # 3WHG #MAC DORPMON 3X36 DOUPMON %B 3XGQ MODD ORS %A EXT+9,%B,FX2 3Y2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPENT https://www.george3.co.uk/george/macro/dospent?rev=1705492539&do=diff DOSPENT (GIN Macro) Defined in: MACROS IH Used in: 6HG= # 6H^W #MAC DOSPENT 6JFG #SKI 20? 6J^6 SEGENTRY G400SP%A 6KDQ 4H0%A 6KYB #SKI 20?<1$1 6LD2 #TRA 0?+1 6LXL #SKI 20? 6MC= BRN X%A 6MWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPFIDDLE https://www.george3.co.uk/george/macro/dospfiddle?rev=1705492539&do=diff DOSPFIDDLE (GIN Macro) Defined in: MACROS IH Used in: 8DHB # 8F32 #MAC DOSPFIDDLE 8FGL #TRA 0?+2 8G2= #FID 0,0,1 8GFW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPMARK https://www.george3.co.uk/george/macro/dospmark?rev=1705492539&do=diff DOSPMARK (GIN Macro) Defined in: MACROS IH Used in: 7SGQ # 7T2B #MAC DOSPMARK 7TG2 #STR %B,DIR 7T^L #SKI 7WF= ( 7WYW #MEN DIRENT 7XDG #TRA G400DIRA 7XY6 #STR %A,@ 7YCQ SMO FX2 7YXB #STR %A,@ 7^C2 #SKI 7^WL BRN G400DIRB 82B= #END 82TW ) 83*G #STR %B,DIR 83T6 ( 84#Q #MEN SETPC 84SB #TRA G400SP%B 85#2 4H%A%B 85RL #END 86?= ) 86QW #STR %C 87… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPMON https://www.george3.co.uk/george/macro/dospmon?rev=1705492539&do=diff DOSPMON (GIN Macro) Defined in: MACROS IH Used in: COMPROB867, DISPCOM867, SETPC867, TRACE867 3FT= # 3G#W #MAC DOSPMON 3GSG LDN 0 2 3H#6 SLC 0 12 [ #00020000 3HRQ MODD ORS 0 EXT+9,%A,FX2 3J?B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPOFF https://www.george3.co.uk/george/macro/dospoff?rev=1705492539&do=diff DOSPOFF (GIN Macro) Defined in: MACROS IH Used in: 7BT= # 7C#W #MAC DOSPOFF 7CSG #DEF 19?+1=1? 7D#6 #LIS 0 7DRQ DOSPMARK 0,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J 7F?B #LIS 19?+1] 7FR2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPOFFALL https://www.george3.co.uk/george/macro/dospoffall?rev=1705492539&do=diff DOSPOFFALL (GIN Macro) Defined in: MACROS IH Used in: 7G=L # 7GQ= #MAC DOSPOFFALL 7H9W #DEF 19?+1=1? 7HPG #LIS 0 7J96 #MEN SETPC 7JNQ #TRA G400SPFIRST 7K8B DOSPTEXT RESET 7KN2 #END 7L7L #MEN DIRENT 7LM= #TRA G400DIRA 7M6W SMO FX2 7MLG #END 7N66 #LIS 19?+1] 7NKQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPON https://www.george3.co.uk/george/macro/dospon?rev=1705492539&do=diff DOSPON (GIN Macro) Defined in: MACROS IH Used in: 7P5B # 7PK2 #MAC DOSPON 7Q4L #DEF 19?+1=1? 7QJ= #LIS 0 7R3W DOSPMARK @,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J 7RHG #LIS 19?+1] 7S36 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPONALL https://www.george3.co.uk/george/macro/dosponall?rev=1705492539&do=diff DOSPONALL (GIN Macro) Defined in: MACROS IH Used in: 889Q # 88PB #MAC DOSPONALL 8992 #DEF 19?+1=1? 89NL #LIS 0 8=8= #MEN SETPC 8=MW #TRA G400SPFIRST 8?7G DOSPTEXT RESET 8?M6 #TRA G400SPFIRST-1 8#6Q #REP G400SPLAST-G400SPFIRST/2 8#LB DOSPFIDDLE 8*62 #END 8*KL #MEN DIRENT 8B5= #TRA G400DIRA 8BJW BRN G400DIRB 8C4G #END 8CJ6 #LIS 19?+1] 8D3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOSPTEXT https://www.george3.co.uk/george/macro/dosptext?rev=1705492539&do=diff DOSPTEXT (GIN Macro) Defined in: MACROS IH Used in: SETPC867 6NBG # 6NW6 #MAC DOSPTEXT 6P*Q #DEF 20?=0 6PTB #STR RESET,%A 6Q*2 #DEF 20?=1 6QSL #SKI 20? 6R#= SEGENTRY G400SPFIRST 6RRW DOSPENT GEO 6S?G DOSPENT NAM 6SR6 DOSPENT GEN 6T=Q DOSPENT SER 6TQB DOSPENT REE 6W=2 DOSPENT LAN 6WPL DOSPENT CHC 6X9= DOSPENT PCO 6XNW DOSPENT FCO 6Y8G DOSPENT BJB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOTPMON https://www.george3.co.uk/george/macro/dotpmon?rev=1705492539&do=diff DOTPMON (GIN Macro) Defined in: MACROS IH Used in: MONFILE867, TRACE867 3MNQ # 3N8B #MAC DOTPMON 3NN2 LDN 0 2 3P7L SLC 0 12 [ #00020000 3PM= MODD ANDX 0 EXT+9,%B,FX2 3Q6W BNZ 0 %A 3QLG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOUPMON https://www.george3.co.uk/george/macro/doupmon?rev=1705492539&do=diff DOUPMON (GIN Macro) Defined in: MACROS IH Used in: COMPROA867, TRACE867 3JR2 # 3K=L #MAC DOUPMON 3KQ= NGN 0 3 3L9W SLC 0 12 [ #77757777 3LPG MODD ANDS 0 EXT+9,%A,FX2 3M96 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOUTHIER https://www.george3.co.uk/george/macro/douthier?rev=1705492539&do=diff DOUTHIER (GIN Macro) Defined in: MACROS IH Used in: DISPCOM867 46*G # 46T6 #MAC DOUTHIER 47#Q DOWN ERROR,5 47SB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOWN https://www.george3.co.uk/george/macro/down?rev=1705492539&do=diff DOWN (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ABANDONA867, ADDICT865, ADJUNCTS85, ALASB867, APPEND864, ASTONIF867, ATTACHC867, ATTRIBUT867, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BMAPDIR865, BMAPONE867, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLSLAV864, BMQUESTB866, BMSJRNL866, BRADSPLT867, BSPRUNE867, BSUNJAM867, CARTCONT867, CHINTEG867, CLOSBAC867, CLOSDEL867, CLOSEDIR867, CLOSEMT867, CLOSEND867, COMPRESS864, COMPRO867, COMPROB867, CONCEPT85, CONNECT867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOWNC https://www.george3.co.uk/george/macro/downc?rev=1705492539&do=diff DOWNC (GIN Macro) Defined in: CHCHCOORMAC2 Used in: 2RL# ...[??? DOWNC SECT CENT FGN 32 DOC 2RW6 #MAC DOWNC 2S*Q CALL 1 (CHAPDOWNK) 2STB +%A 2T*2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DOWNY https://www.george3.co.uk/george/macro/downy?rev=1705492539&do=diff DOWNY (GIN Macro) Defined in: CHCHCOORMAC2 Used in: 27KN ...[??? DOWNY SECT CENT FGN 32 DOC 27TG # 28*6 #MAC DOWNY 28SQ CALL 1 (CHAPDOWNK) 29#B #HAL %A,%B 29S2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DP80 https://www.george3.co.uk/george/macro/dp80?rev=1705492539&do=diff DP80 (GIN Macro) Defined in: CENTCSSMACS Used in: 5P6G ...[ 5PL6 ...[??? DP80 SECT CENT FGN 23 DOC 5Q5Q ...[ 5QKB ...[ RESTORE TIME MACRO TO INCREASE DP TEXT LIMIT TO 80 CHARS. 5R52 ...[ 5RJL ...#MAC DP80 5S4= ...#MEN DISPCOM 5SHW ...#TRA K50DISPCOM 5T3G ... +81 5TH6 ...#TRA K51DISPCOM 5W2Q ... LDN 5 80 5WGB ...#TRA K52DISPCOM 5X22 ... LDN 7 29 5XFL ...#END 5X^= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DPASS https://www.george3.co.uk/george/macro/dpass?rev=1705492539&do=diff DPASS (GIN Macro) Defined in: MACROS IAN Used in: 2?=W ...[ 2?K? ...[??? DPASS SECT DEVT FGN 3 DOC 2?XN ...#MAC DPASS [- A.P.HOLDEN 2#=6 ...[ THIS MACRO WILL COMPILE DATAPASS 2#PQ ...[ IT WILL TAKE IT'S SOURCE FROM FILESTORE IF POSSIBLE - 2*9B ...[ OTHERWISE IT WILL USE SUB-FILE DATAPASS ON MT DPTAPE. 2*P2 ...[ FILESTORE SOURCE SHOULD BE IN FILE :GEO.DATAPASS 2*W8 ...#STR NOLIS,%I 2B3B ...( 2B8L ...#ALT ADPLIST=1? 2BN= ...#LIS 0 2C7W .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DPOFF https://www.george3.co.uk/george/macro/dpoff?rev=1705492539&do=diff DPOFF (GIN Macro) Defined in: MACROS IAN Used in: 29^8 ...[??? DPOFF SECT DEVT FGN 2 DOC 2=4G ...#MAC DPOFF [- A.P.HOLDEN 2=7W ...[ THIS MACRO TURNS OFF BUILT IN DATAPASS 2=#W ...#MEN VCLASTWO 2=FW ...#TRA K86VCLASTWO 2=LW ... BICE ??,??,0,VCLASTWO,1 2=RW ...#END 2=YW ...#ALT APPSW=0 2?5W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DPON https://www.george3.co.uk/george/macro/dpon?rev=1705492539&do=diff DPON (GIN Macro) Defined in: MACROS IAN Used in: 28J3 ...[??? DPON SECT DEVT FGN 2 DOC 28JY ...#MAC DPON [- A.P.HOLDEN 28KW ...[ THIS MACRO TURNS ON BUILT IN DATAPASS 28QW ...#UNS APPSW 28XW ...#EXI 294W ...#MEN VCLASTWO 299W ...#TRA K86VCLASTWO 29BW ... BICE ZP,ZPERFORM,0,PERFPASS,1 29HW ...#END 29NW ...#ALT APPSW=1 29TW ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DROPTASK https://www.george3.co.uk/george/macro/droptask?rev=1705492539&do=diff DROPTASK (GIN Macro) Defined in: MACROSIPC Used in: 3?#X ...[??? DROPTASK SECT COMM FGN 19 DOC 3?M# ...[ REMOVE A TASK BLOCK ASSOCIATED WITH A LINK TO BE CLOSED 3?^Q #MAC DROPTASK 3#FB LDX 2 FX2 3#^2 LDX 0 %A 3*DL STO 0 ACOMMUNE1(2) 3*Y= SMO %B 3BCW LDX 0 ALINUM 3BXG STO 0 ACOMMUNE2(2) 3CC6 DOWN GETNOR,1 3CWQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DRUMMASH https://www.george3.co.uk/george/macro/drummash?rev=1705492539&do=diff DRUMMASH (GIN Macro) Defined in: MISCMACS Used in: 58H= [??? DRUMMASH SECT DIAG FGN 4 DOC 592W #MAC DRUMMASH [M.C.D. MANN 59GG [ 5=26 [ 5=FQ [ ************** 5=^B [ * DRUMMASH * 5?F2 [ ************** 5?YL [ 5#D= [ 5#XW [CREATED ON DRUM 5*CG FSDESC 5*X6 #STR EDS30,%A 5BBQ #SKI 5BWB FSFILE 3,6,DASTORE30 5CB2 #STR EDS30,%A 5CTL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DSCA https://www.george3.co.uk/george/macro/dsca?rev=1705492539&do=diff DSCA (GIN Macro) Defined in: MACS SPC Used in: CLOSEIPB864, IPBERROR867, IPBIN867, IPBPM84, IPBSTARB867, IPBSTART867, IPCGEO8, IPCON864, IPCONA864, IPCONB8, IPCONE865, IPCONG8, IPCPASS8, IPCSTART864 5QKB #MAC DSCA 5R52 MODD %B %C IS%D,%A,CPPTR(2) 5RJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DTAFTERREST https://www.george3.co.uk/george/macro/dtafterrest?rev=1705492539&do=diff DTAFTERREST (GIN Macro) Defined in: DUMP-MACROS Used in: DHPH ...[??? DTAFTERR SECT FILE FGN ? DOC DJ97 ...#MAC DTAFTERREST DJNR ... IDCRTM %A,K82INCSET DK8C ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DTFILEINC https://www.george3.co.uk/george/macro/dtfileinc?rev=1705492539&do=diff DTFILEINC (GIN Macro) Defined in: DUMP-MACROS Used in: DBT? ...[??? DTFILEIN SECT FILE FGN ? DOC DC#X ...#MAC DTFILEINC DCSH ... IDCRTM %A,K86INCSET DD#7 ...[ USES IDCRTM ( SEE ABOVE ) TO MEND INCSTART DDRR ...[ TO CONTROL PLACING OF FILE ONLY INCREMENTS DF?C ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DTRESTINC https://www.george3.co.uk/george/macro/dtrestinc?rev=1705492539&do=diff DTRESTINC (GIN Macro) Defined in: DUMP-MACROS Used in: DFR3 ...[??? DTRESTIN SECT FILE FGN ? DOC DG=M ...#MAC DTRESTINC DGQ? ... IDCRTM %A,K85INCSET DH9X ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMP https://www.george3.co.uk/george/macro/dump?rev=1705492539&do=diff DUMP (GIN Macro) Defined in: MISCMACS Used in: BSPRUNE867, CHTAB, INCFIN864, INCTAPES867, INKS, LISTDIR867, LISTDIRF867, LOADERPM867, MESSAC, MESSAI, MESSBI, MESSCE, MESSCG, MESSCH, MESSCI, MESSI, PMCHAP867, PMDUMPMT85, SETPF867, WTSTAT867 6X9= ...[??? DUMP SECT DIAG FGN 5 DOC 6XNW #MAC DUMP [M.C.D. MANN 6Y8G [ 6YN6 [ 6^7Q [ ********** 6^MB [ * DUMP * 7272 [ ********** 72LL [ 736= [ 73KW [ THIS VERSI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPBUFFS https://www.george3.co.uk/george/macro/dumpbuffs?rev=1705492539&do=diff DUMPBUFFS (GIN Macro) Defined in: DUMP-MACROS Used in: 38HS ...[??? DUMPBUFF SECT FILE FGN 65 DOC 38JB # 3942 # THIS MACRO RESETS THE MAXIMUM NO OF BUFFER BLOCKS THAT DUMPER WILL 39HL # KEEP IN CORE AT ONE TIME. 3=3= # %A IS THE NO. FOR TERMINAL FILES. 3=GW # %B IS THE NO. FOR DIRS. 3?2G # 3?G6 #MAC DUMPBUFFS 3?^Q #STR %A 3#FB ( 3#^2 #SKI %A<2$2 3*DL ! DUMPBUFF 1ST PARAM OUT OF RANGE 3*Y= #SKI %A>1$1 3BCW ( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPINC https://www.george3.co.uk/george/macro/dumpinc?rev=1705492539&do=diff DUMPINC (GIN Macro) Defined in: DUMP-MACROS Used in: BSUNJAM867 2XH# ...[??? DUMPINC SECT FILE FGN 65 DOC 2XR6 # 2Y=Q # USED ONLY BY BSUNJAM - SAYS 'DO AN INCREMENTAL DUMP NOW' 2YQB #MAC DUMPINC 2^=2 BS ,BNOWD 2^PL FON ADUMPWAIT 329= COOR3 BSUJWT [SET UNJAMMER WAITING FOR END OF DUMP 32NW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPNEW https://www.george3.co.uk/george/macro/dumpnew?rev=1705492539&do=diff DUMPNEW (GIN Macro) Defined in: DUMP-MACROS Used in: 376= ...[??? DUMPNEW SECT FILE FGN 65 DOC 3792 ...#MAC DUMPNEW [FORCES DUMPER TO USE NEW TAPE 37CY ...! PLEASE USE DTRESTINC AND/OR DTFILEINC 37LW ... DTRESTINC NEW 37TS ... DTFILEINC NEW 384Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPNODIR https://www.george3.co.uk/george/macro/dumpnodir?rev=1705492539&do=diff DUMPNODIR (GIN Macro) Defined in: DUMP-MACROS Used in: 333Q ...[??? DUMPNODI SECT FILE FGN 65 DOC 334C ...# 335N ...# 338G # 33N6 # THIS MACRO PREVENTS THE 1ST INCR IN A BATCH FROM CONTAINING 33WS ...# DIRS AND 'VSF'S UNLESS THERE HAVE BEEN AT LEAST 345G ...# <1ST PARAM> NON-RESTORABLE BATCHES SINCE THE LAST RESTORABLE 34#8 ...# ONE. 34GW ...# FOR USE BY INSTALLATIONS WHICH ALWAYS HIT END OF TAPE 34PJ ...# ESPECIALLY THOSE WHICH HAVE DIFFICULTY FITTING… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPNOLA https://www.george3.co.uk/george/macro/dumpnola?rev=1705492539&do=diff DUMPNOLA (GIN Macro) Defined in: MISCMACS Used in: 67?L #MAC DUMPNOLA [M.C.D. MANN 67R= [ 68=W [ 68QG [ ************** 69=6 [ * DUMPNOLA * 69PQ [ ************** 6=9B [ 6=P2 [ 6?8L [ DUMPNOLA DUMPS A RESTORABLE DUMP OF GEORGE ON TO 6?N= [ MAGNETIC TAPE IN THE SAME FORMAT AS THE "DUMP" 6#7W [ MACRO BUT WITHOUT LOADER/ALLOCATOR 6#MG [ 6*76 #INT 6*LQ #OPT ARDL=0 6B6B PET… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DUMPPOOL https://www.george3.co.uk/george/macro/dumppool?rev=1705492539&do=diff DUMPPOOL (GIN Macro) Defined in: DUMP-MACROS Used in: 3R*Y ...[??? DUMPPOOL SECT FILE FGN 65 DOC 3RKQ #MAC DUMPPOOL 3S5B ...! PLEASE USE NEWDTPOOL 3SK2 ... NEWDTPOOL ON 3W3W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) DX https://www.george3.co.uk/george/macro/dx?rev=1705492539&do=diff DX (GIN Macro) Defined in: MACS SPC Used in: PCTBEGIN863, WLA867 5XFL #MAC DX 5X^= #MEN PERTYPNO 5YDW #TRA K80PERTYPNO+3 5YYG 4H**DX 5^D6 #END 5^XQ #MEN RELPER 62CB #TRA ADX 62X2 LDCT 4 #007 63BL #END 63W= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EASYGAP https://www.george3.co.uk/george/macro/easygap?rev=1705492539&do=diff EASYGAP (GIN Macro) Defined in: MACRO COMPRO Used in: =534 ...[??? EASYGAP SECT CENT FGN 21 DOC =5=W #MAC EASYGAP =5QG #DEF 21?=0?+0>200 =6=6 #STR %A =6PQ #SKI =79B #DEF 22?=K6ALLGEO =7P2 #STR %A =88L #DEF 22?=%A =8N= #GAP 4*22?-250*21?+0/15/22?+0?+0<1023-0? =97W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDCOM https://www.george3.co.uk/george/macro/edcom?rev=1705492539&do=diff EDCOM (GIN Macro) Defined in: MACROSAJE Used in: EDITEX7, EDITORA865, EDITPT867, EDWRITE867 29J8 ...[??? EDCOM SECT COMM FGN 8 DOC 29S2 # 2=?L #MAC EDCOM [EDCOM - OUTPUT THE COMMENT MESSAGE 2=R= LDN 7 IERR%A [LABELLED %A IN THE COMMENT CATEGORY 2?=W DOWN EDITER,2 [AND REUTRN TO ONE AFTER MACRO. 2?QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDCOMERR https://www.george3.co.uk/george/macro/edcomerr?rev=1705492539&do=diff EDCOMERR (GIN Macro) Defined in: MACROSAJE Used in: EDIT867, EDITOR867 2#2# ...[??? EDCOMERR SECT COMM FGN 8 DOC 2#=6 # 2#*= ...#MAC EDCOMERR [EDCOMERR - OUTPUT THE ERROR 2#DB ... LDN 7 IERR%A [MESSAGE %A IN COMMAND ERROR 2#HG ... DOWN EDITER,5 [CATEGORY, SET COMERR FLAG 2#LL ...#NOR [AND RETURN TO ONE AFTER MACRO text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDERM https://www.george3.co.uk/george/macro/ederm?rev=1705492539&do=diff EDERM (GIN Macro) Defined in: MACROSAJE Used in: EDITER867 24WJ ...[??? EDERM SECT COMM FGN 8 DOC 24WQ ...# 24X6 ...# 24XQ #MAC EDERM [EDERM - GENERATE ERROR MESSAGE %C 25CB IERR%A +%B [OF CHARACTER LENGTH %B AND LABEL IT 25X2 %BH%C [%C. MUST ONLY BE USED IN SEGMENT 26BL #NOR [EDITER text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDERR https://www.george3.co.uk/george/macro/ederr?rev=1705492539&do=diff EDERR (GIN Macro) Defined in: MACROSAJE Used in: EDITAR867, EDITET7, EDITMFO867, EDITOR867, EDITPT867, EDWRITE867 26LD ...[??? EDERR SECT COMM FGN 8 DOC 26W= # 27*W # 27TG #MAC EDERR [EDERR - OUTPUT THE ERRROR MESSAGE 28*6 ... LDN 7 IERR%A [LABELLED %A, IN COMERR OR COMMENT 28SQ ... DOWN EDITER,1 [CATEGORY, IF FORMER SET COMERR FLAG 29#B ...#NOR [AND RETURN TO ONE AF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDITRP https://www.george3.co.uk/george/macro/editrp?rev=1705492539&do=diff EDITRP (GIN Macro) Defined in: MACROSAJE Used in: 2249 ...[ THIS MACRO FILE IS OWNED JOINTLY BY COMM AND DIAG 226D ...[ COMM OWNS THE FIRST HALF (UP TO ORIF) AND DIAG OWNS THE REST 228N ...[ 4 MACRO DEFINITIONS. 22CB ...[ -------------------- 22L4 ...[ 22L7 ...[??? EDITRP SECT COMM FGN 8 DOC 22L= ...[ 22L* ...[ MACRO TO CONTROL THE INCLUSION OF THE ENHANCEMENT 22LD ...[ TO REDUCE THE PROBLEM OF LARGE REPEATED EDITS 22LH ...[ HOLDING UP OBJECT PR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDSCNT https://www.george3.co.uk/george/macro/edscnt?rev=1705492539&do=diff EDSCNT (GIN Macro) Defined in: MACROS EWDAS Used in: ERASEX866 W*9= # W*NW [??? EDSCNT WB8G # ****** WBN6 #MAC EDSCNT WC7Q # WCMB #STR %C WD72 ( WDLL +%C WF6= #FID 0 5 %A WFKW #FID 6 11 %B WG5G EDSCNT %A,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O WGK6 ) WH4Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDSMASH https://www.george3.co.uk/george/macro/edsmash?rev=1705492539&do=diff EDSMASH (GIN Macro) Defined in: MISCMACS Used in: GEND 4JGL [??? EDSMASH SECT DIAG FGN 4 DOC 4K2= #MAC EDSMASH [M.C.D. MANN 4KFW [ 4K^G [ 4LF6 [ ************* 4LYQ [ * EDSMASH * 4MDB [ ************* 4MY2 [ 4NCL [ 4NX= FSDESC 4PBW #STR EDS30,%A 4PWG #SKI 4QB6 ( 4QTQ FSFILE 3,6,DASTORE30 4R*B FSFILE 4,6,DASWAP30,,SWAP 4RT2 ) 4S#L #STR EDS30… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EDSTAT https://www.george3.co.uk/george/macro/edstat?rev=1705492539&do=diff EDSTAT (GIN Macro) Defined in: MACROSAJE Used in: 22SQ ...[ DICK RUSBRIDGE 233D ...[??? EDSTAT SECT COMM FGN 8 DOC 23=6 ...[ 23DS ...[ 23MG ...[ MACRO TO SWITCH ON THE EDIT SPECIAL FOR PLESSEY 23W8 ...[ THAT OUTPUTS THE JOBTIME AT THE START AND END 244W ...[ OF AN EDIT, AND ALSO THE TOTAL RECORD TRANSFERS 24?J ...[ PERFORMED DURING THE EDIT. 24GB ...# 24GQ ...#MAC EDSTAT 24H6 ...#MEN EDIT 24HG ...#TRA ESP1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ELSE https://www.george3.co.uk/george/macro/else?rev=1705492539&do=diff ELSE (GIN Macro) Defined in: IFMACS Used in: ARCHIVE867, CONSET864, FORMLOOP865, GETFREE867, GETFREEB864, GETWORD867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTDIRF867, LISTNEXT867, LISTOPEN867, LISTPARS867, LISTRING864, OPER864, OPERA864, OPERAPP864, OPERIN867, PERFPASS864, SHOWCOMM864, WA864, WHATGENS867, WHATPROP865, WHATRVS867, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLG862, WLOUT865 34MB [ 3572 [ 35LL [??? ELSE SECT DEVT FGN 1 DOC 366… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ELSF https://www.george3.co.uk/george/macro/elsf?rev=1705492539&do=diff ELSF (GIN Macro) Defined in: IFMACS Used in: FORMLOOP865, LISTOPEN867, LISTRING864, OPER864, OPERA864, OPERAPP864, OPERIN867, SHOWCOMM864, WA864, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLOUT865 47SB [ 48#2 [ 48RL [??? ELSF SECT DEVT FGN 1 DOC 49?= [ 49QW #MAC ELSF 4==G [ ==== 4=Q6 [ 4?9Q [ ENSURES: 4?PB [ DEPTH NON-ZERO 4#92 [ CURRENT STRUCTURE = CONDITIONAL 4#NL [ 'OR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ELSFR https://www.george3.co.uk/george/macro/elsfr?rev=1705492539&do=diff ELSFR (GIN Macro) Defined in: IFMACS Used in: OPER864 8TGB ...[ 8TGL ...[ 8TGW ...[??? ELSFR SECT COMM FGN 1 DOC 8TH6 ...[ 8THB ...#MAC ELSFR 8THL ...[ ===== 8THW ...[ 8TJ6 ...[ CONTRACTION OF 'ELSF EITHER' 8TJB ...[ 8TJL ... ELSF EITHER,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, - 8TJW ... %Q,%R,%S,%T 8TK6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EMPTY https://www.george3.co.uk/george/macro/empty?rev=1705492539&do=diff EMPTY (GIN Macro) Defined in: COREMACROS Used in: EDITER867, GETNO865, GETNOR8, IDFPER867, IPBLISTB867, IPBSTARB867, IPBSTART867, IPCGEO8, IPCONB8, IPCONC8, IPCPASS8, IPQUAKE83, IPQUAKER865, LISTDIR867, LISTINIT867, LISTRING864, MESSCB, MESSCF, PCTBEGIN863, PCTSTART867, PMBUFFS84, PMFILE860, PMFSB84, RMTLFEND864, SETUP867 DRBD ...[??? EMPTY SECT CENT FGN 32 DOC DRL= # DS5W # THIS MACRO MAKES AN ELEMENT EMPTY DSKG # DT56 #MAC EMPTY DTJQ LDN 0 %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EMSACT https://www.george3.co.uk/george/macro/emsact?rev=1705492539&do=diff EMSACT (GIN Macro) Defined in: COREMACROS Used in: IPCSTART864 ?T7Y ...[??? EMSACT SECT CENT FGN 32 DOC ?TCQ # ?TXB # EMSACT GETS ABLOCK OF CORE FOR AN ACTIVITY BLOCK AT EARLY MORNING STAR ?WC2 # TIME. IT IS LOCKED PERMANENTLY AT THE TOP OF CORE ?WWL # ?XB= #MAC EMSACT ?XTW #STR %B ?Y*G LDN 2 %ALEN+%BLEN ?YT6 #STR %B ?^#Q #SKI ?^SB LDN 2 %ALEN #2#2 STO 2 GLOGLEN [STORE LENGTH REQUIRED #2RL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EMSACTX https://www.george3.co.uk/george/macro/emsactx?rev=1705492539&do=diff EMSACTX (GIN Macro) Defined in: COREMACROS Used in: CAFSCTRL866, LOADERII867, SETUPA867, SETUPB867 *68D ...[??? EMSACTX SECT CENT FGN 32 DOC *6D= # *6XW # X VERSION OF EMSACT(SEE ABOVE *7CG # *7X6 #MAC EMSACTX *8BQ #STR %B,2 *8WB LDX 2 %B *9B2 STO 2 GLOGLEN [STORE LENGTH REQUIRED *9TL ADN 2 A1 *=*= LDX 1 BFREE+1 [TOP BLOCK IN F/C CHAIN *=SW LDX 0 ASIZE(1)… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EMSCONWT https://www.george3.co.uk/george/macro/emsconwt?rev=1705492539&do=diff EMSCONWT (GIN Macro) Defined in: BMAP MACROS Used in: BACKMAP864, BACKROOM865, BMPRCHEK860, BMQUEST866, BMQUESTB866, FSERR867 7TG2 ...[??? EMSCONWT SECT FILE FGN 36 DOC 7T^L ...[ 7WF= ...[ THIS MACRO WAITS FOR ALL 'MONOUT'S 7WYW ...[ TO FINISH - FOR USE DURING E.M.S. 7XDG ...[ 7XY6 ...#MAC EMSCONWT 7Y93 ...M1EMSCONWT 7YFY ... LDN 0 BCONSOUT 7YQT ... BXE 0 BCONSOUT,M3EMSCONWT 7^3Q ...M2EMSCONWT 7^#M ... COOR3 #53 7^KJ ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EMSCORE https://www.george3.co.uk/george/macro/emscore?rev=1705492539&do=diff EMSCORE (GIN Macro) Defined in: COREMACROS Used in: LOADERII867, SETLIST864, SETUPA867, SETUPB867 59Q# ...[??? EMSCORE SECT CENT FGN 32 DOC 5=26 # 5=FQ [ 5=^B [ENTRY SEQUENCE TO SPECIAL EARLY MORNING START ROUTINE WHICH GETS CORE 5?F2 [FROM THE TOP END OF THE STORE 5?YL [ 5#D= #MAC EMSCORE 5#XW [ 5*CG [THIS IS A SPECIAL EARLY MORNING START ROUTINE WHICH GETS A BLOCK OF 5*X6 [CORE FROM THE TOP OF STORE 5BBQ [ 5BWB SEMS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDBLOCK https://www.george3.co.uk/george/macro/endblock?rev=1705492539&do=diff ENDBLOCK (GIN Macro) Defined in: IFMACS Used in: H^8= ...[ H^MW ...[ J27G ...[??? ENDBLOCK SECT COMM FGN 1 DOC J2M6 ...[ J36Q ...#MAC ENDBLOCK J3LB ...[ ======== J462 ...[ J4KL ...[ ENSURES THAT IT FOLLOWS A BLOCK-START LABEL FOR J55= ...[ THE BLOCK IN QUESTION. GENERATES A BRN TO THE J5JW ...[ INSTRUCTION FOLLOWING THE 'EXECUTE' FOR THIS BLOCK J64G ...[ J6J6 ...#SKI %A0&0 J73Q ...!! BLOCK %A NOT YET STARTED J7HB ... BRN %A1 J832 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDCCYCLE https://www.george3.co.uk/george/macro/endccycle?rev=1705492539&do=diff ENDCCYCLE (GIN Macro) Defined in: LLSMACROS Used in: CORESHED861, LLSMESS867, SCHEDIN867, SCHEDOUT865 2S4B ...[??? ENDCCYCL SECT CENT FGN 6 DOC 2T*2 [ 2TSL [ MACROS TO END SCHEDULING CYCLES 2W#= [ 2WRW #MAC ENDCCYCLE 2X?G BC ,ASWACTIVE 2XR6 #STR AB,%A 2Y=Q STOZ CYCLECORE 2YQB #STR %A 2^=2 ( 2^PL LDX 0 COREK9 329= STO 0 CYCLECORE 32NW ) 338G COOR1X 33N6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDCOM https://www.george3.co.uk/george/macro/endcom?rev=1705492539&do=diff ENDCOM (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDON867, ABANDONA867, ACCESS867, ALLOCATE867, ALLOW84, ALTINST60, ANSCOM865, ANTIC867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BCAST867, BQUERY84, BUDGET84, CANCRVX864, CANTDO867, CMEMILL866, COMPRESS864, CONCEPT85, CONNECT867, CONTINUE867, COPYA867, CORE867, CREATE867, DATECON37, DEAD867, DELCOM5, DELCON867, DETACH867, DEWELL867, DISPCOM867, DOMONOP867, DOXCODE867, DRUM852… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDESC https://www.george3.co.uk/george/macro/endesc?rev=1705492539&do=diff ENDESC (GIN Macro) Defined in: MACROSBRBS Used in: 8F=S ...[??? ENDESC SECT FILE FGN 14 DOC 8FGL [ 8G2= [ 8GFW #MAC ENDESC 8G^G #SKI MFINDFS7<1$1 8HF6 !! NO SWAP RESIDENCE DECLARED!! 8HYQ #FRE MFINDFS7 8JDB #END 8JY2 #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDIFREC https://www.george3.co.uk/george/macro/endifrec?rev=1705492539&do=diff ENDIFREC (GIN Macro) Defined in: MACRO COMPRO Used in: IFEXPAN867 #H=8 ...[??? ENDIFREC SECT CENT FGN 21 DOC #HK6 ...#MAC ENDIFREC [RETURN TO CP - 'IF' #HY4 ... ACROSS COMPRO,16 #J?2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDLIST https://www.george3.co.uk/george/macro/endlist?rev=1705492539&do=diff ENDLIST (GIN Macro) Defined in: MACROS NI Used in: LISTDEV866, PMBDTS863, PMCRABS860 2=R= # 2?=W # GET END ADDRESS OF ALL DEVICE LISTS 2?QG # 2#=6 #MAC ENDLIST 2#PQ #SKI G4 2*9B LDX %A ENDPERT 2*P2 #SKI G3 2B8L LDX %A FCORES 2BN= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDMCYCLE https://www.george3.co.uk/george/macro/endmcycle?rev=1705492539&do=diff ENDMCYCLE (GIN Macro) Defined in: LLSMACROS Used in: 347Q [ 34MB [ 3572 #MAC ENDMCYCLE 35LL LDN 0 24 366= NGS 0 K5 36KW #STR AB,%A 375G STOZ CYCLEMILL 37K6 #STR %A 384Q NGS 0 CYCLEMILL 38JB LDX 1 FX1 3942 LDN 2 BACT 39HL LINKSET 2,MENDM(1) 3=3= COOR1X 3=GW MENDM LINK CHARGESC,1 3?2G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDPAXES https://www.george3.co.uk/george/macro/endpaxes?rev=1705492539&do=diff ENDPAXES (GIN Macro) Defined in: MACROS FIXD Used in: CORE867, COREALLF867, CORESHED861, GETWORD867, PLUGIN867, PROSTART867, RUNPROG840, SWAP865 7873 ...# 787Y ...#MAC ENDPAXES [EXIT FROM CRITICAL SEQUENCE 788T ... NGN 0 #401 789Q ... MOD ANDS 0 JCLASS,%A 78=M ... LDBIT 9,0 78?J ... MOD ANDX 0 JCLASS,%A 78#F ... BZE 0 MENDP 78*B ... MOD ERS 0 JCLASS,%A 78B? ... FON AXESPROG 78C8 ...MENDP 78D5 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENDREC https://www.george3.co.uk/george/macro/endrec?rev=1705492539&do=diff ENDREC (GIN Macro) Defined in: MACRO COMPRO Used in: ALAS822, ALASB867, GOTO867 #FN8 ...[??? ENDREC SECT CENT FGN 21 DOC #FY2 #MAC ENDREC [RETURN TO CP - MULTILINERY #GCL ACROSS COMPRO,12 #GX= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENGMESS https://www.george3.co.uk/george/macro/engmess?rev=1705492539&do=diff ENGMESS (GIN Macro) Defined in: MACS SPC Used in: FSERR867, RESTOREA866 64*W [??? ENGMESS SECT COMM FGN 14 DOC 64TG # 65*6 # ENGMESS 65SQ # 66#B # OUTPUT ON THE OPS CONSOLE A MESSAGE REQUIRING A REPLY OR A 66S2 # PERIPHERAL ENGAGEMENT 67?L # 67R= #MAC ENGMESS 68=W LDN 0 63 68QG BUTTON 0,0 69=6 MONOUT %A 69PQ MENGMESS2 6=9B %D 6=P2 #UNS ENHOPER 6?8L ON … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENGMEX https://www.george3.co.uk/george/macro/engmex?rev=1705492539&do=diff ENGMEX (GIN Macro) Defined in: MACS SPC Used in: 6F46 [??? ENGMEX SECT COMM FGN 14 DOC 6FHQ # 6G3B # ENGMEX 6GH2 # 6H2L #MAC ENGMEX 6HG= LDN 0 63 6H^W BUTTON 0,0 6JFG MONOUTX %A 6J^6 MENGMEX2 6KDQ %D 6KYB #UNS ENHOPER 6LD2 ON IGNORENGAGE 6LXL BUTTON %B,%C 6MC= BPZ %B MENGMEX1 6MWW LDN 0 63 6NBG BUTTON %B,0 6NW6 BNG %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENGPER https://www.george3.co.uk/george/macro/engper?rev=1705492539&do=diff ENGPER (GIN Macro) Defined in: MACROS PERI Used in: DISEVENT65, ENGAGE867, LISTDEV866, LISTINIT867, LISTINTC865, LISTLOOP867, LISTPREP865, LISTTPCP867, PERFAIL866, PREPREAD867, TIDYREAD850 5#XW #MAC ENGPER 5*CG #STR %B 5*X6 ( 5BBQ LDX 0 %B 5BWB SMO FX2 5CB2 STO 0 ACOMMUNE7 5CTL LDN 0 %D+0 5D*= SMO FX2 5DSW STO 0 ACOMMUNE8 5F#G ) 5FS6 #STR %B 5G?Q #SKI 5GRB ( 5H?… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENRING https://www.george3.co.uk/george/macro/enring?rev=1705492539&do=diff ENRING (GIN Macro) Defined in: COREMACROS Used in: ACCESS867, BSQ867, CAFSPERI867, CHCH865, CLOSEONE867, COREALLF867, COREALLJ865, FAILTWIN866, IDFPER867, INTWIN866, LISTFIND867, LISTINIT867, LISTINTC865, LISTNIP865, PCTSTART867, RESTBLOK850, RIGHT867, SETJOBQ867, TWINSETA866, TWINSETB866, TWINSETD866, UNSAVE867 C^G# ...[??? ENRING SECT CENT FGN 32 DOC C^Q6 # D29Q # ENRINGS AN ELEMENT ON TO AN EXISTING RING(WHICH MAY BE EMPTY) AT D2PB # A SPECIFID POINT D392 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENRINGD https://www.george3.co.uk/george/macro/enringd?rev=1705492539&do=diff ENRINGD (GIN Macro) Defined in: COREMACROS Used in: COREALLF867, IPBSTARB867, IPBSTART867, LOADPROG865, PCTBEGIN863, PCTCON8, REDON867 DL2J ...[??? ENRINGD SECT CENT FGN 32 DOC DL=B # DLQ2 #MAC ENRINGD DM9L LDN 1 %A DMP= LDN 2 %B DN8W CALL 0 (ENRING) DNNG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENTPROP https://www.george3.co.uk/george/macro/entprop?rev=1705492539&do=diff ENTPROP (GIN Macro) Defined in: MACROS RME10 Used in: ADJUNCTS85, UNLOAD7 =534 ...[??? ENTPROP SECT FILE FGN 4 DOC =5=W #MAC ENTPROP =5QG DOWN LIBPROPS,1 =6=6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENTRUST https://www.george3.co.uk/george/macro/entrust?rev=1705492539&do=diff ENTRUST (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHCH865, CHTAB, COMPS JSR, COOR865, INKS, PM SNFQ ...[??? ENTRUST SECT CENT FGN 1 DOC SN^B ...#MAC ENTRUST SPF2 ...#STR %A SPYL ...( SQD= ... MODE #70 [ STOP G3 & EXEC AT SAME TIME REPLY IN SQXW ... BNG 0 %A [ JIF REPLY IS OK SRCG ... BRN %B [ ELSE JIF EXEC IS RUNNING SRX6 ...) SSBQ ...#STR %A SSWB ...#SKI STB2 ... MODE #60 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ENVOKE https://www.george3.co.uk/george/macro/envoke?rev=1705492539&do=diff ENVOKE (GIN Macro) Defined in: CHCHCOORMAC2 Used in: 222K ...[??? ENVOKE SECT CENT FGN 36 DOC 2238 ...# 223R ...#MAC ENVOKE 224B ...#STR %B 224^ ...#STR 225J ... CALL 0 %A 2267 ...#STR %B 226Q ...( 227* ... LDN 0 JRETURN%B 227Y ... CALL %B %A 228H ...) 2296 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERALLWF https://www.george3.co.uk/george/macro/erallwf?rev=1705492539&do=diff ERALLWF (GIN Macro) Defined in: WORK-MACROS Used in: FILELOG 2M9N ...[??? ERALLWF SECT FILE FGN 4 DOC 2MFG #MAC ERALLWF 2M^6 DOWN WORKFILE,4 2NDQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASE https://www.george3.co.uk/george/macro/erase?rev=1705492539&do=diff ERASE (GIN Macro) Defined in: MACROS RM59B Used in: BMOUTPUT867, CHTAB, CLEAN867, COPYA867, DELCON867, DEWELL867, DOMONOP867, ENWELLB867, INKS, MESSBE, MESSCD, MESSCG, MESSCH, SAVEJOB865, SJOPEN863, UNSAVE867, WA864, WHATRVSA867, WHTSTAT867, WLC867 4X=B ...[??? ERASE SECT FILE FGN 6 DOC 4XQ2 #MAC ERASE 4X^S ...[ THIS MACRO ERASES THE FILE WHOSE FABSNB IS IN THE CHAIN. 4Y9L DOWN ERASEA,2 4YP= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASECOUNT https://www.george3.co.uk/george/macro/erasecount?rev=1705492539&do=diff ERASECOUNT (GIN Macro) Defined in: MACROS RME10 Used in: ??5S ...[??? ERASECOU SECT FILE FGN 4 DOC ??*L ...#MAC ERASECOUNT ??T= ...#STR %A ?##W ...( ?#SG ...#SKI %A>#7777$#7777 ?*#6 ...#SKI ?*RQ ...( ?B?B ...#SKI %A<#100$#100 ?BR2 ...#SKI ?C=L ...( ?CQ= ...#MEN OLMTD ?D9W ...#TRA K8OLMTD ?DPG ... LDN 0 %A ?F96 ...#END ?FNQ ...#MEN OLMTE ?G8B ...#TRA K8OLMTE ?GN2 ... LDN 0 %A ?H7L ...#END ?HM= ...) ?J6W ...) ?JLG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASEMULT https://www.george3.co.uk/george/macro/erasemult?rev=1705492539&do=diff ERASEMULT (GIN Macro) Defined in: MACROS RMD10 Used in: CLOSEAB863, COMPOST867, INLOOP84, INPCT84, INPUTJDF82, READBULK867, SETPRAMA867 #7D4 ...[??? ERASEMUL SECT FILE FGN 16 DOC #7MW #MAC ERASEMULT #87G DOWN ERASE,2 #8M6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASEND https://www.george3.co.uk/george/macro/erasend?rev=1705492539&do=diff ERASEND (GIN Macro) Defined in: MACROS RM59B Used in: CLOSEALT864, ERASE867, FILELOG, OPENEND865 4^8W ...[??? ERASEND SECT FILE FGN 6 DOC 4^NG #MAC ERASEND 4^Y# ...[ SAME AS ERASE BUT DIRECTORY ABOVE TO-BE-ERASED FILE IS OPEN 5286 DOWN ERASEA,1 52MQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASESUD https://www.george3.co.uk/george/macro/erasesud?rev=1705492539&do=diff ERASESUD (GIN Macro) Defined in: MACROS JSRG4 Used in: RENAME864 KMBL #MAC ERASESUD KMW= #STR %A KN*W #SKIP KNTG TOPFCB 2 KP*6 #STR %A KPSQ ( KQ#B #STR %A,2 KQS2 LDX 2 %A KR?L #STR %B KRR= ( KS=W #SKIP %B>FUSER1-%B KSQG SBN 2 FUSER1-%B KT=6 #SKIP %B>FUSER1-FUSER1 KTPQ ADN 2 %B-FUSER1 KW9B ) KWP2 ) KX8L STO 2 JWSP1 KXN= LDN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASEWORK https://www.george3.co.uk/george/macro/erasework?rev=1705492539&do=diff ERASEWORK (GIN Macro) Defined in: WORK-MACROS Used in: LISTDIR867, LOGANAL864, WA864, WHATRVSA867, WHTSTAT867, WLC867 2NNJ ...[??? ERASEWOR SECT FILE FGN 4 DOC 2NYB #MAC ERASEWORK 2PD2 DOWN WORKFILE,2 2PXL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASEX https://www.george3.co.uk/george/macro/erasex?rev=1705492539&do=diff ERASEX (GIN Macro) Defined in: MACROS EWDAS Used in: CHTAB, FLAW866, INKS TT5L # TTK= [??? ERASEX TW4W # ****** TWJG #MAC ERASEX TX46 # TXHQ DOWN ERASEX,1 TY3B BRN %A TYH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERASTREM https://www.george3.co.uk/george/macro/erastrem?rev=1705492539&do=diff ERASTREM (GIN Macro) Defined in: MACROS RMD10 Used in: COPYA867 #5FJ ...[??? ERASTREM SECT FILE FGN 16 DOC #692 #MAC ERASTREM #6NL DOWN ERASE,2 #78= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERROR https://www.george3.co.uk/george/macro/error?rev=1705492539&do=diff ERROR (GIN Macro) Defined in: MACRO COMPRO Used in: ALTINST60, ATTACHB866, BUDGTWO84, CANTDO867, CHNUMCON867, CHTAB, CREATE867, DIRENT867, DUMP860, ERASE867, FREEZE864, GET6, GETON867, GETONA867, GLOBALS867, IFEXPAN867, INCOM864, INKS, INPUTJDF82, IPBMOPB867, IPBMOPC867, LIBCOM867, LISTRING864, LOCALNAM, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSC, MESSCB, MESSCC, MESSCD, MESSCE, MESSCI, MESSD, MESSDA, MESSDB, MESSE, MESSF, MESSI, MONFIL865, MULTIPLX864, NETOFLNE867, NORMERR860, OFFR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERRORX https://www.george3.co.uk/george/macro/errorx?rev=1705492539&do=diff ERRORX (GIN Macro) Defined in: MACRO COMPRO Used in: ADDJOB867, ALLOCATE867, ARCHIVE867, ARCHIVNW83, ATTACHC867, BCAST867, BEXTSJ84, BUDGTWO84, CANCRVX864, CONNECT867, COPYA867, DEAD867, DUMMYA867, DUMMYB867, FILESECU83, FORMLOOP865, HOWBIG867, IDFASAT867, IDFCANC867, INITJOB867, JDTWO864, JOBDATAB867, LIBCOM867, LOADERR70, LOGCOM864, MONITOR36, NEWA867, NEWDIR867, NEWOWN865, NEWPW867, NORMERR860, PARIDF8, PARSORT867, PERCON867, PRINT70, REGEN865, RENAMAG864, RENAMDIR, REPERR867, REPORT865, R… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERRTEST https://www.george3.co.uk/george/macro/errtest?rev=1705492539&do=diff ERRTEST (GIN Macro) Defined in: REPLY-MACROS Used in: ALLOCATE867, FILESECU83, GETON867, LIBCOM867, NETOFLNE867, OLMTA85, RENAMDIR, RETURN867, TRANSPOT65, UNLOAD7 45L4 ...[??? ERRTEST SECT FILE FGN 2 DOC 45TW # MACRO TO TEST FOR A NUMBER OF SPECIFIED FILESTORE REPLIES 46*G # AND, IF ANY OF THEM ARE FOUND, OUTPUT AN APPROPRIATE 46T6 # ERROR MESSAGE AND BRANCH TO A SPECIFIED ADDRESS. 47#Q #MACRO ERRTEST [M.B.KINGHAM 47SB #SKI %A>2-2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ERRTESTA https://www.george3.co.uk/george/macro/errtesta?rev=1705492539&do=diff ERRTESTA (GIN Macro) Defined in: REPLY-MACROS Used in: 3YPS ...[??? ERRTESTA SECT FILE FGN 2 DOC 3Y^L # RECURSIVE MACRO USED BY ERRTEST MACRO 3^F= #MACRO ERRTESTA [M.B.KINGHAM 3^YW #STR %B 42DG ( 42Y6 LDN %A ANS%B 43CQ CALL 0 M0ERRTEST 43XB +ER%B 44C2 ERRTESTA %A,%C,%D,%E,%F,%G,%H,%I,%J,%K 44WL ) 45B= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EVENTFIN https://www.george3.co.uk/george/macro/eventfin?rev=1705492539&do=diff EVENTFIN (GIN Macro) Defined in: LLSMACROS Used in: GIVE867, GIVEA867, MONEVENT867, OPCA867, PLUGIN867, REQESLIP861, SCHDJOBA867, TPINS861 59F9 ...[??? EVENTFIN SECT CENT FGN 6 DOC 59GG # 5=26 # 5=FQ # 5=^B #MAC EVENTFIN 5?F2 BRN (GEVFIN) 5?YL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXCHOFE https://www.george3.co.uk/george/macro/exchofe?rev=1705492539&do=diff EXCHOFE (GIN Macro) Defined in: MACROS EWDAS Used in: CHINTEG867, EXINONE867, NEXTUNIT867, RENAMEX867, SQOPEN867, WRITEFIP867 22FL # ********************************************************************** 22^= # * 23DW # * EXOFILE SECURITY MACROS 23YG # * 24D6 # * EXCHOFE,S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXECUTE https://www.george3.co.uk/george/macro/execute?rev=1705492539&do=diff EXECUTE (GIN Macro) Defined in: IFMACS Used in: J8GL ...[ J92= ...[ J9FW ...[??? EXECUTE SECT COMM FGN 1 DOC J9^G ...[ J=F6 ...#MAC EXECUTE J=YQ ...[ ======= J?DB ...[ J?Y2 ...[ EXECUTES A BLOCK OF CODE DELIMITED BY 'BLOCK' AND J#CL ...[ 'ENDBLOCK' MACROS. GENERATES A BRN TO THE BLOCK, J#X= ...[ AND A RETURN LABEL J*BW ... BRN %A0 J*WG ...#DEF %A1=0?+37? JBB6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXMESS https://www.george3.co.uk/george/macro/exmess?rev=1705492539&do=diff EXMESS (GIN Macro) Defined in: MACROS EWDAS Used in: CHINERR867, CHINTEG867, CHTAB, CLOSBAC867, CLOSDEL867, CONTEND867, EXINONE867, EXINTO867, INKS, NEXTUNIT867, PATCH, SCEX866, SCEXEND867, SPERION867, WRITEFIP867 KHFL # KH^= [??? EXMESS KJDW # ****** KJYG #MAC EXMESS KKD6 # KKXQ MHUNTW 1,EWDAS,EWMESS KLCB BNG 1 MEXMESS KLX2 #STR %A KMBL DOWN EXMES… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXOFAIL https://www.george3.co.uk/george/macro/exofail?rev=1705492539&do=diff EXOFAIL (GIN Macro) Defined in: MACROS EWDAS Used in: PERFAIL866 RQ92 # RQNL # ********************************************************************** RR8= # * RRMW # * MISC MACROS RS7G # * RSM6 # * EXOFAIL,MOVLONG,UDASTYPE,RNXNOCHECK,JPROP RT6Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXOFILE https://www.george3.co.uk/george/macro/exofile?rev=1705492539&do=diff EXOFILE (GIN Macro) Defined in: MACROS EWDAS Used in: BRADSPLT867, CHINTEG867, FINDFS867, MESSBA, MESSCG, MESSCI, MESSDB, PATCH, SCEX866, SCRATCH866, SQOPEN867, WRITEFIP867 9#B2 # 9#TL [??? EXOFILE 9**= # ******* 9*SW #MAC EXOFILE 9B#G # 9BS6 #SKI %A<3-3 9C?Q ! EXOFILE ! 9CRB LDN 2 BCCB 9D?2 LDN 0 0 9DQL #SKI K6EXOFILE>199-199 9F== ( 9FPW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXTEND https://www.george3.co.uk/george/macro/extend?rev=1705492539&do=diff EXTEND (GIN Macro) Defined in: MACROS RMD10 Used in: CHTAB, IDFSEG867, INKS, MESSCI #RDN ...[??? EXTEND SECT FILE FGN 16 DOC #S86 #MAC EXTEND #SMQ #STR %A,0 #T7B LDX 0 %A #TM2 TOPFCB 1 #W6L ADS 0 FSIZE(1) #WL= MBS 1,BFALTB,BFALTR #X5W LDN 0 FILESIZE #XKG BXGE 0 FSIZE(1),M1EXTEND #Y56 STO 0 FSIZE(1) #YJQ BRN %B #^4B M1EXTEND #^J2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXTRACODE https://www.george3.co.uk/george/macro/extracode?rev=1705492539&do=diff EXTRACODE (GIN Macro) Defined in: MACROS IH Used in: WTSTAT867 3YG2 # 3Y^L #MAC EXTRACODE 3^F= #MEND DOIHEMS 3^YW #TRA K90DOIHEMS 42DG +G400HOOKNO+1 42Y6 #TRA 5*G400HOOKNO+1+K90DOIHEMS 43CQ 4H%B 43XB 12H%A 44C2 %C 44WL #END 45B= #ALT G400HOOKNO=G400HOOKNO+1 45TW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXTRACOM https://www.george3.co.uk/george/macro/extracom?rev=1705492539&do=diff EXTRACOM (GIN Macro) Defined in: MACRO COMPRO Used in: =*#N ...[??? EXTRACOM SECT CENT FGN 21 DOC =*JG # =B46 [ THIS RESTORE-TIME MACRO ALLOWS GEORGE PROGRAMMERS =BHQ [ TO INCORPORATE AN EXTRA BUILT-IN COMMAND, ZZ =C3B # =CH2 #MAC EXTRACOM =D2L #MEN VCLASTWO =DG= #TRA K98VCLASTWO =D^W BICE ZZ,ZZ,+0,%A,%B =FFG #END =F^6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) EXTRACOR https://www.george3.co.uk/george/macro/extracor?rev=1705492539&do=diff EXTRACOR (GIN Macro) Defined in: COREMACROS Used in: COMPSG4, CORE867, GIVE867 HHGQ # HJ2B #MAC EXTRACOR [EXTENDS AN O/P WITHOUT SWAPOUT HJG2 [%A=ADDR OF WORD CONTG NEW REQU;J TO %B IF SUCCESSFUL HJ^L LDX 2 FX2 HKF= BRN MEXT2 HKYW MEXT1 SMO JOBRING+FPTR(2) [S/R TO J TO MEXT3 IF O/P NOT SWPD IN HLDG LDX 0 JMISC-AJBRING HLY6 SLL 0 9 [B9 OR B10 OF JMISC SET IF O/P IN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FADDRESS https://www.george3.co.uk/george/macro/faddress?rev=1705492539&do=diff FADDRESS (GIN Macro) Defined in: MACROS JSR Used in: ANTIC867, ATTACHC867, CAFSPERI867, CIMOP867, CLOSBAC867, CONIPB8, CONMXB8, CONMXC8, CPOBJ6, CROBJ6, DRSTART6, DRUM852, EXINONE867, FHLIST867, FHOBJ860, FHOBJDIR860, GETWORD867, HLSREAD867, INMOP867, IPCON864, LOAD60, LPOBJ6, LPTWO7, MEXTSJ70, MONRESUM850, NETOFLNE867, OPCAXCOD5, PERION867, READSPEC867, RENAMEX867, REQESLIP861, SCHDJOBA867, SCHEDJOB867, SIMULPTR60, SPERION867, SQOPEN867, TPOBJ867, TROBJ867 F*8Q #MAC FADDRESS [J.S.RAYN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FAILCLEAR https://www.george3.co.uk/george/macro/failclear?rev=1705492539&do=diff FAILCLEAR (GIN Macro) Defined in: MACROS Used in: CLOSEALT864 CYH4 ...[??? FAILCLEA SECT FILE FGN 9 DOC CYQW #MAC FAILCLEAR C^=G STO 3 BSL1 C^Q6 LDX 0 %B D29Q ANDX 0 BSTSMASK D2PB STO 0 GEN0 D392 FINDFAIL 3,GEN0,%A,CFL,M3FAILCLEAR D3NL NGN 1 1 D48= M1FAILCLEAR D4MW LDX 0 2(3) D57G STO 0 0(3) D5M6 TXU 0 1 D66Q BCC M2FAILCLEAR D6LB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FAILURE https://www.george3.co.uk/george/macro/failure?rev=1705492539&do=diff FAILURE (GIN Macro) Defined in: MACROS RMD10 Used in: LOADERI867, MESSAG, MESSB, MESSBA, MESSBG, MESSBH, MESSDB, MESSDC, PMFSB84, RESTERR864, RITEFAIL864 39NL ...[??? FAILURE SECT FILE FGN 16 DOC 3=G6 ...# MACRO TO CHANGE BLOCK NOS IN FILESTORE BLOCKS, ACTS, AND Q-BLOCKS 3=WW ...#MAC FAILURE 3??L ...[ THIS MACRO SEARCHES THE ACTIVITY CHAIN WITH DETOURS VIA THE 3?NB ...[ WORKFILE RINGS & THEN THE FILE CHAIN LOOKING FOR BLOCKS WHICH NEED TO 3#56 ...[ BE UPDATED BY TH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FASTCONC https://www.george3.co.uk/george/macro/fastconc?rev=1705492539&do=diff FASTCONC (GIN Macro) Defined in: MACS CONC Used in: 2L^W #MAC FASTCONC 2MFG KEEPCHAP 10,CONMXC,PROFLAG 2M^6 KEEPCHAP 11,CONMXC,PROFLAG 2NDQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FASTREWIND https://www.george3.co.uk/george/macro/fastrewind?rev=1705492539&do=diff FASTREWIND (GIN Macro) Defined in: ACCESSMACROS Used in: BMINDEX866, BMOUTPUT867, BMXEND7, NEWINST867, WHATPROP865 7TPS ...[??? FASTREWI SECT FILE FGN 19 DOC 7T^L #MAC FASTREWIND 7WF= [ REWINDS TOP FILE BUT DOESN'T DISPOSE OF USAGE BLOX 7WYW TOPFCA %A 7XDG NGS %A FREADBLOCK(%A) 7XY6 NGS %A FREADWORD(%A) 7YCQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FBIDEXEC https://www.george3.co.uk/george/macro/fbidexec?rev=1705492539&do=diff FBIDEXEC (GIN Macro) Defined in: CHCHCOORMAC2 Used in: X4M= ...# X56W ...[??? FBIDEXEC SECT FGN 1 DOC X5LG ...#MAC FBIDEXEC X666 ...#STR *ON,%A X6KQ ...( X75B ...#STR *OFF,%A X7K2 ...( X84L ...#UNS K%A X8J= ...( X93W ...#MEN SETUP X9HG ...#TRA K80SETUP X=36 ...#DEF 20?=34?+0?+0]&#40000000 X=GQ ...#SKI 20? X?2B ...( X?G2 ...#REP (AENDCHAPS-KTAB)/24+1 X?^L ... +0 X#F= ...) X#YW ...#DEF 20?=K%A/24 X*DG ...#DEF 21?=K%A-(20?*24) X*Y6 ...#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FC https://www.george3.co.uk/george/macro/fc?rev=1705492539&do=diff FC (GIN Macro) Defined in: MACROS SJ Used in: ARCHIVE867, ASTONIF867, BSPRUNE867, CANCRVX864, CLOSEFUL867, CLOSEND867, INCWRITE865, OPER864, OPERA864, RETURNIT867 DHWT ...[ DH^D ...[ DJ44 ...[??? FC SECT FILE FGN 24 DOC DJ?W #MAC FC [P,F DJRG LASS %B,0,INVERT DK?6 OP %A,%B,ANDS DKQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCAJO https://www.george3.co.uk/george/macro/fcajo?rev=1705492539&do=diff FCAJO (GIN Macro) Defined in: MACROS GLJ Used in: ABANDON867, ACTPRI867, ANSCOM865, BCAST867, CAPCA50, CHARGESC867, CONNECT867, CONNECTA867, CORESHED861, FINISH867, HLSREAD867, IDFENQS867, JAMSWAP865, LISTNEXT867, LISTOPEN867, LISTPREP865, LISTSEAR867, LOGACC863, OPENWORK866, ORELEND860, PROCONTX867, READFALE866, SAVEBLOK65, SAVEFILE860, SAVEJOB865, SCHDJOBA867, SCHEDJOB867, SETJOBQ867, SWAP865, UNPLUG867, UNSAVE867, WORKFILE860, WSJOBSA867, WTSTAT867 82L4 ...[??? FCAJO SECT CENT FGN 18 DO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCANO2 https://www.george3.co.uk/george/macro/fcano2?rev=1705492539&do=diff FCANO2 (GIN Macro) Defined in: RING-MACROS Used in: #P2J ...[??? FCANO2 SECT FILE FGN 20 DOC #P=B #MAC FCANO2 #PQ2 [ #Q9L [ SET %A -> SECOND FCA IN FILECHAIN,BRN %B IF NOT PRESENT #QP= [ #R8W TOPFCA %A,%A #RNG NXFCA %A,%A,%B #S86 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCAPCA https://www.george3.co.uk/george/macro/fcapca?rev=1705492539&do=diff FCAPCA (GIN Macro) Defined in: MACROS GLJ Used in: CIMOP867, COMMFILE82, COMPCHAN84, CONTXCOD60, DOMONOP867, FHOBJIND860, FREEBUFF860, INMOP867, LOADPROG865, LOGACC863, MONRESUM850, OLPODD865, OPILLS70, PLUGIN867, RUNPROG840 6HQ4 ...[??? FCAPCA SECT CENT FGN 18 DOC 6H^W # 6JFG # 6J^6 #MAC FCAPCA [FIND CPA FROM PCA 6KDQ [ 6KYB #STR %B 6LD2 MOD LDX %A JOBRING+FPTR,%B 6LXL #STR %B 6MC= #SKI 6MWW LDX %A JOBR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCATP https://www.george3.co.uk/george/macro/fcatp?rev=1705492539&do=diff FCATP (GIN Macro) Defined in: MACROS GLJ Used in: 8M6# ...[??? FCATP SECT CENT FGN 18 DOC 8MB6 # 8MTQ # THIS MACRO LOCATES THE CPA FROM THE TP.PCA WHETHER IT IS 8N*B # ON THE JOB RING OR NOT.IT WORKS IF THE PROG IS NOT RCTP 8NT2 # 8P#L #MAC FCATP 8PS= #STR %B 8Q?W LDX %A %B 8QRG LDX 0 JOBRING+BPTR(%A) 8R?6 BNZ 0 MFCATP [J IF PCA NOT ON JOB RING 8RQQ FINDPUC %A,%A [… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCBFIND https://www.george3.co.uk/george/macro/fcbfind?rev=1705492539&do=diff FCBFIND (GIN Macro) Defined in: RING-MACROS Used in: ARCHIVE867, CLOSEAB863, COMPOST867, ERASEA867, FHDIRTWO864, HOWBIG867, INCEOT865 J*74 ...[??? FCBFIND SECT FILE FGN 20 DOC J*BW #MAC FCBFIND JBB6 ... HUNT 1,FILE,ENT JBTQ ...#SKI %A-6 JC*B ... STO 6 %A JCT2 ... STO 2 GEN0 [CLEAR WORKING AREA JD#L ... STO 3 GEN1 JDS= ... LDX 0 ELOC1(1) JF?W ... BASEFCB 3,FILE,MFCBFIND7,6 JFRG ...MFCBFIND1 JG?6 ... BX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCBNO2 https://www.george3.co.uk/george/macro/fcbno2?rev=1705492539&do=diff FCBNO2 (GIN Macro) Defined in: RING-MACROS Used in: BMINDEX866, CLOSFREZ867, COPYFILA867 #SCY ...[??? FCBNO2 SECT FILE FGN 20 DOC #SMQ #MAC FCBNO2 #T7B [ #TM2 [ SET %A -> SECOND FCB,BRN %B IF NOT THERE #W6L [ #WL= FCANO2 %A,%B #X5W PSTAC %A,%A #XKG BFCBX %A,%A #Y56 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCEND https://www.george3.co.uk/george/macro/fcend?rev=1705492539&do=diff FCEND (GIN Macro) Defined in: MACROS FIXD Used in: FCEND, INKS 4WGY ...[??? FCEND SECT CENT FGN 13 DOC 4WQQ # 4X=B # 4XQ2 # 4Y9L #MAC FCEND [FOR INSERTION AFTER F/C MEND 4YP= #ALT JFCT=37?+0? 4^8W ...#END %A 537B #MEN LOADERI 53M2 #TRA JLVAR 546L ... +JFCT>JFCS-AENDCHAPS 54L= #END 555W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCENDV https://www.george3.co.uk/george/macro/fcendv?rev=1705492539&do=diff FCENDV (GIN Macro) Defined in: MACROS FIXD Used in: 57RS ...[??? FCENDV SECT CENT FGN 13 DOC 583L # 58H= #MAC FCENDV 592W #ALT APATPT=37?+0? 59GG #SKI APATLEN-APATPT+APATPI&#40000000 5=26 ( 5=FQ ! PATCH SPACE WILL NOT BE LOADED 5?F2 ) 5?YL ...#END %A 5#D= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCJOB https://www.george3.co.uk/george/macro/fcjob?rev=1705492539&do=diff FCJOB (GIN Macro) Defined in: HUNTMACS1 Used in: ACCESS867, CDCIPB864, CHEKPRIV867, ERASE867, INCRCUBS860, INCRCUBX860, IPCOPENA83, IPCOPENB83, IPCPERI83, MAKEFILE863, MONFIL865, MONFILEA864, MONJRNAL850, ONLINCL864, OWNERCHE84, WLA867 3*ND ...[??? FCJOB SECT CENT FGN 1 DOC 3*Y= # 3BCW #MAC FCJOB 3BXG [ 3CC6 [ FINDS CURRENT JOB BLOCK FROM A SUBSET OF PCA CPA OLPA ACTIVITIES 3CWQ [ DEFINED BY %C %D %E 3DBB [ %A MODIFIER TO POINT TO JOB BLOCK; %B PNTR T… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCMEND https://www.george3.co.uk/george/macro/fcmend?rev=1705492539&do=diff FCMEND (GIN Macro) Defined in: MACROS FIXD Used in: 4QKY ...[??? FCMEND SECT CENT FGN 11 DOC 4QTQ # 4R*B # 4RT2 [ THESE MACROS IMPLEMENT THE FIXED CORE MEND SYSTEM 4S#L # 4SS= #MAC FCMEND [FOR INSERTION IN FRONT OF F/C MEND 4T?W #MEN CEND 4TRG #TRA JFCT 4W?6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCMENDV https://www.george3.co.uk/george/macro/fcmendv?rev=1705492539&do=diff FCMENDV (GIN Macro) Defined in: MACROS FIXD Used in: 55*N ...[??? FCMENDV SECT CENT FGN 11 DOC 55KG # 5656 #MAC FCMENDV 56JQ ...#MEN REPLAC 574B #TRA APATPT 57J2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FCONDCBE https://www.george3.co.uk/george/macro/fcondcbe?rev=1705492539&do=diff FCONDCBE (GIN Macro) Defined in: MACS CONC Used in: 2RBG #MAC FCONDCBE [D. WEBSTER 2RW6 #STR %B,7 2S*Q LDX 7 %B 2STB #STR %A,%C 2T*2 HUNT2 %A,AMXOR,CSTATE,%C 2TSL #STR %A,%C 2W#= #SKI 2WRW HUNT2 %A,AMXOR,CSTATE 2X?G LDX %A A1+FPTR(%A) 2XR6 SBX 7 IDNUM(%A) 2Y=Q LDN 0 CONDCBLEN 2YQB STO 0 %D 2^=2 MPY 7 %D 2^PL ADX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDESC https://www.george3.co.uk/george/macro/fdesc?rev=1705492539&do=diff FDESC (GIN Macro) Defined in: MACROS JSRG4 Used in: ?7Y= #MAC FDESC [J.S.RAYNER.G4 ONLY ?8CW LDX 0 %A ?8XG SRL 0 4 ?9C6 ANDX %A B0T13 ?9WQ DCH 0 %A ?=BB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDPTE https://www.george3.co.uk/george/macro/fdpte?rev=1705492539&do=diff FDPTE (GIN Macro) Defined in: MACROS JSRG4 Used in: J3LB #MAC FDPTE [JSRAYNER G4 ONLY J462 LDX 0 %B J4KL SRL 0 6 J55= MOD ADX 0 ASEGTAB,%C J5JW #STR %D J64G ( J6J6 LDCT 1 #600 [CHECK THAT SEG TABLE LONG ENOUGH J73Q ANDX 1 0 J7HB LDCH 1 BLENCH(1) J832 SLL 1 6 J8GL ANDX 1 %B J92= BNZ 1 %D [J IF NOT J9FW ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDPTLEN https://www.george3.co.uk/george/macro/fdptlen?rev=1705492539&do=diff FDPTLEN (GIN Macro) Defined in: MACROS GLJ Used in: BB^6 #MACRO FDPTLEN BCDQ LDX %A %B BCYB #STRING %C BDD2 STO %A %C BDXL FDESC %A BFC= MOD LDX %A 0,%A BFWW SLC %A 10 BGBG ANDN %A #160 BGW6 #STRING %C BH*Q ( BHTB SBN %A 1 BJ*2 ORS %A %C BJSL ERS %A %C BK#= ADN %A 1 BKRW ) BL?G #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMAUTO https://www.george3.co.uk/george/macro/fdrmauto?rev=1705492539&do=diff FDRMAUTO (GIN Macro) Defined in: OLPMACROS Used in: APPEND864, COMMFILE82 3GJN ...[??? FDRMAUTO SECT FILE FGN 7 DOC 3GSG [ 3H#6 [ FDRMAUTO IS USED BY ACCESS SYSTEM TO TICKLE SUSINED PROGRAMS 3HRQ [ %A=APPWAIT OR STEPWAIT 3J?B #MAC FDRMAUTO 3JR2 SMO FX2 3K=L LDX 1 FILERING 3KQ= ADX 1 FBACKPOINT(1) 3L9W LDX 2 BPTR(1) 3LPG LDN 0 FCB%A 3M96 ANDX 0 FINFC(2) 3MNQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMAUTX https://www.george3.co.uk/george/macro/fdrmautx?rev=1705492539&do=diff FDRMAUTX (GIN Macro) Defined in: OLPMACROS Used in: CLOSEND867, ORELEND860 3^P4 ...[??? FDRMAUTX SECT FILE FGN 7 DOC 3^YW [ 42DG [ USED BY OPEN & CLOSE TO TICKLE WHEN LAST OPENER CLOSES FILE 42Y6 [ OR FIRST OPENER OPENS FILE 43CQ [ %A IS X3->X7 & CONTAINS FCBAPPWAIT OR FCBSTEPWAIT AS APPROPRIATE 43XB #MAC FDRMAUTX 44C2 SMO FX2 44WL LDX 1 FILERING 45B= ADX 1 FBACKPOINT(1) 45TW LDX 2 BPTR(1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMCHECK https://www.george3.co.uk/george/macro/fdrmcheck?rev=1705492539&do=diff FDRMCHECK (GIN Macro) Defined in: OLPMACROS Used in: STEP864 3B84 ...[??? FDRMCHEC SECT FILE FGN 7 DOC 3BCW [ 3BXG [ FDRMCHECK IS USED IN STEP(APPEND) TO CHECK IF THERE ARE ANY DRM WAITER 3CC6 [ %A(MODIFIER)->FCB 3CWQ [ %B-LABEL IF WAITERS 3DBB #MAC FDRMCHECK 3DW2 LDN 0 FCBSTEPWAIT 3F*L ANDX 0 FINFC(%A) 3FT= BNZ 0 %B 3G#W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMOFF https://www.george3.co.uk/george/macro/fdrmoff?rev=1705492539&do=diff FDRMOFF (GIN Macro) Defined in: OLPMACROS Used in: OPCA867 2^^D ...[??? FDRMOFF SECT FILE FGN 7 DOC 329= [ 32NW [ FDRMOFF %A->PRB RECORD 338G #MAC FDRMOFF 33N6 LDCT 0 #200 347Q SMO 1(%A) 34MB ANDX 0 BFSTATE-CHAINADD 3572 SMO 1(%A) 35LL ERS 0 BFSTATE-CHAINADD 366= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMON https://www.george3.co.uk/george/macro/fdrmon?rev=1705492539&do=diff FDRMON (GIN Macro) Defined in: OLPMACROS Used in: OPCA867 2W4D ...[??? FDRMON SECT FILE FGN 7 DOC 2W#= [ MACROS USED IN IMPLEMENTATION OF DRM ON COMMUNICATION FILES 2WRW [ FIRST 2 USED IN PCA WHEN PLUGGED IN - FOR ALLOT EXTRACODE 2X?G [ FDRMON %A->PRB RECORD 2XR6 #MAC FDRMON 2Y=Q LDCT 0 #200 2YQB SMO 1(%A) 2^=2 ORS 0 BFSTATE-CHAINADD 2^PL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMQUERY https://www.george3.co.uk/george/macro/fdrmquery?rev=1705492539&do=diff FDRMQUERY (GIN Macro) Defined in: OLPMACROS Used in: COMMFILE82, PERION867 4J=S ...[??? FDRMQUER SECT FILE FGN 7 DOC 4JGL [ 4K2= [ USE BY SERIAL ACCESS SYSTEM TO AVOID COOR & LONGSET IF DRM CASE 4KFW #MAC FDRMQUERY 4K^G LDCT 0 #200 4LF6 SMO FX2 4LYQ ANDX 0 BFSTATE 4MDB BNZ 0 %A 4MY2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDRMTEST https://www.george3.co.uk/george/macro/fdrmtest?rev=1705492539&do=diff FDRMTEST (GIN Macro) Defined in: OLPMACROS Used in: CPOBJ6, CROBJ6, FHOBJ860, LPOBJ6, SIMULPTR60, TPOBJ867, TROBJ867 36B4 ...[??? FDRMTEST SECT FILE FGN 7 DOC 36KW [ 375G [ FDRMTEST IS USED BY OFFLINE PERI SEGMENTS TO TEST IF DRM IS APPLICABLE 37K6 [ %A=APPWAIT OR STEPWAIT 384Q [ %B-LABEL TO JUMP TO IF NOT DRM OR NOT OPEN COMUNALLY 38JB #MAC FDRMTEST 3942 LDX 2 FX2 39HL JNOTFDRM %B 3=3= TOPFCA2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FDTENT https://www.george3.co.uk/george/macro/fdtent?rev=1705492539&do=diff FDTENT (GIN Macro) Defined in: DUMP-MACROS Used in: DTREST860, DTSCAN860, DTSTART867, DTSUBSA867, DTSUBSS867, INCDTA865, INCOBS867, LIBLOAD867, SCHEDMTX867, UNLOAD7, UNLOADMT867 7=ND ...[??? FDTENT SECT FILE FGN 65 DOC 7=Y= #MAC FDTENT 7?CW #OPT M1FDTENT=0 7?XG LDX %A BOLC 7#C6 LDX %A A1(%A) 7#WQ #STR %C 7*BB BZE %A %C 7*W2 #STR %C 7B*L #SKI 7BT= BZE %A M2FDTENT 7C#W SLL %A 2 7CSG ADX %A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FFCA https://www.george3.co.uk/george/macro/ffca?rev=1705492539&do=diff FFCA (GIN Macro) Defined in: RING-MACROS Used in: MTCHECK860, READFAIL866, READFALE866 H284 ...[??? FFCA SECT FILE FGN 20 DOC H2CW #MAC FFCA H2XG BNG 3 M1FSTAC H3C6 CALL 0 (HSFSTACKF) H3WQ M1FSTAC H4BB CALL 0 (HSFSTACKB) H4W2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FFFNORM https://www.george3.co.uk/george/macro/fffnorm?rev=1705492539&do=diff FFFNORM (GIN Macro) Defined in: MACROSAJE Used in: 2R6N ...[??? FFFNORM SECT COMM FGN 8 DOC 2RBG # 2RW6 # 2S*Q #MAC FFFNORM [FFFNORM - FANTASTICALLY FAST FNORM 2STB DOWN FFFNORM,1 [CONVERTS <FILE-DESCRIPTION> POSSIBLY 2T*2 #STR %A [INCLUDING <DETAILS> HELD IN A FNAME 2TSL BRN %A [INOT A FABSNB. IF ERROR EXITS TO %A 2W#= #STR %A [(… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FFINDEXB https://www.george3.co.uk/george/macro/ffindexb?rev=1705492539&do=diff FFINDEXB (GIN Macro) Defined in: INDEX-MACROS Used in: BMAPONE867, BMINDEX866, CREALEX864, INCMON865 2X3N ...[??? FFINDEXB SECT FILE FGN 9 DOC 2X?G #MAC FFINDEXB 2XR6 # THIS MACRO PINDS THE FINDEXB BLOCK GIVEN %A -> FCA 2Y=Q PSTAC %B,%A 2YQB M1FFINDEXB 2^=2 LDX %B FPTR(%B) 2^PL #SKI IFS<1$1 329= BXE %B CXFI,M2FFINDEXB 32NW LDX 0 ATYPE(%B) 338G SMO FX1 33N6 BXE 0 M3FFINDEXB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FFSTDESC https://www.george3.co.uk/george/macro/ffstdesc?rev=1705492539&do=diff FFSTDESC (GIN Macro) Defined in: MACROS JSRG4 Used in: D48= #MAC FFSTDESC [J.S.RAYNER.G4 ONLY D4MW FDESC %A [ADDR OF ONE OF THE TABLES DESC WORDS D57G MOD LDX 0 0,%A D5M6 SLC 0 7 D66Q ANDN 0 15 [EXTRACT LENGTH OF TABLE D6LB NGX 0 0 D762 ANDX %A 0 [ADDR OF FIRST DESC WORK D7KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FHDIROPT https://www.george3.co.uk/george/macro/fhdiropt?rev=1705492539&do=diff FHDIROPT (GIN Macro) Defined in: MACROS HFD8 Used in: 6J^6 ...[??? FHDIROPT SECT FILE FGN 22 DOC 6KDQ ...#MAC FHDIROPT 6KYB ...#STR %A,NOWRITE 6LD2 ...#SKI 6LXL ...( 6MC= ...#MEN FHOBJ 6MWW ...#TRA K98FHOBJ 6NBG ... #50200000 6NW6 ...#END 6P*Q ...#EXI 6PTB ...) 6Q*2 ...#STR %A,NORMAL 6QSL ...#SKI 6R#= ...( 6RRW ...#MEN FHOBJ 6S?G ...#TRA K98FHOBJ 6SR6 ... #56200000 6T=Q ...#END 6TQB ...#MEN FHOBJDIR 6W=2 ...#TRA K98FHOBJDIR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FHONLINE https://www.george3.co.uk/george/macro/fhonline?rev=1705492539&do=diff FHONLINE (GIN Macro) Defined in: OLPMACROS Used in: 9XX2 ...[ 9YBL ...[??? FHONLINE SECT FILE 9YW= ...[ SWITCHES ON AND OFF THE SETTING OF BIT 1 IN ONLINE FH MODE #12 9^*W ...#MAC FHONLINE 9^TG ...#MEN FHOBJIND =2*6 ...#TRA K80FHOBJIND =2SQ ...#STR %A,ON =3#B ...#SKI =3S2 ...( =4?L ... NULL =4R= ...#END =5=W ...#EXI =5QG ...) =6=6 ...#STR %A,OFF =6PQ ...#SKI =79B ...( =7P2 ... BRN K81FHOBJIND =88L ...#END =8N= ...#EXI =97W… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FI https://www.george3.co.uk/george/macro/fi?rev=1705492539&do=diff FI (GIN Macro) Defined in: IFMACS Used in: ARCHIVE867, ASTONIF867, CONSET864, EDITPT867, EDWRITE867, FORMLOOP865, GETFREE867, GETFREEB864, GETWORD867, HOWBIG867, IDFASAT867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTDIRF867, LISTFILE867, LISTIDF867, LISTINIT867, LISTLOOP867, LISTNEXT867, LISTOPEN867, LISTPARS867, LISTRING864, MESSAB, MESSAF, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, PERCON867, PERFCHAP866, PERFPASS864, RAECOMMS867, SHOWCOMM864, TPOBJ867, TROBJ867, WA864, WHATGENS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIELDALT https://www.george3.co.uk/george/macro/fieldalt?rev=1705492539&do=diff FIELDALT (GIN Macro) Defined in: COMPMACMOON Used in: 29#W ...[??? FIELDALT SECT FILE FGN 11 DOC 29*B ...#MAC FIELDALT 29*W ...#ALT %A=(%B-1)@L19+%D+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%- 29BB ...C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C[ 29BW ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIELDDEF https://www.george3.co.uk/george/macro/fielddef?rev=1705492539&do=diff FIELDDEF (GIN Macro) Defined in: COMPMACMOON Used in: BMSTREAM853, BSPRUNE867, COMPS ACTBLK, COMPS FIXD, COMPS OPER, COMPS RMD13, COMPS SAR9, COMPS SHFS, COMPSDUMP, FILECOMPS, LINECTRL864, LLSBITS, RESTMERG864, WHATPERB867 23YG #MAC FIELDDEF 24D6 #DEF %A=(%B-1)@L19+%D+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%- 24XQ C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C+%C[ 25CB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEA https://www.george3.co.uk/george/macro/filea?rev=1705492539&do=diff FILEA (GIN Macro) Defined in: CLOSE-MACROS Used in: 636S ...[??? FILEA SECT FILE FGN 11 DOC 63BL #MAC FILEA 63W= ...[ CALCULATE POINTERS,SET GEN1 & GEN2 TO B.S.HOME PAIR OF BLOCK TO BE TRA 64*W ...M2FILEA 64TG #STR %A,3 65*6 LDX 3 %A 65SQ #STR %A 66#B #SKI 66S2 LDN 3 0 67?L ... CALL 0 M1FILETRAN [X1-> FCB, X2-> FCA 67R= ...#STR %C 68=W ... SMO %C 68QG ...#STR %C 69=6 #SKI 69PQ SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEAUTR https://www.george3.co.uk/george/macro/fileautr?rev=1705492539&do=diff FILEAUTR (GIN Macro) Defined in: CLOSE-MACROS Used in: DROBJ864, EDOBJ864, MTCODE864 7PSS ...[??? FILEAUTR SECT FILE FGN 11 DOC 7Q4L #MAC FILEAUTR 7QJ= ... FILEA %A,%C,%D 7R3W #STR %C 7RHG READAUTO %B,%C,,GEN1,GEN2,%E,%F 7S36 #STR %C 7SGQ #SKI 7T2B READAUTO %B,BSBS,,GEN1,GEN2,%E,%F 7TG2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEAUTW https://www.george3.co.uk/george/macro/fileautw?rev=1705492539&do=diff FILEAUTW (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, CLOSEDIR867, COMPRESS864, DELETE864, DROBJ864, EDOBJ864, MTCODE864, MTOBJ864, PERUSFIL84, RAND864, READFILE84, REWRITE864 7G2S ...[??? FILEAUTW SECT FILE FGN 11 DOC 7G=L #MAC FILEAUTW 7G#3 ...# 7G*D ...#STR %B 7GBT ...#DEF M2FILEAUTW = BSET+BOBJ&(%B) 7GD= ...#OPT M2FILEAUTW = 0 7GFM ...# 7GH4 ...#STR NOCHECK,%G 7GJF ...#DEF M3FILEAUTW = 0 7GKW ...#OPT M3FILEAUTW = 1 7GM? ...# 7GNN ...#DEF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILECOUNT https://www.george3.co.uk/george/macro/filecount?rev=1705492539&do=diff FILECOUNT (GIN Macro) Defined in: RING-MACROS Used in: ALASB867, CONNECT867, INSERT6, LDSTART850, LOGANAL864, LOGOUT867, RESTERR864, RESTLIMB864, RESTOREA866, SJOPEN863, SUICIDE864, UNSAVE867 8N5J ...[??? FILECOUN SECT FILE FGN 20 DOC 8N*B #MAC FILECOUNT 8NT2 FILENUMB %A 8P#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEFORM https://www.george3.co.uk/george/macro/fileform?rev=1705492539&do=diff FILEFORM (GIN Macro) Defined in: DUMP-MACROS Used in: BSPRUNE867 =YB4 ...[??? FILEFORM SECT FILE FGN 65 DOC =YKW # =^5G #MAC FILEFORM =^6? ... SEGENTRY K12BSPRUNE =^74 ... BRN M3FILEFORM =^7T ... LDX 3 EAVACC(1) [PARAMETERS SPECIFIED =^8L ... MPY 3 BSUJFORM2 =^9C ... STO 4 2 =^=8 ... LDX 3 GMTNOW =^=^ ... SBX 3 EGMTLA(1) =^?Q ... MPY 3 BSUJFORM3 =^#H ... ADX 2 4 =^*# ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILELOG https://www.george3.co.uk/george/macro/filelog?rev=1705492539&do=diff FILELOG (GIN Macro) Defined in: MACROS RM59B Used in: CHTAB, CONNECT867, INKS, LOGOUT867 3BMN ...[??? FILELOG SECT FILE FGN 6 DOC 3BXG #MAC FILELOG 3CC6 DOWN FILELOG,1 3CWQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEMOVE https://www.george3.co.uk/george/macro/filemove?rev=1705492539&do=diff FILEMOVE (GIN Macro) Defined in: RING-MACROS Used in: ADDICT865, BACKMAP864, BMCNTRL866, BMOUTPUT867, COPYA867, COPYB867, CREALEX864, EDIT867, EDITET7, EDITMFO867, INCCHECK860, IPBLISTC867, IPBLISTD867, JOBLIST867, LISTINIT867, LISTLOOP867, LISTPREP865, LOGANAL864, PCTLISTA867, PERFCHAP866, RENGAGE851, RESTEND850, SAVEFILE860 FM94 ...[??? FILEMOVE SECT FILE FGN 20 DOC FMDW # FMYG # THIS MACROS MOVES A FILE FROM ONE LEVEL TO ANOTHER IN A GIVEN ACTIVITY FND6 # FNXQ #M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILENUMB https://www.george3.co.uk/george/macro/filenumb?rev=1705492539&do=diff FILENUMB (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, BMQUEST866, CHANFILE8, CLOSEDIR867, COPYA867, CREALEX864, DELETE864, FILEMAP, OFFREL867, OPENWAIT867, PERFCHAP866, PERUSFIL84, READFILE84, REWRITE864, SAVEJOB865, STEP864 87^Y ...[??? FILENUMB SECT FILE FGN 20 DOC 889Q #MAC FILENUMB 88PB [ PUTS NO. OF FILES OPEN IN %A 8992 [ ACT-POINTED TO BY %B, DEFAULT FX2 89NL #ACC %A 8=8= ( 8=MW LDN 0 1 8?7G STOZ %A 8?M6 ) 8#6Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEOPEN https://www.george3.co.uk/george/macro/fileopen?rev=1705492539&do=diff FILEOPEN (GIN Macro) Defined in: RING-MACROS Used in: INLOOP84, REPERR867 85F8 ...[??? FILEOPEN SECT FILE FGN 20 DOC 85RL #MAC FILEOPEN 86?= LDX 2 FX2 86QW LDN 0 FILERING(2) 87=G BXE 0 FILERING(2),%A 87Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEREAD https://www.george3.co.uk/george/macro/fileread?rev=1705492539&do=diff FILEREAD (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, DELETE864, DROBJ864, EDOBJ864, MTCODE864, MTOBJ864, PERUSFIL84, RAND864, READFILE84, REWRITE864 6W^D ...[??? FILEREAD SECT FILE FGN 11 DOC 6X9= #MAC FILEREAD 6X9C ...# 6X9J ...# SET M4FILEREAD TO ZERO 6X9P ...# IF %B CONTAINS BSET OR BOBJ 6X9W ...# OR IF %G IS NOCHECK 6X=3 ...# 6X=8 ...#STR %B 6X=* ...#DEF M2FILEREAD = BSET+BOBJ&(%B) 6X=G ...#OPT M2FILEREAD =… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILETRAN https://www.george3.co.uk/george/macro/filetran?rev=1705492539&do=diff FILETRAN (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, CLOSEALT864, CLOSEDIR867, COMPRESS864, DELETE864, DROBJ864, EDOBJ864, MTCODE864, MTOBJ864, PERUSFIL84, RAND864, READFILE84, REWRITE864 22^= ...# 23DW ...# 23YG ...[??? FILETRAN SECT FILE FGN 11 DOC 24D6 ...# 24XQ ...[??? FILEA SECT FILE FGN 11 DOC 25CB ...# 25X2 ...[??? FILEREAD SECT FILE FGN 11 DOC 26BL ...# 26W= ...[??? FILEAUTW SECT FILE FGN 11 DOC 27*W ...# 27TG ...[??? FILEWRIT SECT FI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEWAIT https://www.george3.co.uk/george/macro/filewait?rev=1705492539&do=diff FILEWAIT (GIN Macro) Defined in: MACROS Used in: COPYFILE867 3LFN ...[??? FILEWAIT SECT FILE FGN 9 DOC 3LPG # 3M96 #MAC FILEWAIT 3MNQ M13FILEWAIT 3N8B HUNTW 2,BSTB,FULLB 3NN2 BNG 2 M1FILEWAIT [ERROR IF NOT THERE 3P7L LDX 0 A1(2) [RECORD HEADER 3PM= SBN 0 2 3Q6W STO 0 BATEMAN3 [NO. OF BLOCK NOS 3QBN ... BZE 0 M91FILEWAIT [EXIT IF FILE EMPTY 3QLG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILEWRITE https://www.george3.co.uk/george/macro/filewrite?rev=1705492539&do=diff FILEWRITE (GIN Macro) Defined in: CLOSE-MACROS Used in: 7KXS ...[??? FILEWRIT SECT FILE FGN 11 DOC 7L7L #MAC FILEWRITE 7LFM ... FILEA %A,%C,%D 7LRN ... SMO FX2 7LTX ... LDX 2 FPTR 7LY6 ... CHECKBL 1,2,M1FILEWRITE 7M2* ... DOWN READFAIL,5 7M4J ...M1FILEWRITE 7M6W #STR %C 7MLG #SKI 7N66 BACKWRIT %B,BSBS,%G,GEN1,GEN2,%E,%F 7NKQ #STR %C 7P5B BACKWRIT %B,%C,%G,GEN1,GEN2,%E,%F 7PK2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FILL https://www.george3.co.uk/george/macro/fill?rev=1705492539&do=diff FILL (GIN Macro) Defined in: MACROS JSR Used in: CROBJ6 FK2Q #MAC FILL [J.S.RAYNER GEORGE 3 VERSION FKGB MOD ADX %B ADATUM,%A FL22 SMO %B FLFL STO %C 0 FL^= LDX 0 %D FMDW BCT 0 MFILL1 FMYG BRN MFILL2 FND6 MFILL1 FNXQ SMO %B FPCB LDN %C 1 FPX2 SMO 0 FQBL MOVE %B 0 FQW= MFILL2 FR4G ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIND https://www.george3.co.uk/george/macro/find?rev=1705492539&do=diff FIND (GIN Macro) Defined in: HUNTMACS1 Used in: CREALEX864, MESSD, MTCHECK860 58R4 ...[??? FIND SECT CENT FGN 1 DOC 592W # 59GG #MAC FIND 5=26 LDX 0 %B 5=FQ CALL %A (JFIND%A) 5=^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDACTFB https://www.george3.co.uk/george/macro/findactfb?rev=1705492539&do=diff FINDACTFB (GIN Macro) Defined in: HUNTMACS1 Used in: ASSIGN860, DSCNCT867, GETNO865, GETNOR8, INCDTA865, INCEOT865, INCMON865, INCSTART865, IPBIN867, IPBJOURN867, IPBOUT867, IPBSTARB867, IPCEN8, IPCGEO8, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPCOPENB83, IPCPERI83, IPCSTART864, IPQUAKER865, MTDUMP860, ONLINCL864, RELPER867, TRIPB83 2S5Y ...[??? FINDACTF SECT CENT FGN 1 DOC 2S*Q # 2STB # 2T*2 #MAC FINDACTFB [SEARCHES FORWARDS OR BACKWARD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDACTNO https://www.george3.co.uk/george/macro/findactno?rev=1705492539&do=diff FINDACTNO (GIN Macro) Defined in: HUNTMACS1 Used in: BMJLSLAV864, CIMOP867, FHLIST867, INMOP867, LOADERR70, LOADFIN860, MOPCOMB865, OFFREL867, SAVEFILE860, SUICIDE864 38#J ...[??? FINDACTN SECT CENT FGN 1 DOC 38JB # 3942 #MAC FINDACTNO [ACC %A:=ACTIVITY WHOSE NO IS [%B] 39HL LDX 0 %B 3=3= LDN %A BACT 3=GW MFINDACTNO1 3?2G LDX %A ACTRING+FPTR(%A) 3?G6 SBN %A ACTRING 3?^Q #STR %C 3#FB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDACTX https://www.george3.co.uk/george/macro/findactx?rev=1705492539&do=diff FINDACTX (GIN Macro) Defined in: MACROS RMD10 Used in: CAFSPERI867, COMPCHAN84, FHOBJIND860, SJLOOP864, SJOPEN863 ?FNQ ...[??? FINDACTX SECT FILE FGN 16 DOC ?TXB # ?WC2 # ?WWL #MAC FINDACTX ?XB= ADN %A ACTRING ?XTW M1FINDACTX ?Y*G LDX %A FPTR(%A) ?YT6 BXU %B ACTNUM-ACTRING(%A),M1FINDACTX ?^#Q SBN %A ACTRING ?^SB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDBICC https://www.george3.co.uk/george/macro/findbicc?rev=1705492539&do=diff FINDBICC (GIN Macro) Defined in: MACRO COMPRO Used in: J^CG ...[??? FINDBICC SECT CENT FGN 21 DOC J^X6 ...# K2BQ ...#MAC FINDBICC K2WB ...#DEF 21?=34?+0?+0]&#37777777 K3B2 ...#SKI 22?<1$1 K3TL ...( K4*= ...#CON COMMAND '%A' NOT CANCELLABLE K4SW ...! COMMAND '%A' NOT CANCELLABLE K5#G ...#EXIT K5S6 ...) K6?Q ...#SKI 21?-20? K6RB ...( K7?2 ...#DEF 0?=0?+BICESIZE K7QL ...#DEF 22?=22?-1 K8== ... FINDBICC %A K8PW ...) K99G ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDBICE https://www.george3.co.uk/george/macro/findbice?rev=1705492539&do=diff FINDBICE (GIN Macro) Defined in: MACRO COMPRO Used in: DS*N ...[??? FINDBICE SECT CENT FGN 21 DOC DSKG #MAC FINDBICE DT56 #DEF 21?=34?+0?+0] DTJQ #SKI 22?<1$1 DW4B ( DWJ2 #CON COMMAND '%A' NOT CANCELLABLE DX3L ! COMMAND '%A' NOT CANCELLABLE DXH= #EXIT DY2W ) DYGG #SKI 21?-20? D^26 ( D^FQ #DEF 0?=0?+BICESIZE D^^B #DEF 22?=22?-1 F2F2 FINDBICE %A F2YL ) F3D= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDBICX https://www.george3.co.uk/george/macro/findbicx?rev=1705492539&do=diff FINDBICX (GIN Macro) Defined in: MACRO COMPRO Used in: F49* ...[??? FINDBICX SECT CENT FGN 21 DOC F49D ...#MAC FINDBICX F49L ...#DEF 21?=34?+0?+0] F49S ...#SKI 22?-0?<1$1 F4=2 ...( F4=8 ...#CON COMMAND '%A' NOT 'OP'ABLE F4=B ...! COMMAND '%A' NOT 'OP'ABLE F4=J ...#DEF 22?=0 F4=Q ...#EXIT F4=Y ...) F4?6 ...#SKI 21?$20? F4?# ...( F4?G ...#DEF 0?=0?+BICESIZE+1 F4?N ... FINDBICX %A F4?W ...) F4#4 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDBSA https://www.george3.co.uk/george/macro/findbsa?rev=1705492539&do=diff FINDBSA (GIN Macro) Defined in: MACROS EWDAS Used in: BSTS867, KARTCONT867, PMJOURNL866 WHJB # WJ42 [??? FINDBSA WJHL # ******* WK3= #MAC FINDBSA WKGW # WL2G #STR %B WLG6 #SKI WL^Q ( WMFB #STR %A,1 WM^2 LDX 1 %A WNDL SLL 1 1 [MULTIPLY BY 2 WNY= ADX 1 ALFTP [ADD BASE OF ALFTABLE WPCW LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDBSH https://www.george3.co.uk/george/macro/findbsh?rev=1705492539&do=diff FINDBSH (GIN Macro) Defined in: MACROS GLJ Used in: BRMB #MACRO FINDBSH BS72 SMO %B BSLL LDX 0 0(%A) BT6= ANDX 0 BSP16 BTKW BZE 0 %D BW5G #STRING %E BWK6 ( BX4Q SRC 0 11 BXJB STO 0 %E BY42 SLC 0 11 BYHL ) B^3= ANDN 0 #3777 B^GW SLL 0 3 C22G STO 0 %C C2G6 #STRING %E C2^Q ( C3FB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDCORE https://www.george3.co.uk/george/macro/findcore?rev=1705492539&do=diff FINDCORE (GIN Macro) Defined in: COREMACROS Used in: ANALYSE865, BSTS867, CHCH865, CHNUMCON867, COMPRESS864, COMPROB867, CONMXC8, COREALL865, COREALLF867, COREALLJ865, DECODE860, DOC867, DSCNCT867, EDOBJ864, ENWELL867, EXINONE867, FINDOC867, IFEXPAN867, INPUTJDF82, JWELLTWO867, LOADPROG865, LOGOUT867, MACRALAS864, MOPSTART865, MTCODE864, NORMALUS864, PARAM865, PCTSTART867, PERFLOGS866, PROGISH850, RESTLIMB864, SCEX866, SETLIST864, SETPARAM867, SETPE867, SETUPA867, SETUPB867, STRATEGY865, TRAN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDEXB https://www.george3.co.uk/george/macro/findexb?rev=1705492539&do=diff FINDEXB (GIN Macro) Defined in: INDEX-MACROS Used in: DELETE864, GETDIR860, INDEX85, LOCATE84 2NNJ ...[??? FINDEXB SECT FILE FGN 9 DOC 2NYB #MAC FINDEXB 2PD2 SFSTACK %A,%B,%B 2PXL M1FINDEXB 2QC= LDX %B FPTR(%B) 2QWW LDX 0 ATYPE(%B) 2RBG SMO FX1 2RW6 BXE 0 M2FINDEXB,M3FINDEXB 2S*Q BXU 0 FILEPLUSFCB,M1FINDEXB 2STB GEOERR 1,NOFINDEX 2T*2 M2FINDEXB 2TSL #HAL FI+FINDEXF,0 2W#=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDEXOF https://www.george3.co.uk/george/macro/findexof?rev=1705492539&do=diff FINDEXOF (GIN Macro) Defined in: MACROS EWDAS Used in: SETPC867, TWINSETB866, WHATPERB867, WSPERIS867 8N*B # 8NT2 # ********************************************************************** 8P#L # * 8PS= # * EXOF HANDLING 8Q?W # * 8QRG # * FINDEXOF,MFINDEXOF,EXOFILE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDFAIL https://www.george3.co.uk/george/macro/findfail?rev=1705492539&do=diff FINDFAIL (GIN Macro) Defined in: MACROS Used in: BSALFAIL, BSTS867, RITEFAIL864, TRANFAIL866 CCD8 ...[??? FINDFAIL SECT FILE FGN 9 DOC CCN2 #MAC FINDFAIL CD7L LDN 0 %A CDM= STO 0 EX4 CF6W LDX 0 %B CFLG STO 0 EX5 CG66 LDX 0 %C CGKQ STO 0 EX6 CH5B LDCT 0 BS%D CHK2 STO 0 EX7 CJ4L #STR %F CJJ= #SKI CK3W ( CKHG LDX 2 %C CL36 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDFCB https://www.george3.co.uk/george/macro/findfcb?rev=1705492539&do=diff FINDFCB (GIN Macro) Defined in: MACROS RM59B Used in: FREEZE864, INCVFCHK850, LOGCOM864, OPENFILE867, ORELHALF82 5L8Q ...[??? FINDFCB SECT FILE FGN 6 DOC 5MML #MAC FINDFCB 5MMY ...[ 5MN= ...[ ACCS USED AS FOLLOWS 5MNJ ...[ X0 TESTNAMX 5MNW ...[ X1 FCBRING POINTER 5MP8 ...[ X2 POINTER TO THE REQUIRED NAME IN FABS 5MPG ...[ X3 =0 IF USER NAME OR ELSE POINTER TO SUPUSER NAME 5MPS ...[ X4 LOCAL NAME USER NAME IDICATOR . 0=FLOC1,3= FME1 5MQ6 ...[ X5 FIRST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDFEXTRA https://www.george3.co.uk/george/macro/findfextra?rev=1705492539&do=diff FINDFEXTRA (GIN Macro) Defined in: WORK-MACROS Used in: TRAPCHEC867, TRAPLIST864, TRAPWORK864 2Q7D ...[??? FINDFEXT SECT FILE FGN 4 DOC 2QC= #MAC FINDFEXTRA 2QWW #SKI %B 2RBG LDX %B FPTR(%A) 2RW6 #SKI %B 2S*Q #SKI 2STB LDX %A FPTR(%A) 2T*2 M1FINDFEX 2TSL #SKI %B 2W#= LDX 0 ATYPE(%B) 2WRW #SKI %B 2X?G #SKI 2XR6 LDX 0 ATYPE(%A) 2Y=Q SRL 0 12 2YQB SBN 0 FILE+FEXTRA 2^… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDGPUT https://www.george3.co.uk/george/macro/findgput?rev=1705492539&do=diff FINDGPUT (GIN Macro) Defined in: MACROS GLJ Used in: B2=W #MACRO FINDGPUT B2QG #STRING %B B3=6 ( B3PQ #MODIFIER %B B49B ( B4P2 #STRING %B,%A B58L LDX %A %B B5N= MOD LDX %A 0,%A B67W ) B6MG #MODIFIER %B B776 #SKIP B7LQ LDX %A 0(%B) B86B ) B8L2 SRL %A 10 B95L ANDN %A #7777 B9K= ADX %A BGPUT%C B=4W #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDJOBQ https://www.george3.co.uk/george/macro/findjobq?rev=1705492539&do=diff FINDJOBQ (GIN Macro) Defined in: MACROS GLJ Used in: ACTPRI867, ANSCOM865, BCAST867, CHARGESC867, CONIPB8, CONNECTA867, COREALLF867, CORESHED861, EVENTS864, HLSEVENT867, HLSREAD867, JWELLONE867, LLSMESS867, LOGACC863, READFALE866, SCHDJOBA867, SCHEDOUT865, STRATEGY865, UNJAMMER866, WSJOBSA867, WTSTAT867 22FL ...[??? FINDJOBQ SECT CENT FGN 18 DOC 2G5L # 2GK= # MACROS FOR GEORGE 3 2H4W # 2HJG # 2J46 # HERE IS A QUICK JOBLOCK MACRO 2JHQ # … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDLCA https://www.george3.co.uk/george/macro/findlca?rev=1705492539&do=diff FINDLCA (GIN Macro) Defined in: MACS SPC Used in: ATTACHC867, CONMXA85, CONMXC8, DETACH867, MOPOUT85, MOPPM84, MOPSTART865, MULTIPLX864, PCTCIN8, PCTCON8, PCTCOUT8, PCTCRTR8, PCTLPTP851, PROFLAG83, SCAN865, SENTINEL8 6WPL #MAC FINDLCA [C.E.WILKINSON : FINDS LCA 6X9= #STR %A 6XNW ( 6Y8G #STR %A,1 6YN6 LDX 1 %A 6^7Q ) 6^MB #STR %A 7272 #SKI 72LL LDX 1 CPPTR(2) 736= LDX 0 K58(1) 73KW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDLINK https://www.george3.co.uk/george/macro/findlink?rev=1705492539&do=diff FINDLINK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BMFIXIT864, COMPCHAN84, LISTPREP865, PARAM865, RELPER867, UNPLUG867, WHATPERA867 HS#2 ...[??? FINDLINK SECT CENT FGN 32 DOC HSRL ...# HT?= ...# HTQW ...# HW=G ...#MAC FINDLINK HWQ6 ...#STR %B HX9Q ...#SKI HXPB ...( HY92 ... SMO FX2 HYNL ... LDX %A ALINKRING H^8= ...) H^MW ...#STR %B J27G ... MOD LDX %A ALINKRING,%B J2M6 ... SBN %A BLINKRING+ACC3-A1+ALINK J36Q ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDNAME https://www.george3.co.uk/george/macro/findname?rev=1705492539&do=diff FINDNAME (GIN Macro) Defined in: MACROS RM59B Used in: BUDGTWO84, COPYB867, CREALEX864, DIRENT867, ENWELL867, MACRALAS864, MAKEDIR84, OPENFILE867, OPENTWO867, OWNERCHE84, SETPF867, TRAPCHEC867, USERONE867 2X3N ...[??? FINDNAME SECT FILE FGN 6 DOC 2X?G #MAC FINDNAME 2XR6 DOWN LEXIFIND,1 2Y=Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDOC https://www.george3.co.uk/george/macro/findoc?rev=1705492539&do=diff FINDOC (GIN Macro) Defined in: MACS SPC Used in: CHTAB, INKS, ONLINEA867 773= #MAC FINDOC 77GW DOWN FINDOC,1 782G BRN %A 78G6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDOLP1 https://www.george3.co.uk/george/macro/findolp1?rev=1705492539&do=diff FINDOLP1 (GIN Macro) Defined in: MACS SPC Used in: DETACH867, MONITOR36 7=Y= #MAC FINDOLP1 7?XG HUNT2 %B,APERI,APERIRES,%C 7#C6 MFIN1 LDX 0 A1(%B) 7#WQ BNG 0 %D 7*BB ORX %C GSIGN 7*W2 LDX 0 A1+1(%B) 7B*L BPZ 0 MFIN2 7BT= FINDACTFB %C,,AOLPT,,,FPTR 7C#W MFIN2 LDX 0 A1(%B) 7CSG BXE 0 %A,MFIN3 7D#6 BDX %B MFIN1 7DRQ MFIN3 7F?B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDOLPA https://www.george3.co.uk/george/macro/findolpa?rev=1705492539&do=diff FINDOLPA (GIN Macro) Defined in: MACS SPC Used in: ATTACHC867, SETJOBQ867 7J96 #MAC FINDOLPA 7JNQ HUNT2 %B,APERI,APERIRES,%C 7K8B MFINDOLPRTN 7KN2 LDN %E 0 7L7L MFINDOLPBCK 7LM= LDXC 0 A1+1(%B) 7M6W ADN %E 0 7MLG LDXC 0 A1(%B) 7N66 BCS %F 7NKQ SRL 0 15 7P5B BXE 0 %A,MFINDOLPFND 7PK2 BDX %B MFINDOLPBCK 7Q4L %D BDX %B MFINDOLPRTN 7QJ= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDPARS https://www.george3.co.uk/george/macro/findpars?rev=1705492539&do=diff FINDPARS (GIN Macro) Defined in: MACROS MSYS Used in: COMPROB867 ?4=G ...[??? FINDPARS SECT CENT FGN 56 DOC ?4=Q ...# ?4?= ...# ?4?Q ...# HERE FOLLOWS FINDPARS **** FINDPARS ?4#= ...# IT IS USED BY AN ACTIVITY TO PICK UP A ?4#Q ...# PARAMETER BLOCK TRANSFERRED FROM ANOTHER ACTIVITY ?4*= ...# ?4*Q ...#MAC FINDPARS ?4B= ...#STR %C ?4BQ ... LDX 2 FX2 ?4C= ... SETBIT 2,CLONG1(2) ?4CQ ... MHUNTW 1,%A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDPB https://www.george3.co.uk/george/macro/findpb?rev=1705492539&do=diff FINDPB (GIN Macro) Defined in: MACRO COMPRO Used in: ALAS822 GC6N ...[??? FINDPB SECT CENT FGN 21 DOC GCBG [ GCW6 [ MACRO FINDPB - FINDS THE SPECIFIED CPB/CALAS BLOCK GD*Q [ %A -MODIFIER TO HOLD ADDRESS OF CPB/CALAS, ON EXIT GDTB [ %B -LABEL TO JUMP TO, IF CPB/CALAS NOT FOUND GF*2 [ %C B0 -UNSET IF 1ST CPB/CALAS GFSL [ -SET IF 2ND CPB/CALAS GG#= [ ON EXIT GGRW [… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDPEREC https://www.george3.co.uk/george/macro/findperec?rev=1705492539&do=diff FINDPEREC (GIN Macro) Defined in: MACS SPC Used in: CDUM866, CHARGESC867, CLOSEIPB864, DEAD867, DUMMYA867, ENGAGE867, FAILTWIN866, FINDRUM866, HLSREAD867, IDFASAT867, IDFCANC867, IDFCHK867, IDFONLIN867, INTWIN866, IPCGEO8, LIBLOAD867, LIBREQ866, LIBREQC867, LISTEXCP865, LOADERDA867, LOADERDR867, LOADERFS867, LOADERI867, LOADERII867, LOADERMT867, LOADERPM867, MODEA65, MOPPM84, NEWOWN865, NEWPW867, ONLINEA867, ONLINEB867, ONLINEC867, PARSORT867, PM, PMDUMPDA85, PMDUMPMT85, PMFS85, PMLP866, PMWH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDPUC https://www.george3.co.uk/george/macro/findpuc?rev=1705492539&do=diff FINDPUC (GIN Macro) Defined in: RCTPMACS Used in: CHARGESC867, CORE867, COREALLJ865, GIVE867, GIVEA867, PLUGIN867, PROSTART867, PUTPER85, REALTIME867, RELPER867, REQESLIP861, SWAP865, TPINS861, UNPLUG867 2WRW # THIS MACRO FINDS THE RELATED PUC/PCA 2X?G # FROM THE TP/PCA 2XR6 #MAC FINDPUC 2Y=Q #SKIP CAMK7 2YQB ( 2^=2 #STRING %A 2^PL #STRING %A,%B 329= OPND LDX %B,%A,FX2 32NW ) 338G #SKIP … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDREC https://www.george3.co.uk/george/macro/findrec?rev=1705492539&do=diff FINDREC (GIN Macro) Defined in: ACCESSMACROS Used in: BMCNTRL866, DTSUBSS867, SCHEDMTA860, SCHEDMTX867 =QGJ ...[??? FINDREC SECT FILE FGN 19 DOC =QQB #MAC FINDREC =R=2 M1FINDREC =RPL STEP %A =S9= BZE 3 %D =SNW LDX 0 %B(3) =T8G BXU 0 %C,M1FINDREC =TN6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDRET https://www.george3.co.uk/george/macro/findret?rev=1705492539&do=diff FINDRET (GIN Macro) Defined in: MACROS VB Used in: IPBMOPB867, IPBOUT867, MORNING867 4*D4 ...[??? FINDRET SECT CENT FGN 7 DOC 4*MW #MAC FINDRET 4B7G HUNTW %A,GMON,AOUT [BOUT IN FUTURE 4BM6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDRPDEV https://www.george3.co.uk/george/macro/findrpdev?rev=1705492539&do=diff FINDRPDEV (GIN Macro) Defined in: MACROS EWDAS Used in: XFTG ...[ XFTW ...[??? FINDRPDEV XFW= ...# ********* XFWL ...#MAC FINDRPDEV XFX2 ...# XFXB ...#STR %B XFXQ ...#SKI XFY6 ...( XFYG ... LDN %D 6 XFYW ... FINDPEREC %A,APFOTY,%D XF^= ... BNG %A %C XF^L ...) XG22 ...#STR %B XG2B ...( XG2Q ... SMO FX1 XG36 ... LDX %D MFINDRPDEV1 XG3G ...MFINDRPDEV4 FINDPEREC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDSU https://www.george3.co.uk/george/macro/findsu?rev=1705492539&do=diff FINDSU (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, CLOSBAC867, FLAWMAP866, KARTCONT867, REQCART866, TWINSETA866, WHATPERB867 736= # 73KW # ********************************************************************** 745G # * 74K6 # * ASTUC HANDLING 754Q # * 75JB # * … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDSUD https://www.george3.co.uk/george/macro/findsud?rev=1705492539&do=diff FINDSUD (GIN Macro) Defined in: MACROS EWDAS Used in: KARTCONT867 87=G # 87Q6 [??? FINDSUD 889Q # ******* 88PB #MAC FINDSUD 8992 # 89NL LDCT 0 #400 8=8= ORX 0 %B 8=MW LDN %A BCCB 8?7G MFINDSU 8?M6 LDX %A FPTR(%A) 8#6Q TXU %A CXCC 8#LB BCC %C 8*62 TXU 0 BACK1(%A) 8*KL BCS MFINDSU… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDSUX https://www.george3.co.uk/george/macro/findsux?rev=1705492539&do=diff FINDSUX (GIN Macro) Defined in: MACROS EWDAS Used in: RELIEF866, SETDISC866 7M6W # 7MLG [??? FINDSUX 7N66 # ******* 7NKQ #MAC FINDSUX 7P5B # 7PK2 LDN %A BCCB 7Q4L MFINDSU 7QJ= LDX %A FPTR(%A) 7R3W TXU %A CXCC 7RHG BCC %C 7S36 LDXC 0 BACK1(%A) 7SGQ ERX 0 %B 7T2B BNZ 0 MFINDSU 7TG2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDTP https://www.george3.co.uk/george/macro/findtp?rev=1705492539&do=diff FINDTP (GIN Macro) Defined in: RCTPMACS Used in: CHARGESC867, CORESHED861, EVENTFN, JAMSWAP865, OPCA867, OPILLS70, PLUGIN867, RELPER867, SWAP865, UNPLUG867, WSPERIS867 2K3B # THIS MACRO FINDS THE RELATED TP/PCA 2KH2 # FROM THE PUC/PCA. 2L2L #MAC FINDTP 2LG= #SKIP CAMK7 2L^W ( 2MFG #STRING %A 2M^6 #STRING %A,%B 2NDQ OPND LDX %B,%A,FX2 2NYB ) 2PD2 #SKIP CAMK7<1$1 2PXL ( 2QC=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDWFL https://www.george3.co.uk/george/macro/findwfl?rev=1705492539&do=diff FINDWFL (GIN Macro) Defined in: WORK-MACROS Used in: FFFNORM7, IFEXPAN867, TRAPCHEC867, TRAPWORK864, WFMOVE867, WORKFILE860 37*# ...[??? FINDWFL SECT FILE FGN 4 DOC 37K6 #MAC FINDWFL 3942 HUNT 2,FILE,FABSNB 39HL LDX 0 A1+1(2) 3=3= ADN 0 1 3=GW #SKI %A-3 3?2G STO 3 GEN0 3?G6 ... LDX 1 FX2 3?^Q ... BASEFCB 1,WORK,M2FINDWFL,3 [SET UP FOR WORKRING SEARCH 3#FB ...M1FINDWFL 3#^2 ... LDX 2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDWFN https://www.george3.co.uk/george/macro/findwfn?rev=1705492539&do=diff FINDWFN (GIN Macro) Defined in: WORK-MACROS Used in: COMPOST867, HOWBIG867, OPENWORK866, TRAPCHEC867, TRAPLIST864, TRAPWORK864, WORKFILE860 3MDY ...[??? FINDWFN SECT FILE FGN 4 DOC 3MNQ #MAC FINDWFN 3N8B ...#SKI %A 3NN2 ...( 3P7L ... LDN 1 %A 3PM= ... FINDWN 1,%B,%C,%D 3Q6W ...#EXI 3QLG ...) 3R66 ... FINDWN ,%B,%C,%D 4?PB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINDWN https://www.george3.co.uk/george/macro/findwn?rev=1705492539&do=diff FINDWN (GIN Macro) Defined in: WORK-MACROS Used in: OPENWORK866, ORELEND860 4?^8 ...[??? FINDWN SECT FILE FGN 4 DOC 4#92 #MAC FINDWN 4#DS ...#SKI %A 4#NL ...( 4#YD ...#SKI %A-1 4*8= ... LDX 1 %A 4*D4 ...) 4*MW #SKI %A 4B7G #SKI 4BM6 ( 4C6Q SMO FX2 4CLB LDN 1 BWORKRING 4D62 ) 4DKL HUNT 2,FILE,FABSNB 4F5= LDX 2 A1+4(2) 4FJW #SKI %B-3 4G4G STO 3 GEN0 4GJ6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINMOVE https://www.george3.co.uk/george/macro/finmove?rev=1705492539&do=diff FINMOVE (GIN Macro) Defined in: MACROS JSR Used in: ANTIC867, BEXTRA83, CAFSPERI867, CROBJ6, DROBJ864, DRSTART6, EDOBJ864, EDSTART860, EXTEND866, FHLIST867, FHOBJ860, FHOBJBL860, GETNO865, HLSREAD867, IPCEN8, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPCOPENB83, IPCPERI83, IPQUAKE83, IPQUAKER865, LOAD60, LOADX60, MATALO860, MTCODE864, MTOBJ864, OPCA867, SCHDJOBA867, TPINS861, TRIPB83, VIPBPERI864 F4XQ ...#MAC FINMOVE [J.S.RAYNER GEORGE 3 VERSION F4YY ... MOD ADX %B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINMOVEZ https://www.george3.co.uk/george/macro/finmovez?rev=1705492539&do=diff FINMOVEZ (GIN Macro) Defined in: MACROS JSRG4 Used in: 773= ...#MAC FINMOVEZ [J.S.RAYNER GEORGE 4 ONLY 77GW ... OPTMOD %H,FX2,SBX %B %E+1 782G ...#STR %I 78G6 ...( 78^Q ... LDX 0 %B 79FB ... SLC 0 2 79^2 ... TXL 0 BIT11 7=DL ... BCS MFINMOVEZ5 [J IF SOME OF AREA IN FIRST PAGE 7=Y= ... SBN %B 1024 7?CW ... OPTMOD %H,FX2,ADX %B %E+3 7?XG ... LDX 0 %D 7#C6 ... BRN MFINMOVEZ4… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FINMVCH https://www.george3.co.uk/george/macro/finmvch?rev=1705492539&do=diff FINMVCH (GIN Macro) Defined in: MACROS JSR Used in: CIMOP867, FHLIST867, TROBJ867 F5WB #MAC FINMVCH [J.S.RAYNER GEORGE 3 VERSION F6B2 MOD ADX %B ADATUM,%A F6TL SMO %D F7*= MVCH %C 0 F7HG ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIPPER https://www.george3.co.uk/george/macro/fipper?rev=1705492539&do=diff FIPPER (GIN Macro) Defined in: MACROS EWDAS Used in: CHINTEG867, CLOSBAC867, CLOSDEL867, CONTRACT866, EXINTO867, RENAMEX867 P#52 # P#JL [??? FIPPER P*4= # ****** P*HW #MAC FIPPER PB3G # PBH6 LDX 0 %B PC2Q LDX 1 FX2 PCGB STO 0 ACOMMUNE9(1) PD22 MFINDSU 1,ACOMMUNE9(1) PDFL LADDP HUNIT(1),1 PD^= JDED 1,%E PFDW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIXEMSACTX https://www.george3.co.uk/george/macro/fixemsactx?rev=1705492539&do=diff FIXEMSACTX (GIN Macro) Defined in: MACROS GLJ Used in: SETUPA867, SETUPB867 =JWW #MAC FIXEMSACTX =KBG #STR %B,2 =KW6 LDX 2 %B =L*Q STO 2 GLOGLEN =LTB ADN 2 A1 =M*2 LDX 0 GFIXFREE =MSL SBX 0 2 =N#= BNG 0 MFIXEMSACTX =NRW LDX 1 BSUT =P?G SBX 1 GFIXFREE =PR6 SBS 2 GFIXFREE =Q=Q MFXEMSACTX2 =QQB STO 2 ASIZE(1) =R=2 #SKI CAMK7<5-5 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIXEMSCR https://www.george3.co.uk/george/macro/fixemscr?rev=1705492539&do=diff FIXEMSCR (GIN Macro) Defined in: MACROS GLJ Used in: SETUPA867, SETUPB867 9S22 # 9SFL #MAC FIXEMSCR 9S^= LDX 2 %A 9TDW STO 2 GLOGLEN [PRESERVE LOGICAL LENGTH 9TYG ADN 2 A1 9WD6 LDX 0 GFIXFREE 9WXQ SBX 0 2 9XCB BNG 0 MFIXEMSCR 9XX2 LDX 1 BSUT 9YBL SBX 1 GFIXFREE [S/A OF NEW BLOCK IN X1 9YW= SBS 2 GFIXFREE [UPDATE TOTAL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FIXTRA https://www.george3.co.uk/george/macro/fixtra?rev=1705492539&do=diff FIXTRA (GIN Macro) Defined in: MACROS DTP Used in: BSQ867, BSTS867, CASCODE, CEND, CHCH865, CONSET864, COOR865, COREALL865, EDIT867, EDITORA865, EDITPT867, EDWRITE867, FBUFF860, GETBAX865, IDFCONF867, IPCOPENA83, IPCOPENB83, IPCPERI83, IPLPM84, KEEPCHAP863, MOPPM84, ONLINEC867, OPER864, OPERA864, PM, PMACT867, PMBRKCHS84, PMCHAINS864, PMDR864, PMENDNOS84, PMFILE860, PMFS85, PMFSB84, PMOBJIII860, PMTABLEA, PMTABLEB, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEF, PMTABLEG, PMTABLEH, PMTABLEI, PMTABLEJ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FJOBLOCK https://www.george3.co.uk/george/macro/fjoblock?rev=1705492539&do=diff FJOBLOCK (GIN Macro) Defined in: MACROS RJH Used in: CONNECTA867, LOGOUT867, SAVEJOB865, UNSAVE867 37*# ...[??? FJOBLOCK SECT CENT FGN 71 DOC 37K6 # THIS MACRO FREES THE SPEC JOBLOCK AND UPDATES THE WORDS IN THE 384Q # 1ST BLOCK IN THE JOB QUEUE. ITS PARAMETER IS A POINTER TO THE 38JB # JOBLOCK AND MUST BE A MODIFIER 3942 #MAC FJOBLOCK 39HL FREECORE %A 3=3= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FJOCA https://www.george3.co.uk/george/macro/fjoca?rev=1705492539&do=diff FJOCA (GIN Macro) Defined in: MACROS GLJ Used in: ABANDONA867, ACTPRI867, ALAS822, ALLOCATE867, BLOGNAL865, CANCOM863, COMHOOK867, COMPRO867, COMPROB867, CONNECTA867, CONTINUE867, CONTXCOD60, COOR865, CORE867, COREALLF867, DEWELL867, DOMONOP867, DOXCODE867, DSCNCT867, EDITOR867, EDITORA865, ENWELL867, ENWELLB867, EVENTS864, FILELOG, FREEBUFF860, GET6, GETWORD867, GIVE867, HLSEVENT867, HLSOCCUR865, IFEXPAN867, IFXCODES864, INCOM864, INITJOB867, JDWRITE867, JOBLIST867, JWELLTWO867, LIBREQC867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FJOPCA https://www.george3.co.uk/george/macro/fjopca?rev=1705492539&do=diff FJOPCA (GIN Macro) Defined in: MACROS GLJ Used in: CAPCA50, CORESHED861, EVENTS864, GIVE867, GIVEA867, INMOP867, MEXTSJ70, MONRESUM850, OPCA867, PERFAIL866, PLUGIN867, PROGISH850, REQESLIP861, SWAP865, TPINS861, UNPLUG867 7?84 ...[??? FJOPCA SECT CENT FGN 18 DOC 7?CW # 7?XG # 7#C6 #MAC FJOPCA [FIND JOB BLOCK FROM PCA 7#WQ [ 7*BB #STR %B 7*W2 MOD LDX %A JOBRING+BPTR,%B 7B*L #STR %B 7BT= #SKI 7C#W LDX %A JOB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FJOTP https://www.george3.co.uk/george/macro/fjotp?rev=1705492539&do=diff FJOTP (GIN Macro) Defined in: MACROS GLJ Used in: UNPLUG867 8B*4 ...[??? FJOTP SECT CENT FGN 18 DOC 8BJW # 8C4G # 8CJ6 # 8D3Q # THE NEXT TWO MACROS ARE PARTICULARY USEFUL IN GEORGE 4 8DHB # WHERE CERTAIN ROUTINES ARE FORCED TO WORK FROM THE TP.PCA 8F32 # 8FGL # THIS MACRO LOCATES THE JOB BLOCK FROM THE TP.PCA WHETHER IT 8G2= # IS ON THE JOB RING OR NOT,IT WORKS IF PROG IS NOT RCTP 8GFW # 8G^G #MAC FJOTP 8HF6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLAG https://www.george3.co.uk/george/macro/flag?rev=1705492539&do=diff FLAG (GIN Macro) Defined in: MACROS PRS Used in: MESSAD, PROFLAG83 4CBJ ...[??? FLAG SECT CENT FGN 1 DOC 4CLB # FLAG REDEFINES %A (WHICH MUST BE A LOCAL IDENTIFIER) AS ITS ORIGINAL 4D62 # VALUE PLUS ONE. 4DKL #MAC FLAG 4F5= #DEF MFLAG1=%A+1 4FJW #FRE %A 4G4G #DEF %A=MFLAG1 4GJ6 #FRE MFLAG1 4H3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLAGOFF https://www.george3.co.uk/george/macro/flagoff?rev=1705492539&do=diff FLAGOFF (GIN Macro) Defined in: MACROS PRS Used in: 4H?J ...[??? FLAGOFF SECT CENT FGN 1 DOC 4HHB # FLAGOFF REDEFINES %A (WHICH MUST BE A LOCAL IDENTIFIER) AS VALUE ZERO. 4J32 #MAC FLAGOFF 4JGL #FRE %A 4K2= #DEF %A=0 4KFW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLAGTEST https://www.george3.co.uk/george/macro/flagtest?rev=1705492539&do=diff FLAGTEST (GIN Macro) Defined in: IFMACS Used in: B*G= [ B*^W [ BBFG [??? FLAGTEST SECT DEVT FGN 1 DOC BB^6 [ BCDQ #MAC FLAGTEST BCYB [ ======== BDD2 [ BDXL [ BFC= [ %A - NAME OF CALLING USER LEVEL MACRO BFWW [ %B - 1 => 'EITHER' SHOULD HAVE BEEN GIVEN PREVIOUSLY (ELSE 0) BGBG [ %C - 'NOT' OR NULL - USED IN ERROR MESSAGE BGW6 [ %D - 1 => 'THEN' OR 'DO' SHOULD HAVE BEEN GIVEN PREVIOUSLY (ELSE 0) B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLAWCHK https://www.george3.co.uk/george/macro/flawchk?rev=1705492539&do=diff FLAWCHK (GIN Macro) Defined in: MACROS EWDAS Used in: PERFLOGS866 WY=L # WYQ= [??? FLAWCHK W^9W # ******* W^PG # X296 # MACRO USED BY ERROR LOGGING ACTIVITY FOR CHECKING X2NQ # WHETHER A PERIPHERAL INCIDENT IS ALREADY RECORDED IN X38B # THE FLAW INDEX. X3N2 # X47L #MAC FLAWCHK X4M= # X56W LDX 0 %A X5LG SMO FX2 X666 ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLENME https://www.george3.co.uk/george/macro/flenme?rev=1705492539&do=diff FLENME (GIN Macro) Defined in: MACROS GEM Used in: DISPCOM867, LISTHEAD863, LISTINIT867, LISTINTC865, QUESCOM867 22FL # 22^= # RUTH HEAP 23DW # 23NN ...[??? FLENME SECT CENT FGN 1 DOC 23YG # THIS MACRO IS A BIT OF CODE! 24D6 # ITS PURPOSE IS TO GET A FILENAME FROM A BLOCK OR ANY WHERE ELSE. 24XQ # %A IS THE RELATIVE ADDRESS OF USER-NAME. 25CB # %B IS DO OF LOCAL-FILE-NAME. 25X2 # %C DESCRIBED AT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLENME1 https://www.george3.co.uk/george/macro/flenme1?rev=1705492539&do=diff FLENME1 (GIN Macro) Defined in: MACROS GEM Used in: IPBLISTA867, PCTLISTA867, WHATPERA867, WHATPERB867 39RD ...[??? FLENME1 SECT CENT FGN 1 DOC 3=3= # 3=GW # THIS ACRO CONVERTS THE USER AND LOCAL NAMES SPECIFIED INTO THE 3?2G # FORMAT :- 3?G6 # :USER.LOCAL NAME 3?^Q # 3#FB #MAC FLENME1 3#^2 LDN %C 2 3*DL LDN 6 %A(%B) 3*Y= LDX %B 7 3BCW LDN 0 #12 3BXG M1FLENME1 3CC6 D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLIP https://www.george3.co.uk/george/macro/flip?rev=1705492539&do=diff FLIP (GIN Macro) Defined in: MACS PCT Used in: INPCT84, PCTLISTA867, PCTLISTB867, READOPLN867, RENGAGE851, RMTLF864, RMTLFEND864 3942 #MAC FLIP 39HL LDCT 0 #2 3=3= ANDX 0 EWAIT(3) 3=GW #STR %A 3?2G BNZ 0 %A 3?G6 #STR %A 3?^Q #SKI 3#FB BNZ 0 MFLIP 3#^2 LDX 2 3 3*DL BCHX 2 £ 3*Y= LDCH 1 APCTID(2) 3BCW PCTHUNT 2 3BXG LDEX 0 APCTID(3) 3CC6 SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLIPS https://www.george3.co.uk/george/macro/flips?rev=1705492539&do=diff FLIPS (GIN Macro) Defined in: MACROS JSR Used in: CAPCA50, CHARGESC867, FHOBJDIR860, INCSTART865, OPILLS70, PRINT70, REALTIME867 6B?7 ...[??? FLIPS SECT CENT FGN 9 DOC 6BL2 # 6C5L # THIS MACRO UNSETS AND/OR SETS A BIT IN A SPECIFIED WORD 6CK= # 6D4W #MAC FLIPS 6DJG #STR %B 6F46 ( 6FHQ #STR %C 6G3B #SKI %B-%C 6GH2 ( 6H2L LDBIT %B,0 6HG= ANDX 0 %A 6H^W ERS 0 %A 6JFG ) 6J^6 )… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLIPW https://www.george3.co.uk/george/macro/flipw?rev=1705492539&do=diff FLIPW (GIN Macro) Defined in: MACROS JSR Used in: 76?S ...[??? FLIPW SECT CENT FGN 9 DOC 76HL # THIS MACRO SWITCHES A MASK IN A SPECIFIED WORD 773= #MAC FLIPW 77GW #ACC %B 782G ( 78G6 LDX 0 %B 78^Q ERS 0 %A 79FB ) 79^2 #ACC %B 7=DL #SKI 7=Y= ERS %B %A 7?CW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLIPX https://www.george3.co.uk/george/macro/flipx?rev=1705492539&do=diff FLIPX (GIN Macro) Defined in: MACROS JSR Used in: 6Q58 ...[??? FLIPX SECT CENT FGN 9 DOC 6Q*2 # 6QSL # THIS MACRO UNSETS AND/OR SETS MASKS OF BITS IN A SPECIFIED WORD 6R#= #MAC FLIPX 6RRW #STR %B 6S?G ( 6SR6 #STR %C 6T=Q #SKI %B-%C 6TQB ( 6W=2 #STR %B,0 6WPL LDX 0 %B 6X9= ANDX 0 %A 6XNW ERS 0 %A 6Y8G ) 6YN6 ) 6^7Q #STR %C 6^MB ( 7272 #STR %B 72LL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FLONGWAIT https://www.george3.co.uk/george/macro/flongwait?rev=1705492539&do=diff FLONGWAIT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: SAVEJOB865, SETUPB867, UNSAVE867 NJM2 ...[??? FLONGWAI SECT CENT FGN 32 DOC NK6L ...#MAC FLONGWAIT NKL= ... FWAIT #2000+%A NL5W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FMOPACT https://www.george3.co.uk/george/macro/fmopact?rev=1705492539&do=diff FMOPACT (GIN Macro) Defined in: MACS MISW Used in: ATTACHB866, ATTACHC867, CONSROOT867, DETACH867, REDON867, VIPBFREE865 6MWW #MAC FMOPACT [C.E.WILKINSON 6NBG LDX 0 %B 6NW6 #STR %C 6P*Q LDX %A IPBADDR 6PTB #STR %C 6Q*2 #SKI 6QSL LDX %A ADMULTACT 6R#= BZE %A MFMOPACT1A 6RRW MFMOPACT1 6S?G BXE 0 CPPTR(%A),MFMOPACT2 6SR6 #STR %C 6T=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FMOPG https://www.george3.co.uk/george/macro/fmopg?rev=1705492539&do=diff FMOPG (GIN Macro) Defined in: MACS MISW Used in: CONSROOT867, HARDIDF867, IDFCHK867, IDFOFF867, IDFONLIN867, IDFPER867, IDFSCON867, LISTIDF867, RIGHT867, SETIDF867, SPOOL83, TERM867 75JB #MAC FMOPG [C.E.WILKINSON 7642 #STR IPB,%C 76HL ( 773= LDX %A ADMULTACT 77GW BZE %A MFMOPG1A 782G MFMOPG1 78G6 LGEOG CPPTR(%A),0 78^Q BXE 0 %B,MFMOPG3 79FB LDX %A ADMP(%A) 79^2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FNDELE https://www.george3.co.uk/george/macro/fndele?rev=1705492539&do=diff FNDELE (GIN Macro) Defined in: MACROS RJDG Used in: 59GG ...[ 5=26 ...[ 5=FQ ...[??? FNDELE SECT CENT FGN 5=^B ...[RESTORE TIME MACRO. 5?F2 ...[ALTERS FINISH TO GIVE CHOICE OF ENDINGS TO CLOSEDOWN 5?YL ...[ %A=ON - ENDS WITH GEOSTOP 5#D= ...[ %A=OFF - ENDS WITH ENDCOM 5#XW ...[DEFAULT = ON 5*CG ...[ 5*X6 ...#MAC FNDELE 5BBQ ...#STR %A,ON 5BWB ...#STR 5CB2 ...( 5CTL ...#MEN FINISH 5D*= ...#TRA K14FINISH 5DSW ... ACROSS FINISHB,11 5F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FNORM https://www.george3.co.uk/george/macro/fnorm?rev=1705492539&do=diff FNORM (GIN Macro) Defined in: MACROS RM59B Used in: ALLOCATE867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASTONIF867, BUDGTWO84, CANCRVX864, CONCEPT85, COPYA867, COPYB867, CREATE867, DIRENT867, DUMP860, EDIT867, EDITMFO867, ENWELL867, ERASE867, FILESECU83, FREEZE864, GETON867, HOWBIG867, IFEXPAN867, INCOM864, IPCOPENB83, JDTWO864, LABEL866, LDSTART850, LIBCOM867, LISTDIRF867, LISTFILE867, LISTPARS867, LOGCOM864, MACRALAS864, MAKEDIR84, MAKEVCC867, NETOFLNE867, OLMTA85, PERFPASS864, PREPREAD867, RED… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FNYLIST https://www.george3.co.uk/george/macro/fnylist?rev=1705492539&do=diff FNYLIST (GIN Macro) Defined in: MACROS RMD10 Used in: 23DW [ GEORGE PORTER 23YG [ THIS S/F CONTAINS THE FOLLOWING MACROS 24D6 [ 24MY ...[ FNYLIST 24XQ [ MAGREAD 25CB [ MAGSTEP 25X2 [ FTM 266S ...[ MTCHECK 26BL [ FAILURE 26W= [ FREEHALF 27*W [ FREEHALL 27TG [ FREHFURB 28*6 [ FRSOFURB 28SQ [ FRSOFUWB 29#B [ FREEFURB 29S2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FON https://www.george3.co.uk/george/macro/fon?rev=1705492539&do=diff FON (GIN Macro) Defined in: CHCHCOORMAC2 Used in: APPEND864, BACKROOM865, BMAPTWO860, BMJLSLAV864, BMOUTPUT867, BSALFAIL, BSQ867, BSTS867, CARTCONT867, CHARGESC867, CLOSEND867, COMMFILE82, COMPROB867, CONNECTA867, CONSOLE867, COOR865, COPYFILA867, COREALL865, COREALLF867, COREALLG82, DSCNCT867, DTSUBSA867, FINISH867, GETBACK865, GETBAX865, GROPE867, HLSEVENT867, INCEND865, INCSET865, INCWRITE865, INSTPARA867, IPBIN867, IPBINB867, IPBINC865, IPBSTARB867, IPBSTART867, KARTCONT867, LOADERR70, LO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FON1 https://www.george3.co.uk/george/macro/fon1?rev=1705492539&do=diff FON1 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHARGESC867 7C7L ...[??? FON1 SECT CENT FGN 32 DOC 7C#W # THIS MACRO CHECKS ACTS WAITING FOR TIME ON 4 SEC INTERRUPT 7CSG # USES CLONG3 AND ONLY AWAKENS THOSE WHOSE TIME IS UP 7D#6 #MAC FON1 7DRQ LDX 1 FLOWQ 7F?B M1FON1 LDX 2 1 7FR2 SBN 2 FLOWQ 7G=L BZE 2 M2FON1 7GQ= LDX 1 0(1) 7H9W STO 1 GEN6 7HPG ADN 2 FLOWQ-CHAINADD … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FORBID https://www.george3.co.uk/george/macro/forbid?rev=1705492539&do=diff FORBID (GIN Macro) Defined in: MACRO COMPRO Used in: C9JN ...[??? FORBID SECT CENT FGN 21 DOC C9SG #MAC FORBID [FORBID COMMAND %A IN CONTEXTS %B,%C,%D,%E,%F,%G,%H,%I,%J C=#6 #MEN VERBCLAS C=RQ 4H%A C??B #DEF 0?=0 C?R2 #DEF 20?=34?+0?+0]&#37777777 [CONVERT %A TO BINARY C#=L 8HVERBCLAS C#Q= #SKI 20?/#1000000<14-14 C*9W #DEF 0?=20?/#1000000+34?+K90VERBCLAS-1] C*PG #SKI 20?/#1000000>13-13 CB96 ( CBNQ #END CC8B #MEND VCL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FORBIDCC https://www.george3.co.uk/george/macro/forbidcc?rev=1705492539&do=diff FORBIDCC (GIN Macro) Defined in: MACRO COMPRO Used in: D66B ...[??? FORBIDCC SECT CENT FGN 21 DOC D66Q #MAC FORBIDCC D6LB #MEN CANCOM D762 4H%A D7KL #DEF 20?=34?+0] D85= #DEF 0?=0 D8JW 8HCANCOM D94G #DEF 0?=K90CANCOM D9J6 #DEF 22?=K91CANCOM-K90CANCOM/BICESIZE D=3Q FINDBICE %A D=HB #SKI 22? D?32 ( D?GL #STR #,%B D#2= #DEF 20?=CTX%B+CTX%C+CTX%D+CTX%E+CTX%F+CTX%G+CTX%H+CTX%I+CTX%J+CTX%K D#FW #STR #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FORBIDOP https://www.george3.co.uk/george/macro/forbidop?rev=1705492539&do=diff FORBIDOP (GIN Macro) Defined in: MACRO COMPRO Used in: F3N4 ...[??? FORBIDOP SECT CENT FGN 21 DOC F3YD ...#MAC FORBIDOP F3YL ...#MEN OPERATOR F3YS ... 4H%A F3^2 ...#DEF 20?=34?+0] F3^8 ...#DEF 0?=0 F3^B ... 8HOPERATOR F3^J ...#DEF 0?=K90OPERATOR F3^Q ...#DEF 22?=K91OPERATOR F3^Y ... FINDBICX %A F426 ...#SKI 22? F42# ...( F42G ...#STR #,%B F42N ...#DEF 20?=CTX%B+CTX%C+CTX%D+CTX%E+CTX%F+CTX%G+CTX%H+CTX%I+CTX%J+CTX%K F42W ...#STR #,%B F434 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FORWARD https://www.george3.co.uk/george/macro/forward?rev=1705492539&do=diff FORWARD (GIN Macro) Defined in: MACINTLUDES Used in: MESSCF, OPERIN867 MX7G ...[??? FORWARD SECT DIAG FGN 200 DOC MXM6 ...#MAC FORWARD [J.T.WIFFEN MY6Q ...[ MYLB ...[ M^62 ...[ ********** M^KL ...[ * FORWARD* N25= ...[ ********** N2JW ...[ N34G ...[ N3J6 ...#SKI 77?>521$521 N43Q ...( N4HB ...#SKI 84?+0]<1$1 N532 ...( N5GL ...#CON NO PROGRAM FILE FORWARD REFERENCES N62= ...# !! NO PROGRAM FILE FORWARD REFERENCES N6FW ...#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FOUTMOVE https://www.george3.co.uk/george/macro/foutmove?rev=1705492539&do=diff FOUTMOVE (GIN Macro) Defined in: MACROS JSR Used in: ANTIC867, BEXTRA83, CAFSPERI867, CIMOP867, CONIPB8, CONMXB8, CONMXC8, CPOBJ6, CROBJ6, DROBJ864, DRUM852, EDOBJ864, EDSTART860, EXINONE867, EXTEND866, FHLIST867, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, HLSREAD867, IPCEN8, IPCOPENA83, IPCOPENB83, IPCPERI83, LPOBJ6, LPTWO7, MEXTSJ70, MONEVENT867, MTCODE864, MTOBJ864, MTSTART864, NETOFLNE867, OPCAXCOD5, PERION867, RENAMEX867, REQESLIP861, SCRATCH866, SIMULPTR60, SOUP867, SPERION867, TPI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FOUTMVCH https://www.george3.co.uk/george/macro/foutmvch?rev=1705492539&do=diff FOUTMVCH (GIN Macro) Defined in: MACROS JSR Used in: TPOBJ867 F=QL #MAC FOUTMVCH [J.S.RAYNER GEORGE 3 VERSION F?== MOD ADX %B ADATUM,%A F?PW SMO %D F#9G MVCH %B 0 F#CQ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FOX https://www.george3.co.uk/george/macro/fox?rev=1705492539&do=diff FOX (GIN Macro) Defined in: CHCHCOORMAC2 Used in: HLSEVENT867, JDWRITE867, JOBLIST867, WAIT867 5R#S ...[??? FOX SECT CENT FGN 32 DOC 5RJL #MAC FOX 5S4= LDEX 0 %A 5SHW CALL 1 (FON) 5T3G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPCACA https://www.george3.co.uk/george/macro/fpcaca?rev=1705492539&do=diff FPCACA (GIN Macro) Defined in: MACROS GLJ Used in: ACCESS867, ANTIC867, CAFSPERI867, CHINERR867, CHINTEG867, CLOSDEL867, COMPCHAN84, COMPRO867, CONTXCOD60, CORE867, COREALLF867, DELCOM5, DETACH867, DISPCOM867, DOMONOP867, ENTRUST, EVENTS864, FAIL5, GETWORD867, GIVE867, HALT5, HLSOCCUR865, IFEXPAN867, ILLEXC70, ILLPERI70, JAMSWAP865, LOAD60, LOADERR70, LOADFIN860, LOADPROG865, LOADX60, MATALO860, MODEA65, MONEVENT867, MONITOR36, MONRESUM850, OLMTB867, OLMTD65, OLMTE85, ONOFFALT60, OPCAXCOD5, O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPCAJO https://www.george3.co.uk/george/macro/fpcajo?rev=1705492539&do=diff FPCAJO (GIN Macro) Defined in: MACROS GLJ Used in: ACTPRI867, ATTACHC867, BCAST867, CHARGESC867, COMPRO867, COOR865, COREALLF867, CORESHED861, DOMONOP867, EVENTS864, FREEBUFF860, JAMSWAP865, OPENWAIT867, PERFAIL866, PLUGIN867, PROCONTX867, REALTIME867, RELPER867, RUNPROG840, SCHEDOUT865, SWAP865, UNPLUG867, WSJOBSA867, WSPERIS867 7LX4 ...[??? FPCAJO SECT CENT FGN 18 DOC 7M6W # 7MLG # 7N66 #MAC FPCAJO [FIND PCA FROM JOB BLOCK 7NKQ [ 7P5B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPERENT https://www.george3.co.uk/george/macro/fperent?rev=1705492539&do=diff FPERENT (GIN Macro) Defined in: MACROS2JSR Used in: CONTXCOD60, IFEXPAN867, ILLPERI70, MODEA65, OLMTB867, OLMTD65, OLMTE85, OPCA867, SETPC867 4?FJ ...[??? FPERENT SECT CENT FGN 2 DOC 4?PB # THIS MACRO LOOKS UP ENTRIES IN THE PRB 4#92 # %A & %D MUST BE ACCUMULATORS 4#NL # %B &%C MUST BE MODIFIERS 4*8= #MAC FPERENT 4*MW #STR %B,%C 4B7G LDX %C %B 4BM6 SBN %C 2 4C6Q #STR %D 4CLB ( 4D62 #STR %A,%D 4DKL #S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPERENTA https://www.george3.co.uk/george/macro/fperenta?rev=1705492539&do=diff FPERENTA (GIN Macro) Defined in: MACROS2JSR Used in: ACCESS867, DISPCOM867, LOADFIN860, MONEVENT867, MONRESUM850, QUESCOM867 4T44 ...[??? FPERENTA SECT CENT FGN 2 DOC 4T?W # 4TRG # THIS IS A SHORTER AND LESS GENERAL VERSION OF FPERENT 4W?6 # ON ENTRY %A IS MODIFIER PNTG TO APERIRES BLOCK ,%B CONTAINS TYPE/UNIT 4WQQ # NO. IN B0-8,9-23 RESPECTIVELY 4X=B # ON EXIT %A -> ENTRY IF FOUND ELSE CONTROL JUMPS TO %C 4XQ2 #MAC FPERENTA 4Y9L ADN %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPERENTB https://www.george3.co.uk/george/macro/fperentb?rev=1705492539&do=diff FPERENTB (GIN Macro) Defined in: MACROS2JSR Used in: DISEVENT65 53WS ...[??? FPERENTB SECT CENT FGN 2 DOC 546L # THIS MACRO LOOKS UP ENTRIES IN THE PRB GIVEN A PTR TO DEVICE 54L= # LIST.%A MUST BE A MODIFIER 555W #MAC FPERENTB 55KG ADN %A A1-2 5656 MFPERENTB 56JQ ADN %A 2 574B LDX 0 0(%A) 57J2 BNG 0 %C 583L LDX 0 1(%A) 58H= ERX 0 %B 592W ANDX 0 BITS22LS 59GG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPROGMOVE https://www.george3.co.uk/george/macro/fprogmove?rev=1705492539&do=diff FPROGMOVE (GIN Macro) Defined in: MACROS JSR Used in: FTTG ...#MACRO FPROGMOVE FTTQ ...#SKIP %F-%B-1 FTW2 ...! WRONG PARAMETERS FTW= ... STO 1 JWSP1 FTWG ... STO 2 JWSP2 [ DUMP ACCS. FTWQ ... OPTMOD %D,FX2,LDN 0 %C FTX2 ... STO 0 JWSP3 [ -> OUT LOCKDOWN LIST. FTX= ... OPTMOD %H,FX2,LDN 1 %G FTXG ... STO 1 JWSP4 [ -> IN LOCKDOWN LIST FTXQ ... SBX %F 1(1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPUT https://www.george3.co.uk/george/macro/fput?rev=1705492539&do=diff FPUT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ADDICT865, ATTACHB866, ATTACHC867, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BMAPTWO860, BMCNTRL866, BMJLIST864, BMSJRNL866, BSQ867, BSTS867, CDCIPB864, CHARGESC867, CIMOP867, CLOSEALT864, CLOSEMT867, CLOSEND867, CLOSEONE867, CONIPB8, CONSOLE867, CONSROOT867, COPYFILE867, COREALLF867, CORESHED861, DETACH867, DETACHB867, DSCNCT867, DTSTART867, DTSUBSA867, DUMMYB867, ENGAGE867, ERASE867, EVENTFN, FAILTWIN866, FHLIST867, FINISH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPUTCHA https://www.george3.co.uk/george/macro/fputcha?rev=1705492539&do=diff FPUTCHA (GIN Macro) Defined in: MACS SPC Used in: ENGAGE867, IPCOND864, IPQUAKER865 ?*RQ #MAC FPUTCHA ?B?B DSCA %A,LDXC,2,CHADD ?BR2 NGNC 0 0 ?C=L ANDS 0 0(2) ?CQ= LDX 0 0(2) ?D9W SBN 0 1 ?DPG BNZ 0 MCEND ?F96 SBN 2 CHAINADD ?FNQ FPUT ?G8B MCEND ?GN2 LDX 2 FX2 ?H7L LDX 1 FX1 ?HM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPUTPRI https://www.george3.co.uk/george/macro/fputpri?rev=1705492539&do=diff FPUTPRI (GIN Macro) Defined in: CHCHCOORMAC2 Used in: 5L^7 ...[??? FPUTPRI SECT CENT 5L^8 ...#MAC FPUTPRI 5L^9 ...#UNS ICTON 5L^= ...#SKI 5L^? ...( 5L^# ... FPUTX %A 5L^* ...#EXI 5L^B ...) 5L^C ...#UNS ICTON 5L^D ...( 5L^F ... JBS M1FPUTPRI,,ICTSW 5L^G ... FPUTX %A 5L^H ... BRN M2FPUTPRI 5L^J ...M1FPUTPRI MOD LDN 2 CHAINADD,%A 5L^K ... ENRING 2,ACTLIS 5L^L ...M2FPUTPRI 5L^M ...) 5L^N ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FPUTX https://www.george3.co.uk/george/macro/fputx?rev=1705492539&do=diff FPUTX (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BSQ867, BSTS867, PROFLAG83 5LPL ...#MAC FPUTX 5LPY ...#STR %A,2 5LQ= ... LDX 2 %A 5LQJ ... JBS M1FPUTX,,ICTSW 5LQW ... ENRINGD CHAINADD(2),K3 5LR8 ... BRN M2FPUTX 5LR? ...M1FPUTX 5LRB ... LDX 0 ACRIT(2) 5LRF ... STO 2 GEN6 [KEEP AS FPUT O'WRITES 5LRJ ... STO 0 GEN5 5LRM ... STOZ ACRIT(2) [FIDDLE TO GMEL 0 5LRQ ... FPUT 5LR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEALL https://www.george3.co.uk/george/macro/freeall?rev=1705492539&do=diff FREEALL (GIN Macro) Defined in: MACROS RM59B Used in: LOADERR70, PROSTART867 3K=L ...[??? FREEALL SECT FILE FGN 6 DOC 3KQ= #MAC FREEALL 3L24 ...[ FREES ALL BS BLOCKS IN A FRB OF FULLB FORMAT & ALSO FREES THE FRB 3L9W MHUNTW 2,FILE,FRB 3LPG NAME 2,BSTB,FULLB 3M96 FREEBAX [FREE BS BLOCKS IN FULLB 3MNQ MFREE BSTB,EMPTYB [FREE CORE 3N8B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEBACK https://www.george3.co.uk/george/macro/freeback?rev=1705492539&do=diff FREEBACK (GIN Macro) Defined in: MACROSBRBS Used in: APPEND864, COMMFILE82, CORE867, DELETE864, GIVE867, INSERT6, INSERTBL6, INSERTHR6, INSERTWO6, RAND864, REWRITE864, SAVEBLOK65 4Q6# ...[??? FREEBACK SECT FILE FGN 14 DOC 4QB6 #MAC FREEBACK 4QTQ #STR %A,0 4R*B LDX 0 %A 4RT2 SMO FX2 4S#L STO 0 ACOMMUNE7 4SS= #STR %B 4T?W ( 4TRG #STR %B,1 4W?6 LDX 1 %B 4WQQ ) 4X=B #STR %B 4XQ2 #SK… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEBAX https://www.george3.co.uk/george/macro/freebax?rev=1705492539&do=diff FREEBAX (GIN Macro) Defined in: MACROSBRBS Used in: BACKROOM865, BMINDEX866, BSALFAIL, CLOSEAB863, CLOSEALT864, CLOSEMAS863, CLOSEND867, CONSET864, COPYA867, COPYB867, COPYFILA867, COPYFILE867, CORE867, CREALEX864, CREATE867, DROBJ864, DTREST860, EDSTART860, GIVE867, MTCODE864, MTSTART864, OPENREL865, OPENWORK866, RAND864, REPERR867, SETLIST864, USERONE867, USEROPEN867, USERSTRM867, USERTYPE83, WORKFILE860 5GHJ ...[??? FREEBAX SECT FILE FGN 14 DOC 5GRB # 5H?2 # 5HQL [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEBUFF https://www.george3.co.uk/george/macro/freebuff?rev=1705492539&do=diff FREEBUFF (GIN Macro) Defined in: FREEBUFFMAC Used in: CHTAB, CONTINUE867, COOR865, DEMAND860, FIXINT, INCWAIT860, INKS, LDSTART850, MACRALAS864, PMFSADDC86, PROSTART867, REPLAC, SCHEDENX860, SWAP865, WAIT867 22FL ...#MAC FREEBUFF 22^= ...[ THIS MACRO IS USED TO CALL THE FIXED CORE FREEBUFF 23DW ...[ ROUTINES WHICH FREE FURB'S AND SET OVERFLOW IF ANY FUWB'S 23YG ...[ ARE FOUND CONNECTED TO THE ACTIVITIES OR FILES SPECIFIED BY THE 24D6 ...[ PARAMETERS TO THIS MACRO. 24XQ ...[ IF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREECORD https://www.george3.co.uk/george/macro/freecord?rev=1705492539&do=diff FREECORD (GIN Macro) Defined in: COREMACROS Used in: INSTPARA867, SUICIDE864 3C7# ...[??? FREECORD SECT CENT FGN 32 DOC 3CC6 [ 3CWQ [ENTRY SEQUENCE FOR FOEEING CORE WITHOUT WAKING UP OTHER ACTIVITIES 3DBB [ 3DW2 #MAC FREECORD 3F*L FREECORE %A 3FT= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREECORE https://www.george3.co.uk/george/macro/freecore?rev=1705492539&do=diff FREECORE (GIN Macro) Defined in: COREMACROS Used in: ABANDONA867, ADDICT865, ADDJOB867, ADJUNCTS85, ALAS822, ALASB867, ALTINST60, ANALYSE865, ANTIC867, APPEND864, ARCHIVE867, ASSIGN860, ASSOC867, ASTONIF867, ATTACHA8, ATTACHB866, ATTACHC867, ATTRIBUT867, BACKMAP864, BACKMARK850, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BMAPONE867, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEFILE https://www.george3.co.uk/george/macro/freefile?rev=1705492539&do=diff FREEFILE (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 692# ...[??? FREEFILE SECT FILE FGN 16 DOC 69PQ #MAC FREEFILE 6=9B [CONTAINS SUBROUTINES FOR ABOVE MACROS 6=P2 [ 6?8L [ FREE HALF THE HALF-OPEN CHAIN 6?N= #DEF M1FREEFILE=0? 6#7W LDX 5 HALFFCB 6#MG SRA 5 1 6*76 BRN M3FREEFILE 6*LQ [ 6B6B [ FREE ALL THE HALF-OPEN CHAIN 6BL2 #DEF M2FREEFILE=0? 6C5L LDX 5 HALF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEFINC https://www.george3.co.uk/george/macro/freefinc?rev=1705492539&do=diff FREEFINC (GIN Macro) Defined in: DUMP-MACROS Used in: INCFIN864, INCSET865 DKN3 ...[??? FREEFINC SECT FILE FGN ? DOC DL7M ...#MAC FREEFINC DLM? ...[ THIS MACRO FREES A FINC OR FGET BLOCK POINTED TO BY %A DM6X ...[ AND RETURNS THE DTA'S TO THE RETRIEVAL SYSTEM DMLH ...[ %B IS NODUMP IFF THE INCREMENT HAS BEEN CANCELLED DN67 ... CHAIN %A,FX2 [ CHAIN THE BLOCK NEXT TO CPAT DNKR ...#STR NODUMP,%B DP5C ...( DPK3 ... DOWN INCDTA,2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEFURB https://www.george3.co.uk/george/macro/freefurb?rev=1705492539&do=diff FREEFURB (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 636S ...[??? FREEFURB SECT FILE FGN 16 DOC 63BL # 63W= #MAC FREEFURB 64*W [FREE READ BUFFER BLOCKS 64TG LDN 0 0 65*6 CALL 7 M12FREEFILE 65SQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEFUWB https://www.george3.co.uk/george/macro/freefuwb?rev=1705492539&do=diff FREEFUWB (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 664J ...[??? FREEFUWB SECT FILE FGN 16 DOC 66S2 #MAC FREEFUWB 67?L [FREE WRITE BUFFER BLOCKS 67R= LDX 0 GSIGN 68=W CALL 7 M12FREEFILE 68QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEHALF https://www.george3.co.uk/george/macro/freehalf?rev=1705492539&do=diff FREEHALF (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 5GKW ...[ 5H2L ...[ 5HCB ...[ 5HS6 ...[??? FREEHALF SECT FILE FGN 16 DOC 5K9G [ THESE MACROS ARE USED BY THE CORE UNJAMMER TO FREE FILESTORE BLOCK 5L8Q #MAC FREEHALF 5LNB [FREES HALF THE BLOCKS IN THE HALFOPEN CHAIN 5M82 CALL 7 M1FREEFILE 5MML #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEHALL https://www.george3.co.uk/george/macro/freehall?rev=1705492539&do=diff FREEHALL (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 5MXD ...[??? FREEHALL SECT FILE FGN 16 DOC 5NLW #MAC FREEHALL 5P6G [FREES ALL THE BLOCKS IN THE HALFOPEN CHAIN 5PL6 CALL 7 M2FREEFILE 5Q5Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEIN https://www.george3.co.uk/george/macro/freein?rev=1705492539&do=diff FREEIN (GIN Macro) Defined in: COREMACROS Used in: COREALLG82, UNJAMMER866 3FW? ...[??? FREEIN SECT CENT FGN 3FWL ...[ 3FW^ ...[ENTRY SEQUENCE FOR CHAINING BLK INTO SIZE RING (IN STRUCTURED FREECORE) 3FX# ...[ 3FXM ...#MAC FREEIN 3FY2 ...#STR %A,1 3FY* ... LDX 1 %A [ADDRESS OF BLOCK 3FYN ... CALL 0 (GFRIN) 3F^3 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREELEX https://www.george3.co.uk/george/macro/freelex?rev=1705492539&do=diff FREELEX (GIN Macro) Defined in: MACROS RM59B Used in: BMAPTWO860, ERASE867 7*L8 ...[??? FREELEX SECT FILE FGN 6 DOC 7*W2 #MAC FREELEX 7B*L DOWN USELEX,3 7BT= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREELINK https://www.george3.co.uk/george/macro/freelink?rev=1705492539&do=diff FREELINK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BMFIXIT864, COMPCHAN84, COMPROB867, CONTINUE867, EDITPT867, IFEXPAN867, LISTINIT867, LISTINTC865, LISTPARS867, LISTPREP865, LISTRING864, MULTIPLX864, QUIT4, RELPER867, RENGAGE851 J462 ...[??? FREELINK SECT CENT FGN 32 DOC J4KL ...# J55= ...#MAC FREELINK J5JW ...#STR %A J64G ... LDX 2 %A J6J6 ...#STR %A J73Q ...#SKI J7HB ... LDX 2 FX2 J832 ... LDX 1 ALINKRING(2) J8GL ... SBN 1 BLI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREELNKS https://www.george3.co.uk/george/macro/freelnks?rev=1705492539&do=diff FREELNKS (GIN Macro) Defined in: CHCHCOORMAC2 Used in: IDFSEG867 JJP= ...[??? FREELNKS SECT CENT FGN 32 DOC JK8W ...# THIS MACRO PRESS %B LINKS BELONGING TO ACTIVITY POINTED TO BY %A, JKNG ...# DEFAULT FOR %A, FX2 JL86 ...#MAC FREELNKS JLMQ ...#STR %A JM7B ...#SKI JMM2 ... LDX 2 FX2 JN6L ...#STR %A JNL= ...( JP5W ...#STR %A,2 JPKG ... LDX 2 %A JQ56 ...) JQJQ ... LDX 2 ALINKRING(2) JR4B ... SBN 2 BLINKRING J… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEMT https://www.george3.co.uk/george/macro/freemt?rev=1705492539&do=diff FREEMT (GIN Macro) Defined in: MACROS RME10 Used in: LABEL866, LIBLOADB867, REDONMT867, TAPEWAIT65, UNLOADMT867 53C8 ...[??? FREEMT SECT FILE FGN 4 DOC 53M2 #MAC FREEMT 546L DOWN MODE,4 54L= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEOBJCORE https://www.george3.co.uk/george/macro/freeobjcore?rev=1705492539&do=diff FREEOBJCORE (GIN Macro) Defined in: MACROS GLJ Used in: *6XW #MAC FREEOBJCORE *7CG #STR %A,1 *7X6 LDX 1 %A *8BQ #STR %B,2 *8HY ... LDX 2 %B *8P6 ...#UNSET G4VOPA *8P* ...( *8PJ ...#UNS ISTDP *8PR ...( *8Q2 ...#STR %C *8Q9 ...( *8QD ...#ACC %C *8QM ...#SKI *8QW ... STO %C JWSP1 *8R5 ...#ACC %C *8R# ...( *8RH ... LDX 0 %C *8RQ ... STO 0 JWSP1 *8R^ ...) *8S8 ... CALL 0 (… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEOUT https://www.george3.co.uk/george/macro/freeout?rev=1705492539&do=diff FREEOUT (GIN Macro) Defined in: COREMACROS Used in: COREALLF867, COREALLG82, UNJAMMER866 3F^B ...[??? FREEOUT SECT CENT FGN 3F^P ...[ 3G24 ...[ENTRY SEQUENCE FOR DECHAINING BLK FROM SIZE RING (STRUCTURED FREE CORE) 3G2C ...[ 3G2Q ...#MAC FREEOUT 3G35 ...#STR %A,1 3G3D ... LDX 1 %A [ADDRESS OF BLOCK 3G3R ... CALL 0 (GFROUT) 3G46 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEPAGE https://www.george3.co.uk/george/macro/freepage?rev=1705492539&do=diff FREEPAGE (GIN Macro) Defined in: MACROS GLJ Used in: BSTS867 *?#G #MAC FREEPAGE [G4 ONLY *?S6 #STR %A,2 *#?Q LDX 2 %A **5Q ...#UNSET G4VOPA **5X ...( **64 ...#UNS ISTDP **69 ...( **6B ...#STR %B **6H ...( **6N ...#ACC %B **6T ...#SKI **72 ... STO %B JWSP1 **77 ...#ACC %B **7# ...( **7F ... LDX 0 %B **7L ... STO 0 JWSP1 **7R ...) **7Y ... LDN 1 1 **85 ... SBS 1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEPER https://www.george3.co.uk/george/macro/freeper?rev=1705492539&do=diff FREEPER (GIN Macro) Defined in: MACS SPC Used in: CHTAB, COMPRO867, DRUM852, ENGAGE867, FREEPER867, INKS, IPBLISTD867, LISTDEV866, LISTNEXT867, MODE866, ONLINEC867, PCTLISTB867, RELPER867, SPUNLOAD867 ?MJ= #MAC FREEPER ?N3W DOWN FREEPER,1 ?NHG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEPGCNT https://www.george3.co.uk/george/macro/freepgcnt?rev=1705492539&do=diff FREEPGCNT (GIN Macro) Defined in: MACROS GLJ Used in: *C9G #MACRO FREEPGCNT *CP6 LDN 0 1 *D8Q SBS 0 CPAGETURNS *DNB #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEPROG https://www.george3.co.uk/george/macro/freeprog?rev=1705492539&do=diff FREEPROG (GIN Macro) Defined in: COREMACROS Used in: PROSTART867, SWAP865 JC8L ...#MAC FREEPROG JCJ* ...[ JCY4 ...[ MACRO TO RELEASE A PROGRAM BLOCK AND PUT IT ON THE FREE PROGRAM JD?R ...[ BLOCK CHAIN JDMG ...[ %A - PTR.TO OBJECT PROGRAM BLOCK JF39 ...[ %B - PTR.TO JOB BLOCK FOR PROGRAM JFBY ...#STR %A,1 JFQM ... LDX 1 %A [PTR TO PROGRAM BLOCK JG6B ...#STR %B,2 JGG5 ... LDX 2 %B [PTR TO PROGRAM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEPTAB https://www.george3.co.uk/george/macro/freeptab?rev=1705492539&do=diff FREEPTAB (GIN Macro) Defined in: MACROS GLJ Used in: LOADPROG865, REQESLIP861 #DF6 #MAC FREEPTAB #DHY ... LDX 1 %A #DLQ ...#UNSET G4VOPA #DPJ ...( #DSB ... ANDX 1 BITS22LS #DX8 ... SMO FX2 #F22 ... STO 1 ACOMMUNE1 #F4S ... DOWN SETUPPTS,10 #F7L ...) #F=D ...#UNSET G4VOPA #F*= ...#SKI #FDB CALL 0 (GFPTAB) #FY2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREESS https://www.george3.co.uk/george/macro/freess?rev=1705492539&do=diff FREESS (GIN Macro) Defined in: MACROS JSRG4 Used in: LOADERR70 KFH6 #MAC FREESS [JSRAYNER G4 ONLY KG2Q LDX 0 %A KGGB SBS 0 EBSWAPSP KH22 BSOFF G4SWAIT,MFREESS KHFL FON HSWAPSPWT KH^= OFF G4SWAIT KJDW MFREESS KJYG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREETAB https://www.george3.co.uk/george/macro/freetab?rev=1705492539&do=diff FREETAB (GIN Macro) Defined in: CLOSE-MACROS Used in: DEAD867, ERASE867, GETDIR860, GETDIRX860, INCCHECK860, LIBLOAD867, RENAMDIR, RENAMEMT867, RETURN867, TRAPGO864, USERLIB867, USEROPEN867 ?78S ...[??? FREETAB SECT FILE FGN 11 DOC ?7DL #MAC FREETAB ?7Y= MFREE FILE,FTAB ?8CW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEZE https://www.george3.co.uk/george/macro/freeze?rev=1705492539&do=diff FREEZE (GIN Macro) Defined in: MACROS DTP Used in: CHTAB, INKS DMP= [??? FREEZE SECT DIAG FGN 552 DOC DN8W #MAC FREEZE [M.C.D. MANN DNNG [ DP86 [ DPMQ [ ************ DQ7B [ * FREEZE * DQM2 [ ************ DR6L [ DRL= [ DS5W ...#TID DSKG #GEO G3PDFREEZE %A,%B,%C,%D,%E DT56 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREEZESAVE https://www.george3.co.uk/george/macro/freezesave?rev=1705492539&do=diff FREEZESAVE (GIN Macro) Defined in: CLOSE-MACROS Used in: SAVEFILE860 8S2J ...[??? FREEZESA SECT FILE FGN 11 DOC 8S=B #MAC FREEZESAVE 8S*G ...#STR READ,%A 8SDL ...( 8SHQ ...#STR %A 8SLW ...! %A MUST BE 'READ' OR NULL 8SQ2 DOWN CLOSFREZ,2 8STX ...#EXI 8S^S ...) 8T5P ... DOWN CLOSFREZ,1 8T9L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREHFURB https://www.george3.co.uk/george/macro/frehfurb?rev=1705492539&do=diff FREHFURB (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 5Q*J ...[??? FREHFURB SECT FILE FGN 16 DOC 5QKB # 5R52 # FREES HALF THE FURBS/FURRBS ALTERNATELY 5RJL #MAC FREHFURB 5S4= LDCT 0 #100 5SHW CALL 7 M12FREEFILE 5T3G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FRENO https://www.george3.co.uk/george/macro/freno?rev=1705492539&do=diff FRENO (GIN Macro) Defined in: MACROSIPC Used in: IPCGEO8 3D97 ...[??? FRENO SECT COMM FGN 19 DOC 3DHJ ...[ REMOVES RECORD WITH LINK NUMBER %A FROM IPSTACK AND FREES NUMBER 3DW2 #MAC FRENO 3F*L LDX 0 %A 3FT= SMO FX2 3G#W STO 0 ACOMMUNE1 3GSG DOWN GETNOR,3 3H#6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREZKICK https://www.george3.co.uk/george/macro/frezkick?rev=1705492539&do=diff FREZKICK (GIN Macro) Defined in: MACROS FIXD Used in: CHARGESC867, COREALL865 7D4# ...[??? FREZKICK SECT CENT FGN 11 DOC 7D#6 # 7DRQ [ THIS MACRO WAKES UP ACTIVITIES WAITING IN FREZWAIT 7F?B # 7FR2 #MAC FREZKICK 7G=L BSOFF FREEZBIT,MFREZ 7GQ= OFF FREEZBIT 7H9W FON FREZWAIT 7HPG MFREZ 7J96 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREZWAIT https://www.george3.co.uk/george/macro/frezwait?rev=1705492539&do=diff FREZWAIT (GIN Macro) Defined in: MACROS FIXD Used in: COMPSWAITING, COREALLF867 7?XG ...[??? FREZWAIT SECT CENT FGN 11 DOC 7#C6 # 7#WQ [ THIS MACRO SETS AN ACTIVITY WAITING FOR A FROZEN BLOCK TO BE UNLOCKED 7*BB [ OR THE NEXT SPRING CLEAN 7*W2 # 7B*L #MAC FREZWAIT 7BT= ON FREEZBIT 7C#W COOR3 FREZWAIT 7CSG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FREZWF https://www.george3.co.uk/george/macro/frezwf?rev=1705492539&do=diff FREZWF (GIN Macro) Defined in: WORK-MACROS Used in: 52CY ...[??? FREZWF SECT FILE FGN 4 DOC 52MQ #MAC FREZWF 537B FINDWFN ,2 53M2 LDN 0 1 546L ADS 0 FREEZECOUNT(2) 54L= LDX 2 FX2 555W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FRIGMONF https://www.george3.co.uk/george/macro/frigmonf?rev=1705492539&do=diff FRIGMONF (GIN Macro) Defined in: MACROS RM59B Used in: LISTDIR867, LOGANAL864, WA864, WHATRVSA867, WHTSTAT867, WLC867 5#XW ...[??? FRIGMONF SECT FILE FGN 6 DOC 5*X6 #MAC FRIGMONF 5B4# ...[ THIS MACRO IS A FRIG TO CREATE A WORKFILE OPEN TO A CPAT INSIDE 5B9G ...[ THE SYSTEM AND ACCESSIBLE BY COMMAND EG LISTFILE 5BBQ CREATEWF [SETS UP A WORKFILE FCB,FEXTRA AND 5BWB [CHAINS IT AT THE TOP OF THE ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FRITE https://www.george3.co.uk/george/macro/frite?rev=1705492539&do=diff FRITE (GIN Macro) Defined in: CLOSE-MACROS Used in: CLOSEND867, FHOBJBL860, FHOBJIND860, FREEBUFF860, SJLOOP864 C*24 ...[??? FRITE SECT FILE FGN 11 DOC C*9W [ C*PG #MAC FRITE CB96 #STR %A CBNQ ( CBTY ...#STR ALL,%A CC36 ...( CC8# ...#STR 0,%A CC*G ... LDX 0 %A CCGN ...) CCMW ...#STR ALL,%A CCT4 ...#SKI CD2= ... LDCT 0 #400 CD7L SMO FX2 CDM= STO 0 ACOMMUNE7 CF6W ) CFLG #STR %A CG66 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FRSOFURB https://www.george3.co.uk/george/macro/frsofurb?rev=1705492539&do=diff FRSOFURB (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 5T?# ...[??? FRSOFURB SECT FILE FGN 16 DOC 5TH6 # 5W2Q # FREES FURBS/FURRBS BELONGING TO SWAPPED OUT PROGRAMS 5WGB #MAC FRSOFURB 5X22 LDCT 0 #200 5XFL CALL 7 M12FREEFILE 5X^= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FRSOFUWB https://www.george3.co.uk/george/macro/frsofuwb?rev=1705492539&do=diff FRSOFUWB (GIN Macro) Defined in: MACROS RMD10 Used in: UNJAMMER866 5Y94 ...[??? FRSOFUWB SECT FILE FGN 16 DOC 5YDW # 5YYG # FREES FUWBS/FURWBS BELONGING TO SWAPPED OUT PROGRAMS 5^D6 #MAC FRSOFUWB 5^XQ LDCT 0 #600 62CB CALL 7 M12FREEFILE 62X2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FS https://www.george3.co.uk/george/macro/fs?rev=1705492539&do=diff FS (GIN Macro) Defined in: MACROS DTP Used in: DTJQ [??? FS SECT DIAG FGN 552 DOC F5BQ #MAC FS [M.C.D. MANN F5WB [ F6B2 [ F6TL [ ******** F7*= [ * FS * F7SW [ ******** F8#G [ F8S6 [ F9?Q FSFILE %A,%B,%C,%D,%E F9RB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSCON https://www.george3.co.uk/george/macro/fscon?rev=1705492539&do=diff FSCON (GIN Macro) Defined in: MACROS RMD10 Used in: CONCEPT85 #FN8 ...[??? FSCON SECT FILE FGN 16 DOC #GX= #MAC FSCON #HBW #STR %A,0 #HWG LDX 0 %A #JB6 TOPFCB 1 #JTQ SBS 0 FSIZE(1) #K*B MBS 1,BFALTB,BFALTR #KT2 LDX 0 FSIZE(1) #L#L BPZ 0 M1FSCON #LS= STOZ FSIZE(1) #M?W LDN 0 FBLKS-A1 #MRG STO 0 FBLMOD(1) #N?6 BRN %B #NQQ M1FSCO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSDESC https://www.george3.co.uk/george/macro/fsdesc?rev=1705492539&do=diff FSDESC (GIN Macro) Defined in: MACROSBRBS Used in: MESSI 5Y94 ...[??? FSDESC SECT FILE FGN 14 DOC 5YDW [ 5YYG [ 5^D6 [ 5^XQ [ 62CB [THE FOLLOWING MACROS ARE USED TO MEND THE CURRENT DESCRIPTION 62X2 [OF THE FILESTORE INTO THE BEGINNING OF THE CHAPTER WHICH FINDS 63BL [ THE FILESTORE (FINDFS). 63W= #MAC FSDESC 64*W #LIS 3 64TG #SKI EXUDAS 65*6 #MEND FSTABLE 65SQ #SKI EXUDAS<1$1 66#B #MEND FINDFS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSFILE https://www.george3.co.uk/george/macro/fsfile?rev=1705492539&do=diff FSFILE (GIN Macro) Defined in: MACROSBRBS Used in: 69^J ...[??? FSFILE SECT FILE FGN 14 DOC 6=9B [ 6=P2 [THE FOLLOWING MACRO USES THE LOCAL IDENTIFIERS MFINDFS,MFINDFS1, 6?8L [MFINDFS2,MFINDFS3. THEY HAVE THE FOLLOWING SIGNIFICANCE:- 6?N= [ 6#7W [ MFINDFS: INITIALLY SET OPTIONALLY TO 2 TO CHECK VALIDITY OF THE 6#MG [ FIRST %A OF A GROUP (MUST BE EQUAL TO 3). THEREAFTER 6*76 [ REDEFINED EQUAL TO EACH %A IN TURN TO CHEC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHACCWK https://www.george3.co.uk/george/macro/fshaccwk?rev=1705492539&do=diff FSHACCWK (GIN Macro) Defined in: MACROS SHFS Used in: HLSREAD867, MOVCART867, NEWOWN865, TRANFAIL866 =GYB ...[??? FSHACCWK SECT FILE FGN 1 DOC =HD2 ...#MAC FSHACCWK =HXL ... DOWN FSHTRAND,11 =JC= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHACTNO https://www.george3.co.uk/george/macro/fshactno?rev=1705492539&do=diff FSHACTNO (GIN Macro) Defined in: MACROS SHFS Used in: 8*62 [??? FSHACTNO SECT FILE FGN 1 DOC 8*KL #MAC FSHACTNO 8B5= STO 1 GEN0 8BJW LDX 1 FSHINPTR 8C4G BZE 1 MFSHACTNO4 8CJ6 LDX 1 FSHRINGA+BPTR(1) 8D3Q LDX 1 BPTR(1) 8DHB SBN 1 FSHRINGA 8F32 LDX 0 FSHMARKPTR(1) 8FGL BZE 0 MFSHACTNO3 8G2= ADN 0 FSHMARKLIST(1) 8GFW STO 0 GEN1 8G^G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHACTPR https://www.george3.co.uk/george/macro/fshactpr?rev=1705492539&do=diff FSHACTPR (GIN Macro) Defined in: MACROS SHFS Used in: BSBLFAIL867, CDCIPB864, LISTINTC865, MORNING867, MOVCART867, PCTBEGIN863, PCTSTART867, RETURNA867, SCAN865, TRANFAIL866 8W8W [??? FSHACTPR SECT FILE FGN 1 DOC 8WNG #MAC FSHACTPR 8X86 DOWN FSHTRANC,5 8XMQ #STR %A 8Y7B #STR 8YM2 BRN (GEOERR) 8^6L #STR %A 8^L= BRN %A 925W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHCODE https://www.george3.co.uk/george/macro/fshcode?rev=1705492539&do=diff FSHCODE (GIN Macro) Defined in: MACROS SHFSA Used in: ACCESS867, ANSCOM865, ATTACHB866, ATTACHC867, BACKMASS860, BLOGNAL865, BMSAVJOB864, BSBLFAIL867, BSTS867, CANCRVX864, CDCIPB864, CDUM866, CLOSEIPB864, COMPRESS864, COMPROB867, COMPS WELL, CONCEPT85, COOR865, DEADA867, DEWELL867, DTWRONG867, ENWELL867, EXPRESS864, FHDIRTWO864, FREEZE864, GETBACK865, GETBAX865, GETONA867, HLSEMS864, HLSREAD867, IFEXPAN867, IFXCODES864, INCOBS867, INCOM864, INCRCUBX860, IPALL864, IPBCCA867, IPBCCD867, IPBINB8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHCOMPS https://www.george3.co.uk/george/macro/fshcomps?rev=1705492539&do=diff FSHCOMPS (GIN Macro) Defined in: MACROS SHFSA Used in: 2Y=Q [??? FSHCOMPS SECT FILE FGN 1 DOC 2YQB #MAC FSHCOMPS 2^=2 #ALT FSHA=0 2^PL #ALT FSHB=0 329= #ALT FSHTEST=0 32NW #STR %A 338G #ALT FSH%A=1 33N6 #STR %B 347Q #ALT FSH%B=1 34MB #STR %C 3572 #ALT FSH%C=1 35LL #ALT FSHAORB=FSHA^FSHB 366= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHCOPY https://www.george3.co.uk/george/macro/fshcopy?rev=1705492539&do=diff FSHCOPY (GIN Macro) Defined in: MACROS SHFSB Used in: =HD2 ...[??? FSHCOPY SECT FILE FGN 1 DOC =HXL ...#MAC FSHCOPY =JC= ...#UNS M1%C%DFSHCOPY =JWW ...#SKI =KBG ...( =KW6 ... BRN M3FSHCOPY =L*Q ...#DEF M1%C%DFSHCOPY=0? =LTB ...M1FSHCOPY =M*2 ... SBX %C FX1 =MSL ... LDX %D ALOGLEN(1) =N#= ... GETCORE %D,1 =NRW ... FINDCORE 2 =P?G ... ADX %C FX1 =PR6 ... EXIT %C 0 =Q=Q ...#DEF M2%C%DFSHCOPY=0? =QQB .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHENTRY https://www.george3.co.uk/george/macro/fshentry?rev=1705492539&do=diff FSHENTRY (GIN Macro) Defined in: MACROS SHFSA Used in: ABANDON867, ACTPRI867, ADDJOB867, ANSCOM865, ATTRIBUT867, BCAST867, BMSAVJOB864, CANTDO867, CLOSEMT867, CONNECT867, CONNECTA867, CONSOLE867, CONSROOT867, COPYA867, DEAD867, DELCON867, DEWELL867, DICTWELL867, DSCNCT867, ERASE867, FHDIRTWO864, FINISH867, FINISHB867, FREEPER867, FREEZE864, GETFREE867, HLSEVENT867, HLSREAD867, INCOM864, INITJOB867, INSTPARA867, IPALL864, IPBCCC867, IPBLISTD867, IPBSCANB867, JDTWO864, JWELLONE867, JWELLTWO867,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHGTPER https://www.george3.co.uk/george/macro/fshgtper?rev=1705492539&do=diff FSHGTPER (GIN Macro) Defined in: MACROS SHFSB Used in: 9NJL [??? FSHGTPER SECT FILE FGN 1 DOC 9P4= #MAC FSHGTPER 9PHW #ACC %A 9Q3G ( 9QH6 LDX 0 %A 9R2Q SMO FX2 9RGB STO 0 ACOMMUNE7 9S22 ) 9SFL #ACC %A 9S^= #SKI 9TDW ( 9TYG SMO FX2 9WD6 STO %A ACOMMUNE7 9WXQ ) 9XCB DOWN GETFREE,22 9XX2 BRN %B 9YBL BRN %C 9YW= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHIPCON https://www.george3.co.uk/george/macro/fshipcon?rev=1705492539&do=diff FSHIPCON (GIN Macro) Defined in: MACROS SHFSB Used in: IPALL864, SETPRAMB867 8^L= [ 925W [??? FSHIPCON SECT FILE FGN 1 DOC 92KG [ 9356 #MAC FSHIPCON 93JQ #SKI %A 944B ( 94J2 #ACC %A 953L #SKI 95H= ( 962W SMO FX2 96GG STO %A ACOMMUNE1 9726 ) 97FQ #ACC %A 97^B ( 98F2 LDX 0 %A 98YL SMO FX2 99D= STO 0 ACOMMUNE1 99XW ) 9=CG DOWN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHIPS https://www.george3.co.uk/george/macro/fships?rev=1705492539&do=diff FSHIPS (GIN Macro) Defined in: MACROS SHFSB Used in: IPALL864 7XDG [??? FSHIPS SECT FILE FGN 1 DOC 7XY6 [ 7YCQ #MAC FSHIPS 7YXB #STR SHAPE,%A [SKIP 'IPEXTST' ETC. IF EXTENSION 7^C2 ( [ TABLE ALREADY DECLARED 7^WL [('SHAPE' PARAMETER - USED BY IPALL) 82B= IPEXTST 82TW IPEXTDEF JMANAGER0 ,#40000000 83*G IPEXTDEF JMANAGER1 ,#40000000 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHIPSHAPE https://www.george3.co.uk/george/macro/fshipshape?rev=1705492539&do=diff FSHIPSHAPE (GIN Macro) Defined in: MACROS SHFSB Used in: 8WNG [ 8X86 [??? FSHIPSHAPE SECT FILE FGN 1 DOC 8XMQ [ 8Y7B #MAC FSHIPSHAPE 8YM2 #HAL %A@C1,%B@C1 8^6L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHKILL https://www.george3.co.uk/george/macro/fshkill?rev=1705492539&do=diff FSHKILL (GIN Macro) Defined in: MACROS SHFS Used in: ATTACHB866, BSBLFAIL867, CDCIPB864, DEADA867, MORNING867, MOVCART867, PCTCON8, PCTSTART867, RETURNA867, SCAN865, TRANFAIL866 92KG [??? FSHKILL SECT FILE FGN 1 DOC 9356 #MAC FSHKILL 93JQ TRANSBEG FSHNOID,SUICIDE,1,NOBLOCKS,,ACOMMUNE1,M1FSHKILL,AUT 944B DOWN FSHTRANC,4 94J2 M1FSHKILL 953L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHMOVE https://www.george3.co.uk/george/macro/fshmove?rev=1705492539&do=diff FSHMOVE (GIN Macro) Defined in: MACROS SHFSB Used in: DTWRONG867, LIBINSEC864, LOGANAL864, MACRALAS864, SAVEJOB865, WA864 3*DL # 3*Y= [??? FSHMOVE SECT FILE FGN 1 DOC 3BCW #MAC FSHMOVE 3BXG #STR CANCEL,%A 3CC6 #SKI 3CWQ ( 3DBB DOWN FSHMVSTA,7 3DW2 #EXI 3F*L ) 3FT= #STR END,%A 3G#W ( 3GSG #STR START,%A 3H#6 ! %A MUST BE "START" OR "END" OR "CANCEL" 3HRQ #STR COPY,%B 3J?B #SKI 3JR2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHPFIN https://www.george3.co.uk/george/macro/fshpfin?rev=1705492539&do=diff FSHPFIN (GIN Macro) Defined in: MACROS SHFSB Used in: 6GH2 [??? FSHPFIN SECT FILE FGN 1 DOC 6H2L #MAC FSHPFIN 6HG= #SKI FSHA<1$1 [INCLUDE IF NOT COMPILING FOR MACHINE A 6H^W ( 6JFG ! PARAMETER 2 ONLY APPLIES IN M/C A 6J^6 #EXI 6KDQ ) [#SKI FSHA<1#1 6KYB #SKI FSHA [INCLUDE IF COMPILING FOR MACHINE A 6LD2 ( 6LXL #STR #,%A 6MC= ( 6MWW ! PARAMETER 2 MUST BEGIN WITH A '#' 6NBG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHPFOUT https://www.george3.co.uk/george/macro/fshpfout?rev=1705492539&do=diff FSHPFOUT (GIN Macro) Defined in: MACROS SHFSB Used in: 4#92 [??? FSHPFOUT SECT FILE FGN 1 DOC 4#NL #MAC FSHPFOUT 4*8= #STR #,%A 4*MW ( 4B7G ! PARAMETER 1 MUST BEGIN WITH A '#' 4BM6 #EXI 4C6Q ) [#STR #,%A 4CLB #SKI %A<1$1 4D62 ( 4DKL ! PARAMETER 1 MAY NOT BE ZERO 4F5= #EXI 4FJW ) [#SKI %A<1$1 4G4G #DEF 20?=0 4GJ6 #ALT FSHPREFIX=0 4H3Q #ALT FSHPREFIXA=0 4… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHSKIP https://www.george3.co.uk/george/macro/fshskip?rev=1705492539&do=diff FSHSKIP (GIN Macro) Defined in: MACROS SHFSA Used in: ANSCOM865, BSTS867, CANCRVX864, CDCIPB864, CDUM866, CLOSEIPB864, COMPRESS864, COMPROB867, COMPS WELL, COOR865, DELETE864, DTWRONG867, EVENTS864, FHDIRTWO864, FINDFS867, FREEZE864, GETBACK865, GETBAX865, GETONA867, HLSREAD867, IFXCODES864, INCOBS867, INCOM864, IPBCCA867, IPBCCD867, IPBINB867, IPBSCAN867, IPCON864, IPCONA864, IPCOND864, IPCSTART864, JDWRITE867, LOGANAL864, LOGCOM864, MACRALAS864, MONFILEA864, MOVCART867, MTSTART864, NETOFLNE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHTABLE https://www.george3.co.uk/george/macro/fshtable?rev=1705492539&do=diff FSHTABLE (GIN Macro) Defined in: MACROS SHFS Used in: 6#7W [??? FSHTABLE SECT FILE FGN 1 DOC 6#MG #MAC FSHTABLE 6*76 #STR MOVEAREA,%A 6*LQ #STR 6B6B ( 6BL2 #UNS MTABY 6C5L ( 6CK= #SKI %C>127-127 6D4W ! PARAMETER C IS OUT OF RANGE 6DJG #SKI %C>127-127 6F46 #SKI 6FHQ ( 6G3B %C:%B 6GH2 #DEF 21?=21?+1 6H2L #DEF 22?=22?+%C 6HG= ) 6H^W ) 6JFG #UNS MTABY 6J^6 #SKI 6KDQ ! … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHTEST https://www.george3.co.uk/george/macro/fshtest?rev=1705492539&do=diff FSHTEST (GIN Macro) Defined in: MACROS SHFSA Used in: ABANDONA867, BMSJRNL866, EMSENTER867, GETBAX865, GETFREE867, LISTFIND867, MOVCART867, NEWINST867, PMCHAINS864, PMFSB84, PMSUMA867, REGEN865, SCHEDIN867, SETLIST864, SETUP867, SETUPA867, SETUPB867, TRANFAIL866 3W3W [??? FSHTEST SECT FILE FGN 1 DOC 3WHG #MAC FSHTEST 3X36 # NOTE: FSHNOIPB IS NOT SET WITHIN THIS EDF! 3XGQ # 3Y2B FCMENDV 3YG2 # 3Y^L # 3^F= # THE FIXED CORE STAT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSHTRMC https://www.george3.co.uk/george/macro/fshtrmc?rev=1705492539&do=diff FSHTRMC (GIN Macro) Defined in: MACROS SHFSB Used in: =9MG [??? FSHTRMC SECT FILE FGN 1 DOC ==76 #MAC FSHTRMC ==LQ FSHCODE AORB =?6B ( =?L2 #STR ON,%A =#5L #SKI =#K= ( =*4W HIDECOM AZ,OFF [MACHINE SWITCH =*JG HIDECOM ZF,OFF [ACCOUNTING FRIG =B46 #EXI =BHQ ) =C3B #STR OFF,%A =CH2 #SKI =D2L ( =DG= HIDECOM AZ =D^W HIDE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSLOAD https://www.george3.co.uk/george/macro/fsload?rev=1705492539&do=diff FSLOAD (GIN Macro) Defined in: MACROS DTP Used in: F=?2 [??? FSLOAD SECT DIAG FGN 553 DOC F=QL #MAC FSLOAD [M.C.D. MANN F?== [ F?PW [ F#9G [ ************ F#P6 [ * FSLOAD * F*8Q [ ************ F*NB [ FB82 [ FBML #MEN LOADERI FC7= #TRA K1FSLOADER FCLW #STR %A,OFF FD6G #SKI FDL6 ( FF5Q BRN K2FSLOADER FFKB #END FFLY ...#UNS FPRJW FFNG ...( FFQ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSRELOAD https://www.george3.co.uk/george/macro/fsreload?rev=1705492539&do=diff FSRELOAD (GIN Macro) Defined in: BMAP MACROS Used in: 2Y?8 ...[??? FSRELOAD SECT FILE FGN 36 DOC 2YQB #MAC FSRELOAD [SUPRESSES 'RESTORE?' UNLESS PREVIOUS 2YR* ...#UNS FPARTRES 2YS# ...( 2YT? ...#MEN BMQUEST 2YW= ...#TRA K91BMQUEST 2YX9 ...#STR %A,ON 2YY8 ...#SKI 2Y^7 ...( 2^26 ... BRN K92BMQUEST 2^35 ...#END 2^44 ...#EXI 2^53 ...) 2^62 ...) 2^6^ ...#UNS FPARTRES 2^7Y ...#SKI 2^8X ...( 2^=2 #MEN BACKMAP … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSUD https://www.george3.co.uk/george/macro/fsud?rev=1705492539&do=diff FSUD (GIN Macro) Defined in: MACROS JSRG4 Used in: LDSTART850, LOADERR70, LOADPROG865 D9J6 #MAC FSUD D=3Q LDN %A BSUD D=HB MFSUD LDX %A FPTR(%A) D?32 TXL %A BIT11 D?GL BCS %C D#2= TXU %B HSUDNO(%A) D#FW BCS MFSUD D#^G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FSUM https://www.george3.co.uk/george/macro/fsum?rev=1705492539&do=diff FSUM (GIN Macro) Defined in: MACROS JSR Used in: LOAD60 FG52 # FSUM THIS MACRO'SUMS'AN AREA OF AN OBJ PROG USING 127 INSTR FGJL #MAC FSUM [J.S.RAYNER GEORGE 3 VERSION FH4= MOD ADX %C ADATUM,%A FHHW SMO %D FJ3G SUM %B 0 FJ9Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FTM https://www.george3.co.uk/george/macro/ftm?rev=1705492539&do=diff FTM (GIN Macro) Defined in: MACROS RMD10 Used in: LDSTART850 2XH# ...[??? FTM SECT FILE FGN 16 DOC 2Y=Q #MAC FTM 2YQB DOWN MATALO,3 2^=2 BRN %A [END OF FILE 2^PL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FTRANC https://www.george3.co.uk/george/macro/ftranc?rev=1705492539&do=diff FTRANC (GIN Macro) Defined in: MACROS EWDAS Used in: =3S2 # =4?L # ********************************************************************** =4R= # * =5=W # * EXOFILE TRANSFER SYSTEM =5QG # * =6=6 # * FTRANC,FTRANW,TRANERR,OPENST,CLOSEST,CLOSEWR,WORDST =6PQ # * … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FTRANW https://www.george3.co.uk/george/macro/ftranw?rev=1705492539&do=diff FTRANW (GIN Macro) Defined in: MACROS EWDAS Used in: =M*2 # =MSL [??? FTRANW =N#= # ****** =NRW #MAC FTRANW =P?G # =PR6 #OPT MFTRANW1=0 =Q=Q #SKI MFTRANW1-1 =QQB ( =R=2 #FRE MFTRANW1 =RPL #DEF MFTRANW1=1 =S9= MFTRANW2 =SNW #DEF MFTRANW=MFTRANW2 =T8G STO 0 EWK+2(3) =TN6 LDX 0 EWK(3) =W7Q LDN 1 EBUF-A1(3) =WMB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FULLBPAS https://www.george3.co.uk/george/macro/fullbpas?rev=1705492539&do=diff FULLBPAS (GIN Macro) Defined in: CLOSE-MACROS Used in: ARCHIVE867, BACKMASS860, BMAPTWO860, BMFIXIT864, BMOUTPUT867, BMSJRNL866, BSPRUNE867, CLOSEAB863, COPYFILA867, FHOBJDIR860 CM^L ...[??? FULLBPAS SECT FILE FGN 11 DOC CPY6 #MAC FULLBPAS CQ3= ...[ MOVE A FULLB INTO THE CORRECT PLACE IN THE DIRECTORIES' CQ6B ...[ FILE CHAIN. USED WHEN BLOCKS RECORDS ARE DELETED FROM THE CQ9G ...[ DIRECTORY ENTRY CQ#L ...[ %A -> FULLB %B - WORK MODIFIER CQCQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FULLMONS https://www.george3.co.uk/george/macro/fullmons?rev=1705492539&do=diff FULLMONS (GIN Macro) Defined in: PMACS Used in: 9?BQ [??? FULLMONS SECT DIAG FGN 104 DOC 9?WB #MAC FULLMONS [M.C.D. MANN 9#B2 [ 9#TL [ 9**= [ ************** 9*SW [ * FULLMONS * 9B#G [ ************** 9BS6 [ 9C?Q [ 9CRB [ RESTORE TIME MACRO TO GIVE 9D?2 [ FULL MONITORING FILES 9DQL [ 9F== #MEN PMFS 9FPW #TRA JZM4 9G9G LDX 4 JMASK1(1) 9GP6 STO 4 J… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FULLWAIT https://www.george3.co.uk/george/macro/fullwait?rev=1705492539&do=diff FULLWAIT (GIN Macro) Defined in: MACROS RJDG Used in: 27KN ...[??? FULLWAIT SECT CENT FGN 7 DOC 27TG # 2C7W #MAC FULLWAIT 2CMG #MEN WAIT 2D76 #TRA K50WAIT 2DLQ EXIT 7 0 2F6B #END 2FL2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FUWBSET https://www.george3.co.uk/george/macro/fuwbset?rev=1705492539&do=diff FUWBSET (GIN Macro) Defined in: ACCESSMACROS Used in: USELEX5 BJJS ...[??? FUWBSET SECT FILE FGN 19 DOC BJSL # THIS MACRO I LIKE STEPREWRITE - IT RENAMES T E CURRENT USA E BK#= # BLOCK A FILE/FUWB J TO %B IF BLOCK NOT THERE BKRW #MAC FUWBSET BL?G SCURFUB 1,%A,%B BLR6 LDX 0 FFSFUWB BM=Q STO 0 ATYPE(1) BMQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) FWAIT https://www.george3.co.uk/george/macro/fwait?rev=1705492539&do=diff FWAIT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BACKMASS860, CAFSCTRL866, IDFPROP867, IPBSTART867, IPCSTART864, LOADERII867, MOPSTART865, ONLINCL864, SCAN865, SETIDF867, SETUP867, SETUPA867, SETUPB867 62M8 ...[??? FWAIT SECT CENT FGN 32 DOC 63BL #MAC FWAIT 63W= LDN 0 %A 64*W DSA 0 ATYPE(2) [SET WAITING STYLE 64TG LDN 1 FLOWQ 65*6 STO 1 CHAINADD(2) 65SQ LDX 1 AQEND [PUT ON 66#B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) G12MESS https://www.george3.co.uk/george/macro/g12mess?rev=1705492539&do=diff G12MESS (GIN Macro) Defined in: MACROS FIXD Used in: 229S ...[??? G12MESS SECT CENT FGN 11 DOC 22FL [ DEK BEASLEY : CENT 22^= #MAC G12MESS [INCLUDES 'CORE GIVEN' MESSAGE ON G12 23DW #SKI G3 [ APPLIES TO GEORGE 3 ONLY 23YG ( 24D6 #MEN GIVE 24XQ #TRA K2GIVE 25CB BRN K3GIVE 25X2 #END 26BL ) 26W= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GDE https://www.george3.co.uk/george/macro/gde?rev=1705492539&do=diff GDE (GIN Macro) Defined in: ACCESSMACROS Used in: FILELOG =P3N ...[??? GDE SECT FILE FGN 19 DOC =P?G #MAC GDE =PR6 GETDIR 1 =Q=Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GDISREP https://www.george3.co.uk/george/macro/gdisrep?rev=1705492539&do=diff GDISREP (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCPERI83 3HLH ...[??? GDISREP SECT COMM FGN 19 DOC 3HYY ...[ UNSET DISESTABLISHED MARKER,AND SET DISESTABLISHED REPLY GIVEN. 3J?B #MAC GDISREP 3JR2 LDX 0 AWORK1(%A) 3K=L SMO AWORK1(%A) 3KQ= LDX 1 ARINGEL(%A) 3L9W SBX 1 0 3LPG LDN 0 1 3M96 SLL 0 20 3MNQ ORS 0 ASTATUS2(1) 3N8B SLL 0 1 3NN2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GDRPTRS https://www.george3.co.uk/george/macro/gdrptrs?rev=1705492539&do=diff GDRPTRS (GIN Macro) Defined in: OPEN-MACROS Used in: ORELEND860 =BRJ ...[??? GDRPTRS SECT FILE FGN 20 DOC =C3B #MAC GDRPTRS =CH2 [ =D2L [ THIS MACRO CALCULATES THE READ POINTERS OF A NEWLY OPENED GENERAL =DG= [ DESTRUCTIVE READ FILE,AND SETS THEM EQUAL TO THE READ PTRS OF THE =D^W [ MOST ADVANCED READER. =FFG [ =F^6 LDX %B %A =GDQ ADX %B FBACKPOINT(%A) [%B -> FSTACK =GYB MOD LDEX 0 ARINGNO,%B =H… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GELL https://www.george3.co.uk/george/macro/gell?rev=1705492539&do=diff GELL (GIN Macro) Defined in: MACROS NI Used in: LOADERMT867, LOADERPM867, RESTART84 2GK= # 2H4W # ASK OPERATOR WHICH VERSION OF GEORGE IS TO BE LOADED 2HJG # 2J46 #MAC GELL 2JHQ '165 0 0 2K3B '166 0 0 2KH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GEOERR https://www.george3.co.uk/george/macro/geoerr?rev=1705492539&do=diff GEOERR (GIN Macro) Defined in: MISCMACS Used in: ABANDON867, ABANDONA867, ADDICT865, ADDJOB867, ALAS822, ALLOCATE867, ALLOW84, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BACKMAP864, BACKMARK850, BACKMASS860, BACKROOM865, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GEOEVENTS https://www.george3.co.uk/george/macro/geoevents?rev=1705492539&do=diff GEOEVENTS (GIN Macro) Defined in: MACROS NI Used in: COOR865 2QC= # 2QWW # HANDOVER ALL GEORGE EVENTS,OR SUSPEND GEORGE AWAITING AN EVENT 2RBG # 2RW6 #MAC GEOEVENTS 2S*Q '161 0 0 2STB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GEOMILL https://www.george3.co.uk/george/macro/geomill?rev=1705492539&do=diff GEOMILL (GIN Macro) Defined in: MACROS NI Used in: 2T*2 # 2TSL # UPDATE GEORGE'S MILL TIMER (K7) 2W#= # 2WRW #MAC GEOMILL 2X?G '167 0 0 2XR6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GEOPACK https://www.george3.co.uk/george/macro/geopack?rev=1705492539&do=diff GEOPACK (GIN Macro) Defined in: MACS PW Used in: ATTJOUNL861, ATTRIBUT867, COREALLH860, ENGAGE867, FORMLOOP865, FREEPER867, GETFREEB864, IDFPROP867, IPBCONS867, IPBERROR867, IPBINB867, IPBJOURN867, IPBSCANB867, IPBSTARB867, IPBSTART867, LISTEND867, LISTLOOP867, LISTNEXT867, MAKEVCC867, MONFIL865, MONJRNAL850, MOPCOM867, MOPCOMB865, MULTIPLX864, ONLINEC867, OUTPER867, PAGES867, PCTCON8, PERFAIL866, PERFLOGS866, REDON867, RELPER867, REPERT867, RIGHT867, SETUPB867, TERM867, WHATPERX867, WLD864 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GEOSTOP https://www.george3.co.uk/george/macro/geostop?rev=1705492539&do=diff GEOSTOP (GIN Macro) Defined in: PMACS Used in: BMQUEST866, BMQUESTB866, BSALFAIL, CDUM866, FINDFS867, FINISHB867, SETUPA867 PLSQ [??? GEOSTOP SECT DIAG FGN 104 DOC PM#B #MAC GEOSTOP [M.C.D. MANN PMS2 [ PN?L [ PNR= [ ************* PP=W [ * GEOSTOP * PPQG [ ************* PQ=6 [ PQPQ [ PR9B [ THIS MACRO TERMINATES A RUN OF GEORGE, AND CAUSES THE POSTMORTEM PRP2 [ ROUTINE TO OUTPUT A SPEC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERLABEL https://www.george3.co.uk/george/macro/gerlabel?rev=1705492539&do=diff GERLABEL (GIN Macro) Defined in: MACSGERONIMO Used in: 22FL [ 22^= [ 23DW [ RETURN TO KEITH H MARTIN 8OPAW 23YG [ 24D6 [ 24XQ [ 25CB [CONTENTS LIST:- 25X2 [ 26BL [ GERLABEL 26W= [ GERTABEND 27*W [ GERTABEXTRA 27TG [ GERTABFILL 28*6 [ GERTABINIT 28SQ [ GERTABLE 29#B [ 29S2 [END OF LIST. 2=?L [ 2=HD ...[??? GERLABEL SECT COMM FGN 7 DOC 2=R= #MA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERTABEND https://www.george3.co.uk/george/macro/gertabend?rev=1705492539&do=diff GERTABEND (GIN Macro) Defined in: MACSGERONIMO Used in: 2#2# ...[??? GERTABEN SECT COMM FGN 7 DOC 2#=6 [ 2#PQ [ 2*9B [ 2*P2 [ 2B8L #MAC GERTABEND 2BN= #DEF 20?=20?+1 2C7W GERLABEL QZSTARS 2CMG 16H**** 2D76 GERLABEL QZBUFF 2DLQ #REP 20 2F6B 4H 2FL2 ...[ 2G5L ...[ 2GK= ...[ 2H4W GERLABEL QZCPTPER 2HJG DISTY QZAB 2J46 BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERTABEXTRA https://www.george3.co.uk/george/macro/gertabextra?rev=1705492539&do=diff GERTABEXTRA (GIN Macro) Defined in: MACSGERONIMO Used in: 3QW# ...[??? GERTABEX SECT COMM FGN 7 DOC 3R66 [ 3RKQ [ 3S5B [ 3SK2 [ 3T4L #MAC GERTABEXTRA 3TJ= #STR %A 3W3W ( 3WHG GERTABFILL %A 3X36 GERTABEXTRA %B,%C,%D,%E,%F,%G,%H,%I,%J 3XGQ ) 3Y2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERTABFILL https://www.george3.co.uk/george/macro/gertabfill?rev=1705492539&do=diff GERTABFILL (GIN Macro) Defined in: MACSGERONIMO Used in: 3Y=8 ...[??? GERTABFI SECT COMM FGN 7 DOC 3YG2 [ 3Y^L [ 3^F= [ 3^YW [ 42DG #MAC GERTABFILL 42Y6 #DEF 20?=20?+1 43CQ 12H%A 43JY ...#UNSET %A 43Q6 ...( 43XB +%A 4478 ...) 448F ...#UNSET %A 449Q ...#STR 44?3 ...( 44## ... +0 44*K ...) 44C2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERTABINIT https://www.george3.co.uk/george/macro/gertabinit?rev=1705492539&do=diff GERTABINIT (GIN Macro) Defined in: MACSGERONIMO Used in: 44LS ...[??? GERTABIN SECT COMM FGN 7 DOC 44WL [ 45B= [ 45TW [ 46*G [ 46T6 #MAC GERTABINIT 47#Q #FRL 47SB #ORD 48#2 #INT 48RL GERLABEL QZLINK 49?= 0 49QW GERLABEL QZNULL 4==G NULL 4=Q6 GERLABEL QZCPTPCA 4?9Q 0,0,80,+QZBUFF 4?PB GERLABEL QZONLINE 4#92 60:1,0,32,0 4##X ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GERTABLE https://www.george3.co.uk/george/macro/gertable?rev=1705492539&do=diff GERTABLE (GIN Macro) Defined in: MACSGERONIMO Used in: 6#CN ...[??? GERTABLE SECT COMM FGN 7 DOC 6#MG [ 6*76 [ 6*LQ [ 6B6B [ 6BL2 #MAC GERTABLE 6C5L ... GERTABINIT %B,%A 6CK= GERTABFILL BJOBQ 6D4W GERTABFILL JOBNUM 6DJG GERTABFILL AJBRING+BPTR 6F46 GERTABFILL JOBRING 6F?Y ... GERTABFILL JSOURCE1 6FHQ GERTABFILL JSOURCE2 6G3B GERTABFILL JOBNO 6GH2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GET https://www.george3.co.uk/george/macro/get?rev=1705492539&do=diff GET (GIN Macro) Defined in: MACROS RME10 Used in: CHTAB, INCTAPES867, INKS, MESSBJ 2G5L ...[??? GET SECT FILE FGN 4 DOC 2TSL [ JUDITH SAWER LIBRARIAN MACROS 2W#= [THIS MACRO GETS A POOL TAPE OPTIONALLY. INPUT IS A FILE/FABSNB HOLDING 2WRW [DIRECTORY NAME AND THE LOCAL NAME TO BE GIVEN TO THE TAPE. THIS BLOCK W 2X?G [EXTENDED ON EXIT TO CONTAIN THE TSN. 2XR6 [IF THERE ARE NO POOL TAPES AVAILABLE, THE REPLY NOTAV IS GIVEN 2Y=Q #MAC GET 2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETACT https://www.george3.co.uk/george/macro/getact?rev=1705492539&do=diff GETACT (GIN Macro) Defined in: COREMACROS Used in: ABANDON867, ADDICT865, BACKMAP864, BACKMASS860, BACKROOM865, BMAPTWO860, BMCNTRL866, BMJLIST864, BMSJRNL866, CDCIPB864, CIMOP867, CLOSEMT867, CLOSEONE867, COPYFILE867, DETACH867, DETACHB867, DSCNCT867, DTSUBSA867, DUMMYB867, ERASE867, FAILTWIN866, FREEPER867, GROPE867, IDFPROP867, INCEOT865, INTWIN866, IPBCONS867, IPBJOURN867, IPBSCAN867, IPBSTARB867, IPBSTART867, IPCOND864, IPCONE865, IPCOPENA83, IPCOPENB83, IPCPERI83, IPCSTART864, LIBREQCA8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETACTOP https://www.george3.co.uk/george/macro/getactop?rev=1705492539&do=diff GETACTOP (GIN Macro) Defined in: COREMACROS Used in: CHARGESC867, CONSOLE867, ENGAGE867, PERFLOGS866 ?#54 ...[??? GETACTOP SECT CENT FGN 32 DOC ?##W # ?#SG #MAC GETACTOP ?*#6 #STR %C ?*RQ GETCORAL %CLEN+%BLEN,N,HACTY+0%D:0 ?B?B #STR %C ?BR2 #SKI ?C=L GETCORAL %BLEN,N,HACTY+0%D:0 ?CQ= BRN MGET ?D9W BRN %A ?DPG MGET FINDCORE 1 ?F96 NAME 1,%B,%C ?FNQ ADN 1 ACTRING ?G8B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETACTX https://www.george3.co.uk/george/macro/getactx?rev=1705492539&do=diff GETACTX (GIN Macro) Defined in: COREMACROS Used in: ACCESS867, ANTIC867, ASSIGN860, DRUM852, IPBINB867, IPBINC865, IPBSCANB867, LISTFIND867, NETOFLNE867, ONLINCL864, ONLINEC867, RESTBLOK850, SCHEDJOB867, SETUP867, SQOPEN867 ?HCD ...[??? GETACTX SECT CENT FGN 32 DOC ?HM= # ?J6W #MAC GETACTX ?JLG GETCORAL %B,X,HMANDAT+HACTY+0%C:0 ?K66 FINDCORE 1 ?KKQ STO %A ATYPE(1) ?L5B ADN 1 ACTRING ?LK2 ENRING 1,ACTRING+BPTR(2)… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETACTXOP https://www.george3.co.uk/george/macro/getactxop?rev=1705492539&do=diff GETACTXOP (GIN Macro) Defined in: COREMACROS Used in: ENGAGE867 ?MS4 ...[??? GETACTXO SECT CENT FGN 32 DOC ?N3W # ?NHG #MAC GETACTXOP ?P36 GETCORAL %C,X,HACTY+0%D:0 ?PGQ BRN MGET ?Q2B BRN %A ?QG2 MGET FINDCORE 1 ?Q^L STO %B ATYPE(1) ?RF= ADN 1 ACTRING ?RYW ENRING 1,ACTRING+BPTR(2) ?SDG CHAIN FPTR(2),BPTR(2) ?SKN ...#UNS ICT ?SQW ... APGAX %B ?SY6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETAFURB https://www.george3.co.uk/george/macro/getafurb?rev=1705492539&do=diff GETAFURB (GIN Macro) Defined in: ACCESSMACROS Used in: INSERTWO6, LEXIFIND5, USELEX5 *B^N ...[??? GETAFURB SECT FILE FGN 19 DOC *C9G # THIS ATTEMPTS TO LEAVE THE CURRENT BLOCK IN THE FILE CHAIN AS A *CP6 # FILE/USAGE BLOCK [IT MAY NOT RE THERE AFTER COMING UP *D8Q #MAC GETAFURB *DNB #STR %A *F82 ( *FML LDCT 0 %A *G7= SMO FX2 *GLW STO 0 ACOMMUNE7 *H6G DOWN PERUSFIL,7 *HL6 ) *J5Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETAREA https://www.george3.co.uk/george/macro/getarea?rev=1705492539&do=diff GETAREA (GIN Macro) Defined in: MACROS EWDAS Used in: EXINONE867, NEXTUNIT867 NYTL # N^*= [??? GETAREA N^SW # ******* P2#G #MAC GETAREA P2S6 # P3?Q LDX 0 %A P3RB LDX 1 FX2 P4?2 STO 0 ACOMMUNE9(1) P4QL MFINDSU 1,ACOMMUNE9(1) P5== LADDP HUNIT(1),1 P5PW LDX 2 FX2 P69G JDED 1,MGETAREA1 P6P6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETBACK https://www.george3.co.uk/george/macro/getback?rev=1705492539&do=diff GETBACK (GIN Macro) Defined in: MACROSBRBS Used in: APPEND864, BSBLFAIL867, CHTAB, CORE867, DELETE864, GETBAX865, GIVE867, INKS, INSERT6, INSERTBL6, INSERTHR6, INSERTWO6, RAND864, RESTOREG864, REWRITE864, SWAP865, TRANFAIL866 49H4 ...[??? GETBACK SECT FILE FGN 14 DOC 49QW #MAC GETBACK 4==G #STR %A,0 4=Q6 LDX 0 %A 4?9Q #STR %A 4?PB #SKI 4#92 LDX 0 7 [LOAD IN X7 IF NO PARAMETER 4#NL SMO FX2 4*8= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETBAX https://www.george3.co.uk/george/macro/getbax?rev=1705492539&do=diff GETBAX (GIN Macro) Defined in: MACROSBRBS Used in: BMFIXIT864, BMINDEX866, CHTAB, COPYB867, COPYFILE867, CORE867, DROBJ864, EDSTART860, GIVE867, INKS, MTCODE864, OPENREL865, RAND864, RESTLIMB864 5MCS ...[??? GETBAX SECT FILE FGN 14 DOC 5MML [ 5N7= #MAC GETBAX 5NLW #STR %A 5P6G #SKI 5PL6 ( 5Q5Q SMO FX2 5QKB STOZ ACOMMUNE9 5R52 ) 5RJL #STR %A 5S4= ( 5SHW NGN 0 1 5T3G SMO FX2 5TH6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETBSLIS https://www.george3.co.uk/george/macro/getbslis?rev=1705492539&do=diff GETBSLIS (GIN Macro) Defined in: MACROSBRBS Used in: BSALFAIL, GETBACK865, GETBAX865 53WS ...[??? GETBSLIS SECT FILE FGN 14 DOC 546L # 54L= # 555W #MAC GETBSLIS 55KG #STR %A,7 5656 LDX 7 %A 56JQ CALL 0 MP2 574B #OPT MGET1=0 57J2 #SKI MGET1-1 583L ( 58H= BRN MGET2 [ 592W M2 BXGE 7 BLMP,MT1 [J IF LFN TOO BIG 59GG BPZ 7 MT2 [J IF LFN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCHAP https://www.george3.co.uk/george/macro/getchap?rev=1705492539&do=diff GETCHAP (GIN Macro) Defined in: COREMACROS Used in: DATUM 6W^D ...[??? GETCHAP SECT CENT FGN 32 DOC 6X9= [ 6XNW [ENTRY SEQUENCE FOR GETTING CHAPTER SPACE 6Y8G [ 6YN6 #MAC GETCHAP 6^7Q GETCORAL %A,X,HMANDAT+HCHAP:0 6^MB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCLB https://www.george3.co.uk/george/macro/getclb?rev=1705492539&do=diff GETCLB (GIN Macro) Defined in: MACRO COMPRO Used in: ALASB867, COMPROA867 FWHD ...[??? GETCLB SECT CENT FGN 21 DOC FWR= #MAC GETCLB FX=W SETNCORE +AVELINE+ALB,%A,CLB FXQG LDN 6 A1(%A) FY=6 LDN 7 A1+1(%A) FYPQ STOZ A1(%A) F^9B MOVE 6 ALB-1 F^P2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCORAL https://www.george3.co.uk/george/macro/getcoral?rev=1705492539&do=diff GETCORAL (GIN Macro) Defined in: COREMACROS Used in: 4H?J ...[??? GETCORAL SECT CENT FGN 32 DOC 4HHB # 4J32 # THE GETCORE SET OF MACROS FOR GETTING A BLOCK OF CORE 4JGL # 4K2= #MAC GETCORAL [USED FOR DEFINING THE REST 4KFW LD%B 2 %A 4K^G #STR %D%E 4LF6 ( 4LYQ #STR %E 4MDB LDCT 1 %E 4MY2 #STR %E 4NCL #SKI 4NX= LDCT 1 2 4PBW #STR %D 4PWG OR%F 1 %D 4QB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCORE https://www.george3.co.uk/george/macro/getcore?rev=1705492539&do=diff GETCORE (GIN Macro) Defined in: COREMACROS Used in: APPEND864, CHNUMCON867, COMPRESS864, COMPROB867, COREALLF867, COREALLG82, DSCNCT867, EDOBJ864, ENWELL867, EXINONE867, GETBAX865, IFEXPAN867, INPUTJDF82, JWELLTWO867, MOPSTART865, MTCODE864, NORMALUS864, PARAM865, PCTSTART867, PERFLOGS866, PROGISH850, RESTLIMB864, SCEX866, SETPARAM867, SETPE867, STRATEGY865, TRANSFER70, TWINSETB866, USERLIB867, WHENEVER867 4X2J ...[??? GETCORE SECT CENT FGN 32 DOC 4X=B # 4XQ2 #MAC GETCORE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCOREN https://www.george3.co.uk/george/macro/getcoren?rev=1705492539&do=diff GETCOREN (GIN Macro) Defined in: COREMACROS Used in: ANALYSE865, CHNUMCON867, CONMXC8, DECODE860, DOC867, EDOBJ864, FINDOC867, LOADPROG865, LOGOUT867, MACRALAS864, NORMALUS864, WHATPER867 4Y^4 ...[??? GETCOREN SECT CENT FGN 32 DOC 4^8W # 4^NG #MAC GETCOREN 5286 GETCORAL %A,N,HMANDAT*%B+0%C:0,%D,%E,N 52MQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCOREX https://www.george3.co.uk/george/macro/getcorex?rev=1705492539&do=diff GETCOREX (GIN Macro) Defined in: COREMACROS Used in: 52XJ ...[??? GETCOREX SECT CENT FGN 32 DOC 537B # 53M2 #MAC GETCOREX 546L GETCORAL %A,X,HMANDAT*%B+0%C:0,%D,%E,X 54L= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETCPB https://www.george3.co.uk/george/macro/getcpb?rev=1705492539&do=diff GETCPB (GIN Macro) Defined in: MACRO COMPRO Used in: ALASB867, COMPROA867 F^YS ...[??? GETCPB SECT CENT FGN 21 DOC G28L #MAC GETCPB G2N= SETNCORE +AVELINE+APB,%A,CPB,CALAS G37W STOZ A1(%A) G3MG LDN 6 A1(%A) G476 LDN 7 A1+1(%A) G4LQ MOVE 6 APB-1 G56B NGN 7 1 G5L2 STO 7 APARAFIR(%A) G65L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETDIR https://www.george3.co.uk/george/macro/getdir?rev=1705492539&do=diff GETDIR (GIN Macro) Defined in: ACCESSMACROS Used in: BACKMASS860, BMSJRNL866, BMSTREAM853, CHTAB, CLOSEALT864, COMPRESS864, CREALEX864, DEWELL867, ERASE867, ERASEA867, FHOBJDIR860, FHOBJIND860, GET6, HOWBIG867, INCPTRES864, INCVFCHK850, INCWRITE865, INKS, LIBLOAD867, LOGCOM864, NEWDIR867, OPENREL865, OPENTWO867, RENAMAG864, RENAMDIR, RENAME864, RENAMEMT867, RETURNA867, USERDIR842, USERSTRM867, WORKFILE860 =MJS ...[??? GETDIR SECT FILE FGN 19 DOC =MSL #MAC GETDIR =N#= DOWN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETDIRWORK https://www.george3.co.uk/george/macro/getdirwork?rev=1705492539&do=diff GETDIRWORK (GIN Macro) Defined in: WORK-MACROS Used in: OPENFILE867, OPENWORK866, USERONE867, USEROPEN867, WORKFILE860 55*N ...[??? GETDIRWO SECT FILE FGN 4 DOC 55KG #MAC GETDIRWORK 5656 #SKI %A 56JQ #SKI 574B DOWN OPENWORK,3 57J2 #SKI %A 583L DOWN OPENWORK,13 58H= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETEMSCR https://www.george3.co.uk/george/macro/getemscr?rev=1705492539&do=diff GETEMSCR (GIN Macro) Defined in: COREMACROS Used in: BSQ867, LOADERII867, SETUPA867 6=F8 ...[??? GETEMSCR SECT CENT FGN 32 DOC 6=P2 [ 6?8L [ENTRY SEQUENCE FOR EMS TO GET CORE SAME WAY AS LINK BLOCK 6?N= [ 6#7W #MAC GETEMSCR 6#MG #STR %A,4 6*76 LDX 4 %A 6*LQ CALL 0 (GEMS) 6B6B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETFCB https://www.george3.co.uk/george/macro/getfcb?rev=1705492539&do=diff GETFCB (GIN Macro) Defined in: RING-MACROS Used in: ORELEND860 ?WJ8 ...[??? GETFCB SECT FILE FGN 20 DOC ?WWL # ?XB= #MAC GETFCB ?XTW [ THIS MACRO SEARCHES FOR THE FCB INDICATED BY THE BACKING STORE HOME IN ?Y*G [ %A,%A+1 IN THE OPEN FILE CHAIN STARTING AT THE BACK OF THE CHAIN ?YJC ...#MOD %B ?YR# ...!!!!! ?^29 ...#SKI %A-5 ?^96 ...( ?^D3 ... STO 5 GEN0 ?^LY ... STO 6 GEN1 [STO ACCS IF X5,6 NOT USED ?^TT ...#STR %A,4 #24… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETFCBN https://www.george3.co.uk/george/macro/getfcbn?rev=1705492539&do=diff GETFCBN (GIN Macro) Defined in: RING-MACROS Used in: CREATE867, MAKEFILE863, OPENREL865, RESTLIMB864 G#NJ ...[??? GETFCBN SECT FILE FGN 20 DOC G#YB # G*D2 #MAC GETFCBN G*RN ... BPZ %B MGETFCBN2 G*^H ... LDX 0 FCBNO [UNIQUE NUMBER FOR DIR FCBS GB7B ...MGETFCBN1 GB*9 ... ADN 0 1 GBH4 ... STO 0 FCBNO GBNX ... BNG 0 MGETFCBN3 [TEST IF WE HAVE OVERFLOWED !! GBWQ ... LDCT 0 #400 [RESET FCB NO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETFNAME https://www.george3.co.uk/george/macro/getfname?rev=1705492539&do=diff GETFNAME (GIN Macro) Defined in: ACCESSMACROS Used in: CLEAN867, CLOSEND867, CLOSFREZ867, COMPRESS864, DEWELL867 7YMJ ...[??? GETFNAME SECT FILE FGN 19 DOC 7YXB #MAC GETFNAME 7^C2 #STR %A 7^WL #SKI 82B= DOWN CHANFILE,24 82TW #STR %A 83*G ( 83T6 LDCT 0 %A 84#Q SMO FX2 84SB STO 0 ACOMMUNE7 85#2 DOWN CHANFILE,4 85RL ) 86?= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETFP https://www.george3.co.uk/george/macro/getfp?rev=1705492539&do=diff GETFP (GIN Macro) Defined in: MACROS GLJ Used in: CJJ= #MACRO GETFP CK3W #STRING %C CKHG ( CL36 LDN 0 1 CLGQ SBS 0 %C CM2B ) CMG2 LDX 0 %B CM^L BNG 0 (GEOERR) CNF= STO 0 %A CNYW MOD LDX 0 0,%A CPDG STO 0 %B CPY6 #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETGMILL https://www.george3.co.uk/george/macro/getgmill?rev=1705492539&do=diff GETGMILL (GIN Macro) Defined in: ICTMACS Used in: CHARGESC867 4QTQ [??? GETGMILL SECT CENT FGN DOC 4R*B #MAC GETGMILL 4RT2 LDXC %B K7 4S#L LDX %A K7X 4SS= SBSC %B K7 4T?W SBS %A K7X 4TRG BSOFF ICTSW,M1GETGMILL 4W5X ... LDX 1 ASFNO1 4WD# ...M2GETGMILL SMO GMELRTAB+1(1) 4WQP ... LDX 0 ATM 4X56 ... SMO GMELRTAB+1(1) 4XCH ... SBS 0 ATM 4XQ2 ADXC %B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETJOB https://www.george3.co.uk/george/macro/getjob?rev=1705492539&do=diff GETJOB (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDON867, ABANDONA867, BMJLSLAV864, BMSAVJOB864, DEWELL867, DICTWELL867, DSCNCT867, ENWELL867, FHOBJIND860, FREEZE864, IFXCODES864, JDWRITE867, JOBLIST867, JSASCAN867, JWELLONE867, LOGOUT867, REGEN865, SCHDJOBA867, SCHEDULE867, SETJD867, SETPR867, WSJOBS867 ?XL4 ...[??? GETJOB SECT FILE FGN 19 DOC ?XTW #MAC GETJOB ?XXD ...#UNS JWPHASE3 ?X^2 ...( ?Y2J ...#STR %C ?Y46 ...( ?Y5N ... LDX 0 %C ?Y7= ... S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETLINK https://www.george3.co.uk/george/macro/getlink?rev=1705492539&do=diff GETLINK (GIN Macro) Defined in: COREMACROS Used in: CHCH865 6BB8 ...[??? GETLINK SECT CENT FGN 32 DOC 6BL2 [ 6C5L [ENTRY SEQUENCE FOR GETTING A LINK BLOCK 6CK= [ 6D4W #MAC GETLINK 6DJG CALL 0 GLINK 6F46 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETNO https://www.george3.co.uk/george/macro/getno?rev=1705492539&do=diff GETNO (GIN Macro) Defined in: MACROSIPC Used in: CHTAB, INKS, IPCOPENA83, IPCOPENB83 3P^M ...[??? GETNO SECT COMM FGN 19 DOC 3Q#4 ...[ TO ASSIGN A UNIQUE LINK NUMBER TO A LINK BEING OPENED 3QLG #MAC GETNO 3R66 DOWN GETNO,1 3RKQ LDX 0 ACOMMUNE1(2) 3S5B STO 0 %A 3SK2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETNOG https://www.george3.co.uk/george/macro/getnog?rev=1705492539&do=diff GETNOG (GIN Macro) Defined in: MACROSIPC Used in: IPCGEO8 3SXC ...[??? GETNOG SECT COMM FGN 19 DOC 3T9S ...[ ASSIGNS A LINK NUMBER TO A GEORGE LINK 3TJ= #MAC GETNOG 3W3W DOWN GETNO,8 3WHG LDX 0 ACOMMUNE1(2) 3X36 STO 0 %A 3XGQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPAGE https://www.george3.co.uk/george/macro/getpage?rev=1705492539&do=diff GETPAGE (GIN Macro) Defined in: MACROS GLJ Used in: #Q9L #MAC GETPAGE #Q=C ...MGETPAGE #Q?8 ...#UNSET G4VOPA #Q?^ ...( #Q#Q ... LDX 0 CFPCFREZ #Q*H ... BZE 0 MGETOK #QB# ...[ #QC5 ... NGX 0 APTURNPAGS [AS A FREEZE IS IN PROGRESS WE MUST.. #QCW ... ADX 0 CPAGETURNS [. CHECK WE CAN MEET REQUEST FROM.. #QDM ... [ .. FROM APTURNPAGS #QFD ... BPZ 0 MGETWAIT #QG9 ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPER https://www.george3.co.uk/george/macro/getper?rev=1705492539&do=diff GETPER (GIN Macro) Defined in: MACS SPC Used in: #6NL #MAC GETPER #78= GETPER7 %A,%B,%C #7MW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPER7 https://www.george3.co.uk/george/macro/getper7?rev=1705492539&do=diff GETPER7 (GIN Macro) Defined in: MACS SPC Used in: DRUM852, LISTFIND867, LISTPROC867 ?SDG #MAC GETPER7 ?SY6 #ACC %A ?TCQ ( ?TXB LDX 0 %A ?WC2 SMO FX2 ?WWL STO 0 ACOMMUNE7 ?XB= ) ?XTW #ACC %A ?Y*G #SKI ?YT6 ( ?^#Q SMO FX2 ?^SB STO %A ACOMMUNE7 #2#2 ) #2RL DOWN GETFREE,2 #3?= BRN %B #3QW BRN %C #4=G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPERNEXT https://www.george3.co.uk/george/macro/getpernext?rev=1705492539&do=diff GETPERNEXT (GIN Macro) Defined in: MACROSIPC Used in: IPCPASS8 3XT7 ...[??? GETPERNE SECT COMM FGN 19 DOC 3Y7J ...[ GET THE NEXT DEVICE WITH SUITABLE PROPERTIES 3YG2 #MAC GETPERNEXT 3Y^L LDX 0 %A 3^F= SRL 0 18 3^YW STO 0 %A 42DG FINDPEREC %C,APFOTY,%A,MGNEXT1 42Y6 BNG %C MGNEXTY 43CQ SMO FX2 43XB STO %C CPPTR 44C2 LGEOG %C,0 44WL SMO FX2 45B= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPROGCORE https://www.george3.co.uk/george/macro/getprogcore?rev=1705492539&do=diff GETPROGCORE (GIN Macro) Defined in: COREMACROS Used in: HW=S ...#MAC GETPROGCORE HW=W ...[ HW=Y ...[ MACRO TO OBTAIN ONE OR MORE PAGES OF CORE TO HOLD AN OBJECT HW?2 ...[ PROGRAM OR ITS PAGE TABLES. HW?4 ...[ HW?6 ... ACCSTO %A,ACOMMUNE1,FX2 [STORE SIZE OF REQUEST IN ACOMMUNE1 HW?8 ... LDX 2 FX2 HW?= ...[ ENOUGH PAGES AVAILABLE HW?# ...[ I.E. REQUEST <OR= COBJFREE+CPAGETURNS-APTURNPAGS HW?B ... LDX 0 COBJFREE HW?D .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETPTAB https://www.george3.co.uk/george/macro/getptab?rev=1705492539&do=diff GETPTAB (GIN Macro) Defined in: MACROS GLJ Used in: LOADPROG865 #692 ...#MAC GETPTAB #6#X ...#UNSET G4VOPA #6DS ...#SKIP #6JP ...( #6NL BRN MGETPTAB #78= DOWN PROGDEL,5 [TRY TO DELETE A SUD #7D4 ...) #7MW MGETPTAB #7RF ... LDX 2 %A #7X4 ...#UNSET G4VOPA #82M ...( #86= ... SMO FX2 #89T ... STO 2 ACOMMUNE1 #8*D ...) #8F3 ...#STR %B,PDESC #8JL ...( #8N9 ...#UNSET… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETQUE https://www.george3.co.uk/george/macro/getque?rev=1705492539&do=diff GETQUE (GIN Macro) Defined in: COREMACROS Used in: BSQ867 6F?Y ...[??? GETQUE SECT CENT FGN 32 DOC 6FHQ [ 6G3B [ENTRY SEQUENCE FOR GETTING A QUEUE BLOCK 6GH2 [ 6H2L #MAC GETQUE 6HG= CALL 0 GQUEU%A 6H^W ZERORING 0 6JFG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETSOUT https://www.george3.co.uk/george/macro/getsout?rev=1705492539&do=diff GETSOUT (GIN Macro) Defined in: ACCESSMACROS Used in: FHOBJIND860, LISTEND867, LISTFIND867, LISTFNDA865, LISTPROC867, SETPR867, WLF862, WLG862 ?MS4 ...[??? GETSOUT SECT FILE FGN 19 DOC ?N3W #MAC GETSOUT ?NHG #STR %A ?P36 LDX 0 %A ?PGQ #STR %A ?Q2B #SKI ?QG2 LDN 0 0 ?Q^L SMO FX2 ?RF= STO 0 ACOMMUNE9 ?RYW LDX 0 %B ?SDG SMO FX2 ?SY6 STO 0 ACOMMUNE7 ?TCQ L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETWORD https://www.george3.co.uk/george/macro/getword?rev=1705492539&do=diff GETWORD (GIN Macro) Defined in: MACROS GLJ Used in: ANTIC867, BEXTSJ84, CAFSPERI867, CHINERR867, CHNUMCON867, CHTAB, CLOSBAC867, CLOSDEL867, COMPRO867, CONTEND867, CORE867, EXINONE867, EXINTO867, FAIL5, GETONA867, GIVE867, IFNUMS867, INKS, IPCOPENA83, LOADFIN860, MONRESUM850, NEXTUNIT867, OLMTB867, OLMTC85, OLMTE85, ONOFFALT60, PERFAIL866, PERION867, PROGISH850, PROSTART867, READSPEC867, RENAMEX867, SAVE864, SAVEDA70, SCEXEND867, SCHDJOBA867, SPERION867, SQOPEN867, STEPBACK1 2PMS ...[??? G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GETWORDX https://www.george3.co.uk/george/macro/getwordx?rev=1705492539&do=diff GETWORDX (GIN Macro) Defined in: MACROS GLJ Used in: ALTINST60, ILLPERI70, ONOFFALT60, OPILLS70, PRINT70, SAVE864, SAVEDA70 3W?N ...[??? GETWORDX SECT CENT FGN 18 DOC 3WHG # 3X36 # 3XGQ # 3Y2B # GETWORDX IS A FORM OF GETWORD WHICH ALLOWS THE TYPE OF ACCESS 3YG2 # TO BE MADE TO AN AREA TO BE DEFINED BY THE CONTENTS 3Y^L # OF A WORD IT HAS BEEN DESIGNED WITH GEORGE 4 IN MIND 3^F= # 3^YW #MAC GETWORDX 42DG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GFCB https://www.george3.co.uk/george/macro/gfcb?rev=1705492539&do=diff GFCB (GIN Macro) Defined in: OPEN-MACROS Used in: ORELEMPT70, ORELHALF82 #3H4 ...[??? GFCB SECT FILE FGN 20 DOC #3QW #MAC GFCB #4=G ... GFCBC %A,%B #8M6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GFCBC https://www.george3.co.uk/george/macro/gfcbc?rev=1705492539&do=diff GFCBC (GIN Macro) Defined in: OPEN-MACROS Used in: ORELMAIN867, RITEFAIL864, WHATPERA867, WTSTAT867 #8WY ...[??? GFCBC SECT FILE FGN 20 DOC #96Q # #9LB # THIS MACRO LOCATES AN FCB IN THE FILE RING BY ITS UNIQUE NUMBER & #=62 # BRANCHES TO A GIVEN LABEL IF FCB NOT FOUND #=KL # #?5= #MAC GFCBC #?#8 ... LDXC 0 %A [DIRECTORY OR TERM FILE #?H6 ... LDN 0 0 #?Q4 ... ERN 0 1 [DIR=0 FILE=1 #?^2 ... STO 0 GEN0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GINMOD https://www.george3.co.uk/george/macro/ginmod?rev=1705492539&do=diff GINMOD (GIN Macro) Defined in: MACROS DTP Used in: J2M6 [??? GINMOD SECT DIAG FGN 554 DOC J36Q #MAC GINMOD [M.C.D. MANN J3LB [ J462 [ J4KL [ ************ J55= [ * GINMOD * J5JW [ ************ J64G [ J6J6 [ J73Q #STR %A J7HB ( J832 USEFILE %A J8GL #EXI J92= ) J9FW ! PARAMETER OMITTED J9^G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GIVFP https://www.george3.co.uk/george/macro/givfp?rev=1705492539&do=diff GIVFP (GIN Macro) Defined in: MACROS GLJ Used in: C?R2 #MACRO GIVFP C#=L #STRING %C C#Q= ( C*9W LDN 0 1 C*PG ADS 0 %C CB96 ) CBNQ LDX 0 %B CC8B MOD STO 0 0,%A CCN2 LDX 0 %A CD7L STO 0 %B CDM= #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GLPERI https://www.george3.co.uk/george/macro/glperi?rev=1705492539&do=diff GLPERI (GIN Macro) Defined in: MACROS PERI Used in: ATTACHC867, CONMXA85, CONMXC8, DETACH867, MOPOUT85, MOPPM84, MOPSTART865, MULTIPLX864, PCTCIN8, PCTCON8, PCTCOUT8, PCTCRTR8, PCTLPTP851, PROFLAG83, SCAN865, SENTINEL8 5Q5Q #MAC GLPERI [C.E.WILKINSON 5QKB LDN 0 1 5R52 MODD STO 0 JCCA1,%A,CPPTR(2) 5RJL #STR %A 5S4= PERI 0 %A 5SHW #STR %A 5T3G #SKI 5TH6 PERI 0 CPPTR(2) 5W2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GMONTIDY https://www.george3.co.uk/george/macro/gmontidy?rev=1705492539&do=diff GMONTIDY (GIN Macro) Defined in: MACROS VB Used in: LOADERII867, MONFILEA864, MONJRNAL850 3DBG ...[??? GMONTIDY SECT CENT FGN 7 DOC 3DBL ...#MAC GMONTIDY 3DBW ... LDX 2 %A 3DC6 ... LDN 0 #41 3DCB ... STO 0 JRECHEAD2(2) 3DCC ... FSHCODE AORB 3DCD ...( 3DCF ... LDCT 1 2 3DCG ... FSHCODE A,MFSHAFORCE 3DCH ...( 3DCJ ... NOTALIEN MFSHAHOME,FX2 3DCK ... ORS 1 JCATS(2) 3DCM ... BRN MFSHAFORCE 3D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GMTUPDATE https://www.george3.co.uk/george/macro/gmtupdate?rev=1705492539&do=diff GMTUPDATE (GIN Macro) Defined in: DUMP-MACROS Used in: EVENTS864 96MJ ...[??? GMTUPDAT SECT FILE FGN 65 DOC 96SL ...# 96^N ...# UPDATES GEORGE MEAN TIME 976Q ...# 97?S ...#MAC GMTUPDATE 97DW ... FSHSKIP B,MFSHNBEND 97KY ...( 97R2 ... DOWN INCWAIT,2 97Y4 ...MFSHNBEND 9856 ...) 98=8 ... FSHCODE B,MFSHBEND 98C= ...( 98J# ... LDX 0 APROCTIME 98PB ... STO 0 GMTLUP 98WD ... LDN 0 1 993G ... ADS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GOIFALSE https://www.george3.co.uk/george/macro/goifalse?rev=1705492539&do=diff GOIFALSE (GIN Macro) Defined in: IFMACS Used in: 9DQL [ 9F== [ 9FPW [??? GOIFALSE SECT DEVT FGN 1 DOC 9G9G [ 9GP6 #MAC GOIFALSE 9H8Q [ ======== 9HNB [ 9J82 [ 9JML [ %A - LABEL ROOT FOR STANDARD JUMP 9K7= [ %B - LABEL ROOT FOR IF 'EITHER' GIVEN, I.E. 'OR' EXPECTED TO FOLLOW 9KLW [ %C ... PARAMETERS TO THE CALLING USER LEVEL MACRO 9L6G [ 9LL6 [ IF 'EITHER' GIVEN THEN 9M5Q ...[ SETS 'OR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GOIFTRUE https://www.george3.co.uk/george/macro/goiftrue?rev=1705492539&do=diff GOIFTRUE (GIN Macro) Defined in: IFMACS Used in: =79B [ =7P2 [ =88L [??? GOIFTRUE SECT DEVT FGN 1 DOC =8N= [ =97W #MAC GOIFTRUE =9MG [ ======== ==76 [ ==LQ [ =?6B [ %A - LABEL ROOT FOR STANDARD JUMP =?L2 [ %B - LABEL ROOT FOR IF 'EITHER' GIVEN, I.E. 'OR' EXPECTED TO FOLLOW =#5L [ %C ... PARAMETERS TO THE CALLING USER LEVEL MACRO =#K= [ =*4W [ IF 'EITHER' GIVEN THEN =*JG ...[ SETS 'OR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GPERI https://www.george3.co.uk/george/macro/gperi?rev=1705492539&do=diff GPERI (GIN Macro) Defined in: MACROS PERI Used in: BSQ867, BSTS867, CAFSINFO866, CAFSPERI867, CONSET864, CONSOLE867, DRUM852, EMSENG864, INLOOP84, INRESTAR84, IPBERROR867, IPBOUT867, IPBSTARB867, IPBSTART867, LABEL866, LIBLOAD867, LIBLOADB867, LISTDEV866, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNEXT867, LISTTPCP867, LOAD60, LOADERDA867, LOADERDR867, LOADERFS867, LOADERGO867, LOADERI867, LOADERMT867, LOADERPM867, MODE866, MOVCART867, MTDUMP860, NETOFLNE867, OLMTB867, OLMTD65, OLMTE85, OPER8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GPERIIPC https://www.george3.co.uk/george/macro/gperiipc?rev=1705492539&do=diff GPERIIPC (GIN Macro) Defined in: MACROS PERI Used in: IPCON864, IPCONA864, IPCONB8, IPCONC8, IPCONE865, IPCONG8, IPCSTART864 6#7W #MAC GPERIIPC 6#MG LDCT 0 #400 6*76 ADN 0 1 6*LQ STO 0 CHAINADD(%B) 6B6B ADN 0 CHAINADD-1(%B) 6BL2 #STR SP,%C 6C5L MODD STO 0 JCCA5,%A,CPPTR(%B) 6CK= #STR CT,%C 6D4W MODD STO 0 JSCA5,%A,CPPTR(%B) 6DJG #STR SP,%C 6F46 ( 6FHQ LDN 0 CPRW1(%B) 6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GPNS https://www.george3.co.uk/george/macro/gpns?rev=1705492539&do=diff GPNS (GIN Macro) Defined in: MACROSIPC Used in: IPCEN8 4Q8X ...[??? GPNS SECT COMM FGN 19 DOC 4QH# ...[ GET THE NAMES OF THE PROGRAMS AT EITHER END OF THE LINK 4QTQ #MAC GPNS 4R*B STO 1 GEN0 4RT2 HUNT2B 1,AOBRES,0,2 4S#L LDX 0 A1+1(1) 4SS= STO 0 %A [GIVE 1ST PROGRAM NAME 4T?W SMO AWORK1(2) 4TRG LDX 1 ARINGEL(2) 4W?6 SBX 1 AWORK1(2) 4WQQ LDX 0 ASTA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GREADY https://www.george3.co.uk/george/macro/gready?rev=1705492539&do=diff GREADY (GIN Macro) Defined in: MACROS VB Used in: 2FB8 ...[??? GREADY SECT CENT FGN 7 DOC 2FL2 #MAC GREADY 2G5L #SKI %A>20$20 2GK= #SKI 2H4W ( 2HJG #SKI %A 2J46 ( 2JHQ #MEN MORNING 2K3B #TRA K50MORNING 2KH2 %A+3/4 2L2L %AH%B 2LG= #END 2L^W ) 2MFG ) 2M^6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GRELOAD https://www.george3.co.uk/george/macro/greload?rev=1705492539&do=diff GRELOAD (GIN Macro) Defined in: MACROS NI Used in: BACKMAP864, BACKROOM865, BMPRCHEK860, RESTART84 2C7W # 2CMG # RELOAD SAME VERSION OF GEORGE 2D76 # 2DLQ #MAC GRELOAD 2F6B '164 0 0 2FL2 '166 0 0 2G5L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GRINDEX https://www.george3.co.uk/george/macro/grindex?rev=1705492539&do=diff GRINDEX (GIN Macro) Defined in: INDEX-MACROS Used in: RESTLIMB864, RESTOREG864 22FL ...[??? GRINDEX SECT FILE FGN 9 DOC 2=?L # 2=R= #MAC GRINDEX 2?=W #STR M,%A 2?QG ( 2#=6 #STR %A 2#PQ ( 2*9B LDN 0 %A 2*P2 SMO FX2 2B8L STO 0 ACOMMUNE9 2BN= DOWN BMINDEX,1 2C7W ) 2CMG #STR %A 2D76 #SKI 2DLQ DOWN BMINDEX,11 2F6B ) 2FL2 #STR M,%A 2G5L #SKI 2GK= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GROPE https://www.george3.co.uk/george/macro/grope?rev=1705492539&do=diff GROPE (GIN Macro) Defined in: MACROS PERI Used in: CHTAB, GROPE867, INKS, PERFLOGS866 6RRW #MAC GROPE 6S?G LDX 2 FX2 6SR6 #STR %A 6T=Q #SKI 6TQB LDX 1 CPPTR(2) 6W=2 #STR %A 6WPL ( 6X9= #STR %A,1 6XNW LDX 1 %A 6Y8G ) 6YN6 LDX 0 GSIGN 6^7Q STO 0 CHAINADD(2) 6^MB ADN 0 CHAINADD(2) 7272 STO 0 JCCA5(1) 72LL LDN 0 CPRW1(2) 736= STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GROPEREC https://www.george3.co.uk/george/macro/groperec?rev=1705492539&do=diff GROPEREC (GIN Macro) Defined in: MACROS PERI Used in: DUMMYA867, ENGAGE867, LIBREQ866, LIBREQC867, PARSORT867, SWITCH867 7DRQ #MAC GROPEREC 7F?B #STR APINT,%B 7FR2 #STR 7G=L ( 7GQ= SMO FX2 7H9W STOZ ACOMMUNE1 7HPG LDX 0 %C 7J96 SMO FX2 7JNQ STO 0 ACOMMUNE2 7K8B ) 7KN2 #STR APGEOG,%B 7L7L #STR 7LM= ( 7M6W LDN 0 1 7MLG SMO FX2 7N66 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GSCAN https://www.george3.co.uk/george/macro/gscan?rev=1705492539&do=diff GSCAN (GIN Macro) Defined in: MISCMACS Used in: ASSIGN860, ATTACHA8, ATTACHC867, CONCEPT85, COREALLG82, COREALLJ865, CORESHED861, DOC867, FREEPER867, GETFREE867, IPBIN867, LIBLOAD867, LOADFIN860, MONFILEA864, MOVCART867, OFFREL867, OLMTC85, PMBUFFS84, SPUNLOAD867, SUICIDE864, SWAP865, UNJAMMER866 2QC= #MAC GSCAN [M.C.D. MANN 2QWW [ 2RBG [ 2RW6 [ *********** 2S*Q [ * GSCAN * 2STB [ *********** 2T*2 [ 2TSL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GSCANDEF https://www.george3.co.uk/george/macro/gscandef?rev=1705492539&do=diff GSCANDEF (GIN Macro) Defined in: PMACS Used in: PMBUFFS84 *TBL #MAC GSCANDEF [M.C.D. MANN *TW= [ *W*W [ *WTG [ ************** *X*6 [ * GSCANDEF * *XSQ [ ************** *Y#B [ *YS2 [ *^?L M1 +0 *^R= 8H%A B2=W GSCANX %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S B2QG M2 B3=6 #TRA M1 B3PQ +M2 B49B #TRA M2 B4P2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GSCANEQU https://www.george3.co.uk/george/macro/gscanequ?rev=1705492539&do=diff GSCANEQU (GIN Macro) Defined in: PMACS Used in: PMBUFFS84 B#G6 #MAC GSCANEQU [M.C.D. MANN B#YW [ B*CL [ B*WB [ ************** BB*6 [ * GSCANEQU * BBRW [ ************** BC=L [ BCPB [ BD86 [DEFINE GSCAN PRINTING FORMATS AS BDLW [ BF5L M3 +M3+3+#40000000 [SAME AS NEXT ESCANDEF BFJB 8H%A BG36 #FREE M3 BGFW #STR %B BGYL GSCANEQU %B,%C,%D,%E,%F,%G,%H,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GSCANX https://www.george3.co.uk/george/macro/gscanx?rev=1705492539&do=diff GSCANX (GIN Macro) Defined in: PMACS Used in: QGPG #MAC GSCANX [M.C.D. MANN QH8B [ QHM= [ QJ66 [ ************ QJK2 [ * GSCANX * QK3W [ ************ QKGQ [ QK^L [ QLDG #STR %A QLXB ( QMB= #HAL %A,%B QMT6 GSCANX %C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R QN#2 ) QNQW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) GSPERI https://www.george3.co.uk/george/macro/gsperi?rev=1705492539&do=diff GSPERI (GIN Macro) Defined in: MACROS PERI Used in: IPBERROR867, IPBIN867, IPBSTARB867, IPBSTART867 84#Q #MAC GSPERI 84SB LDCT 0 #400 85#2 #STR NC,%C 85RL STO 0 CHAINADD(%B) 86?= ADN 0 CHAINADD(%B) 86QW MODD STO 0 JSCA5,%A,CPPTR(%B) 87=G LDN 0 CPRW1(%B) 87Q6 MODD STO 0 JSCA1,%A,CPPTR(%B) 889Q #STR %A 88PB PERI 0 %A 8992 #STR %A 89NL #SKI 8=8= PERI 0 CPPTR(%B) 8=MW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HALFOPEX https://www.george3.co.uk/george/macro/halfopex?rev=1705492539&do=diff HALFOPEX (GIN Macro) Defined in: OPEN-MACROS Used in: OPENTWO867 8G=4 ...[??? HALFOPEX SECT FILE FGN 20 DOC 8GFW #MAC HALFOPEX 8G^G LDX 2 FX2 8HF6 ACCSTO %C,ACOMMUNE7(2) 8HYQ ACCSTO %B,ACOMMUNE8(2) 8JDB DOWN ORELHALF,2 8JY2 BRN %A 8KCL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HDWRTE https://www.george3.co.uk/george/macro/hdwrte?rev=1705492539&do=diff HDWRTE (GIN Macro) Defined in: MACS SPC Used in: GROPE867, PERFLOGS866, SWITCH867 #?JW #MAC HDWRTE ##4G #STR %A ##J6 LDX 0 %A #*3Q #STR %A #*HB #SKI #B32 LDX 0 CPPTR(2) #BGL '171 0 9 #C2= STO 0 %B #CFW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HELLO https://www.george3.co.uk/george/macro/hello?rev=1705492539&do=diff HELLO (GIN Macro) Defined in: MACROS VB Used in: 9C3Y ...[??? HELLO SECT CENT FGN 7 DOC 9C?Q # 9CRB #MAC HELLO 9D?2 ALTMESS GOODMORNING,,%A,FORCETYP 9DQL %AH%B 9F== ALTEND 9FPW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HI7020 https://www.george3.co.uk/george/macro/hi7020?rev=1705492539&do=diff HI7020 (GIN Macro) Defined in: MACROS VB Used in: 9F^N ...[??? HI7020 SECT CENT FGN 7 DOC 9G9G # 9GP6 #MAC HI7020 9H8Q ALTMESS HI7020,,%A,OPINF 9HNB %AH%B 9J82 ALTEND 9JML #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HIDECCCM https://www.george3.co.uk/george/macro/hidecccm?rev=1705492539&do=diff HIDECCCM (GIN Macro) Defined in: MACRO COMPRO Used in: JKNG ...[??? HIDECCCM SECT CENT FGN 1 DOC JL86 ...#MAC HIDECCCM JLMQ ...# JM7B ...#MEN CANCOM JMM2 ... 4H%A JN6L ...#DEF 20?=34?+0]&#37777777 JNL= ...#DEF 0?=0 JP5W ... 8HCANCOM JPKG ...#DEF 0?=K90CANCOM JQ56 ...#DEF 22?=K91CANCOM-K90CANCOM/BICESIZE JQJQ ... FINDBICC %A JR4B ...#SKI 22? JRJ2 ...( JS3L ...#DEF 20?=#40000000 JSH= ...#DEF 21?=0 JT2W ...#STR OFF,%B JTG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HIDECOM https://www.george3.co.uk/george/macro/hidecom?rev=1705492539&do=diff HIDECOM (GIN Macro) Defined in: MACRO COMPRO Used in: D5MB ...[??? HIDECOM SECT CENT FGN 21 DOC D5MM ...#MAC HIDECOM D5N8 ...#MEN VERBCLAS D5NP ... 4H%A D5P= ...#DEF 0?=0 D5PR ...#DEF 20?=34?+0]&#37777777 D5Q# ... 8HVERBCLAS D5QT ...#SKI 20?/#1000000<14-14 D5RB ...#DEF 0?=20?/#1000000+34?+K90VERBCLAS-1] D5RX ...#SKI 20?/#1000000>13-13 D5SD ...( D5S^ ...#END D5TG ...#MEND VCLASTWO D5W3 ...#DEF 0?=20?/#1000000+34?+K90VCLASTWO-14] D5WJ ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSAV https://www.george3.co.uk/george/macro/hlsav?rev=1705492539&do=diff HLSAV (GIN Macro) Defined in: MACROS PRS Used in: ABANDON867, CHARGESC867, CONNECT867, FINISH867, HLSREAD867, SAVEJOB865, SCHEDJOB867, UNSAVE867, WSJOBS867, WSJOBSA867 22FL # MACROS PRS ***** 22^= # RUTH HEAP 23DW ...[??? HLSAV SECT CENT FGN 1 DOC 25X2 # HLSAV IS USED IN CONNEXION WITH THE JOB-SAVING BITS IN HLSQ AND JOBQ 26BL # BLOCKS. IT CAN BE USED TO TEST OR ALTER ONE OF THESE BITS AT A 26W= # TIME AND CAN TEST FOR THE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSCONTROL https://www.george3.co.uk/george/macro/hlscontrol?rev=1705492539&do=diff HLSCONTROL (GIN Macro) Defined in: MACROS WELL Used in: =MSL ...# =N#= ...# =NRW ...# HERE FOLLOWS THE HLSCONTROL MACRO. IT IS USED TO SET OR =P?G ...# UNSET AT RESTORE TIME THE INTERFACE BITS IN HLSFACE. =PR6 ...# ITS PARAMETERS MAY BE ANY OF THE FOLLOWING. =Q=Q ...# =QQB ...# MFS,BFS,MS,BS,OFF,ALL =R=2 ...# =RPL ...#MAC HLSCONTROL =S9= ...#STR @,%A =SNW ...( =T8G ...#SKI HLSFACE<KTAB-KTAB =TN6 ...( =W7Q ...#MEN FIXED =WMB .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSEVENT https://www.george3.co.uk/george/macro/hlsevent?rev=1705492539&do=diff HLSEVENT (GIN Macro) Defined in: MACROS WELL Used in: CHTAB, FIXED867, HLSEVENT867, INKS 8LWG ...# 8MB6 ...# HERE FOLLOWS THE HLSEVENT MACRO. IT IS USED IN THE 8MTQ ...# HLS EVENT SEGMENT TO SET UP A 2 WORD ENTRY IN THE 8N*B ...# TABLE OF EVENTS. ITS PARAMETERS ARE AS FOLLOWS. 8NT2 ...# %A :- EVENT NAME 8P#L ...# PLUS ANY OF THE FOLLOWING IN ANY ORDER 8PS= ...# OFF :- IGNORE EVENT 8Q?W ...# BACK :- EVENT SIGNIFICANT FOR BACKGROUND JOBS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSINFORM https://www.george3.co.uk/george/macro/hlsinform?rev=1705492539&do=diff HLSINFORM (GIN Macro) Defined in: MACROS WELL Used in: COMPRO867, COMPROB867, CONNECTA867, CONTINUE867, CORE867, DEWELL867, DSCNCT867, ENWELLB867, EVENTS864, GIVE867, GROPE867, IPBSTARB867, JDWRITE867, JOBLIST867, JWELLONE867, LDSTART850, LOADERR70, LOADPROG865, MONFILEA864, MONJRNAL850, MONRESUM850, MOPCOM867, MOPCOMB865, PERFCHAP866, PROGISH850, PROSTART867, PUTPER85, QUOTA850, REALTIME867, REGEN865, RELPER867, REQESLIP861, SWITCH867, VCLASTWO867, VERBCLAS867, WAIT867 7?CW ...# 7?XG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSINFRT https://www.george3.co.uk/george/macro/hlsinfrt?rev=1705492539&do=diff HLSINFRT (GIN Macro) Defined in: MACROS WELL Used in: ALASB867, CONTINUE867, EVENTS864, PROGISH850 =C3B ...# =CH2 ...# =D2L ...#MAC HLSINFRT =DG= ... SMO 5 =D^W ... BRN £ =FFG ...#STR %A =F^6 ... BRN %A =GDQ ...#STR %A =GYB ...#SKI =HD2 ... BRN (GEOERR) =HXL ...#ALT EVC%B=0 =JC= ...#STR %C =JWW ...( =KBG ... BRN MHLSI =KW6 ... HLSINFOR @,%B,%C,%D,%E,%F,%G =L*Q ...) =LTB ...MHLSI =M*2 ...#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSLEVEL https://www.george3.co.uk/george/macro/hlslevel?rev=1705492539&do=diff HLSLEVEL (GIN Macro) Defined in: MACROS WELL Used in: ?M4L ...# ?MJ= ...# HERE FOLLOWS THE HLSLEVEL MACRO. IT IS A RESTORE TIME ?N3W ...# MACRO FOR USE BY THE USER TO RESET THE BITS GOVERNING ?NHG ...# THE CONTROL OF THE OPTIONAL HLS ENTRIES. ?P36 ...# ITS PARAMETERS ARE AS FOLLOWS. ?PGQ ...# %A :- EVENT NAME ?Q2B ...# %B :- EITHER ON OR OFF ?QG2 ...# %C ETC. AS FOR HLSEVENT EXCEPT NEVERREQ AND # NOT ALLOWED ?Q^L ...# ?RF= ...#MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSOFF https://www.george3.co.uk/george/macro/hlsoff?rev=1705492539&do=diff HLSOFF (GIN Macro) Defined in: MACROS HL Used in: 4GJ6 #MAC HLSOFF 4H3Q RESON HLSBIT 4HHB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSON https://www.george3.co.uk/george/macro/hlson?rev=1705492539&do=diff HLSON (GIN Macro) Defined in: MACROS HL Used in: 4KQW ...#MAC HLSON 4KQ^ ... RESOFF HLSBIT 4KR4 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSWAITS https://www.george3.co.uk/george/macro/hlswaits?rev=1705492539&do=diff HLSWAITS (GIN Macro) Defined in: MACROS WELL Used in: COOR865, FIXED867 #W6L ...# #WL= ...# #X5W ...#MAC HLSWAITS #XKG ...#STR X,%A #Y56 ...( #YJQ ...#STR ON,%A #^4B ...( #^J2 ...#STR OFF,%A *23L ...( *2H= ...! 1ST PARAMETER UNRECOGNISED *32W ...#EXI *3GG ...) *426 ...) *4FQ ...#SKI HLSWAITS<KTAB-KTAB *4^B ...( *5F2 ...#MEN FIXED *5YL ...#DEF 20?=DFIXED *6D= ...) *6XW ...#SKI HLSWAITS>KTAB-KTAB *7CG ...( *7X6 ...#MEN CHTA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HLSXONCH https://www.george3.co.uk/george/macro/hlsxonch?rev=1705492539&do=diff HLSXONCH (GIN Macro) Defined in: MACROS WELL Used in: GETON867, GETONA867, NETOFLNE867, OLMTA85, OLMTC85, ONLINEA867, ONLINEB867, SCRATCH866, SOUP867, SQOPEN867 8LGR ...#MAC HLSXONCH 8LHJ ... JBC MHLS1,,EVBXONLINE 8LJ* ... LDX 0 %B 8LK6 ... SMO FX2 8LKX ... STO 0 ACOMMUNE4 8LLN ... DOWN HLSEVENT,5 8LMF ... BRN %A 8LN= ... BRN MHLS1 8LP3 ... BRN %C 8LPS ...MHLS1 8LQK ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HSPACTLF https://www.george3.co.uk/george/macro/hspactlf?rev=1705492539&do=diff HSPACTLF (GIN Macro) Defined in: MACROS LEF Used in: COMPOST867 43XB ...[??? HSPACTLF SECT DEVT FGN 2 DOC 44C2 #MAC HSPACTLF 44FK ...[ 44J8 ...[ THIS MACRO INFORMS THE LISTFILE SCHEDULER WHEN 44LR ...[ A NEW COMPONENT OF A FROZEN MULTIFILE IS OPENED 44PB ...[ OR THE MULTIFILE IS CLOSED 44R^ ...[ 44WL LDX 2 FX2 45B= #ACC %A 45TW ( 46*G LDX 0 %A 46T6 STO 0 ACOMMUNE1(2) 47#Q ) 47SB #ACC %A 48… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT https://www.george3.co.uk/george/macro/hunt?rev=1705492539&do=diff HUNT (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDON867, ADDICT865, ADJCHECK85, ADJUNCTS85, ALLOW84, ANALYSEA3, ANSCOM865, ATTACHC867, ATTJOUNL861, BACKROOM865, BMCNTRL866, BMFIXIT864, BMSJRNL866, BQUERY84, BRADDATA867, BRADEMUL867, BRADSPLT867, BUDGET84, BUDGTWO84, CANTDO867, CDCIPB864, CHANG867, CHNUMCON867, CLEAN867, COMPROB867, CONNECT867, COPYA867, COPYB867, CORE867, CREALEX864, CREATE867, CROBJ6, DEADA867, DECODE860, DELCOM5, DEWELL867, DISPCOM867, DOMONOP867, DSCNCT867, ENWELL867, E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT2 https://www.george3.co.uk/george/macro/hunt2?rev=1705492539&do=diff HUNT2 (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDON867, ABANDONA867, ACCESS867, ATTACHC867, BACKMASS860, BSQ867, BUDGTWO84, CDCIPB864, COMPOST867, CONIPB8, CONMXA85, CONNECTA867, COPYA867, COPYB867, CORE867, COREALLF867, DELCOM5, DETACH867, DISEVENT65, DISPCOM867, DTREST860, ENTRUST, EXPRESS864, FAIL5, FINDFS867, GET6, GETNO865, GETNOR8, GETWORD867, GIVE867, GOTO867, HALT5, HARDIDF867, HLSOCCUR865, HUNTBLOK, IDFASAT867, IDFCANC867, IDFCHK867, IDFCLEAN867, IDFCONS8, IDFENQS867, IDFOFF867,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT2B https://www.george3.co.uk/george/macro/hunt2b?rev=1705492539&do=diff HUNT2B (GIN Macro) Defined in: HUNTMACS1 Used in: CONIPB8, CONMXC8, DETACH867, ERASE867, GETNO865, IDFPER867, INMOP867, IPCEN8, IPCONA864, IPCONB8, MULTIPLX864, NEWDIR867, PCTDIS8, PROFLAG83, REDON867, RIGHT867, SPOOL83, UNPLUG867 285# ...[??? HUNT2B SECT CENT FGN 1 DOC 28*6 # 28SQ # SEARCHES BACKWARDS FROM CURRENT POSITION FOR BLOCK 29#B # 29S2 #MAC HUNT2B 2=?L #STR %D 2=R= LDX %A %D 2?=W MHUNT2B LDX %A BPTR(%A) 2?QG LDX 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT2J https://www.george3.co.uk/george/macro/hunt2j?rev=1705492539&do=diff HUNT2J (GIN Macro) Defined in: MACS PCT Used in: ABANDON867, ABANDONA867, ADDICT865, ANSCOM865, ATTACHB866, ATTACHC867, BACKMAP864, BMSJRNL866, BSTS867, CAFSINFO866, CAFSPERI867, CDCIPB864, COMPRESS864, CONIPB8, CONSROOT867, DEAD867, DETACH867, DETACHB867, DICTWELL867, DSCNCT867, FAILTWIN866, GETNO865, GOTO867, IDFLINE867, INTWIN866, IPBCCB867, IPBCCC867, IPBERROR867, IPBIN867, IPBINB867, IPBINC865, IPBOUT867, IPBSCAN867, IPBSCANB867, IPBSTARB867, IPCGEO8, LISTEND867, LISTIDF867, LISTNIP865, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT2OPT https://www.george3.co.uk/george/macro/hunt2opt?rev=1705492539&do=diff HUNT2OPT (GIN Macro) Defined in: MACS JIB Used in: ATTJOUNL861, CONIPB8, COPYB867, DETACH867, GOTO867, HARDIDF867, IDFCLEAN867, IDFPER867, INCMON865, IPCONA864, IPCONB8, IPCONC8, IPCOND864, IPDBATCH867, IPQUAKE83, IPQUAKER865, LISTAST867, LOADERR70, LOADPROG865, MTDUMP860, NEWOWN865, OPILLS70, PROSTART867, SETIDF867, SETPB867, UNLOAD7 4BC# ...[??? HUNT2OPT SECT COMM FGN 25 DOC 4BM6 #MAC HUNT2OPT 4C6Q #STR %D 4CLB LDX %A %D 4D62 MHUNT2OP 4DKL LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNT7020 https://www.george3.co.uk/george/macro/hunt7020?rev=1705492539&do=diff HUNT7020 (GIN Macro) Defined in: MACS PCT Used in: PCTDIS8, RENGAGE851 3XGQ #MAC HUNT7020 3Y2B HUNTACTF A7020,%A,%B 3YG2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTACT https://www.george3.co.uk/george/macro/huntact?rev=1705492539&do=diff HUNTACT (GIN Macro) Defined in: HUNTMACS1 Used in: ATTACHC867, CDCIPB864, CIMOP867, CONIPB8, CONSROOT867, DETACH867, DETACHB867, IPBINB867, IPBOUT867, MOPCOM867, MOPCOMB865, MOPSTART865, MORNING867, ONLINCL864, OPERIN867, PCTCIN8, PCTCRTR8, PCTLPTP851, PCTSTART867, PROFLAG83, REDON867, SCHEDJOB867 2*YS ...[??? HUNTACT SECT CENT FGN 1 DOC 2B8L #MAC HUNTACT 2BN= #STR %C 2C7W LDX %B %C 2CMG MHUNTACT 2D76 LDX %B BPTR(%B) 2DLQ LDCH 0 ATYP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTACTC https://www.george3.co.uk/george/macro/huntactc?rev=1705492539&do=diff HUNTACTC (GIN Macro) Defined in: MACROS MACB Used in: 5MCS ...[??? HUNTACTC SECT CENT FGN 2 DOC 5MML # 5N7= # 5NLW #MAC HUNTACTC 5P6G [OWNER : P R LUCKE 5PL6 [SEARCHES FORWARD FROM THE BLOCK WHOSE ADDRESS IS [%C] UNTIL IT FINDS A 5Q5Q [ TYPE %A. A POINTER IS LEFT IN %B(WHICH MUST BE A MODIFIER). IF NO SUCH 5QKB [ IS FOUND BEFORE THE CURRENT ACTIVITY IS ENCOUNTERED,THE ROUTINE BRANCH 5R52 [ IF %C IS OMITTED,IT IS TAKEN TO BE THE SAME AS %B 5R… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTACTF https://www.george3.co.uk/george/macro/huntactf?rev=1705492539&do=diff HUNTACTF (GIN Macro) Defined in: HUNTMACS1 Used in: ASTONIF867, CONNECTA867, CONTXCOD60, IFEXPAN867, IFNUMS867, IFXCODES864, PERFAIL866, SWAP865 2G*D ...[??? HUNTACTF SECT CENT FGN 1 DOC 2GK= #MAC HUNTACTF 2H4W #STR %C 2HJG LDX %B %C 2J46 MHUNTACTF 2JHQ LDX %B FPTR(%B) 2K3B LDCH 0 ATYPE(%B) 2KH2 SBN 0 %A/64 2L2L BNZ 0 MHUNTACTF 2LG= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTACTJ https://www.george3.co.uk/george/macro/huntactj?rev=1705492539&do=diff HUNTACTJ (GIN Macro) Defined in: MACROS RJH Used in: SETJOBQ867, WHATRVSA867 2FB8 ...[??? HUNTACTJ SECT CENT FGN 71 DOC 2FL2 # THIS MACRO FINDS AN ACT GIVEN :ITS TYPE,JOB NUMBER. 2G5L #MAC HUNTACTJ 2GK= LDX %C FX2 2H4W MHUNTJ1 2HJG LDX %C FPTR(%C) 2J46 TXU %C FX2 2JHQ BCC %D 2K3B LDCH 0 ATYPE(%C) 2KH2 SBN 0 %A/64 2L2L BNZ 0 MHUNTJ1 2LG= LDX 0 JOBNO(%C) 2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTANY https://www.george3.co.uk/george/macro/huntany?rev=1705492539&do=diff HUNTANY (GIN Macro) Defined in: MACROS SJ Used in: COPYFILA867, SJLOOP864, SJOPEN863 2F?J ...[ 2FDQ ...[ 2FL2 ...[??? HUNTANY SECT FILE FGN 24 DOC 2LG= #MAC HUNTANY 2LJ8 ...[ HUNTANY IS A GP CHAIN HUNTING MACRO. 2LL6 ...[NB X0 DESTROYED 2LN4 ...[%A MODIFIER ADDRESS OF BLOCK 2LQ2 ...[%B TYPE 2LRY ...[%C SUBTYPE 2LTW ...[%D BASE OF CHAIN <4095 2LXS ...[%E LABEL IF NO SUCH BLOCK EXISTS 2LYT ...[%F RE-ENTRY LABEL (OPTIONAL) 2L^W LDX %A %D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTC https://www.george3.co.uk/george/macro/huntc?rev=1705492539&do=diff HUNTC (GIN Macro) Defined in: HUNTMACS1 Used in: GETFREE867, GOTO867 2LQ4 ...[??? HUNTC SECT CENT FGN 1 DOC 2L^W # SPECIAL COMMAND ROUTINE HUNT WHICH STOPS AT FIRST CPB/CALAS BLOCK 2MFG #MAC HUNTC 2M^6 LDX %A FX2 2NDQ MHUN1 LDX %A FPTR(%A) 2NYB LDX 0 ATYPE(%A) 2PD2 SRL 0 12 2PXL SBN 0 CPB 2QC= BZE 0 %D 2QWW SBADN 0,%C+%B-CPB 2RBG BNZ 0 MHUN1 2RW6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTCLB https://www.george3.co.uk/george/macro/huntclb?rev=1705492539&do=diff HUNTCLB (GIN Macro) Defined in: MACS LIST Used in: 22FL [ 22^= [ LISTFILE MACROS 23DW [ 23YG [ CONTENTS LIST 24D6 [ 24FN ...[ HUNTCLB 24H= ...[ LFBLCNUM 24LB ...[ LFSIZE 24MY ...[ LFSOFTDEFLT 24PG ...[ LFSTARTJL 24SL ...[ LFWLINFO 24XQ [ NIPENDLF 25CB [ NIPLINES 25X2 [ NIPREL 26BL [ NIPRPERT 26W= [ NIPSTART 2727 ...[ OLREJECT 2764 ...[ WLSIZE 27*W [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTJWEL https://www.george3.co.uk/george/macro/huntjwel?rev=1705492539&do=diff HUNTJWEL (GIN Macro) Defined in: MACROS SHFSB Used in: 9^*W [??? HUNTJWEL SECT FILE FGN 1 DOC 9^TG #MAC HUNTJWEL =2*6 #UNS MHUNTJWEL%A =2SQ #SKI =3#B ( =3S2 BRN MHUNTJWELX =4?L #DEF MHUNTJWEL%A=0? =4R= STO %A GEN0 =5=W LDX 0 0(%A) =5QG HUNTMISX %A,0 =6=6 LDX 0 GEN0 =6PQ EXIT 0 1 =79B ) =7P2 MHUNTJWELX =88L CALL %A MHUNTJWEL%A =8N= #HAL +JWELL+… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTMISB https://www.george3.co.uk/george/macro/huntmisb?rev=1705492539&do=diff HUNTMISB (GIN Macro) Defined in: MACS PW Used in: ABANDON867, ADDICT865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMQUESTB866, CHARGESC867, CLOSEFUL867, CONMXA85, CONMXC8, CONSROOT867, DUMP860, FINISH867, HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, INCEND865, INCEOT865, INCFIN864, INCMON865, INCPTRES864, INCSET865, INCVFCHK850, INCWRITE865, JSASCAN867, JWUPDATE867, OUTPER867, PARIDF8,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTMISX https://www.george3.co.uk/george/macro/huntmisx?rev=1705492539&do=diff HUNTMISX (GIN Macro) Defined in: MACS PW Used in: 5NC4 [??? HUNTMISX SECT COMM FGN 9 DOC 5NLW # 5P6G # HUNT BACKWARDS ROUND MISCELLANEOUS CHAIN FOR BLOCK TYPE/SUBTYPE IN 5PL6 # B0-11 %B 5Q5Q # 5QKB #MAC HUNTMISX 5R52 #SKI %B 5RJL LDX 0 %B 5S4= LDN %A 0 5SHW SMO BMISC 5T3G MHMX2 LDX %A BPTR(%A) 5TH6 TXU 0 ATYPE(%A) 5W2Q BCC MHMX1 5WGB TXU %A BMISC 5X22 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTSCB https://www.george3.co.uk/george/macro/huntscb?rev=1705492539&do=diff HUNTSCB (GIN Macro) Defined in: MACROS GLJ Used in: 8X86 # 8XMQ # THIS MACRO FINDS SCB AND SETS UP S/R FOR USE BY SUBSEQUENT 8Y7B # CALLS OF THIS MACRO 8YM2 # 8^6L # 8^L= #MACRO HUNTSCB 925W #STRING %A 92KG LDX 3 %A 9356 CALL 0 MHUNTSCB 93JQ #OPTIONAL MHUNTSCB=0?+1 944B #SKIP MHUNTSCB-0?-1 94J2 #SKIP 953L ( 95H= BRN MHUNTSCB1 962W STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTW https://www.george3.co.uk/george/macro/huntw?rev=1705492539&do=diff HUNTW (GIN Macro) Defined in: HUNTMACS1 Used in: ACCESS867, ADDJOB867, ALAS822, ALASB867, ANSCOM865, ASSIGN860, ASSOC867, ATTACHA8, ATTACHB866, ATTRIBUT867, BEXTRA83, BEXTSJ84, BMAPDIR865, BMCNTRL866, BMFIXIT864, BMSTREAM853, BSBLFAIL867, BSQ867, CAFSPERI867, CARTCONT867, CDCIPB864, CIMOP867, CIOUT8, CLOSEALT864, CLOSEFUL867, COMPRO867, COMPROB867, CONIPB8, CONNECTA867, CONSET864, CONSROOT867, CORE867, CORESHED861, DELCOM5, DEMAND860, DISPCOM867, DTSCAN860, DTSUBSS867, DTWRONG867, DUMMYB867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) HUNTX https://www.george3.co.uk/george/macro/huntx?rev=1705492539&do=diff HUNTX (GIN Macro) Defined in: HUNTMACS1 Used in: MONFILE867, RUNPROG840, SAVEFILE860, SETMON70 52XJ ...[??? HUNTX SECT CENT FGN 1 DOC 537B # 53M2 #MAC HUNTX 546L LDX 0 %B 54L= ANDX 0 HALFTOP 555W CALL %A (JHUNTX%A) 55KG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ICT https://www.george3.co.uk/george/macro/ict?rev=1705492539&do=diff ICT (GIN Macro) Defined in: ICTMACS Used in: ATTACHB866, ATTACHC867, BACKROOM865, CHARGESC867, CHCHCOORMAC2, COMPROA867, COOR865, COREALLF867, DETACH867, EDITOR867, IPBSTARB867, IPBSTART867, JWELLONE867, LLSMACROS, LOGANAL864, MOPCOMB865, MOPSTART865, QPRINT867, REALTIME867, REPLAC, SCHDJOBA867, SCHEDJOB867, SCHEDULE867, SETJOBQ867, UNSAVE867 22FL [??? ICT SECT CENT FGN DOC 22^= #MAC ICT 23DW #STR %A,ON 23YG #SKI 24D6 ( 24G* ...#SKI ICTON<1$1 24JJ ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDCRTM https://www.george3.co.uk/george/macro/idcrtm?rev=1705492539&do=diff IDCRTM (GIN Macro) Defined in: DUMP-MACROS Used in: CW=3 ...[??? IDCTRM SECT FILE FGN ? DOC CWPM ...#MAC IDCRTM CX9? ...[ THIS MACRO IS USED INTERNALLY IN THE EXPANSION OF CXNX ...[ DTFILEINC DTRESTINC AND DTAFTERREST CY8H ...[ ALL OF WHICH TAKE OLD ASK OR NEW AS THE ONLY PARAMETER CYN7 ...[ THEY INDICATE WHETHER DUMPER IS TO USE OLD TPAES NEW ONES OR C^7R ...[ ASK THE OPERATORS C^MC ...[ ALL THREE MACROS MEND AN APPROPRIATE BS MACRO INTO INCTAPES … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDENTITY https://www.george3.co.uk/george/macro/identity?rev=1705492539&do=diff IDENTITY (GIN Macro) Defined in: PMACS Used in: FAILTWIN866, FIXED867, INTWIN866, IPCONE865, IPCSTART864, MESSBA, MESSBG, MESSBI, PMDUMP85, PMSUMA867, SETUPARA867 9LL6 #MAC IDENTITY [M.C.D. MANN 9MKB [ 9N3S [ 9NG= [ ************** 9NYN [ * IDENTITY * 9PC6 [ ************** 9PTJ [ 9Q#2 [ 9QQD #MEN FIXED 9R8W #TRA IDENTITY 9RM# 8H%A 9S5Q #END 9SJ8 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFAT https://www.george3.co.uk/george/macro/idfat?rev=1705492539&do=diff IDFAT (GIN Macro) Defined in: MACS JIB Used in: ATTRIBUT867 4L9# ...[??? IDFAT SECT COMM FGN 25 DOC 4SCW ...#MAC IDFAT 4SDN ... LDX 2 FX2 4SFG ... STO %B ACOMMUNE1(2) 4SG# ... STO %C ACOMMUNE2(2) 4SH6 ... DOWN IDFASAT,30 4SHY ... BRN %A [BRK-IN 4SJQ ... BRN %D 4SKJ ... BRN %E 4SLB ... BRN %F 4SM8 ... BRN %G 4SN2 ... BRN %H 4SNS ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFCCAT https://www.george3.co.uk/george/macro/idfccat?rev=1705492539&do=diff IDFCCAT (GIN Macro) Defined in: MACS JIB Used in: ATTRIBUT867 4SQ3 ...[??? IDFCCAT SECT COMM FGN 25 DOC 4XWQ ...#MAC IDFCCAT 4XXY ... SMO FX2 4X^6 ... STO %B ACOMMUNE2 4Y2# ... DOWN IDFCANC,3 4Y3G ... BRN %A [BRK-IN 4Y4N ... BRN %C 4Y5W ... BRN %D 4Y74 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFCLON https://www.george3.co.uk/george/macro/idfclon?rev=1705492539&do=diff IDFCLON (GIN Macro) Defined in: MACS JIB Used in: ONLINEB867 5?NS ...[??? IDFCLON SECT COMM FGN 25 DOC 5?YL #MAC IDFCLON 5#D= DOWN IDFONLIN,3 5#XW BRN %A 5*CG BRN %B 5*X6 BRN %C 5BBQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFCONREQ https://www.george3.co.uk/george/macro/idfconreq?rev=1705492539&do=diff IDFCONREQ (GIN Macro) Defined in: MACS JIB Used in: IPBCCC867 5BLJ ...[??? IDFCONRE SECT COMM FGN 25 DOC 5BWB # 5CB2 # CONFIGURATION REQUEST ON A CONCEPTUAL 5CTL # 5D*= #MAC IDFCONREQ 5DSW DOWN IDFCONS,1 5F#G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFLINE https://www.george3.co.uk/george/macro/idfline?rev=1705492539&do=diff IDFLINE (GIN Macro) Defined in: MACS JIB Used in: CHTAB, INKS, IPBINB867 5FC5 ...[??? IDFFILE SECT COMM FGN 25 DOC 5Q^5 ...[??? IDFLINE SECT COMM FGN 25 DOC 5RJL # 5S4= # MACRO TO CHANGE LINE 5SHW # 5T3G #MAC IDFLINE 5TH6 DOWN IDFLINE,1 5W2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFOFF https://www.george3.co.uk/george/macro/idfoff?rev=1705492539&do=diff IDFOFF (GIN Macro) Defined in: MACS JIB Used in: CDCIPB864, CHTAB, CONMXA85, INKS, ONLINCL864, ONLINEB867 5W=J ...[??? IDFOFF SECT COMM FGN 25 DOC 5WGB ...[THIS MACRO RELEASES A CONCEPTUAL FROM BEING ONLINED 6D6G ...#MAC IDFOFF 6D6X ...#SKI %C 6D7# ...( 6D7P ... LDN 0 %C+%D 6D86 ... SLL 0 12 6D8H ... SMO FX2 6D8Y ... STO 0 ACOMMUNE1 [BLOCK TYPE AND SUBTYPE 6D9* ... LDN 0 %E 6D9Q ... SMO FX2 6D=7 ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFOPEN https://www.george3.co.uk/george/macro/idfopen?rev=1705492539&do=diff IDFOPEN (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, IDFCONS8, IDFENQS867, IDFLINE867, IDFOFF867, IDFONLIN867, IDFPER867, IDFPROP867, IDFSCON867, LISTSTAR867, ONLINEC867, PARIDF8, SETIDF867, XATTACH861 6DJ8 ...[??? IDFOPEN SECT COMM FGN 25 DOC 6KDQ #MAC IDFOPEN 6KYB ... OPENSYS %A,IDF,WRITE 6LD2 ... IDFREAD 6Q*2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFPER https://www.george3.co.uk/george/macro/idfper?rev=1705492539&do=diff IDFPER (GIN Macro) Defined in: MACS JIB Used in: CHTAB, GETFREE867, IDFPER867, INKS 6QX9 ...[??? IDFOR SECT COMM FGN 25 DOC 6Y4K ...[??? IDFPER SECT COMM FGN 25 DOC 6Y8G # 6YN6 #MAC IDFPER [IDF GETPER MACRO 6^7Q DOWN IDFPER,1 6^MB BRN %A 7272 BRN %B 72LL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFREAD https://www.george3.co.uk/george/macro/idfread?rev=1705492539&do=diff IDFREAD (GIN Macro) Defined in: MACS JIB Used in: 72P9 ...[??? IDFREAD SECT COMM FGN 25 DOC 786B ...#MAC IDFREAD [READ FIRST RECORD FROM IDF 787* ... LDN 2 1 788# ... READED 2,4 789? ... TESTREP OK,M90 789Q ... DOWN SETIDF,3 [SET ALARM INDICATOR 78== ... GEOERR 1,READ 78?9 ...M90 78#8 ... MHUNT 2,FILE,FRRB [LOCATE FILE READ BLOCK 78*7 ... ADN 2 A1 [ADD IN RED… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFSCAN https://www.george3.co.uk/george/macro/idfscan?rev=1705492539&do=diff IDFSCAN (GIN Macro) Defined in: MACS JIB Used in: SCAN865 78CJ ...[??? IDFSCAN SECT COMM FGN 25 DOC 7CX= ...#MAC IDFSCAN 7CXY ...#STR %C 7CYL ... LDX 0 %C [PTR TO DEVICE LIST IN %C 7C^# ...#STR %C 7D22 ...#SKI 7D2N ... LDX 0 CPPTR(2) [NO %C:USE CPPTR(2) TO FIND DEVICE LI 7D3B ... LDX 2 FX2 7D44 ... STO 0 ACOMMUNE2(2) 7D4Q ...#STR %D 7D5D ... STO %D ACOMMUNE3(2) 7D66 ...#STR %D 7D6S ...#SKI 7D7G .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFTPSCN https://www.george3.co.uk/george/macro/idftpscn?rev=1705492539&do=diff IDFTPSCN (GIN Macro) Defined in: MACS JIB Used in: IPBCONS867, IPBSCANB867, IPBSTARB867, IPBSTART867 7D?H ...[??? IDFTPSCN SECT COMM FGN 25 DOC 7RHG #MAC IDFTPSCN 7S36 #STR %C 7SGQ #SKI 7T2B LDX 0 CPPTR(2) 7TG2 #STR %C 7T^L LDX 0 %C 7WF= LDX 2 FX2 7WYW STO 0 ACOMMUNE2(2) 7XDG #SKI %D 7XY6 STO %D ACOMMUNE3(2) 7YCQ #SKI %D 7YXB #SKI 7^C2 STOZ ACOMMUNE3(2) 7^WL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFTPUPD https://www.george3.co.uk/george/macro/idftpupd?rev=1705492539&do=diff IDFTPUPD (GIN Macro) Defined in: MACS JIB Used in: IPBSTARB867, IPBSTART867, MAKEVCC867 844Y ...[??? IDFTPUPD SECT COMM FGN 25 DOC 89#W ...#MAC IDFTPUPD 89*T ...#STR %B 89BS ...#SKI 89CR ... LDX 0 CPPTR(2) 89DQ ...#STR %B 89FP ... LDX 0 %B 89GN ... SMO FX2 89HM ... STO 0 ACOMMUNE1 89JL ... DOWN IDFCONF,1 89KK ... BRN %A 89LJ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFUNON https://www.george3.co.uk/george/macro/idfunon?rev=1705492539&do=diff IDFUNON (GIN Macro) Defined in: MACS JIB Used in: ONLINEB867 89N4 ...[??? IDFUNON SECT COMM FGN 25 DOC 89NL #MAC IDFUNON 8=8= SMO FX2 8=MW STO %C ACOMMUNE2 8?7G DOWN IDFONLIN,1 8?M6 BRN %A 8#6Q BRN %B 8#LB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDFWRITE https://www.george3.co.uk/george/macro/idfwrite?rev=1705492539&do=diff IDFWRITE (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONFA867, IDFLINE867, IDFOFF867, IDFONLIN867, IDFSCON867, IDFSEG867, ONLINEC867, SETIDF867, SPOOL83, XATTACH861 8#W8 ...[??? IDFWRITE SECT COMM FGN 25 DOC 8*62 [THIS MACRO WRITES ALL EXISTING FILE/FRRB BLOCKS INTO THE IDF,USING 8*KL [THEIR RECORD NUMBERS TO CALCULATE THEIR POSITIONS 9N THE FILE.THE 8B5= [FILE READ BLOCKS ARE ALL FREED BEFORE EXIT. … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IDLEPERF https://www.george3.co.uk/george/macro/idleperf?rev=1705492539&do=diff IDLEPERF (GIN Macro) Defined in: MACROS IAN Used in: 22#C ...[??? IDLEPERF SECT DEVT FGN 2 DOC 22LS ...#MAC IDLEPERF [- A.P.HOLDEN 22^= [ THIS MACRO CAUSES PERFCHAP TO OUTPUT THE 23DW [ EXEC IDLE TIME AS 'DEVICE TYPE 999' 23KW ...#STR %A,ON 23QW ...( 23XW ...#STR OFF,%A 244W ...#EXI 249W ...#UNS APC51 24BW ...( 24HW ...#MEN PERFCHAP 25#W ...#TRA APC3 25FW ... BRN APC8 25LW ...#END 25RW ...#ALT APC51=0 25YW ...#EXI 265W ...) 26=W ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IET https://www.george3.co.uk/george/macro/iet?rev=1705492539&do=diff IET (GIN Macro) Defined in: MACROSAJE Used in: EDITAR867, EDITET7, EDITOR867, FFFNORM7 2MP# ...[??? IET SECT COMM FGN 8 DOC 2M^6 # 2NDQ # 2NYB #MAC IET [IET - A RECURSICE VERSION OF IETS 2PD2 IETS %A [WHERE %B AND %C ARE ALREADY SET UP. 2PXL #STR %B 2QC= IET %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V,%W 2QWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IETS https://www.george3.co.uk/george/macro/iets?rev=1705492539&do=diff IETS (GIN Macro) Defined in: MACROSAJE Used in: EDITAR867, EDITET7, EDITOR867, FFFNORM7 2#N8 ...[??? IETS SECT COMM FGN 8 DOC 2#PQ # 2*9B #MAC IETS [IETS - TABLE SETUP MACRO. THIS MACRO 2*P2 #DEF 25?=1? [INSERTS THE VALUE OF %B MODULO *77 2B8L #LIS 0 2BN= #STR %C [FROM THE START OF THE TABLE IS GIVEN 2C7W #DEF 21?=%C [BY %A, EXPRESSED AS THE NUMBER OF 2CMG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IF https://www.george3.co.uk/george/macro/if?rev=1705492539&do=diff IF (GIN Macro) Defined in: IFMACS Used in: ARCHIVE867, ASTONIF867, CONSET864, EDITPT867, EDWRITE867, FORMLOOP865, GETFREE867, GETFREEB864, GETWORD867, HOWBIG867, IDFASAT867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTDIRF867, LISTFILE867, LISTIDF867, LISTINIT867, LISTLOOP867, LISTNEXT867, LISTOPEN867, LISTPARS867, LISTRING864, MESSAC, MESSBH, MESSCG, MESSCI, MESSF, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, PERCON867, PERFCHAP866, PERFPASS864, RAECOMMS867, SHOWCOMM864, TPOBJ867, TR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFACC https://www.george3.co.uk/george/macro/ifacc?rev=1705492539&do=diff IFACC (GIN Macro) Defined in: MACROS LEF Used in: 4HR8 ...[??? IFACC SECT DEVT FGN 2 DOC 4J32 #MAC IFACC 4JGL [THIS MACRO STORES THE CONTENTS OF %A IN %B(IN CURRENT ACTIVITY) 4K2= #ACC %A 4KFW LDX 0 %A 4K^G SMO FX2 4LF6 #ACC %A 4LYQ STO 0 %B 4MDB #ACC %A 4MY2 #SKI 4NCL STO %A %B 4NX= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFDELIMS https://www.george3.co.uk/george/macro/ifdelims?rev=1705492539&do=diff IFDELIMS (GIN Macro) Defined in: MACROS RJDG Used in: 2FTS ...[??? IFDELIMS SECT CENT FGN 7 DOC 2G5L ...#MAC IFDELIMS 2G*D ...#MEN PARAMA 2GK= ...#TRA 34?+K2PARAMA+0]&#7777+K2PARAMA-6 2GT4 ...#DEF 20?=1 2H4W ...#STR OFF,%A 2H#N ...#DEF 20?=0 2HJG ... +1-20?*#17+(20?*#30) 2HS# ... +1-20?*#27+(20?*#30) 2J46 ... +1-20?*#37+(20?*#30) 2J?Y ...#END 2JHQ ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBC https://www.george3.co.uk/george/macro/ifnbc?rev=1705492539&do=diff IFNBC (GIN Macro) Defined in: IFMACS Used in: FPX2 [??? IFNBC SECT DEVT FGN 1 DOC FQBL [ FQW= #MAC IFNBC FR*W [ ===== FRTG JUMPIF BS,%A,%B,%C FS*6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBCC https://www.george3.co.uk/george/macro/ifnbcc?rev=1705492539&do=diff IFNBCC (GIN Macro) Defined in: IFMACS Used in: G5L2 [??? IFNBCC SECT DEVT FGN 1 DOC G65L [ G6K= #MAC IFNBCC G74W [ ====== G7JG JUMPIF BSC,%A,%B,%C G846 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBCS https://www.george3.co.uk/george/macro/ifnbcs?rev=1705492539&do=diff IFNBCS (GIN Macro) Defined in: IFMACS Used in: FXQG [??? IFNBCS SECT DEVT FGN 1 DOC FY=6 [ FYPQ #MAC IFNBCS F^9B [ ====== F^P2 JUMPIF BSS,%A,%B,%C G28L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBS https://www.george3.co.uk/george/macro/ifnbs?rev=1705492539&do=diff IFNBS (GIN Macro) Defined in: IFMACS Used in: FL^= [??? IFNBS SECT DEVT FGN 1 DOC FMDW [ FMYG #MAC IFNBS FND6 [ ===== FNXQ JUMPIF BC,%A,%B,%C FPCB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBSC https://www.george3.co.uk/george/macro/ifnbsc?rev=1705492539&do=diff IFNBSC (GIN Macro) Defined in: IFMACS Used in: G2N= [??? IFNBSC SECT DEVT FGN 1 DOC G37W [ G3MG #MAC IFNBSC G476 [ ====== G4LQ JUMPIF BCC,%A,%B,%C G56B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBSS https://www.george3.co.uk/george/macro/ifnbss?rev=1705492539&do=diff IFNBSS (GIN Macro) Defined in: IFMACS Used in: FSSQ [??? IFNBSS SECT DEVT FGN 1 DOC FT#B [ FTS2 #MAC IFNBSS FW?L [ ====== FWR= JUMPIF BCS,%A,%B,%C FX=W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBUSY https://www.george3.co.uk/george/macro/ifnbusy?rev=1705492539&do=diff IFNBUSY (GIN Macro) Defined in: IFMACS Used in: CCDG ...[??? IFNBUSY SECT COMM FGN 1 DOC CCF6 ...[ CCFQ ...#MAC IFNBUSY CCGB ...[ ======= CCH2 ... JUMPIF UNBUSY,%A,%B,%C,%D CCHL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBWC https://www.george3.co.uk/george/macro/ifnbwc?rev=1705492539&do=diff IFNBWC (GIN Macro) Defined in: IFMACS Used in: G?FG [??? IFNBWC SECT DEVT FGN 1 DOC G?^6 [ G#DQ #MAC IFNBWC G#YB [ ====== G*D2 JUMPIF BWS,%A,%B,%C G*XL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNBWS https://www.george3.co.uk/george/macro/ifnbws?rev=1705492539&do=diff IFNBWS (GIN Macro) Defined in: IFMACS Used in: G8HQ [??? IFNBWS SECT DEVT FGN 1 DOC G93B [ G9H2 #MAC IFNBWS G=2L [ ====== G=G= JUMPIF BWC,%A,%B,%C G=^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNCC https://www.george3.co.uk/george/macro/ifncc?rev=1705492539&do=diff IFNCC (GIN Macro) Defined in: IFMACS Used in: DDWG [??? IFNCC SECT DEVT FGN 1 DOC DFB6 [ DFTQ #MAC IFNCC DG*B [ ===== DGT2 BRANCHIF %A,CS DH#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNCS https://www.george3.co.uk/george/macro/ifncs?rev=1705492539&do=diff IFNCS (GIN Macro) Defined in: IFMACS Used in: D*YQ [??? IFNCS SECT DEVT FGN 1 DOC DBDB [ DBY2 #MAC IFNCS DCCL [ ===== DCX= BRANCHIF %A,CC DDBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNDECFNZ https://www.george3.co.uk/george/macro/ifndecfnz?rev=1705492539&do=diff IFNDECFNZ (GIN Macro) Defined in: IFMACS Used in: GM8G [??? IFNDECFNZ SECT DEVT FGN 1 DOC GMN6 [ GN7Q #MAC IFNDECFNZ GNMB [ ========= GP72 JUMPIF DECFZ,%A,%B,%C GPLL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNDECFZ https://www.george3.co.uk/george/macro/ifndecfz?rev=1705492539&do=diff IFNDECFZ (GIN Macro) Defined in: IFMACS Used in: GJ=Q [??? IFNDECFZ SECT DEVT FGN 1 DOC GJQB [ GK=2 #MAC IFNDECFZ GKPL [ ======== GL9= JUMPIF DECFNZ,%A,%B,%C GLNW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNE https://www.george3.co.uk/george/macro/ifne?rev=1705492539&do=diff IFNE (GIN Macro) Defined in: IFMACS Used in: F5BQ [??? IFNE SECT DEVT FGN 1 DOC F5WB [ F6B2 #MAC IFNE F6TL [ ==== F7*= BRANCHIF %A,U,%B,%C F7SW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNENV https://www.george3.co.uk/george/macro/ifnenv?rev=1705492539&do=diff IFNENV (GIN Macro) Defined in: IFMACS Used in: H7RQ ...[??? IFNENV SECT COMM FGN 1 DOC H8?B ...[ H8R2 ...#MAC IFNENV H9=L ...[ ====== H9Q= ... JUMPIF ENVNOT,%A,%B,%C,%D H=9W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNENVNOT https://www.george3.co.uk/george/macro/ifnenvnot?rev=1705492539&do=diff IFNENVNOT (GIN Macro) Defined in: IFMACS Used in: H=PG ...[??? IFNENVNO SECT COMM FGN 1 DOC H?96 ...[ H?NQ ...#MAC IFNENVNOT H#8B ...[ ========= H#N2 ... JUMPIF ENV,%A,%B,%C,%D H*7L ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNFALSE https://www.george3.co.uk/george/macro/ifnfalse?rev=1705492539&do=diff IFNFALSE (GIN Macro) Defined in: IFMACS Used in: BRMB [ BS72 [ BSLL [ HERE FOLLOW THE SUBSIDIARY MACROS BT6= [ ================================= BTKW [ BW5G [ BWK6 [ DIRECTION INVERSION MACROS, E.G. BX4Q [ IF 0,NZ BXJB [ == BY42 [ -> GOIFALSE NIF2,NIF1,0,NZ BYHL [ -> IFNNZ NIF2,0 B^3= [ -> BRANCHIF NIF2,ZE,0 B^GW [ -> NESTBRANCH ZE 0,NIF2 C22G [ -> BZE 0 NNNNIF2 C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNFNZ https://www.george3.co.uk/george/macro/ifnfnz?rev=1705492539&do=diff IFNFNZ (GIN Macro) Defined in: IFMACS Used in: GF*2 [??? IFNFNZ SECT DEVT FGN 1 DOC GFSL [ GG#= #MAC IFNFNZ GGRW [ ====== GH?G JUMPIF FZ,%A,%B,%C GHR6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNFZ https://www.george3.co.uk/george/macro/ifnfz?rev=1705492539&do=diff IFNFZ (GIN Macro) Defined in: IFMACS Used in: GBC= [??? IFNFZ SECT DEVT FGN 1 DOC GBWW [ GCBG #MAC IFNFZ GCW6 [ ===== GD*Q JUMPIF FNZ,%A,%B,%C GDTB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNGE https://www.george3.co.uk/george/macro/ifnge?rev=1705492539&do=diff IFNGE (GIN Macro) Defined in: IFMACS Used in: DXH= [??? IFNGE SECT DEVT FGN 1 DOC DY2W [ DYGG #MAC IFNGE D^26 [ ===== D^FQ BRANCHIF %A,L,%B,%C D^^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNL https://www.george3.co.uk/george/macro/ifnl?rev=1705492539&do=diff IFNL (GIN Macro) Defined in: IFMACS Used in: F2F2 [??? IFNL SECT DEVT FGN 1 DOC F2YL [ F3D= #MAC IFNL F3XW [ ==== F4CG BRANCHIF %A,GE,%B,%C F4X6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNMBAC https://www.george3.co.uk/george/macro/ifnmbac?rev=1705492539&do=diff IFNMBAC (GIN Macro) Defined in: IFMACS Used in: GTHL [??? IFNMBAC SECT DEVT FGN 1 DOC GW3= [ GWGW #MAC IFNMBAC GX2G [ ======= GXG6 JUMPIF MBS,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%- GX^Q R,%S,%T,%U GYFB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNMBAS https://www.george3.co.uk/george/macro/ifnmbas?rev=1705492539&do=diff IFNMBAS (GIN Macro) Defined in: IFMACS Used in: H4BB [??? IFNMBAS SECT DEVT FGN 1 DOC H4W2 [ H5*L #MAC IFNMBAS H5T= [ ======= H6#W JUMPIF MBC,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%- H6SG R,%S,%T,%U H7#6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNMBC https://www.george3.co.uk/george/macro/ifnmbc?rev=1705492539&do=diff IFNMBC (GIN Macro) Defined in: IFMACS Used in: GY^2 [??? IFNMBC SECT DEVT FGN 1 DOC G^DL [ G^Y= #MAC IFNMBC H2CW [ ====== H2XG JUMPIF MBAS,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,- H3C6 %R,%S,%T,%U H3WQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNMBS https://www.george3.co.uk/george/macro/ifnmbs?rev=1705492539&do=diff IFNMBS (GIN Macro) Defined in: IFMACS Used in: GQ6= [??? IFNMBS SECT DEVT FGN 1 DOC GQKW [ GR5G #MAC IFNMBS GRK6 [ ====== GS4Q JUMPIF MBAC,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,- GSJB %R,%S,%T,%U GT42 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNNG https://www.george3.co.uk/george/macro/ifnng?rev=1705492539&do=diff IFNNG (GIN Macro) Defined in: IFMACS Used in: FF5Q [??? IFNNG SECT DEVT FGN 1 DOC FFKB [ FG52 #MAC IFNNG FGJL [ ===== FH4= BRANCHIF %A,PZ,%B FHHW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNNZ https://www.george3.co.uk/george/macro/ifnnz?rev=1705492539&do=diff IFNNZ (GIN Macro) Defined in: IFMACS Used in: FB82 [??? IFNNZ SECT DEVT FGN 1 DOC FBML [ FC7= #MAC IFNNZ FCLW [ ===== FD6G BRANCHIF %A,ZE,%B FDL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNPZ https://www.george3.co.uk/george/macro/ifnpz?rev=1705492539&do=diff IFNPZ (GIN Macro) Defined in: IFMACS Used in: FJ3G [??? IFNPZ SECT DEVT FGN 1 DOC FJH6 [ FK2Q #MAC IFNPZ FKGB [ ===== FL22 BRANCHIF %A,NG,%B FLFL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNREP https://www.george3.co.uk/george/macro/ifnrep?rev=1705492539&do=diff IFNREP (GIN Macro) Defined in: IFMACS Used in: D85= [??? IFNREP SECT DEVT FGN 1 DOC D8JW [ D94G #MAC IFNREP D9J6 [ ====== D=3Q JUMPIF REPN,%A,%B D=HB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNREP2 https://www.george3.co.uk/george/macro/ifnrep2?rev=1705492539&do=diff IFNREP2 (GIN Macro) Defined in: IFMACS Used in: D29Q [??? IFNREP2 SECT DEVT FGN 1 DOC D2PB [ D392 #MAC IFNREP2 D3NL [ ======= D48= JUMPIF RPN2,%A,%B D4MW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNREPN https://www.george3.co.uk/george/macro/ifnrepn?rev=1705492539&do=diff IFNREPN (GIN Macro) Defined in: IFMACS Used in: D?32 [??? IFNREPN SECT DEVT FGN 1 DOC D?GL [ D#2= #MAC IFNREPN D#FW [ ======= D#^G JUMPIF REP,%A,%B D*F6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNRPN2 https://www.george3.co.uk/george/macro/ifnrpn2?rev=1705492539&do=diff IFNRPN2 (GIN Macro) Defined in: IFMACS Used in: D57G [??? IFNRPN2 SECT DEVT FGN 1 DOC D5M6 [ D66Q #MAC IFNRPN2 D6LB [ ======= D762 JUMPIF REP2,%A,%B D7KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNTRUE https://www.george3.co.uk/george/macro/ifntrue?rev=1705492539&do=diff IFNTRUE (GIN Macro) Defined in: IFMACS Used in: C6WQ [??? IFNTRUE SECT DEVT FGN 1 DOC C7BB [ C7W2 #MAC IFNTRUE C8*L [ ======= C8T= [ I.E. BRN IF FALSE I.E. DO NOTHING C9#W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNU https://www.george3.co.uk/george/macro/ifnu?rev=1705492539&do=diff IFNU (GIN Macro) Defined in: IFMACS Used in: F8#G [??? IFNU SECT DEVT FGN 1 DOC F8S6 [ F9?Q #MAC IFNU F9RB [ ==== F=?2 BRANCHIF %A,E,%B,%C F=QL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNUNBUSY https://www.george3.co.uk/george/macro/ifnunbusy?rev=1705492539&do=diff IFNUNBUSY (GIN Macro) Defined in: IFMACS Used in: CCJ= ...[??? IFNUNBUS SECT COMM FGN 1 DOC CCJW ...[ CCKG ...#MAC IFNUNBUSY CCL6 ...[ ========= CCLQ ... JUMPIF BUSY,%A,%B,%C,%D CCMB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNVC https://www.george3.co.uk/george/macro/ifnvc?rev=1705492539&do=diff IFNVC (GIN Macro) Defined in: IFMACS Used in: DLQ2 [??? IFNVC SECT DEVT FGN 1 DOC DM9L [ DMP= #MAC IFNVC DN8W [ ===== DNNG BRANCHIF %A,VS DP86 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNVCR https://www.george3.co.uk/george/macro/ifnvcr?rev=1705492539&do=diff IFNVCR (GIN Macro) Defined in: IFMACS Used in: DSKG [??? IFNVCR SECT DEVT FGN 1 DOC DT56 [ DTJQ #MAC IFNVCR DW4B [ ====== DWJ2 BRANCHIF %A,VSR DX3L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNVS https://www.george3.co.uk/george/macro/ifnvs?rev=1705492539&do=diff IFNVS (GIN Macro) Defined in: IFMACS Used in: DHS= [??? IFNVS SECT DEVT FGN 1 DOC DJ?W [ DJRG #MAC IFNVS DK?6 [ ===== DKQQ BRANCHIF %A,VC DL=B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNVSR https://www.george3.co.uk/george/macro/ifnvsr?rev=1705492539&do=diff IFNVSR (GIN Macro) Defined in: IFMACS Used in: DPMQ [??? IFNVSR SECT DEVT FGN 1 DOC DQ7B [ DQM2 #MAC IFNVSR DR6L [ ====== DRL= BRANCHIF %A,VCR DS5W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFNZE https://www.george3.co.uk/george/macro/ifnze?rev=1705492539&do=diff IFNZE (GIN Macro) Defined in: IFMACS Used in: F?== [??? IFNZE SECT DEVT FGN 1 DOC F?PW [ F#9G #MAC IFNZE F#P6 [ ===== F*8Q BRANCHIF %A,NZ,%B F*NB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFR https://www.george3.co.uk/george/macro/ifr?rev=1705492539&do=diff IFR (GIN Macro) Defined in: IFMACS Used in: OPER864, OPERA864, OPERIN867, SHOWCOMM864, WLAA867 8SQ2 [ 8T9L [ 8T9W ...[??? IFR SECT COMM FGN 1 DOC 8T=6 ...[ 8T=B ...#MAC IFR 8T=L ...[ === 8T=W ...[ 8T?6 ...[ CONTRACTION OF 'IF EITHER' 8T?B ...[ 8T?L ... IF EITHER,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, - 8T?W ... %Q,%R,%S,%T 8T#6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IFUJSTAT https://www.george3.co.uk/george/macro/ifujstat?rev=1705492539&do=diff IFUJSTAT (GIN Macro) Defined in: DUMP-MACROS Used in: BSPRUNE867, BSUNJAM867 #M56 ...[??? IFUJSTAT SECT FILE FGN 65 DOC #M?W #MAC IFUJSTAT #MRG BZE 7 M1IFUJSTAT #N?6 DOWN BSUJSTAT,%A #NQQ #SKI %A-1 #P=B #SKI #PQ2 ( #Q9L LDX 0 ACOMMUNE1(2) #QP= BNZ 0 M1IFUJSTAT #R8W LDN 7 0 #RNG ) #S86 M1IFUJSTAT #SMQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IGNOREFWT https://www.george3.co.uk/george/macro/ignorefwt?rev=1705492539&do=diff IGNOREFWT (GIN Macro) Defined in: LLSMACROS Used in: 96=9 ...#MAC IGNOREFWT 96=? ...[ 96=* ...[ RESTORE TIME MACRO TO CAUSE THE LLS TO IGNORE FWT IN THE SELECTION 96=C ...[ FOR SWAPIN ALGORITHM OR TO REINSTATE THE USE OF FWT 96=F ...[ %A - ON OR MISSING, FWT IS IGNORED (I.E CALCULATED AS ZERO) 96=H ...[ - OFF,FWT IS USED 96=K ...[ 96=M ...#STR %A,ON [INCLUDE IF %A NOT ON OR ABSENT 96=P ...( 96=R ...#STR OFF,%A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IHPRIVCH https://www.george3.co.uk/george/macro/ihprivch?rev=1705492539&do=diff IHPRIVCH (GIN Macro) Defined in: MACROS IH Used in: 4#*4 ...[??? IHPRIVCH 4#*9 ...# 4#*B ...# THIS MACRO ALLOWS PRIVILEGES TO BE CHECKED IN A HOOK 4#*H ...# 4#*N ...#MAC IHPRIVCH 4#*T ...#STR %A,ON 4#B2 ...#STR 4#B7 ...( 4#B# ...#MEN CHEKPRIV 4#BF ...#TRA K20CHEKPRIV 4#BL ... BRN K21CHEKPRIV 4#BR ...#END 4#BY ...#EXI 4#C5 ...) 4#C= ...#STR %A,OFF 4#CC ...#STR 4#CJ ...( 4#CP ...#MEN CHEKPRIV 4#CW ...#TRA K20CHEKPRIV … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IHSPNOUSER https://www.george3.co.uk/george/macro/ihspnouser?rev=1705492539&do=diff IHSPNOUSER (GIN Macro) Defined in: MACROS IH Used in: 4#D^ ...[??? IHSPNOUSER 4#F6 ...[ 4#F? ...[ THIS MACRO TURNS ON OR OFF NOUSER CONTEXT IN A HOOK 4#FD ...[ 4#FK ...#MAC IHSPNOUSER 4#FQ ...#STR %A,ON 4#FX ...#SKI 4#G4 ...( 4#G9 ...#MEN DIRENT 4#GB ...#TRA G400DIRC 4#GH ... NULL 4#GN ...#END 4#GT ...#MEN SETPF 4#H2 ...#TRA G400LDEA 4#H7 ... NULL 4#H# ...#END 4#HF ...#MEN SETPR 4#HL ...#TRA G400RECA 4#HR ... NULL 4#HY .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IHTRAPCH https://www.george3.co.uk/george/macro/ihtrapch?rev=1705492539&do=diff IHTRAPCH (GIN Macro) Defined in: MACROS IH Used in: 4#92 # 4#97 ...[??? IHTRAPCH 4#9# ...# 4#9F ...# THIS MACRO ALLOWS TRAPS TO BE CHECKED IN A HOOK 4#9L ...# 4#9R ...#MAC IHTRAPCH 4#9Y ...#STR %A,ON 4#=5 ...#STR 4#== ...( 4#=C ...#MEN TRAPCHEC 4#=J ...#TRA K20TRAPCHEC 4#=P ... BRN K21TRAPCHEC 4#=W ...#END 4#?3 ...#EXI 4#?8 ...) 4#?* ...#STR %A,OFF 4#?G ...#STR 4#?M ...( 4#?S ...#MEN TRAPCHEC 4#?^ ...#TRA K20TRA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ILLEGAL https://www.george3.co.uk/george/macro/illegal?rev=1705492539&do=diff ILLEGAL (GIN Macro) Defined in: MACROS2JSR Used in: ANTIC867, BEXTSJ84, CHINERR867, CLOSBAC867, CLOSDEL867, COMPCHAN84, CONTEND867, EVENTS864, EXINONE867, EXTEND866, GETONA867, GIVE867, HLSREAD867, INMOP867, IPCEN8, IPCOPENA83, IPCOPENB83, IPCPERI83, LOADERR70, MESSAA, MESSAB, MESSAD, MESSBG, MESSC, MESSCA, MESSCC, MESSCG, MESSDB, MESSG, MESSH, MESSI, MEXTSJ70, NEXTUNIT867, OLMTB867, OLMTC85, OLMTD65, OLMTE85, OPCA867, OPCAXCOD5, PERFAIL866, PMFILE860, PMOBJIII860, PMSUMA867, PROGISH850, READ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ILLEGALX https://www.george3.co.uk/george/macro/illegalx?rev=1705492539&do=diff ILLEGALX (GIN Macro) Defined in: MACROS2JSR Used in: BEXTRA83, CAFSPERI867, CIMOP867, CONIPB8, CONMXA85, CONMXB8, CONMXC8, CONTXCOD60, DRUM852, NETOFLNE867, OLPODD865, PERION867, RENAMEX867, SPERION867, SQOPEN867, VIPBPERI864 2K?8 ...[??? ILLEGALX SECT CENT FGN 2 DOC 2KH2 #MAC ILLEGALX 2L2L LDX 5 %A 2LG= ACROSS OPILLS,8 2L^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ILLPRQ https://www.george3.co.uk/george/macro/illprq?rev=1705492539&do=diff ILLPRQ (GIN Macro) Defined in: MACROS GLJ Used in: *FML #MAC ILLPRQ *G7= SMO FX1 *GLW LDX 5 MILL *H6G ACROSS OPILLS,9 [DON'T STEP ONR *HL6 MILL +JY%A *J5Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCF https://www.george3.co.uk/george/macro/incf?rev=1705492539&do=diff INCF (GIN Macro) Defined in: MACROS SJ Used in: SHOWCOMM864 DMRT ...[ DMWD ...[ DM^4 ...[??? INCF SECT FILE FGN 24 DOC DN8W #MAC INCF [P,F DNNG LA %B DP86 OP %A,%B,ADS DPMQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCHECK https://www.george3.co.uk/george/macro/incheck?rev=1705492539&do=diff INCHECK (GIN Macro) Defined in: OLPMACROS Used in: INMOP867 8TP= ...#MAC INCHECK 8W8W ...#SKI G4 8WNG ...( 8X86 ... SMO FX2 [%A:ADDRESS OF LOCKDOWN ENTRY IN BLK 8XMQ ... LDX 7 %A [%B:LABEL TO JUMP TO IF OUTSIDE 8Y7B ... LDX 6 7 [OBJECT PROGRAM'S RESERVATIONS 8YM2 ... ANDN 6 #1777 [%A+1:WORD CONTAINING ADDR OF START 8^6L ... ANDX 7 B2T13 [OF AREA TO B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCIF https://www.george3.co.uk/george/macro/incif?rev=1705492539&do=diff INCIF (GIN Macro) Defined in: MACROSAJE Used in: PMTABLEI 37*# ...[??? INCIF SECT DEVT FGN 8 DOC 37K6 # 384Q # 38JB #MAC INCIF 3942 #STR %C 39HL #DEF 26?=%C 3=3= #STR %C 3=GW #SKI 3?2G #DEF 26?=GEORGE 3?G6 #STR %B 3?^Q #DEF 25?=%B 3#FB #STR %B 3#^2 #SKI 3*DL #DEF 25?=G3ISSUE 3*Y= #DEF 24?=%A 3BCW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCLINK https://www.george3.co.uk/george/macro/inclink?rev=1705492539&do=diff INCLINK (GIN Macro) Defined in: MACROSIPC Used in: IPCONA864, IPCONB8 58?D ...[??? INCLINK SECT COMM FGN 19 DOC 58H= #MAC INCLINK 592W DFLOAD %A,LKCT 59GG ADN 0 1 5=26 DFSET %A,LKCT,0 5=FQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCREAMBS https://www.george3.co.uk/george/macro/increambs?rev=1705492539&do=diff INCREAMBS (GIN Macro) Defined in: LOBS-MACROS Used in: COPYA867, COPYB867 77?4 ...[??? INCREAMB SECT FILE FGN 5 DOC 77GW [ 782G #MAC INCREAMBS 78G6 SMO FX2 78^Q STO %B ACOMMUNE1 79FB DOWN INCRCUBS,2 79^2 BRN %A 7=DL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCRECUBS https://www.george3.co.uk/george/macro/increcubs?rev=1705492539&do=diff INCRECUBS (GIN Macro) Defined in: LOBS-MACROS Used in: CREATE867, INSERTBL6, USEROPEN867 229S ...[??? INCRECUB SECT FILE FGN 5 DOC 22FL [ 29S2 #MAC INCRECUBS 2=3S ...# START OF CODE FOR %D NULL 2=?L #STR %D 2=R= #SKI 2?=W ( 2?QG #STR %C 2#=6 #SKI 2#PQ ( 2*9B #STR NOTOPEN,%B 2*P2 #SKI 2B8L ( 2BN= ! ILLEGAL COMBINATION OF PARAMETERS ! 2C7W #EXIT 2CMG ) 2D76 ) 2DLQ #STR FORCED,%A 2F6B #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INCSTEND https://www.george3.co.uk/george/macro/incstend?rev=1705492539&do=diff INCSTEND (GIN Macro) Defined in: DUMP-MACROS Used in: 3859 ...[??? INCSTEND SECT FILE FGN 65 DOC 385P ...# 386N ...# THIS MACRO CAUSES DUMPER TO ISSUE TWO J.D. MACROS 387M ...# 'ENDINC' AFTER EVERY INCREMENT 388L ...# 'STARTGRINC' BEFORE EVERY POTENTIALLY RESTABLE INC 389K ...# 38=J ...#MAC INCSTEND 38?H ...#MEN INCSTART 38#G ...#TRA K50INCSTART 38*F ... NULL 38BD ...#END 38CC ...#MEN INCFIN 38DB ...#TRA K50INCFIN 38F* ... NULL 38G#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFINB https://www.george3.co.uk/george/macro/infinb?rev=1705492539&do=diff INFINB (GIN Macro) Defined in: MACROS RMD10 Used in: INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, PREPREAD867, READBULK867, SETPRAMA867, TIDYREAD850 *YJ8 ...[??? INFINB SECT FILE FGN 16 DOC *YS2 # *^?L # INPUT MACRO TO SET OR UNSET BIT FOR FINISH COMMAND *^R= # B2=W #MAC INFINB B2QG LDX 2 FX2 B3PQ BRUSEN M1INFINB,2 B49B CJOBLOCK 1 B4P2 LDCT 0 #40 B58L ERS 0 JMISC(1) B5N= LDX 1 FX1 B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFIPCA https://www.george3.co.uk/george/macro/infipca?rev=1705492539&do=diff INFIPCA (GIN Macro) Defined in: MACROSIPC Used in: IPCOPENA83, IPCOPENB83, IPCPERI83 5=S7 ...[??? INFIPCA SECT COMM FGN 19 DOC 5?6J ...[ STORE THE DETAILS OF A LINK IN THE STACK AND WAKE THE INTERN ACTIVITY 5?F2 #MAC INFIPCA 5?YL LDX 0 %A 5#D= STO 0 ACOMMUNE1(2) 5#XW DOWN GETNO,3 5*CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFOMESS https://www.george3.co.uk/george/macro/infomess?rev=1705492539&do=diff INFOMESS (GIN Macro) Defined in: MACS SPC Used in: #FY2 # INFOMESS #GCL # #GX= # OUTPUT ON THE CONSOLE AN INFORMATORY MESSAGE DURING EMS #HBW # #HWG #MAC INFOMESS #JB6 SMO FX1 #JTQ LDX 3 %A #K*B SETUPCOR 3,2,CONBUFF,COUT #KT2 STO 3 AREC(2) #L#L ADN 1 %A+1 #LS= ADN 2 ATEXT #M?W SMO 3 #MRG MOVE 1 -1 #N?6 SBN 2 ATEXT #NQQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFOMEX https://www.george3.co.uk/george/macro/infomex?rev=1705492539&do=diff INFOMEX (GIN Macro) Defined in: MACS SPC Used in: #SMQ # OUTPUT MESSAGE ON OPS CONSOLE DURING EMS - USING ACC FOR MESS ADDR #T7B # #TM2 #MAC INFOMEX #W6L LDX 1 FX1 #WL= ADX 1 %A #X5W LDX 2 0(1) #XKG SETUPCOR 2,2,CONBUFF,COUT #Y56 ADX 1 %A #YJQ LDX 0 0(1) #^4B STO 0 AREC(2) #^J2 ADN 1 1 *23L ADN 2 ATEXT *2H= SMO 0 *32W MOVE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFORM https://www.george3.co.uk/george/macro/inform?rev=1705492539&do=diff INFORM (GIN Macro) Defined in: MACROS RJH Used in: ADDICT865, ADDJOB867, ATTACHC867, ATTJOUNL861, BRADDATA867, BRADEMUL867, BRADSPLT867, BSUNJAM867, CDUM866, CLOSFREZ867, CMEMILL866, COMPRESS864, DISPCOM867, DRUM852, EVENTS864, FINDRUM866, FINISH867, FINISHB867, FLAWMAP866, IDFPER867, IDFPROP867, IDFSCON867, INCEND865, INCSTART865, IPBCONS867, IPBLISTC867, IPBLISTD867, IPBMOPB867, IPBSCANB867, LIBREQ866, LISTINTC865, LISTNEXT867, LOADPROG865, MORNING867, MOVCART867, MULTIPLX864, ONLINEA867, O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFORMQU https://www.george3.co.uk/george/macro/informqu?rev=1705492539&do=diff INFORMQU (GIN Macro) Defined in: MACROS VB Used in: 4D*S ...[??? INFORMQU SECT CENT FGN 7 DOC 4DKL #MAC INFORMQU 4F5= MFREEW GMON,AOUT [BOUT IN FUTURE 4FJW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INFORMX https://www.george3.co.uk/george/macro/informx?rev=1705492539&do=diff INFORMX (GIN Macro) Defined in: MACROS RJH Used in: ANSCOM865, BSUNJAM867, CARTCONT867, COREALLH860, DEMAND860, DISPCOM867, DUMMYB867, ENGAGE867, EXMESS70, FAILTWIN866, FORMLOOP865, FREEPER867, FSERR867, GETFREEB864, GROPE867, IDFENQS867, IPBERROR867, IPBINB867, IPBINC865, IPBOUT867, IPBSCANB867, IPBSTARB867, IPBSTART867, KARTCONT867, MAKEVCC867, MOPCOM867, MOPCOMB865, MORNING867, PATCH, PCTCON8, PERFAIL866, RELIEF866, RENGAGE851, RIGHT867, SHARE866, SPEAK8, SWITCH867, TWINSET866 =4HD ...[… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INHIBITBRK https://www.george3.co.uk/george/macro/inhibitbrk?rev=1705492539&do=diff INHIBITBRK (GIN Macro) Defined in: MACROS BJE Used in: ATTACHC867, CONNECT867, CONTXCOD60, DETACH867, ERASEA867, INCWAIT860, JWELLTWO867, LOGOUT867, PNTLAST860, REGEN865, RENAMAG864 3MYJ ...[??? INHIBITB SECT CENT FGN 3 DOC 3N8B # 3NN2 # 3P7L # 3PM= # 3Q6W # MACRO WHICH AFTER USE WILL CAUSE BREAK-IN TO BE IGNORED 3QLG # 3R66 #MAC INHIBITBRK 3RKQ CALL 0 (FCHECKBIN) 3S5B BRN %A [J ALREADY BROKEN-I… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INITLFCA https://www.george3.co.uk/george/macro/initlfca?rev=1705492539&do=diff INITLFCA (GIN Macro) Defined in: RING-MACROS Used in: CLOSEONE867, ORELEND860 GDKJ ...[??? INITLFCA SECT FILE FGN 20 DOC GDTB [ GF*2 #MAC INITLFCA GFSL JBCC M1INITLFCA,3,BFLENW GG#= TRACEIF K6OPEN,99,299,FLOC1(3),REL ALST GGRW FON ISTACWT [FREE WAITERS FOR FSTACK GH?G M1INITLFCA GHR6 LDX 2 FPTR(3) GJ=Q BC 3,BFLEN GJQB LDEX 1 ARINGNO(2) GK=2 LDN 0 FELLE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INITSCAN https://www.george3.co.uk/george/macro/initscan?rev=1705492539&do=diff INITSCAN (GIN Macro) Defined in: MACROS JSRG4 Used in: ?^SB #MAC INITSCAN [J.S.RAYNER.G4 ONLY #2#2 LDCT 1 #600 #2RL MOD ANDX 1 ASEGTAB,%C #3?= LDCH 1 BTABLENS(1) #3QW ADN 1 1 #4=G SRC 1 8 #4Q6 SBX 1 %A #59Q BNG 1 %D #5PB BZE 1 %D #692 SBX 1 %B #6NL BPZ 1 MINITSCAN #78= ADS 1 %B #7MW MINITSCAN #87G #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INMDF https://www.george3.co.uk/george/macro/inmdf?rev=1705492539&do=diff INMDF (GIN Macro) Defined in: MACRO COMPRO Used in: FBCS ...[??? INMDF SECT CENT FGN 21 DOC FBML # FC7= #MACRO INMDF [TJHARPER FCLW LDX 0 CPBFSD(%A) FD6G BPZ 0 %B FDL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INMOP https://www.george3.co.uk/george/macro/inmop?rev=1705492539&do=diff INMOP (GIN Macro) Defined in: OLPMACROS Used in: CHTAB, COMPS ACTBLK, CROBJ6, FHOBJ860, INKS, TROBJ867 97FQ ...#MAC INMOP 97^B ... SMO FX2 98F2 ... LDX 0 IDENTINFO 98YL ... BZE 0 MNOTMOP [J. NOT MOP OR JDF 99D= ... LDX 2 FX2 99XW ... LDN 0 3 9=CG ... LDN 1 ACC3(2) 9=X6 ... MOVE 0 5 9?BQ ... LDX 1 FX1 [RESET X1. 9?WB ... LDX 0 APETADDR(2) 9#B2 ... SBS 0 EVEN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INMOVE https://www.george3.co.uk/george/macro/inmove?rev=1705492539&do=diff INMOVE (GIN Macro) Defined in: MACROS JSR Used in: DROBJ864, EDOBJ864, FHOBJDIR860, MATALO860, MTCODE864, MTOBJ864, OLMTB867, OLMTD65, READSPEC867, TPINS861 3L9W #MAC INMOVE [MOVE GEORGE AREA TO OBJ PROG AREA 3LPG LDX 0 %D 3M96 STO 0 JWSP2 3MNQ STO 1 JWSP1 3N8B LDX 0 %B 3NN2 STO 0 JWSP3 3P7L LDX 0 %C 3PM= SMO %A 3Q6W LDX 1 ADATUM 3QLG ADX 1 JWSP3 3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INMOVEZ https://www.george3.co.uk/george/macro/inmovez?rev=1705492539&do=diff INMOVEZ (GIN Macro) Defined in: MACROS JSRG4 Used in: 5^D6 #MAC INMOVEZ [J.S.RAYNER GEORGE 4 ONLY 5^XQ STO 1 JWSP1 [SAVE X1,X2 62CB STO 2 JWSP2 62X2 LDX 0 %C [GEORGE ADDRESS 63BL STO 0 JWSP4 63W= LDX 0 %D [LENGTH OF MOVE 64*W STO 0 JWSP5 64TG STOZ JWSP6 65*6 LDX 0 %B [OBJ PROG ADDR 65SQ LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INOPTIME https://www.george3.co.uk/george/macro/inoptime?rev=1705492539&do=diff INOPTIME (GIN Macro) Defined in: MACS IPB Used in: 5KP6 #MAC INOPTIME 5L8Q #STR CHAR,%A 5LNB #SKI 5M82 ( 5MML #MEN MULTIPLX 5N7= #TRA K50MULTIPLX 5NLW LDN 7 3+%B/FONINTP 5P6G #END 5PL6 ) 5Q5Q #STR MESS,%A 5QKB #SKI 5R52 ( 5RJL #MEN IPBMOP 5S4= #TRA K51IPBMOP 5SHW 3+%B/FONINTP 5T3G #END 5TH6 #MEN IPBMOPB 5W2Q #TRA K51IPBMOPB 5WGB 3+%B/FONINTP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INPRINTX https://www.george3.co.uk/george/macro/inprintx?rev=1705492539&do=diff INPRINTX (GIN Macro) Defined in: MISCMACS Used in: OPILLSA206, PRINT70 3HRQ #MAC INPRINTX [M.C.D. MANN 3J?B [ 3JR2 [ 3K=L [ ************** 3KQ= [ * INPRINTX * 3L9W [ ************** 3LPG [ 3M96 [ 3MNQ LDX 0 %C 3N8B SMO FX2 3NN2 STO 0 ACOMMUNE9 3P7L INPRINTZ %A,%B,%D,%E 3PM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INPRINTY https://www.george3.co.uk/george/macro/inprinty?rev=1705492539&do=diff INPRINTY (GIN Macro) Defined in: MISCMACS Used in: 3S5B #MAC INPRINTY [M.C.D. MANN 3SK2 [ 3T4L [ 3TJ= [ ************** 3W3W [ * INPRINTY * 3WHG [ ************** 3X36 [ 3XGQ [ 3Y2B #SKI %C 3YG2 ( 3Y^L LDN 0 1 3^F= SMO FX2 3^YW STO 0 ACOMMUNE9 42DG ) 42Y6 #SKI %C 43CQ #SKI 43XB ( 44C2 SMO FX2 44WL STOZ ACOM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INPRINTZ https://www.george3.co.uk/george/macro/inprintz?rev=1705492539&do=diff INPRINTZ (GIN Macro) Defined in: MISCMACS Used in: 2^=2 #MAC INPRINTZ [M.C.D. MANN 2^PL [ 329= [ 32NW [ ************** 338G [ * INPRINTZ * 33N6 [ ************** 347Q [ 34MB [ 3572 LDX 0 %A 35LL SMO FX2 366= STO 0 ACOMMUNE7 36KW LDX 0 %B 375G SMO FX2 37K6 STO 0 ACOMMUNE8 384Q #STR %C 38JB ( 3942 SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INPUTFULL https://www.george3.co.uk/george/macro/inputfull?rev=1705492539&do=diff INPUTFULL (GIN Macro) Defined in: MACROS HFD8 Used in: INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, INRESTAR84, TIDYREAD850 627J ...[??? INPUTFUL SECT FILE FGN 22 DOC 62CB #MAC INPUTFULL 62X2 SMO FX1 63BL LDX 0 M1INPUTFULL 63W= SMO FX2 64*W STO 0 ACOMMUNE1 64TG DOWN INRESTAR,3 65*6 M1INPUTFULL +%C 65SQ BRN %A 66#B BRN %B 66S2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INSBLKS https://www.george3.co.uk/george/macro/insblks?rev=1705492539&do=diff INSBLKS (GIN Macro) Defined in: MACROS SHFSB Used in: 3XGQ [??? INSBLKS SECT FILE FGN 1 DOC 3Y2B #MAC INSBLKS 3YG2 DOWN FSHBSAL,2 3Y^L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INSERT https://www.george3.co.uk/george/macro/insert?rev=1705492539&do=diff INSERT (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, BEXTSJ84, BMJLSLAV864, BMSAVJOB864, BMXEMS83, BMXEND7, CHTAB, CLOSEALT864, CREALEX864, DTREST860, ENWELL867, FHOBJ860, FHOBJDIR860, INCPTRES864, INCTAPES867, INKS, JOBLIST867, LIBLOAD867, LISTEND867, MAKEFILE863, NEWDIR867, NEWOWN865, NEWPW867, OPERAPP864, PROPERTY867, RENAMDIR, RENAME864, RENAMEMT867, RESTEND850, SYSPROP867, TRAPGO864, WHATRVSA867, WLC867, WLE862, WLG862, WORKFILE860 25CB # MACROS FOR "RINGS & THINGS" … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INST https://www.george3.co.uk/george/macro/inst?rev=1705492539&do=diff INST (GIN Macro) Defined in: IPMACROS Used in: NEWINST867 22FL [ 22^= [ SUBFILE OWNER -- OWEN N. JOHN 23DW [ 23YG [ SECTION -- :CENT 24D6 [ 24XQ [ THIS MACROS SUBFILE CONTAINS ALL THE MACROS USED BY THE 25CB [ INSTALLATION PARAMETER CODE VIZ:- 25X2 [ 26BL [ 26W= [ 1( NEWINST SET UP PARAMINDEX AT EMS 27*W [ 27TG [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INSTPARA https://www.george3.co.uk/george/macro/instpara?rev=1705492539&do=diff INSTPARA (GIN Macro) Defined in: MACROS MACB Used in: BSUNJAM867, CHTAB, INCEND865, INKS, PERFPASS864 8548 ...[??? INSTPARA SECT CENT FGN 2 DOC 85#2 # 85RL # MACRO TO DO THE SAME AS THE INSTPARA COMMAND 86?= # %A IS A BREAKIN LABEL 86QW # %B (NOT X0) IS A PTR TO A 3 WORD AREA CONTAINING THE NAME OF THE 87=G # IP SPACEFILLED 87Q6 # %C IS A WORD CONTAINING THE NEW VALUE OF THE IP 889Q # %D IS A LABEL TO BRANCH TO IF THE VALUE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) INTELOCK https://www.george3.co.uk/george/macro/intelock?rev=1705492539&do=diff INTELOCK (GIN Macro) Defined in: MACROS GLJ Used in: DW4B #MAC INTELOCK DWJ2 #MEN COREALLB DX3L #TRA INHIBTLOCK DXH= EXIT 0 0 DY2W #END DYGG ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBACKJAM https://www.george3.co.uk/george/macro/ipbackjam?rev=1705492539&do=diff IPBACKJAM (GIN Macro) Defined in: DUMP-MACROS Used in: INSTPARA867, SETUPARA867 82L4 ...[??? IPBACKJA SECT FILE FGN 65 DOC 84SB # THIS MACRO IS USED TO CALCULATE AND INSERT INTO ANY BSTB-BSLIST 85#2 # BLOCK NOT USED AS A SWAP FILE, THE MINIMUM FREE BLOCKS VALUE 85RL # NECESSARY TO PREVENT THE UNJAMMER SYARTING 86?= # FOR MK7 IT ALSO CALCULATES THE THRESHOLD VALUE 86QW # NB. SPECIAL RESIDENCES HAVE BSJAML=BSTHRESH=0 (IE. 100%) 87=G # … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBANON https://www.george3.co.uk/george/macro/ipbanon?rev=1705492539&do=diff IPBANON (GIN Macro) Defined in: MACS IPB Used in: DUMMYB867, RIGHT867 63DJ ...[??? IPBANON SECT COMM FGN 1 63GG ...#MAC IPBANON 63JD ... LDX 0 IPBSW(2) [LD. IPB SWITCH WORD 63LB ... ANDX 0 BIT10 63N# ... BNZ 0 %A [J. BIT 10 STILL SET UNIT NO. DEFINE 63Q= ... [NOT IN THE IDF YET 63S8 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBATTACH https://www.george3.co.uk/george/macro/ipbattach?rev=1705492539&do=diff IPBATTACH (GIN Macro) Defined in: MACS CONC Used in: XATTACH861 37K6 #MAC IPBATTACH 384Q LDN 0 #400 38JB ANDX 0 IDSTATUS(%A) 3942 BNZ 0 %B 39HL SMO %C 3=3= LDX 0 IPBSW 3=GW ANDX 0 GSIGN 3?2G SRL 0 14 3?G6 ORS 0 IDSTATUS(%A) 3?^Q MODD LDX 0 A1,%D,2 3#FB SRL 0 12 3#^2 STO 0 IDNUM(%A) 3*DL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBBSW https://www.george3.co.uk/george/macro/ipbbsw?rev=1705492539&do=diff IPBBSW (GIN Macro) Defined in: MACS CONC Used in: 3LPG #MAC IPBBSW 3M96 #STR %A,ON 3MNQ #SKI 3N8B ( 3NN2 #MEN CONIPB 3P7L #TRA K90CONIPB 3PM= SBN 4 1 3Q6W #TRA K91CONIPB 3QLG SBN 1 1 3R66 ADN 3 1 3RKQ #END 3S5B #EXI 3SK2 ) 3T4L #STR OFF,%A 3TJ= #SKI 3W3W ( 3WHG #MEN CONIPB 3X36 #TRA K90CONIPB 3XGQ NULL 3Y2B #TRA K91CONIPB 3YG2 NULL 3Y^L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBCLATTACH https://www.george3.co.uk/george/macro/ipbclattach?rev=1705492539&do=diff IPBCLATTACH (GIN Macro) Defined in: MACS CONC Used in: DETACH867 3*Y= #MAC IPBCLATTACH 3BCW LDX 0 IDSTATUS(%A) 3BXG SRC 0 1 3CC6 BPZ 0 MIPBCLATCH 3CWQ ANDN 0 3 3DBB BNZ 0 MIPBCLATCH 3DW2 LDCT 0 #77 3F*L ANDX 0 IDSTATUS+1(%A) 3FT= BZE 0 %B 3G#W MIPBCLATCH 3GSG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBCONREQ https://www.george3.co.uk/george/macro/ipbconreq?rev=1705492539&do=diff IPBCONREQ (GIN Macro) Defined in: MACS CONC Used in: IDFCONS8 45TW #MAC IPBCONREQ 46*G LDX %A IPBRING(%A) 46T6 LDN %A CNAME-IPBRING(%A) 47#Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBCOUNT https://www.george3.co.uk/george/macro/ipbcount?rev=1705492539&do=diff IPBCOUNT (GIN Macro) Defined in: MACS IPB Used in: ATTACHB866, IPBINB867, ONLINCL864 66#B #MAC IPBCOUNT 66S2 LDN %A 1 67?L LDX %C IPBADDR 67R= M1IPBCOUNT 68=W TXU %C %B 68QG BCC M2IPBCOUNT 69=6 MOD LDX %C IPBL,%C 69PQ BUX %A M1IPBCOUNT 6=9B M2IPBCOUNT 6=P2 SLL %A 12 6?8L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBDETACH https://www.george3.co.uk/george/macro/ipbdetach?rev=1705492539&do=diff IPBDETACH (GIN Macro) Defined in: MACS CONC Used in: DETACH867 4==G #MAC IPBDETACH 4=Q6 LDX 0 IDSTATUS(%A) 4?9Q SRC 0 1 4?PB BPZ 0 %B 4#92 ANDN 0 3 4#NL BNZ 0 %B 4*8= LDCT 0 #77 4*MW ANDX 0 IDSTATUS+1(%A) 4B7G BNZ 0 %B 4BM6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBERRLOG https://www.george3.co.uk/george/macro/ipberrlog?rev=1705492539&do=diff IPBERRLOG (GIN Macro) Defined in: MACS IPB Used in: 6?N= [??? IPBERRLOG SECT COMM 6#7W #MAC IPBERRLOG 6#MG #STR ON,%A 6*76 #SKI 6*LQ ( 6B6B #MEN IPBSCAN 6BL2 #TRA K70IPBSCAN 6C5L BZE 0 K72IPBSCAN 6CK= #END 6D4W ) 6DJG #STR OFF,%A 6F46 #SKI 6FHQ ( 6G3B #MEN IPBSCAN 6GH2 #TRA K70IPBSCAN 6H2L BZE 0 K71IPBSCAN 6HG= #END 6H^W ) 6JFG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBINLOAD https://www.george3.co.uk/george/macro/ipbinload?rev=1705492539&do=diff IPBINLOAD (GIN Macro) Defined in: MACS CONC Used in: 4H3Q #MAC IPBINLOAD 4HHB #MEN IPBCCA 4J32 #TRA K51IPBCCA 4JGL SBN 7 %A<4095 4K2= #END 4KFW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBINOPID https://www.george3.co.uk/george/macro/ipbinopid?rev=1705492539&do=diff IPBINOPID (GIN Macro) Defined in: MACS IPB Used in: INITJOB867 6J^6 [??? IPBINOPID SECT COMM FGN 1 DOC 6KDQ [ 6KYB [ THIS MACRO DECIDES IF IDENTIFIER ON WHICH A JOB IS BEING RUN HAS GON 6LD2 [ 6LXL [ INOPERABLE. IF NOT EXITS. IF IDENTIFIER IS INOPERABLE THEN DOWN TO 6MC= [ IPBMOPB ENTRY POINT 1 WHICH WILL CRASH CLOSE AND RE-OPEN. 6MWW [ 6NBG #MAC IPBINOPID 6NW6 LDCH 0 JSOURCE1(2) [ON ENTRY X2 PTS TO CPAT 6P*Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBNOPCK https://www.george3.co.uk/george/macro/ipbnopck?rev=1705492539&do=diff IPBNOPCK (GIN Macro) Defined in: MACS IPB Used in: 7272 #MAC IPBNOPCK 72LL #STR %A,ON 736= #SKI 73KW ( 745G #MEN IPBLISTB 74K6 #TRA K60IPBLISTB 754Q LDXC 5 AWORK1(1) 75JB BCS K64IPBLISTB [J. NOT LP 7642 ANDX 0 IWORK10(1) [ISOLATE LAST BIT OF RECORD NUMBER 76HL BZE 0 K63IPBLISTB [IF NEXT RECORD NUMBER IS EVEN,OUTPUT 773= #TRA K61IPBLISTB 77GW BRN K6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBNULL https://www.george3.co.uk/george/macro/ipbnull?rev=1705492539&do=diff IPBNULL (GIN Macro) Defined in: MACS CONC Used in: CDCIPB864, DETACH867, DETACHB867, IPBCCA867, IPBCCD867 4MY2 #MAC IPBNULL 4NCL LDN 0 #601 4NX= ANDS 0 A1+IDSTATUS(%A) 4PBW SMO A1+BPTR(%A) 4PWG STOZ BPTR 4QB6 STOZ A1+BPTR(%A) 4QTQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBOUT https://www.george3.co.uk/george/macro/ipbout?rev=1705492539&do=diff IPBOUT (GIN Macro) Defined in: MACS IPB Used in: CHTAB, INKS, MONFILEA864, PNTLAST860 7H9W #MAC IPBOUT 7HPG #STR %A,0 7J96 LDX 0 %A [NO. OF CHS. 7JNQ #STR %A 7K8B #SKI 7KN2 NGN 0 1 7L7L SMO FX2 7LM= STO 0 ACOMMUNE7 7M6W DOWN IPBMOP,1 7MLG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBOUTLOAD https://www.george3.co.uk/george/macro/ipboutload?rev=1705492539&do=diff IPBOUTLOAD (GIN Macro) Defined in: MACS CONC Used in: 4X=B #MAC IPBOUTLOAD 4XQ2 #MEN IPBCCA 4Y9L #TRA K50IPBCCA 4YP= SBN 7 %A<4095 4^8W #END 4^NG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPBPM https://www.george3.co.uk/george/macro/ipbpm?rev=1705492539&do=diff IPBPM (GIN Macro) Defined in: MACS IPB Used in: COMPSPM 7N66 [ 7NKQ [??? IPBPM SECT COMM 7P5B [ 7PK2 #MAC IPBPM [RESTORE MACRO 7Q4L #STR ON,%A 7QJ= #SKI 7R3W ( 7RHG #MEN IPBERROR 7S36 #TRA K50IPBERROR 7SGQ +14 7T2B #TRA K51IPBERROR 7TG2 4H 7T^L #TRA K55IPBERROR 7WF= GEOERR 1,IPBERR 7WYW #END 7XDG ) 7XY6 #STR %A 7YCQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCANC https://www.george3.co.uk/george/macro/ipcanc?rev=1705492539&do=diff IPCANC (GIN Macro) Defined in: MACROSIPC Used in: 5*M# ...[??? IPCANC SECT COMM FGN 19 DOC 5*X6 #MAC IPCANC 5BBQ HUNT 2,IPCD,IPCGL%A 5BWB BPZ 2 MIPCANC1 5CB2 GEOERR 1,NOIPCLNK 5CTL MIPCANC1 5D*= LDX 2 A1(2) 5DSW LDX 0 ASTATUS1(2) 5F#G BNG 0 %B 5FS6 ANDN 0 1 5G?Q BZE 0 MIPCANC2 5GRB ERS 0 ASTATUS1(2) 5H?2 STOZ ATIMCT(2) 5HQL STOZ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCHANGE https://www.george3.co.uk/george/macro/ipchange?rev=1705492539&do=diff IPCHANGE (GIN Macro) Defined in: IPMACROS Used in: 2KQS ...[??? IPCHANGE SECT CENT FGN 12 DOC 2L2L [ 2LG= [ MACRO IPCHANGE 2L^W [ 2MFG #MAC IPCHANGE [OWEN N JOHN 2M^6 [ THIS MACRO REPACES THE DEFAULT VALUE OF IP %A BY %B.. IN FIXED 2N3P ...#UNS FSHTEST 2N6# ...#SKI 2N8X ... FSHSKIP B 2N?G ...( 2NB5 ...[ ALL DEFAULT VALUES ARE HELD ON MACHINE A ONLY 2NDQ #DEF 19?+3=1? … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCLIM https://www.george3.co.uk/george/macro/ipclim?rev=1705492539&do=diff IPCLIM (GIN Macro) Defined in: MACROSIPC Used in: 5XPD ...[??? IPCLIM SECT COMM FGN 19 DOC 5X^= #MAC IPCLIM 5YDW #STR ALL,%A 5YYG ( 5^D6 #SKI IPCLIMAX-IPCLIMNO 5^XQ ( 62CB #MEND IPCSTART 62X2 #TRA IPCLIMA+IPCLIMNO 63BL #STR WMC,%A 63W= ... +(%B<#7776)*10000+%A 64*W #STR WMC,%A 64TG #SKI 65*6 ... +(%B<#7776)*10000 65SQ #END 66#B RESET IPCLIMNO,IPCLIMNO+1 66S2 ) 67?L ) 67… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCLOSE https://www.george3.co.uk/george/macro/ipclose?rev=1705492539&do=diff IPCLOSE (GIN Macro) Defined in: MACROSIPC Used in: TWINSETB866 6?Y4 ...[??? IPCLOSE SECT COMM FGN 19 DOC 6#7W #MAC IPCLOSE 6#MG IPCANC %A,%B 6*76 #STR R,%A 6*LQ ( 6B6B LDN 0 1 6BL2 STO 0 ACOMMUNE4(2) 6C5L ) 6CK= #STR R,%A 6D4W #SKI 6DJG STOZ ACOMMUNE4(2) 6F46 DOWN IPCGEO,2 6FHQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCONT https://www.george3.co.uk/george/macro/ipcont?rev=1705492539&do=diff IPCONT (GIN Macro) Defined in: MACROS RJH Used in: INSTPARA867, IPALL864, SETPRAMB867, SETUPARA867 #P2J ...[??? IPCONT SECT CENT FGN 71 DOC #P=B # #PQ2 # #Q9L # #QP= # THIS MACRO CONVERTS A CONTEXT TYPE IP TO CHARS IN ACOMMUNE1 ONWARD #R8W # %A = WORD TO BE CONVERTED #RNG # %B = ACCUMULATOR TO HOLD CH CT ON EXIT #S86 # #SMQ #MAC IPCONT #T7B LDN %B 0 #TM2 LDX 2 FX2 #W6L LDN 1 3 #WL= M1IPCON… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCOPEN https://www.george3.co.uk/george/macro/ipcopen?rev=1705492539&do=diff IPCOPEN (GIN Macro) Defined in: MACROSIPC Used in: FAILTWIN866, INTWIN866 6FRJ ...[??? IPCOPEN SECT COMM FGN 19 DOC 6G3B #MAC IPCOPEN 6GH2 LDX 0 %D 6H2L SMO FX2 6HG= STO 0 ACOMMUNE1 6H^W LDX 0 %B 6JFG ADN 0 5 6J^6 SMO FX2 6KDQ STO 0 ACOMMUNE2 6KYB LDX 2 FX2 6LD2 SETUPCORE ACOMMUNE2(2),2,IPCD,IPCGL%A,,1 6LXL SMO FX2 6MC= ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCPRIV https://www.george3.co.uk/george/macro/ipcpriv?rev=1705492539&do=diff IPCPRIV (GIN Macro) Defined in: MACROSIPC Used in: =6=* ...[ =6=J ...[ =6=R ...[ =6?2 ...[??? IPCPRIV SECT COMM FGN 21 DOC =6?9 ...#MAC IPCPRIV =6*C ...#MEN IPCOPENA =6B4 ...#TRA AIPCOPENA =6B? ... 8H%A =6BP ...#TRA CIPCOPENA =6C7 ... NULL =6CK ...#END =6CS ...#MEN IPCOPENB =6DF ...#TRA AIPCOPENB =6DN ... 8H%A =6F6 ...#TRA CIPCOPENB =6FJ ... NULL =6G2 ...#END =6GD ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCREAD https://www.george3.co.uk/george/macro/ipcread?rev=1705492539&do=diff IPCREAD (GIN Macro) Defined in: MACROSIPC Used in: TWINSETD866 76W3 ...[??? IPCREAD SECT COMM FGN 20 DOC 778D ...[ THIS MACRO REQUESTS A READ ON A GEORGE IPC LINK 77N4 ...#MAC IPCREAD 787N ... IPCSUBR 78M# ... CALL 1 MIPCSUBR 796Y ...#HAL +IPCD+IPCGLR,0 79LJ ... LDN 0 IPCGT%A 7=68 ... LDX 0 %B 7=KS ... LDX 0 %C 7?5D ... LDX 0 %D 7?K4 ... DOWN IPCGEO,3 7#4N ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCREOFF https://www.george3.co.uk/george/macro/ipcreoff?rev=1705492539&do=diff IPCREOFF (GIN Macro) Defined in: MACROSIPC Used in: 899C ...[ 899S ...[ 89=9 ...[ 89=L ...[??? IPCREOFF SECT COMM FGN 21 DOC 89?3 ...#MAC IPCREOFF 89?D ...#MEN IPCOPENA 89?T ...#TRA BIPCOPENA 89#= ... BRN CIPCOPENA 89## ...#TRA FIPCOPENA 89#B ... NULL 89#D ...#TRA EIPCOPENA 89#G ... NULL 89#M ...#END 89*4 ...#MEN IPCOPENB 89*F ...#TRA BIPCOPENB 89*W ... BRN CIPCOPENB 89B2 ...#TRA EIPCOPENB 89B6 ... NULL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCREP https://www.george3.co.uk/george/macro/ipcrep?rev=1705492539&do=diff IPCREP (GIN Macro) Defined in: MACROSIPC Used in: FAILTWIN866, INTWIN866, TWINSETA866, TWINSETB866, TWINSETD866 89C5 ...[ 89CG ...[ 89CX ...[ 89DS ...[??? IPCREP SECT COMM FGN 19 DOC 89NL #MAC IPCREP 8=8= HUNT %B,IPCD,IPCGL%A 8=MW BPZ %B MIPCREP 8?7G GEOERR 1,NOIPCLNK 8?M6 MIPCREP LDX %B IPCGREP(%B) 8#6Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCSTAT2 https://www.george3.co.uk/george/macro/ipcstat2?rev=1705492539&do=diff IPCSTAT2 (GIN Macro) Defined in: MACROSIPC Used in: 93TG ...[??? IPCSTAT2 SECT FILE FGN 1 DOC 93TM ...#MAC IPCSTAT2 93TS ... IPCSUBX 93T^ ... CALL 1 MIPCSUBX 93W6 ...#HAL +IPCD+IPCGL%A,0 93W? ...#STR %B 93WD ... LDX %B ACOMMUNE1(2) 93WK ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCSTATE https://www.george3.co.uk/george/macro/ipcstate?rev=1705492539&do=diff IPCSTATE (GIN Macro) Defined in: MACROSIPC Used in: RELIEF866 8#BJ ...[??? IPCSTATE SECT COMM FGN 19 DOC 8#LB #MAC IPCSTATE 8*62 HUNT %B,IPCD,IPCGL%A 8*KL BPZ %B MIPCSTATE1 8B5= GEOERR 1,NOIPCLNK 8BJW MIPCSTATE1 SMO FX2 8C4G STOZ ACOMMUNE1 8CJ6 LDX %B IPCRNG(%B) 8D3Q SMO FX2 8DHB STO %B ACOMMUNE2 8F32 LDX %B APTRIPB(%B) 8FGL JDISENG CPPTR(%B),MIPCS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCSUBR https://www.george3.co.uk/george/macro/ipcsubr?rev=1705492539&do=diff IPCSUBR (GIN Macro) Defined in: MACROSIPC Used in: 76HP ...[??? IPCSUBR SECT FILE FGN 1 DOC 76HS ...[ THIS MACRO IS CALLED BY IPCREAD/IPCWRITE 76HX ...[ TO GENERATE A SUBROUTINE 76J2 ...#MAC IPCSUBR 76J5 ...#UNS MIPCSUBR 76J8 ...#EXI 76J? ... BRN MIPCSUBRX 76JB ...#DEF MIPCSUBR=0? 76JF ... STO 1 GEN0 76JJ ... HUNTX 1,0(1) 76JM ... BPZ 1 MIPCSUB1 76JQ ... GEOERR 1,NOIPCLNK 76JT ...MIPCSUB1 76JY ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCSUBX https://www.george3.co.uk/george/macro/ipcsubx?rev=1705492539&do=diff IPCSUBX (GIN Macro) Defined in: MACROSIPC Used in: 93JX ...[??? IPCSUBX SECT FILE FGN 1 DOC 93K4 ...[ MACRO TO GENERATE S/R FOR IPCSTAT2 93K9 ...#MAC IPCSUBX 93KB ...#UNS MIPCSUBX 93KH ...#EXI 93KN ... BRN MIPCSUBXX 93KT ...#DEF MIPCSUBX=0? 93L2 ... LDX 0 0(1) 93L7 ... ADN 1 1 93L# ... STO 1 GEN0 93LF ... HUNTX 1,0 93LL ... BPZ 1 MIPCSUBX1 93LR ... GEOERR 1,NOIPCLNK 93LY ...MIPCSUBX1 93M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPCWRITE https://www.george3.co.uk/george/macro/ipcwrite?rev=1705492539&do=diff IPCWRITE (GIN Macro) Defined in: MACROSIPC Used in: TWINSETD866 93X7 ...[??? IPCWRITE SECT COMM FGN 20 DOC 949J ...[ THIS MACRO REQUESTS A WRITE ON A GEORGE IPC LINK 94P8 ...#MAC IPCWRITE 958S ... IPCSUBR 95ND ... CALL 1 MIPCSUBR 9684 ...#HAL +IPCD+IPCGLW,0 96MN ... LDN 0 IPCGT%A 977# ... LDX 0 %B 97LY ... LDX 0 %C 986J ... LDX 0 %D 98L8 ... DOWN IPCGEO,4 995S ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPEXTDEF https://www.george3.co.uk/george/macro/ipextdef?rev=1705492539&do=diff IPEXTDEF (GIN Macro) Defined in: IPMACROS Used in: 5?WJ ...[??? IPEXTDEF SECT CENT FGN 12 DOC 5#B8 ...[ 5#TS ...[ IPEXTDEF 5**D ...[ 5*T4 ...#MAC IPEXTDEF 5B#N ...#DEF %A=0?+37?-IPEXTSTART^#40000000 5BS# ... +%B 5C?Y ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPEXTEND https://www.george3.co.uk/george/macro/ipextend?rev=1705492539&do=diff IPEXTEND (GIN Macro) Defined in: IPMACROS Used in: 5CRJ ...[??? IPEXTEND SECT CENT FGN 12 DOC 5D?8 ...[ 5DQS ...[ IPEXTEND 5F=D ...[ 5FQ4 ...#MAC IPEXTEND 5G9N ...#DEF IPEXTSIZE=0?+37?-IPEXTSTART 5GP# ... FCEND 5H8Y ...#MEN CONSTANT 5HNJ ...#TRA IPEXTTAB 5J88 ... +IPEXTSTART 5JMS ... +IPEXTSIZE 5K7D ...#END 5KM4 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPEXTST https://www.george3.co.uk/george/macro/ipextst?rev=1705492539&do=diff IPEXTST (GIN Macro) Defined in: IPMACROS Used in: 57^J ...[??? IPEXTST SECT CENT FGN 12 DOC 58F8 ...[ 58YS ...[ IPEXTST 59DD ...[ 59Y4 ...#MAC IPEXTST 5=CN ... FCMEND 5=X# ...#DEF IPEXTSTART=0?+37? 5?BY ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPFAIL https://www.george3.co.uk/george/macro/ipfail?rev=1705492539&do=diff IPFAIL (GIN Macro) Defined in: MACROSIPC Used in: =6GM ...[ =6GW ...[ =6H5 ...[ =6JH ...[??? IPFAIL SECT COMM FGN 19 DOC =6WY ...[ TEST IF LINK HAS FAILED IN OPENING,AND JUMP IF NOT =79B #MAC IPFAIL =7P2 SMO AWORK1(%A) =88L LDX 1 ARINGEL(%A) =8N= SBX 1 AWORK1(%A) =97W LDX 0 ASTATUS2(1) =9MG LDX 1 FX1 ==76 SLL 0 4 ==LQ BPZ 0 %B =?6B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPINDEX https://www.george3.co.uk/george/macro/ipindex?rev=1705492539&do=diff IPINDEX (GIN Macro) Defined in: IPMACROS Used in: 4D*S ...[??? IPINDEX SECT CENT FGN 12 DOC 4DKL [ 4F5= [ MACRO IPCONT 4FJW [ 4G4G [ 4GJ6 [ AT PRESENT IN :CENT.MACROS RJH 4H3Q [ WAITING SIB TO QUALIFY THE RULES 4H3T ...#MAC IPINDEX [OWEN N JOHN 4H3Y ...#DEF 19?+3=1? [SAVE LISTING LEVEL 4H43 ...#LIS 0 4H46 ...#ORD 4H49 ...#INT 4H4# ...XIPADD +DNEWINST [ADDR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPUSE https://www.george3.co.uk/george/macro/ipuse?rev=1705492539&do=diff IPUSE (GIN Macro) Defined in: IPMACROS Used in: 4HF8 ...[??? IPUSE SECT CENT FGN 12 DOC 4HF9 ...[ 4HF= ...[ IPUSE 4HF? ...[ 4HF# ...#MAC IPUSE 4HYY ...#UNS %B 4JDJ ...#SKI 4JY8 ...( 4KCS ... SMO IPEXTTAB 4KXD ... %A %B&#37777777 4LC4 ...) 4LWN ...#UNS %B 4MB# ...( 4MTY ...#SKI %B&#40000000<1$1 4N*J ... %A %B 4NT8 ...#SKI %B&#40000000 4P#S ...( 4PSD ... SMO IPEXTTAB 4Q#4 ... %A %B&#3777… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IPUSEX https://www.george3.co.uk/george/macro/ipusex?rev=1705492539&do=diff IPUSEX (GIN Macro) Defined in: IPMACROS Used in: INSTPARA867, IPALL864, SETPRAMB867, SETUPARA867 4S=J ...[??? IPUSEX SECT CENT FGN 12 DOC 4SQ8 ...[ 4T9S ...[ IPUSEX 4TPD ...[ 4W94 ...#MAC IPUSEX 4WNN ... BNG %B MIPUSE1 4X8# ... MOD %A INSTPARAM,%B 4XMY ... BRN MIPUSE2 4Y7J ...MIPUSE1 4YM8 ...#MOD %B 4^6S ...#SKI 4^LD ...( 5264 ... SMO IPEXTTAB 52KN ... %A 0(%B) 535# ...) 53JY ...#MOD %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IRIGHT https://www.george3.co.uk/george/macro/iright?rev=1705492539&do=diff IRIGHT (GIN Macro) Defined in: MACS JIB Used in: RIGHT867 8HNY ...[??? IRIGHT SECT COMM FGN 25 DOC 8HYQ # 8H^N ...#MAC IRIGHT 8J27 ...#STR %C 8J2L ...#SKI 8J35 ... LDX 0 CPPTR(2) 8J3J ...#STR %C 8J43 ... LDX 0 %C 8J4G ... SMO FX2 8J4^ ... STO 0 ACOMMUNE2 8J5D ... LDX 0 %D 8J5X ... SMO FX2 8J6B ... STO 0 ACOMMUNE1 8J6T ... DOWN IDFOFF,70 8J7# ... BRN %A 8J7R ... BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISITJOB https://www.george3.co.uk/george/macro/isitjob?rev=1705492539&do=diff ISITJOB (GIN Macro) Defined in: MACRO COMPRO Used in: INLOOP84, INPCT84, INPUTMOP82, INRESTAR84, IPBMOPB867, MOPOUT85, PREPREAD867, READBULK867, TIDYREAD850 9W8# ...[??? ISITJOB SECT CENT FGN 21 DOC 9WD6 # 9WXQ [ THIS MACRO DETERMINES WAETHER THE INPUT COMMAND WAS INTERNALLY 9XCB [ ISSUED BY THE JOB COMMAND 9XX2 #MAC ISITJOB 9YBL LDCT 0 #40 9YW= SMO FX2 9^*W ANDX 0 EXT+11 9^TG BZE 0 %A =2*6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISNSTOP https://www.george3.co.uk/george/macro/isnstop?rev=1705492539&do=diff ISNSTOP (GIN Macro) Defined in: LLSMACROS Used in: 55LS ...[??? ISNSTOP SECT CENT FGN 6 DOC 55N6 ...# 55PD ...# MACRO FOR TESTING IF PROGRAM IS REALLY STOPPED (DUAL PROCESSOR) 55QQ ...# 55S4 ...#MAC ISNSTOP 55TB ... LDX 0 ANM(%A) 55WN ... BPZ 0 %B 55Y2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISPER https://www.george3.co.uk/george/macro/isper?rev=1705492539&do=diff ISPER (GIN Macro) Defined in: MACS SPC Used in: IPCOPENB83, LISTPARS867, ONLINEA867 *JKB #MAC ISPER *K52 ISPER7 %A,%B *KJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISPER7 https://www.george3.co.uk/george/macro/isper7?rev=1705492539&do=diff ISPER7 (GIN Macro) Defined in: MACS SPC Used in: *9TL #MAC ISPER7 *=*= #ACC %A *=SW ( *?#G LDX 0 %A *?S6 SMO FX2 *#?Q STO 0 ACOMMUNE7 *#RB ) **?2 #ACC %A **QL #SKI *B== ( *BPW SMO FX2 *C9G STO %A ACOMMUNE7 *CP6 ) *D8Q DOWN GETFREE,1 *DNB BRN %B *F82 NULL *FML #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISPERG https://www.george3.co.uk/george/macro/isperg?rev=1705492539&do=diff ISPERG (GIN Macro) Defined in: MACS SPC Used in: DRUM852 *PFL #MAC ISPERG *P^= #ACC %A *QDW ( *QYG LDX 0 %A *RD6 SMO FX2 *RXQ STO 0 ACOMMUNE7 *SCB ) *SX2 #ACC %A *TBL #SKI *TW= ( *W*W SMO FX2 *WTG STO %A ACOMMUNE7 *X*6 ) *XSQ DOWN GETFREE,4 *Y#B BRN %B *YS2 BRN %C *^?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISPROPN https://www.george3.co.uk/george/macro/ispropn?rev=1705492539&do=diff ISPROPN (GIN Macro) Defined in: MACROS SAR Used in: ASSOC867, ONLINEC867, WSPARAM867 384Q #MAC ISPROPN 38JB [THIS MACRO TESTS THE PROPERTY NAME IN THE CPB/CUNI BLOCK,AGAINST THOSE 3942 [IN :SYSTEM.PROPERTY AND,IF A MATCH IS FOUND,THE PROPERTY NUMBER IS SET 39HL [IN %A(IF NOT %A = 0 & COMERR).B0 OF %A SET IF CONSOLE PROPERTY,B1 SET I 3=3= [PERMANENT PROPERTY 3=GW DOWN WHATPROP,4 3?2G #SKI JSKI18<1$1 3?G6 ( 3?^Q LDX 0 ACOMMUNE1(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSTOP https://www.george3.co.uk/george/macro/isstop?rev=1705492539&do=diff ISSTOP (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867 55^H ...[??? ISSTOP SECT CENT FGN 6 DOC 5656 # 56JQ # MACRO FOR TESTING IF PROGRAM IS REALLY STOPPED (DUAL PROCESSOR) 574B # 57J2 #MAC ISSTOP 583L LDX 0 ANM(%A) 58H= BNG 0 %B 592W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUBRK https://www.george3.co.uk/george/macro/issubrk?rev=1705492539&do=diff ISSUBRK (GIN Macro) Defined in: MACRO COMPRO Used in: COMPROB867 *6N4 ...[??? ISSUBRK SECT CENT FGN 21 DOC *6XW #MAC ISSUBRK *7CG RESTERBIT *7M# ... UNSETBIT 2,JOBEVENTS(2) *7X6 UPPLUS 1 *8BQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUCOM https://www.george3.co.uk/george/macro/issucom?rev=1705492539&do=diff ISSUCOM (GIN Macro) Defined in: MACRO COMPRO Used in: BLOGNAL865, CORE867, DOMONOP867, DTQUEST860, INCFIN864, INCRV850, INCSTART865, LOGANAL864, LOGOUT867 8?WY ...[??? ISSUCOM SECT CENT FGN 21 DOC 8#6Q #MAC ISSUCOM 8#LB ... DOWN COMPROA,3 8*62 BRN %A 8*KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUCOMB https://www.george3.co.uk/george/macro/issucomb?rev=1705492539&do=diff ISSUCOMB (GIN Macro) Defined in: MACRO COMPRO Used in: DOMONOP867, INCRCUBX860, JWELLTWO867, LISTDEV866, LISTDIR867, LISTSTAR867, MACDEF8, PERFPASS864, PROGISH850, WA864, WHATRVSA867, WHTSTAT867, WLC867 8C## ...[??? ISSUCOMB SECT CENT FGN 21 DOC 8CJ6 #MAC ISSUCOMB 8D3Q ... DOWN COMPROA,9 8DHB BRN %A 8F32 BRN %B 8FGL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUCOMJ https://www.george3.co.uk/george/macro/issucomj?rev=1705492539&do=diff ISSUCOMJ (GIN Macro) Defined in: MACRO COMPRO Used in: DEWELL867 8*TD ...[??? ISSUCOMJ SECT CENT FGN 21 DOC 8B5= #MAC ISSUCOMJ 8BJW ... ACROSS COMPROA,7 8C4G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUCOML https://www.george3.co.uk/george/macro/issucoml?rev=1705492539&do=diff ISSUCOML (GIN Macro) Defined in: MACRO COMPRO Used in: IPBINC865, LOGANAL864 8FQD ...[??? ISSUCOML SECT CENT FGN 21 DOC 8G2= #MAC ISSUCOML 8GFW SMO FX2 8G^G LDX 1 CPLEV 8HF6 ORX 1 GSIGN 8HYQ SMO FX2 8JDB ORS 1 EXT+11 8JY2 ... DOWN COMPROA,3 8KCL BRN %A 8KX= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUE https://www.george3.co.uk/george/macro/issue?rev=1705492539&do=diff ISSUE (GIN Macro) Defined in: MACROSAJE Used in: MESSBA, MESSCI, MESSDA, PMSUMA867 4848 ...[??? ISSUE SECT DEVT FGN 8 DOC 48#2 # 48RL # 49?= #MAC ISSUE 49QW ...[ THIS MACRO CHECKS THE ISSUE NUMBER OF A SET OF MENDS 4==G #SKI +%A-G3ISSUE 4=Q6 ( 4?9Q #INT 4?PB M1ISSUE 20HAMENDING WRONG ISSUE 4#92 M2ISSUE 20:M1ISSUE 4#NL M3ISSUE SUSTY M2ISSUE 4*8= EXIT 0 0 4*MW #JUM M3ISSUE 4B7G ) 4BM6 #NO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUENO https://www.george3.co.uk/george/macro/issueno?rev=1705492539&do=diff ISSUENO (GIN Macro) Defined in: MACROS SIB Used in: 22FL # THIS MACRO FILE IS OWNED BY SIB 22^= # IT CONTAINS THE FOLLOWING MACROS 23DW # 23YG # ISSUENO [ K BURTON 2432 ...# ISSUESKI [ K BURTON 245G ...# WLOUTLIM [ K BURTON 2482 ...# PROPUNAC [ S TOWNSEND 24=G ...# USERCHURGE [ S TOWNSEND 24?6 ...# WLNARROW [ S TOWNSEND 24?Q ...# ENVIRONMENT TESTING MACROS - TEMPORARY ONLY 24*2 ...# 24BJ ...[??? ISSUENO SEC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUERR https://www.george3.co.uk/george/macro/issuerr?rev=1705492539&do=diff ISSUERR (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867 #XT# ...[??? ISSUERR SECT CENT FGN 21 DOC #Y56 # #YJQ #MAC ISSUERR [RETURN TO CP-ERROR IN INT ISS COM. #^4B RESTERBIT #^J2 UP *23L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUESKI https://www.george3.co.uk/george/macro/issueski?rev=1705492539&do=diff ISSUESKI (GIN Macro) Defined in: MACROS SIB Used in: 2*P2 # 2*PT ...[??? ISSUESKI SECT DEVT FGN 4 DOC 2*QP # ISSUESKI 2*SD # THIS MACRO DOES #SKI ON ISSUE NUMBER 2*WQ ...# %A BEING MAJOR (IF MULTIPLE OF TEN, EG 30) OR 2*^4 ...# MINOR (OTHERWISE, EG 42) ISSUE FOR WHICH LINE(S) 2B3B ...# IS(ARE) TO BE INCLUDED 2B5N ...#MAC ISSUESKI 2B82 ...#DEF 20?=G3ISSUE 2B=# ...#SKI 20?-%A 2B#L ...#SKI (20?<%A)-20? 2BBY ...#SKI %A-(%A/10*10)+(((20?>%A)-(20?<%A))… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUFIN https://www.george3.co.uk/george/macro/issufin?rev=1705492539&do=diff ISSUFIN (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867 *2?D ...[??? ISSUFIN SECT CENT FGN 21 DOC *2H= #MAC ISSUFIN [RETURN TO CP-AFTER INT ISS. COMMAND *32W RESTERBIT *3GG UPPLUS 1 *426 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUFINB https://www.george3.co.uk/george/macro/issufinb?rev=1705492539&do=diff ISSUFINB (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867 *49Y ...[??? ISSUFINB SECT CENT FGN 21 DOC *4FQ [ ISSUFIN TYPE MACRO - RETURN AFTER ISSUCOMB *4^B #MAC ISSUFINB *5F2 RESTERBIT *5YL UPPLUS 2 *6D= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUJOB https://www.george3.co.uk/george/macro/issujob?rev=1705492539&do=diff ISSUJOB (GIN Macro) Defined in: MACRO COMPRO Used in: BMXEMS83, DUMP860, EMSENTER867, IPBERROR867, PERFCHAP866 863D ...[??? ISSUJOB SECT CENT FGN 21 DOC 86?= #MAC ISSUJOB 86QW LDN 7 %A 87=G DOWN REDON,2 87Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ISSUJOBN https://www.george3.co.uk/george/macro/issujobn?rev=1705492539&do=diff ISSUJOBN (GIN Macro) Defined in: MACRO COMPRO Used in: 87^Y ...[??? ISSUJOBN SECT CENT FGN 21 DOC 889Q # 88PB [ MACRO TO DO THE SAME AS ISSUJOB BUT WITHOUT SETTING THE SYSTEM 8992 [ ISSUED BIT 89NL # 8=8= #MAC ISSUJOBN 8=MW LDN 7 %A 8?7G DOWN REDON,3 8?M6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) IWRONG https://www.george3.co.uk/george/macro/iwrong?rev=1705492539&do=diff IWRONG (GIN Macro) Defined in: MACS JIB Used in: RIGHT867 8J8F ...[??? IWRONG SECT COMM FGN 25 DOC 8J8P ...#MAC IWRONG 8J98 ...#STR %C 8J9M ...#SKI 8J=6 ... LDX 0 CPPTR(2) 8J=K ...#STR %C 8J?4 ... LDX 0 %C 8J?H ... SMO FX2 8J#2 ... STO 0 ACOMMUNE2 8J#F ... LDX 0 %D 8J#Y ... SMO FX2 8J*C ... STO 0 ACOMMUNE1 8J*W ... DOWN IDFOFF,75 8JB* ... BRN %A 8JBS ... BRN %B 8JC? .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) J151L https://www.george3.co.uk/george/macro/j151l?rev=1705492539&do=diff J151L (GIN Macro) Defined in: MACROS PERI Used in: OPCA867 8BJW #MAC J151L 8C4G MODD LDX 0 JK52F,%A,CPPTR(2) 8CJ6 ANDN 0 2 8D3Q BNZ 0 %B 8DHB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) J152L https://www.george3.co.uk/george/macro/j152l?rev=1705492539&do=diff J152L (GIN Macro) Defined in: MACROS PERI Used in: OPCA867 8JDB #MAC J152L 8JY2 MODD LDX 0 JK52F,%A,CPPTR(2) 8KCL ANDN 0 4 8KX= BNZ 0 %B 8LBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JALLOC https://www.george3.co.uk/george/macro/jalloc?rev=1705492539&do=diff JALLOC (GIN Macro) Defined in: MACROS PERI Used in: DEAD867, DUMMYB867, HLSREAD867, LABEL866, LIBINSEC864, LIBMANY867, LIBREQC867, LIBSEC867, LISTEXCP865, MAKEVCC867, MODE866, MODEA65, MOPCOM867, MOPCOMB865, NEWOWN865, NEWPW867, ONLINEB867, REDON867, RETURNIT867, RIGHT867, TAPERING867, TRANSPOT65, UNLOAD7, UNLOADMT867, VIPBPERI864, WHATPERA867, WHATPERB867, XENON 8Q?W #MAC JALLOC 8QRG MODD LDX 0 JPSTATE,%A,CPPTR(2) 8R?6 ANDN 0 1 8RQQ BNZ 0 %B 8S=B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JAMQUERY https://www.george3.co.uk/george/macro/jamquery?rev=1705492539&do=diff JAMQUERY (GIN Macro) Defined in: MACROSBRBS Used in: BSALFAIL, GETBACK865, GETBAX865 93#Y ...[??? JAMQUERY SECT FILE FGN 14 DOC 93JQ # 944B # 94J2 # 953L # 95H= #MAC JAMQUERY 962W #STR %A [SKIP IF A PARAMETER SPECIFIED 96GG #SKI 9726 LDX 1 A1+1(2) [NUMBER OF BLOCKS LEFT IN BSLIST 97FQ ... BSON EMSBIT,M1JM 97^B BNG 1 M3JM [NO BLOCKS LEFT 98F2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JANAL https://www.george3.co.uk/george/macro/janal?rev=1705492539&do=diff JANAL (GIN Macro) Defined in: MACRO COMPRO Used in: CHNUMCON867, DIRENT867, ERROR867, HOWBIG867, LOCALNAM, NORMERR860, PERCON867, SETPF867, WHATGENS867 ?N32 ...[??? JANAL SECT CENT FGN 21 DOC ?NFQ ...# ?NYG ...[ THIS MACRO JUMPS TO %A IF THE COMMAND PROCESSOR IS STILL ?PC= ...[ PROCESSING THE COMMAND. ?PW2 ...[ I.E. STILL DOING PARAMETER SUBSTITUTION. ?Q#Q ...#MAC JANAL ?QRG ... JBS %A,FX2,EXCOMAN ?R== ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JANON https://www.george3.co.uk/george/macro/janon?rev=1705492539&do=diff JANON (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, DUMMYA867, DUMMYB867, ENGAGE867, FREEPER867, GROPE867, IPBSTARB867, IPBSTART867, PARSORT867, PERFCHAP866, SETIDF867, SETUPA867, SWITCH867 8Y7B #MAC JANON 8YM2 MODD LDEX 0 JK52C,%A,CPPTR(2) 8^6L BZE 0 %B 8^L= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JAUTFAIL https://www.george3.co.uk/george/macro/jautfail?rev=1705492539&do=diff JAUTFAIL (GIN Macro) Defined in: OLPMACROS Used in: JAMSWAP865, PERFAIL866, UNPLUG867 7H^# ...[??? JAUTFAIL SECT FILE FGN 7 DOC 7J96 # 7JNQ # BRANCH TO %B IF OLPA IS MARKED 'PERIPHERAL CHANNEL FAILED' 7K8B # 7KN2 #MAC JAUTFAIL 7L7L #STR %A 7LM= ( 7M6W #MOD %A 7MLG ( 7N66 SMO %A 7NKQ LDX 0 BFSTATE 7P5B ) 7PK2 #MOD %A 7Q4L #SKI 7QJ= LDX 0 BFSTATE(%A) 7R3W ) 7RHG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JAUTOFF https://www.george3.co.uk/george/macro/jautoff?rev=1705492539&do=diff JAUTOFF (GIN Macro) Defined in: OLPMACROS Used in: JAMSWAP865, UNPLUG867 78PY ...[??? JAUTOFF SECT FILE FGN 7 DOC 78^Q # 79FB # BRANCH TO %B IF OLPA IS NOT PROCESSING AUTONOMOUSLY 79^2 # 7=DL #MAC JAUTOFF 7=Y= #STR %A 7?CW ( 7?XG #MOD %A 7#C6 ( 7#WQ SMO %A 7*BB LDX 0 BFSTATE 7*W2 ) 7B*L #MOD %A 7BT= #SKI 7C#W LDX 0 BFSTATE(%A) 7CSG ) 7D#6 #STR %A 7DRQ #SK… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JAUTON https://www.george3.co.uk/george/macro/jauton?rev=1705492539&do=diff JAUTON (GIN Macro) Defined in: OLPMACROS Used in: 6TGJ ...[??? JAUTON SECT FILE FGN 7 DOC 6TQB # 6W=2 # BRANCH TO %B IF OLPA IS PROCESSING AUTONOMOUSLY 6WPL # 6X9= #MAC JAUTON 6XNW #STR %A 6Y8G ( 6YN6 #MOD %A 6^7Q ( 6^MB SMO %A 7272 LDX 0 BFSTATE 72LL ) 736= #MOD %A 73KW #SKI 745G LDX 0 BFSTATE(%A) 74K6 ) 754Q #STR %A 75JB #SKI 7642 ( 76HL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBACK https://www.george3.co.uk/george/macro/jback?rev=1705492539&do=diff JBACK (GIN Macro) Defined in: MACROS PERI Used in: HLSREAD867 95H= #MAC JBACK 962W MODD LDX 0 JK52F,%A,CPPTR(2) 96GG SLL 0 11 9726 BNG 0 %B 97FQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBC https://www.george3.co.uk/george/macro/jbc?rev=1705492539&do=diff JBC (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ABANDONA867, ADDICT865, ADJUNCTS85, ALAS822, ALLOCATE867, ALLOW84, APPEND864, ARCHIVE867, ASSIGN860, ATTRIBUT867, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BMAPDIR865, BMAPONE867, BMAPTWO860, BMCNTRL866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BSBLFAIL867, BSPRUNE867, BSUJSTAT867, BSUNJAM867, BUDGTWO84, CASCODE, CHANFILE8, CHANG867, CHARGESC867, CLO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBCC https://www.george3.co.uk/george/macro/jbcc?rev=1705492539&do=diff JBCC (GIN Macro) Defined in: MACROS SJ Used in: BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMJLSLAV864, BMSTREAM853, BSPRUNE867, CLOSEAB863, CLOSEALT864, CLOSEFUL867, CLOSEND867, CLOSEONE867, COMMFILE82, COMPOST867, CONNECT867, COOR865, CORE867, CORESHED861, DTSUBS867, EVENTS864, FHOBJDIR860, GIVE867, HOWBIG867, INCFIN864, INCSET865, INCTAPES867, JSASCAN867, JWELLONE867, LIBLOAD867, OPENEND865, PLUGIN867, PROCONTX867, RESTLIMB864, RESTMERG864, RESTOREG864, RUNPROG840, SCHEDMTX867, SCHED… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBCS https://www.george3.co.uk/george/macro/jbcs?rev=1705492539&do=diff JBCS (GIN Macro) Defined in: MACROS SJ Used in: INCRCUBS860, INCTAPES867, INCVFCHK850, INCWRITE865 6D7F ...[ 6D=4 ...[ 6D#N ...[??? JBCS SECT FILE FGN 24 DOC 6DJG #MAC JBCS [L,P,I 6DPN ...#STR %D%E 6DWW !!-TOO MANY PARAMS FOR SINGLE BIT MACRO 6F46 #SKI %C&#37 6FHQ ( [NOT B0 6G3B BOP %C,LD,0,GEN0 [SET UP BIT,STORING IN GEN0 IF B1-9 6H2L OP %B,%C,ANDX 6HG= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBCSBS https://www.george3.co.uk/george/macro/jbcsbs?rev=1705492539&do=diff JBCSBS (GIN Macro) Defined in: MACROS SJ Used in: JDWRITE867 *754 ...[ *7== ...[ *7CG ...[??? JBCSBS SECT FILE FGN 24 DOC *7X6 #MAC JBCSBS [L,P,I,P2,I2 *86Y ...[ JUMP TO L IF BIT(P,I) IS CLAER OR SET IT OR SET BIT(P2,I2) *8BQ JBCS %A,%B,%C *8WB BS %D,%E *9B2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBGROP https://www.george3.co.uk/george/macro/jbgrop?rev=1705492539&do=diff JBGROP (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867, GROPE867 9?BQ #MAC JBGROP 9?WB MODD LDX 0 JPSTATE,%A,CPPTR(2) 9#B2 ANDN 0 32 9#TL BNZ 0 %B 9**= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBS https://www.george3.co.uk/george/macro/jbs?rev=1705492539&do=diff JBS (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ABANDONA867, ACTPRI867, ADDICT865, ADJUNCTS85, ALAS822, ANSCOM865, APPEND864, ARCHIVE867, ASSOC867, ASTONIF867, ATTRIBUT867, BACKMARK850, BCAST867, BMAPDIR865, BMAPONE867, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BSPRUNE867, BSUNJAM867, CANTDO867, CHANFILE8, CHARGESC867, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEMAS863, CLOSEN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBSC https://www.george3.co.uk/george/macro/jbsc?rev=1705492539&do=diff JBSC (GIN Macro) Defined in: MACROS SJ Used in: ALAS822, BSUNJAM867, CLOSEFUL867, CLOSEND867, DATECON37, DTSCAN860, DTSUBSA867, HOWBIG867, INCWRITE865, SETUPARA867, SWAP865, UNPLUG867 69C# ...[ 69JG ...[ 69PQ ...[??? JBSC SECT FILE FGN 24 DOC 6=9B #MAC JBSC [L,P,I 6=BJ ...#STR %D%E 6=HQ !!-TOO MANY PARAMS FOR SINGLE BIT MACRO 6=P2 #SKI %C&#37 6?8L ( [NOT B0 6?N= LA %C 6#7W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBSS https://www.george3.co.uk/george/macro/jbss?rev=1705492539&do=diff JBSS (GIN Macro) Defined in: MACROS SJ Used in: BACKMAP864, BSUNJAM867, CONNECT867, COOR865, CORESHED861, DTSCAN860, DUMP860, FHOBJDIR860, FREEBUFF860, INCDTA865, INCMON865, INCOM864, INCVFCHK850, JWELLONE867, LLSMESS867, OPENREL865, PATCH, PLUGIN867, PROCONTX867, SETUPARA867, WHATRVS867, WLB867, WORKFILE860 62^K ...[ 6348 ...[ 636S ...[??? JBSS SECT FILE FGN 24 DOC 63BL #MAC JBSS [L,P,I 63HS ...#STR %D%E 63P2 !!-TOO MANY PARAMS FOR SINGLE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBUSY https://www.george3.co.uk/george/macro/jbusy?rev=1705492539&do=diff JBUSY (GIN Macro) Defined in: MACROS PERI Used in: BSQ867, CARTCONT867, CONSOLE867, EMSENG864, FINISHB867, IPBINB867, IPBOUT867, IPBPM84, JAMSWAP865, KARTCONT867, LISTLOOP867, LOADERDA867, LOADERDR867, LOADEREM867, LOADERFS867, LOADERGO867, LOADERI867, LOADERMT867, LOADERPM867, MOVCART867, OPCA867, PATCH, PM, PMBRKCHS84, PMCRABS860, PMDR864, PMDUMP85, PMDUMPDA85, PMDUMPMT85, PMFS85, PMFSB84, PMLP866, PMWHATA866, PMWINDDN84, UNPLUG867 9F== #MAC JBUSY 9FPW MODD LDX 0 JCCA1,%A,CP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBVEXHOOK https://www.george3.co.uk/george/macro/jbvexhook?rev=1705492539&do=diff JBVEXHOOK (GIN Macro) Defined in: MACROS IH Used in: ?WC2 ...# ?WWL ...[ JBVEXHOOK - MACRO TO ALLOW SP *JBV OUTSIDE A HOOK ?XB= ...#MAC JBVEXHOOK ?XTW ...#STR %A,ON ?Y*G ...#STR ?YT6 ...( ?^#Q ...#MEN GLOBALS ?^SB ...#TRA K82GLOBALS #2#2 ... BRN K83GLOBALS #2RL ...#END #3?= ...#EXI #3QW ...) #4=G ...#STR OFF,%A #4Q6 ...#STR #59Q ...( #5PB ...#MEN GLOBALS #692 ...#TRA K82GLOBALS #6NL ... SMO FX2 #78= ...#END #7MW ...) #87G ...#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBWC https://www.george3.co.uk/george/macro/jbwc?rev=1705492539&do=diff JBWC (GIN Macro) Defined in: MACROS SJ Used in: #XQN ...[ #XXW ...[ #Y56 ...[??? JBWC SECT FILE FGN 24 DOC #YJQ #MAC JBWC [L,W #YSJ ...[ JUMP TO L IF W IS CLEAR #^4B #ACC %B #^J2 ([NOT AN ACC *23L LDX 0 %B *2H= BZE 0 %A *32W #EXI *3GG ) *426 BZE %B %A *4FQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBWCBC https://www.george3.co.uk/george/macro/jbwcbc?rev=1705492539&do=diff JBWCBC (GIN Macro) Defined in: MACROS SJ Used in: *4LY ...[ *4S6 ...[ *4^B ...[??? JBWCBC SECT FILE FGN 24 DOC *5F2 #MAC JBWCBC [L,W,P,I *5NS ...[ JUMP TO L IF W IS CLEAR OR CLEAR BIT(P,I) *5YL JBWC %A,%B *6D= BC %C,%D *6XW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBWS https://www.george3.co.uk/george/macro/jbws?rev=1705492539&do=diff JBWS (GIN Macro) Defined in: MACROS SJ Used in: INCEOT865, IPBLISTB867 #ND# ...[ #NKG ...[ #NQQ ...[??? JBWS SECT FILE FGN 24 DOC #P=B #MAC JBWS [L,W #PG8 ...[ JUMP TO L IF W IS SET #PQ2 #ACC %B #Q9L ([ NOT AN ACC #QP= LDX 0 %B #R8W BNZ 0 %A #RNG #EXI #S86 ) #SMQ BNZ %B %A #T7B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JBWSBS https://www.george3.co.uk/george/macro/jbwsbs?rev=1705492539&do=diff JBWSBS (GIN Macro) Defined in: MACROS SJ Used in: #T#J ...[ #TFQ ...[ #TM2 ...[??? JBWSBS SECT FILE FGN 24 DOC #W6L #MAC JBWSBS [L,W,P,I #WBD ...[ JUMP TO L IF W IS SET ELSE SET BIT(P,I) #WL= JBWS %A,%B #X5W BS %C,%D #XKG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCAFSBSY https://www.george3.co.uk/george/macro/jcafsbsy?rev=1705492539&do=diff JCAFSBSY (GIN Macro) Defined in: MACROS CAFS Used in: JAMSWAP865, PLUGIN867, UNPLUG867 22FL ...# 22^= ...# 23DW ...# THIS FILE CONTAINS MACROS USED BY THE CAFS INTERFACE IN GEORGE 3 23YG ...# 24D6 ...# 24XQ ...[??? JCAFSBSY SECT BACK FGN 1 DOC 25CB ...#MAC JCAFSBSY 25X2 ... JFNZ %B,%A,BBFCAFSCT 26BL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCAFSDV https://www.george3.co.uk/george/macro/jcafsdv?rev=1705492539&do=diff JCAFSDV (GIN Macro) Defined in: MACROS CAFS Used in: CARTCONT867, DUMMYB867, RELPER867, SHARE866 28SQ ...[??? JCAFSDV SECT BACK FGN 1 DOC 29#B ...#MAC JCAFSDV 29S2 ...#STR %C 2=?L ...#STR 2=R= ...( 2?=W ... LDX 0 JPTI+CAFSTYPE 2?QG ... TXU 0 JPTI+CAFSTYPE+1 2#=6 ... BCC M1CAFSDV 2#PQ ...) 2*9B ... MODD LDX 0 JK52F+1,%A,CPPTR(2) 2*P2 ... ANDN 0 1 2B8L ... BNZ 0 %B 2BN= ...M1CAFSDV 2C7W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCAFSNBS https://www.george3.co.uk/george/macro/jcafsnbs?rev=1705492539&do=diff JCAFSNBS (GIN Macro) Defined in: MACROS CAFS Used in: CLOSBAC867 26W= ...[??? JCAFSNBS SECT BACK FGN 1 DOC 27*W ...#MAC JCAFSNBS 27TG ... JFZ %B,%A,BBFCAFSCT 28*6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCANTENG https://www.george3.co.uk/george/macro/jcanteng?rev=1705492539&do=diff JCANTENG (GIN Macro) Defined in: MACROS PERI Used in: JAMSWAP865, ONLINEC867, UNPLUG867 9LL6 #MAC JCANTENG 9M5Q MODD LDX 0 JK52F,%A,CPPTR(2) 9MKB SLL 0 4 9N52 BNG 0 %B 9NJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCBB https://www.george3.co.uk/george/macro/jcbb?rev=1705492539&do=diff JCBB (GIN Macro) Defined in: MACROS LLS Used in: JAMSWAP865, UNPLUG867, VIPBPERI864 DD74 ...[??? JCBB SECT CENT FGN 3 DOC DDBW # DDWG # THIS MACRO JUMPS TO %B IF THE CHANNEL BUSY BIT IS SET DFB6 # DFTQ #MAC JCBB DG*B #SKI IPCV2 DGT2 ( DH#L LDBIT 2,0 DHS= #STR %A DJ?W MOD ANDX 0 BFSTATE,%A DJRG #STR %A DK?6 #SKI DKQQ ( DL=B SMO FX2 DLQ2 ANDX 0 BFSTATE DM9L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCERRCT https://www.george3.co.uk/george/macro/jcerrct?rev=1705492539&do=diff JCERRCT (GIN Macro) Defined in: MACROS PERI Used in: UNLOADMT867 9SFL #MAC JCERRCT 9S^= LDCT 0 2 9TDW MODD ANDX 0 JK52F,%A,CPPTR(2) 9TYG BZE 0 %B 9WD6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JCMESH https://www.george3.co.uk/george/macro/jcmesh?rev=1705492539&do=diff JCMESH (GIN Macro) Defined in: MACROS EWDAS Used in: SHARE866 XQLB #MAC JCMESH XR62 # XRKL MODD LDX 0 JK52B,%A,CPPTR(2) XS5= ANDN 0 8 XSJW BNZ 0 %B XT4G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDECFNZ https://www.george3.co.uk/george/macro/jdecfnz?rev=1705492539&do=diff JDECFNZ (GIN Macro) Defined in: MACROS SJ Used in: DXKT ...[ DXND ...[ DXR4 ...[??? JDECFNZ SECT FILE FGN 24 DOC DY2W #MAC JDECFNZ [L,P,F DYGG DECF %B,%C D^26 JFNZ %A,%B,%C D^FQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDECFZ https://www.george3.co.uk/george/macro/jdecfz?rev=1705492539&do=diff JDECFZ (GIN Macro) Defined in: MACROS SJ Used in: DTM* ...[ DTPY ...[ DTSJ ...[??? JDECFZ SECT FILE FGN 24 DOC DW4B #MAC JDECFZ [L,P,F DWJ2 DECF %B,%C DX3L JFZ %A,%B,%C DXH= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDED https://www.george3.co.uk/george/macro/jded?rev=1705492539&do=diff JDED (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867, CHINTEG867, KARTCONT867, MOVCART867, REQCART866, SETDISC866, SQOPEN867, TWINSET866, TWINSETA866, WHATPER867 MTNL # MW8= [??? JDED MWMW # **** MX7G #MAC JDED MXM6 # MY6Q MOD LDX 0 BSUNIT,%A MYLB ANDX 0 BITS910 M^62 BZE 0 %B M^KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDISENG https://www.george3.co.uk/george/macro/jdiseng?rev=1705492539&do=diff JDISENG (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, CLOSEIPB864, ENGAGE867, GETNO865, HOLDCOM867, IPCGEO8, IPCON864, IPCOND864, IPCONE865, IPCONG8, IPCSTART864, IPQUAKE83, IPQUAKER865, KARTCONT867, LOADERDA867, LOADERDR867, LOADERFS867, LOADERI867, LOADERMT867, LOADERPM867, MOVCART867, PM, PMDR864, RIGHT867, SETDISC866, SETUPA867, SWITCH867, TAPEWAIT65, VIPBPERI864, WHATPERA867 =2*6 #MAC JDISENG =2SQ MODD LDX 0 JK52E,%A,CPPTR(2) =3#B ANDN 0 1 =3S2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDNAME https://www.george3.co.uk/george/macro/jdname?rev=1705492539&do=diff JDNAME (GIN Macro) Defined in: MACROS WELL Used in: BY42 ...# BYHL ...#MAC JDNAME B^3= ...#STR @,%A B^GW ...( C22G ...#MEN JOBDATA C2G6 ...#STR PERIPHERAL,%A C2^Q ...#SKI C3FB ...( C3^2 ...#SKI JDTABLES5-JDTABLES4<%B-%B C4DL ...! TYPE NUMBER OUT IF RANGE C4Y= ...#SKI JDTABLES5-JDTABLES4>%B-%B C5CW ...( C5XG ...#TRA JDTABLES4+%B C6C6 ... 4H%C C6WQ ...) C7BB ...#END C7W2 ...#EXI C8*L ...) C8T= ...#DEF 20?=%B*4096 C9#W ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDOCL https://www.george3.co.uk/george/macro/jdocl?rev=1705492539&do=diff JDOCL (GIN Macro) Defined in: MACROS PERI Used in: =88L #MAC JDOCL =8N= MODD LDX 0 JPSTATE,%A,CPPTR(2) =97W ANDN 0 #20 =9MG BNZ 0 %B ==76 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDRM https://www.george3.co.uk/george/macro/jdrm?rev=1705492539&do=diff JDRM (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867 =B46 #MAC JDRM =BHQ MODD LDX 0 JK52E,%A,CPPTR(2) =C3B ANDN 0 4 =CH2 BNZ 0 %B =D2L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDRMABLE https://www.george3.co.uk/george/macro/jdrmable?rev=1705492539&do=diff JDRMABLE (GIN Macro) Defined in: MACROS PERI Used in: OPCA867 =HXL #MAC JDRMABLE =JC= MODD LDX 0 JK52F,%A,CPPTR(2) =JWW SLL 0 9 =KBG BNG 0 %B =KW6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JDTABLES https://www.george3.co.uk/george/macro/jdtables?rev=1705492539&do=diff JDTABLES (GIN Macro) Defined in: MACROS WELL Used in: JOBDATA867 *J5Q ...# *JKB ...#MAC JDTABLES *K52 ...#DEF %A=0? *KJL ... SEGENTRY JDTABLES1 *L4= ... 12HUR *LHW ... #40000000 *M3G ... 12HJT *MH6 ... #40014005 *N2Q ... 12HDEADLINE *NGB ... #40020010 *P22 ...#DEF %E=0?-%A *PFL ... 12HSTARTTIME *P^= ... #40030003 *QDW ... 12H … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JENG https://www.george3.co.uk/george/macro/jeng?rev=1705492539&do=diff JENG (GIN Macro) Defined in: MACROS PERI Used in: BSTS867, ENGAGE867, IPBSTARB867, IPCEN8, IPCONE865, IPQUAKER865, LISTINIT867, LOADEREM867, LOADERGO867, MOVCART867, ONLINEC867, PERION867, PMDUMP85, PMDUMPDA85, PMDUMPMT85, PMLP866, SETDISC866, SETUPA867, TERM867, TRIPB83, VIPBPERI864, WHATPERA867, WHATPERB867 =PR6 #MAC JENG =Q=Q MODD LDX 0 JK52E,%A,CPPTR(2) =QQB ANDN 0 1 =R=2 BNZ 0 %B =RPL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JENGABLE https://www.george3.co.uk/george/macro/jengable?rev=1705492539&do=diff JENGABLE (GIN Macro) Defined in: MACROS PERI Used in: =XLL #MAC JENGABLE =Y6= MODD LDX 0 JK52F,%A,CPPTR(2) =YKW SLL 0 4 =^5G BPZ 0 %B =^K6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JENV https://www.george3.co.uk/george/macro/jenv?rev=1705492539&do=diff JENV (GIN Macro) Defined in: MACROS SIB Used in: CHARGESC867, CORE867, DUMMYB867, ENGAGE867, FREEPER867, GIVE867, GROPE867, KARTCONT867, LIBREQ866, LIBREQC867, LOADERDA867, LOADERMT867, LOADPROG865, PARSORT867, PERFCHAP866, PERFLOGS866, PMDUMPDA85, SETDISC866, SETUPA867, STRATEGY865, SWITCH867 2C78 ...# 2C79 ...# 2C7# ...[ THE MACRO DEFINITIONS IN THIS FILE ARE DESTINED FOR 2C7G ...[ 'MACS EMUL'. THE DEFINITIONS ARE ONLY COMPILED FROM 2C7N ...[ ONE OF THESE FILES FOR ANY IS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JENVNOT https://www.george3.co.uk/george/macro/jenvnot?rev=1705492539&do=diff JENVNOT (GIN Macro) Defined in: MACROS SIB Used in: BRADDATA867, BSQ867, CARTCONT867, CDUM866, CHARGESC867, CMEMILL866, DATUM, DUMMYA867, DUMMYB867, EMSENG864, ENGAGE867, FREEPER867, HLSREAD867, INCSTART865, IPBINB867, IPBSCAN867, LINECTRL864, LOADERDA867, LOADERFS867, LOADERFT867, LOADERI867, LOADERII867, LOADERMT867, MODE866, MOVCART867, OLMTB867, PARSORT867, PERFCHAP866, PERFLOGS866, PERION867, PMFSB84, PMJOBS866, PMLP866, PMWHATA866, PROPERTY867, RELPER867, SETLIST864, SETUPA867, SETUPB86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JEXOTIC https://www.george3.co.uk/george/macro/jexotic?rev=1705492539&do=diff JEXOTIC (GIN Macro) Defined in: MACROS PERI Used in: CLOSEIPB864, DUMMYB867, FREEPER867, IPBPM84, MOPCOM867, ONLINEB867, PARSORT867, RELPER867, RIGHT867, SETUPA867 ?5G6 #MAC JEXOTIC ?5^Q MODD LDX 0 JK52F,%A,CPPTR(2) ?6FB SLL 0 1 ?6^2 BNG 0 %B ?7DL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFAIL https://www.george3.co.uk/george/macro/jfail?rev=1705492539&do=diff JFAIL (GIN Macro) Defined in: MACROS PERI Used in: JAMSWAP865, LOADERDA867, PERFAIL866, PMLP866, PMWHATA866, UNPLUG867, WHATPERA867, WHATPERB867 ??*L #MAC JFAIL ??T= MODD LDX 0 JK52E,%A,CPPTR(2) ?##W ANDN 0 2 ?#SG BNZ 0 %B ?*#6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFLAGW https://www.george3.co.uk/george/macro/jflagw?rev=1705492539&do=diff JFLAGW (GIN Macro) Defined in: MACROS PERI Used in: ?F96 #MAC JFLAGW ?FNQ MODD LDX 0 JK52F,%A,CPPTR(2) ?G8B SLL 0 2 ?GN2 BNG 0 %B ?H7L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFNZ https://www.george3.co.uk/george/macro/jfnz?rev=1705492539&do=diff JFNZ (GIN Macro) Defined in: MACROS SJ Used in: BSPRUNE867, CLOSEALT864, CLOSEND867, CLOSFREZ867, CREATE867, FHDIRTWO864, GETDIR860, GETDIRX860, INCEOT865, INCWRITE865, RESTMERG864 DRNT ...[ DRRD ...[ DRW4 ...[??? JFNZ SECT FILE FGN 24 DOC DS5W #MAC JFNZ [L,P,F DSKG LFUN %B,%C DT56 BNZ 0 %A DTJQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFREE https://www.george3.co.uk/george/macro/jfree?rev=1705492539&do=diff JFREE (GIN Macro) Defined in: MACROS PERI Used in: CLOSEIPB864, ENGAGE867, GETFREE867, IPBPM84, LISTDEV866, ONLINEC867, REPERT867, RIGHT867, TERM867, WHATPER867, WHATPERA867, WHATPERX867 ?M4L #MAC JFREE ?MJ= MODD LDX 0 JPSTATE,%A,CPPTR(2) ?N3W ANDN 0 1 ?NHG BZE 0 %B ?P36 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFREZFCB https://www.george3.co.uk/george/macro/jfrezfcb?rev=1705492539&do=diff JFREZFCB (GIN Macro) Defined in: MACROS HFD8 Used in: GETON867, GETONA867, LIBCOM867, NETOFLNE867, NEWDIR867, USERDIR842 6BL2 ...[??? JFREZFCB SECT FILE FGN 22 DOC 6CK= ...#MAC JFREZFCB 6D4W ...[ 6DJG ...[ %A=POINTER TO FCB. 6F46 ...[ %B=LABEL TO JUMP TO IF FILE IS USER-FROZEN AND USER MAY NOT 6FHQ ...[ ACCESS IT. SETS A SUITABLE ERROR REPLY,OR OK IF DOES NOT 6G3B ...[ JUMP. 6GH2 ... JBC MJFREZFCB,%A,BFUSERFREZ 6GL6 ...#STR %C 6GP= ... D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JFZ https://www.george3.co.uk/george/macro/jfz?rev=1705492539&do=diff JFZ (GIN Macro) Defined in: MACROS SJ Used in: BSPRUNE867, CLOSEND867, CLOSEONE867, FHOBJDIR860, GETDIR860 DPQ* ...[ DPSY ...[ DPXJ ...[??? JFZ SECT FILE FGN 24 DOC DQ7B #MAC JFZ [L,P,F DQM2 LFUN %B,%C DR6L BZE 0 %A DRL= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JHLFDON https://www.george3.co.uk/george/macro/jhlfdon?rev=1705492539&do=diff JHLFDON (GIN Macro) Defined in: MACROS PERI Used in: PMDR864 ?SY6 #MAC JHLFDON ?TCQ JBS %B,%A,HALFDONEBIT ?TXB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JHOLD https://www.george3.co.uk/george/macro/jhold?rev=1705492539&do=diff JHOLD (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, HOLDCOM867, WHATPERB867 ?^SB #MAC JHOLD #2#2 MODD LDX 0 JK52E,%A,CPPTR(2) #2RL ANDN 0 8 #3?= BNZ 0 %B #3QW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JILLMS https://www.george3.co.uk/george/macro/jillms?rev=1705492539&do=diff JILLMS (GIN Macro) Defined in: MACROS PERI Used in: GROPE867 #7MW #MAC JILLMS #87G MODD LDX 0 JPSTATE,%A,CPPTR(2) #8M6 ANDN 0 1024 #96Q BNZ 0 %B #9LB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JINUSE https://www.george3.co.uk/george/macro/jinuse?rev=1705492539&do=diff JINUSE (GIN Macro) Defined in: IFMACS Used in: CC92 ...[??? JINUSE SECT COMM FGN 1 DOC CC9L ...[ CC== ...#MAC JINUSE CC=W ...[ ====== CC?G ... JBUSY %B,%A CC#6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JIPCM https://www.george3.co.uk/george/macro/jipcm?rev=1705492539&do=diff JIPCM (GIN Macro) Defined in: MACROSIPC Used in: CLOSEIPB864, GETNO865, IPCGEO8, IPCOND864, IPCONE865, IPQUAKE83, IPQUAKER865 =?L2 ...[??? JIPCM SECT COMM FGN 20 DOC =#5L ...#MAC JIPCM =#K= ... LDN 0 IPCMR%A =*4W ...#STR %C =*JG ... MOD ANDX 0 IPCMKR,%C =B46 ...#STR %C =BHQ ...#SKI =C3B ... ANDX 0 IPCMKR(2) =CH2 ... BNZ 0 %B =D2L ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JIPCMC https://www.george3.co.uk/george/macro/jipcmc?rev=1705492539&do=diff JIPCMC (GIN Macro) Defined in: MACROSIPC Used in: IPCOND864 =DG= ...[??? JIPCMC SECT COMM FGN 20 DOC =D^W ...#MAC JIPCMC =FFG ... LDN 0 IPCMR%A =F^6 ...#STR %C =GDQ ... MOD ANDX 0 IPCMKR,%C =GYB ...#STR %C =HD2 ...#SKI =HXL ... ANDX 0 IPCMKR(2) =JC= ...#STR %C =JWW ... MOD ERS 0 IPCMKR,%C =KBG ...#STR %C =KW6 ...#SKI =L*Q ... ERS 0 IPCMKR(2) =LTB ... BNZ 0 %B =M*2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JIPCMN https://www.george3.co.uk/george/macro/jipcmn?rev=1705492539&do=diff JIPCMN (GIN Macro) Defined in: MACROSIPC Used in: IPCONA864, IPCONE865, IPCSTART864 =MSL ...[??? JIPCMN SECT COMM FGN 20 DOC =N#= ...#MAC JIPCMN =NRW ... LDN 0 IPCMR%A =P?G ...#STR %C =PR6 ... MOD ANDX 0 IPCMKR,%C =Q=Q ...#STR %C =QQB ...#SKI =R=2 ... ANDX 0 IPCMKR(2) =RPL ... BZE 0 %B =S9= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JJOBLMT https://www.george3.co.uk/george/macro/jjoblmt?rev=1705492539&do=diff JJOBLMT (GIN Macro) Defined in: MACROS PERI Used in: WHATPERA867 #*HB #MAC JJOBLMT #B32 MODD LDX 0 JPSTATE,%A,CPPTR(2) #BGL ANDN 0 8 #C2= BNZ 0 %B #CFW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLADJUST https://www.george3.co.uk/george/macro/jladjust?rev=1705492539&do=diff JLADJUST (GIN Macro) Defined in: MACROS WELL Used in: ABANDON867, BMJLSLAV864, DEWELL867, DOMONOP867, DSCNCT867, ENWELL867, ENWELLB867, INITJOB867, JDTWO864, JDWRITE867, JOBDATA867, JOBLIST867, JSASCAN867, JWELLONE867, JWELLTWO867, JWUPDATE867, LOGOUT867, PNTLAST860, REGEN865, SCHDJOBA867, SETJOBQ867 2MP# ...[??? JLADJUST SECT CENT FGN 72 DOC 2M^6 [ 2NDQ [ 2NYB [ 2PD2 #MAC JLADJUST 2PXL ADN %A A1+FRH 2QC= ADX %A JOBDATASIZE 2QWW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLASLOST https://www.george3.co.uk/george/macro/jlaslost?rev=1705492539&do=diff JLASLOST (GIN Macro) Defined in: MACROS WELL Used in: DEWELL867 5QL7 ...[??? JLASLOST SECT CENT FGN 5QLY ...[ 5QMP ...[ SETS TO ZERO PROPERTY NOS. IN JLASSOCS,+1,+2 OF 5QNG ...[ SYSTEM JOBLIST. USED WHEN ONLY "CENTRAL" AVAILABLE 5QP? ...[ 5QQ4 ...#MAC JLASLOST 5QQT ... DOWN JOBLIST,10 5QRL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLASSOCS https://www.george3.co.uk/george/macro/jlassocs?rev=1705492539&do=diff JLASSOCS (GIN Macro) Defined in: MACROS WELL Used in: ASSOC867 5NWN ...[??? JLASSOCS SECT CENT FGN 72 DOC 5P6G ...[ 5PL6 ...#MAC JLASSOCS 5Q5Q ... DOWN JOBLIST,8 5QKB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLBUSY https://www.george3.co.uk/george/macro/jlbusy?rev=1705492539&do=diff JLBUSY (GIN Macro) Defined in: MACROS PERI Used in: ATTACHC867, CONMXC8, DETACH867, MOPSTART865, PROFLAG83, SCAN865, SENTINEL8 #HBW #MAC JLBUSY #HWG DLCA %A,LDX,0,CREP #JB6 BNG 0 %B #JTQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLLD https://www.george3.co.uk/george/macro/jlld?rev=1705492539&do=diff JLLD (GIN Macro) Defined in: MACROS PERI Used in: CONMXC8 #NQQ #MAC JLLD #P=B DLCA %A,LDX,0,CREP #PQ2 BNZ 0 %B #Q9L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLRECCONV https://www.george3.co.uk/george/macro/jlrecconv?rev=1705492539&do=diff JLRECCONV (GIN Macro) Defined in: MACROS WELL Used in: BMSAVJOB864 GPQF ...#MAC JLRECCONV GPRQ ... LDX 0 %A GPT3 ... STO 0 ACOMMUNE1(2) GPW# ... DOWN BMJLCONV,2 GPXK ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLSBUSY https://www.george3.co.uk/george/macro/jlsbusy?rev=1705492539&do=diff JLSBUSY (GIN Macro) Defined in: MACROS PERI Used in: CONMXC8 #W6L #MAC JLSBUSY #WL= DLCA %A,LDX,0,CREP2 #X5W BNG 0 %B #XKG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLSUNBUSY https://www.george3.co.uk/george/macro/jlsunbusy?rev=1705492539&do=diff JLSUNBUSY (GIN Macro) Defined in: MACROS PERI Used in: *3GG #MAC JLSUNBUSY *426 DLCA %A,LDX,0,CREP2 *4FQ BPZ 0 %B *4^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLTEMPCONV https://www.george3.co.uk/george/macro/jltempconv?rev=1705492539&do=diff JLTEMPCONV (GIN Macro) Defined in: MACROS WELL Used in: BMSAVJOB864 F7WM ...#MAC JLTEMPCONV F7X= ... LDX 1 FX1 F7XT ... LDX 0 %B+1(1) F7YD ... ADN 0 1 F7^3 ... LDX 2 FX2 F7^L ... STO 0 ACOMMUNE1(2) F829 ... SETUPCOR ACOMMUNE1(2),2,ADATA,CSTORE F82S ... SMO FX2 F83C ... LDX 0 ACOMMUNE1 F842 ... LDN 1 %B(1) F84K ... LDN 2 A1(2) F858 ... SMO 0 F85R ... MOVE 1 0 F86B ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLTEMPLATE https://www.george3.co.uk/george/macro/jltemplate?rev=1705492539&do=diff JLTEMPLATE (GIN Macro) Defined in: MACROS WELL Used in: BMSAVJOB864, JDWRITE867 DFTQ ...# THE FOLLOWING MACRO IS USED IN BMSAVJOB AND JDWRITE DG*B ...# TO DEFINE RECORD 0 OF :SYSTEM.JOBLIST. DGT2 ...# DH#L ...#MAC JLTEMPLATE DHS= ... +JLRECLEN DJ?W ... SEGENTRY %ATEMPLATE1 DJRG ...#STR %B DK?6 ...#DEF %B=0? DKQQ ... +FACILITIES*3+JLFIXLEN DL=B ...MJL1 +JLRECLEN^#40000000 DLQ2 ... +MJL2-MJL1 DM9L ... +JLUSER DMP= ... +JLJ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JLUNBUSY https://www.george3.co.uk/george/macro/jlunbusy?rev=1705492539&do=diff JLUNBUSY (GIN Macro) Defined in: MACROS PERI Used in: CONMXA85, CONMXC8, DETACH867, MOPPM84 *8WB #MAC JLUNBUSY *9B2 DLCA %A,LDX,0,CREP *9TL BPZ 0 %B *=*= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBAC https://www.george3.co.uk/george/macro/jmbac?rev=1705492539&do=diff JMBAC (GIN Macro) Defined in: MACROS SJ Used in: ARCHIVE867, ASSIGN860, BMAPDIR865, BMAPONE867, BMJLSLAV864, BMOUTPUT867, BMSTREAM853, BSPRUNE867, BSUNJAM867, CHARGESC867, CLOSEDIR867, CLOSEND867, COMPOST867, CONNECT867, COREALLF867, DEWELL867, DTQUEST860, DTSUBS867, ENWELL867, EVENTS864, GETDIR860, GETDIRX860, GETWORD867, INCCHECK860, INCRCUBS860, INCRV850, INCSTART865, INCWAIT860, INITJOB867, JAMSWAP865, JOBDATA867, JOBLIST867, JWELLONE867, LISTDIR867, LISTDIRF867, MAKEFILE863, OPENREL865, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBACC https://www.george3.co.uk/george/macro/jmbacc?rev=1705492539&do=diff JMBACC (GIN Macro) Defined in: MACROS SJ Used in: BMAPDIR865 =4DS ...[ =4L2 ...[ =4R= ...[??? JMBACC SECT FILE FGN 24 DOC =6=6 #MAC JMBACC =6PQ JMBAC %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U =79B MBC %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U =7P2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBAS https://www.george3.co.uk/george/macro/jmbas?rev=1705492539&do=diff JMBAS (GIN Macro) Defined in: MACROS SJ Used in: BMAPDIR865, BMAPTWO860, CLOSEND867, COMPROB867, DTSUBS867, DUMP860, GETDIR860, JWELLONE867, PROCONTX867, SCHEDIN867, SETJOBQ867, UNPLUG867, WHATRVSA867 9^Y5 ...[ =22N ...[ =25# ...[??? JMBAS SECT FILE FGN 24 DOC =2*6 #MAC JMBAS =2SQ OPS JMBCI M1JMBAS,%B,%A,,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q- =3#B ,%R,%S,%T,%U[ =3S2 M1JMBAS =4?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBC https://www.george3.co.uk/george/macro/jmbc?rev=1705492539&do=diff JMBC (GIN Macro) Defined in: MACROS SJ Used in: ARCHIVE867, CLOSEDIR867, INCMON865, READFALE866, REGEN865, RITEFAIL864, WSPARAM867 9X^K ...[ 9Y48 ...[ 9Y6S ...[??? JMBC SECT FILE FGN 24 DOC 9YBL #MAC JMBC 9YW= OPS JMBCI %A,%B,,,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%- 9^*W S,%T,%U[ 9^TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBCI https://www.george3.co.uk/george/macro/jmbci?rev=1705492539&do=diff JMBCI (GIN Macro) Defined in: MACROS SJ Used in: 9DD8 ...[ 9DKB ...[ 9DQL ...[??? JMBCI SECT FILE FGN 24 DOC 9FPW #MAC JMBCI 9G9G ...[ JMBC-%C NULL,JMBAS-%C LABAL 9H8Q #SKI (19?+6]-1)^(19?+7]@L-19)<1-1 9HNB ( [SINGLE BIT CASE 9J82 #STR %C 9JML #SKI 19?+5] 9K7= ( [ALL BUT LAST WORD OF JMBAS 9KLW JBC %A,%B,19?+7] 9L6G #EXI 9LL6 ) 9M5Q JBS %C,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBS https://www.george3.co.uk/george/macro/jmbs?rev=1705492539&do=diff JMBS (GIN Macro) Defined in: MACROS SJ Used in: ACTPRI867, APPEND864, ARCHIVE867, ASTONIF867, BMAPONE867, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BMSTREAM853, BSPRUNE867, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEND867, CLOSFREZ867, COMPRESS864, COOR865, COPYB867, COPYFILE867, COREALLG82, CORESHED861, CREALEX864, DTQUEST860, DTSCAN860, DTSUBS867, DTSUBSA867, DTSUBSS867, DTWRONG867, EMSENG864, ENWELLB867, ERASE867, ERASEA867, FHDIRTWO864, FHOBJ860, FHOBJDIR8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMBSI https://www.george3.co.uk/george/macro/jmbsi?rev=1705492539&do=diff JMBSI (GIN Macro) Defined in: MACROS SJ Used in: 8X*# ...[ 8XGG ...[ 8XMQ ...[??? JMBSI SECT FILE FGN 24 DOC 8YM2 #MAC JMBSI 8^6L ...[ JMBS-%C NULL,JMBAC-%C LABEL 925W #SKI (19?+6]-1)^(19?+7]@L-19)<1-1 92KG ( [SINGLE BIT CASE 9356 #STR %C 93JQ #SKI 19?+5] 944B ( [ALLEXCEPT LAST WORD OF JMBAC 94J2 JBS %A,%B,19?+7] 953L #EXI 95H= ) 962W JBC %C,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMNBWR https://www.george3.co.uk/george/macro/jmnbwr?rev=1705492539&do=diff JMNBWR (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867, GROPE867, RIGHT867 *B== #MAC JMNBWR *BPW LDN 0 #200 *C9G MODD ANDX 0 JK52F,%A,CPPTR(2) *CP6 BZE 0 %B *D8Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMT https://www.george3.co.uk/george/macro/jmt?rev=1705492539&do=diff JMT (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867, ENGAGE867, FREEPER867, HLSREAD867, PUTPER85, RIGHT867, SWITCH867 *J5Q #MAC JMT *JKB LDN 0 #2000 *K52 MODD ANDX 0 JK52F,%A,CPPTR(2) *KJL BNZ 0 %B *L4= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JMTONL https://www.george3.co.uk/george/macro/jmtonl?rev=1705492539&do=diff JMTONL (GIN Macro) Defined in: MACROS RME10 Used in: OPENWAIT867, RENAME864 6KFQ ...[??? JMTONL SECT FILE FGN 4 DOC 6KG* ...#MAC JMTONL 6KGY ... FINDPERE 1,APTSER,%A 6KHH ... LDX 2 FX2 6KJ6 ... BNG 1 M0JMTONL 6KJP ... JONL 1,M1 6KK# ... BRN M0JMTONL 6KKX ...M1 LJOBNO 1,0 6KLG ... LDX 1 FX1 6KM5 ...#STR %B 6KMN ...( 6KN? ... SBX 0 %B 6KNW ... BZE 0 %C 6KPF ...) 6KQ4 ...#STR %B 6KQM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNANON https://www.george3.co.uk/george/macro/jnanon?rev=1705492539&do=diff JNANON (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867, GETFREE867, GROPE867, SWITCH867 *P^= #MAC JNANON *QDW MODD LDEX 0 JK52C,%A,CPPTR(2) *QYG BNZ 0 %B *RD6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNBGROP https://www.george3.co.uk/george/macro/jnbgrop?rev=1705492539&do=diff JNBGROP (GIN Macro) Defined in: MACROS PERI Used in: GROPE867 *X*6 #MAC JNBGROP *XSQ MODD LDX 0 JPSTATE,%A,CPPTR(2) *Y#B ANDN 0 32 *YS2 BZE 0 %B *^?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNCAFSDV https://www.george3.co.uk/george/macro/jncafsdv?rev=1705492539&do=diff JNCAFSDV (GIN Macro) Defined in: MACROS CAFS Used in: CAFSCTRL866, CAFSINFO866, CAFSPERI867, READSPEC867 2CMG ...[??? JNCAFSDV SECT BACK FGN 1 DOC 2D76 ...#MAC JNCAFSDV 2DLQ ...#STR %C 2F6B ...#STR 2FL2 ...( 2G5L ... LDX 0 JPTI+CAFSTYPE 2GK= ... TXU 0 JPTI+CAFSTYPE+1 2H4W ... BCC %B 2HJG ...) 2J46 ... MODD LDX 0 JK52F+1,%A,CPPTR(2) 2JHQ ... ANDN 0 1 2K3B ... BZE 0 %B 2KH2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNCFENBU https://www.george3.co.uk/george/macro/jncfenbu?rev=1705492539&do=diff JNCFENBU (GIN Macro) Defined in: MACROS CAFS Used in: CAFSINFO866, CAFSPERI867 329= ...[??? JNCFENBU SECT BACK FGN 1 DOC 32NW ...#MAC JNCFENBU 338G ... LDCT 0 #300 33N6 ... MODD ANDX 0 CFRDBITMASK,%A,CPPTR(2) 347Q ... BZE 0 %B 34MB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNCMESH https://www.george3.co.uk/george/macro/jncmesh?rev=1705492539&do=diff JNCMESH (GIN Macro) Defined in: MACROS EWDAS Used in: LOADERDA867, LOADERFS867, SETUPB867, SHARE866, WHATPERB867 X^YQ #MAC JNCMESH Y2DB # Y2Y2 MODD LDX 0 JK52B,%A,CPPTR(2) Y3CL ANDN 0 8 Y3X= BZE 0 %B Y4BW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNENVX https://www.george3.co.uk/george/macro/jnenvx?rev=1705492539&do=diff JNENVX (GIN Macro) Defined in: MACROS SIB Used in: DATUM, LOADERDA867, LOADERFS867, SPERION867 2CGJ ...[??? JNENVX SECT FILE FGN 1 DOC 2CGQ ...#MAC JNENVX 2CGY ...[ ====== 2CH6 ...[ 2CH# ...[ JUMP TO %A UNLESS IN ENVIRONMENT %B. 2CHG ...[ ACCUMULATOR %C CAN BE OVERWRITTEN. 2CHN ...[ 2CHW ... LBW ,CPEMU,%C 2CJ4 ... BZE %C %A 2CJ= ... LF ,CPEMUENV,%C 2CJ? ...#STR MEEP,%B 2CJ# ...#STR 2CJ* ...( 2CJB ... SBN %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNESTED https://www.george3.co.uk/george/macro/jnested?rev=1705492539&do=diff JNESTED (GIN Macro) Defined in: MACROS SHFS Used in: 57J2 [??? JNESTED SECT FILE FGN 1 DOC 583L #MAC JNESTED 58H= STO 1 GEN0 592W MHUNTW 1,FSH,FSHREQ 59GG LF 1,FSHNESTCT,0 5=26 LDX 1 GEN0 5=FQ BNZ 0 %A 5=^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNHLFDON https://www.george3.co.uk/george/macro/jnhlfdon?rev=1705492539&do=diff JNHLFDON (GIN Macro) Defined in: MACROS PERI Used in: LISTLOOP867, PERFAIL866 B58L #MAC JNHLFDON B5N= JBC %B,%A,HALFDONEBIT B67W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNOTFDRM https://www.george3.co.uk/george/macro/jnotfdrm?rev=1705492539&do=diff JNOTFDRM (GIN Macro) Defined in: OLPMACROS Used in: PERION867, SIMULPTR60 4N7S ...[??? JNOTFDRM SECT FILE FGN 7 DOC 4NCL [ 4NX= [ JUMPS IF CHANNEL NOT DRM 4PBW #MAC JNOTFDRM 4PWG LDCT 0 #200 4QB6 ANDX 0 BFSTATE(2) 4QTQ BZE 0 %A 4R*B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNOTINUSE https://www.george3.co.uk/george/macro/jnotinuse?rev=1705492539&do=diff JNOTINUSE (GIN Macro) Defined in: IFMACS Used in: CC#Q ...[??? JNOTINUS SECT COMM FGN 1 DOC CC*B ...[ CCB2 ...#MAC JNOTINUSE CCBL ...[ ========= CCC= ... JUNBUSY %B,%A CCCW ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNOTMT21S https://www.george3.co.uk/george/macro/jnotmt21s?rev=1705492539&do=diff JNOTMT21S (GIN Macro) Defined in: MACROS RME10 Used in: MODE866, MODEA65 ?P36 ...[??? JNOTMT21S SECT FILE ?PGQ ...#MAC JNOTMT21S ?Q2B ... MODD LDX 0 JK52B,%A,CPPTR(2) ?QG2 ... SLL 0 1 ?Q^L ... BPZ 0 %B ?RF= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNREALT https://www.george3.co.uk/george/macro/jnrealt?rev=1705492539&do=diff JNREALT (GIN Macro) Defined in: MACROS PERI Used in: ONLINEC867, RELPER867 B=4W #MAC JNREALT B=JG JFLAGW %A,MRTREQ [RT REQ IF FLAG WAVER B?46 LTYPE %A,0 B?HQ SBN 0 23 B#3B BZE 0 MRTREQ [OR IF UDT B#H2 [ OR NON ENG EXOTIC... B*2L CHECKXOT %A,%B [SO J IF NOT EXOTIC... B*G= JENGABLE %A,%B [OR IF ENGAGEABLE B*^W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNRGROP https://www.george3.co.uk/george/macro/jnrgrop?rev=1705492539&do=diff JNRGROP (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867, GROPE867, LISTINIT867, RIGHT867 BGBG #MAC JNRGROP BGW6 MODD LDX 0 JPSTATE,%A,CPPTR(2) BH*Q ANDN 0 512 BHTB BZE 0 %B BJ*2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JNWTBSW https://www.george3.co.uk/george/macro/jnwtbsw?rev=1705492539&do=diff JNWTBSW (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, FREEPER867, SWITCH867 BN=2 #MAC JNWTBSW BNPL MODD LDX 0 JPSTATE,%A,CPPTR(2) BP9= ANDN 0 64 BPNW BZE 0 %B BQ8G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JOBAUT https://www.george3.co.uk/george/macro/jobaut?rev=1705492539&do=diff JOBAUT (GIN Macro) Defined in: MACROS VB Used in: 4SJD ...[??? JOBAUT SECT CENT FGN 7 DOC 4SS= #MAC JOBAUT 4T?W #STR %A%B 4TRG ( 4W?6 #DEF %C=1 4WQQ #STR %A 4X=B ( 4XQ2 LDX 0 %A 4Y9L #SKI %D-2 4YP= LDX 2 FX2 4^8W ) 4^NG #STR %A 5286 #STR 52MQ ( 537B #SKI %D-2 53M2 LDX 2 FX2 546L LDX 0 JOBNO(2) 54L= ) 555W #STR NONAUT,%B 55KG #STR 5656 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JOBCONS https://www.george3.co.uk/george/macro/jobcons?rev=1705492539&do=diff JOBCONS (GIN Macro) Defined in: MACS PW Used in: COMPROA867, ENWELL867, PCTSTART867 5YNN [??? JOBCONS SECT COMM FGN 9 DOC 5^D6 # 5^XQ # 62CB #MAC JOBCONS [P.WARNER 62X2 DOWN IDFENQS,1 [GET JSE3 AND ASSOCIATIONS FROM IDF 63BL BRN %A [BREAK-IN 63W= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JOBLOCK https://www.george3.co.uk/george/macro/joblock?rev=1705492539&do=diff JOBLOCK (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDON867, CLOSEMT867, CONNECT867, DTSUBSS867, ENWELL867, ERASEA867, EXPRESS864, FINISH867, HLSREAD867, IDFENQS867, LIBREQCA867, LISTNEXT867, LISTOPEN867, LISTPREP865, LISTSEAR867, OPENWORK866, ORELEND860, PROCONTX867, PROFLAG83, READFALE866, REGEN865, RELPER867, RENAMEMT867, SAVEBLOK65, SAVEFILE860, SAVEJOB865, SCHEDJOB867, SCHEDULE867, SWAP865, UNSAVE867, WHATPER867, WHATRVSA867, WORKFILE860, WSJOBSA867, WSPERIS867 *8LJ ...[??? JOBLO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JOBLOCKC https://www.george3.co.uk/george/macro/joblockc?rev=1705492539&do=diff JOBLOCKC (GIN Macro) Defined in: MACRO COMPRO Used in: WORKFILE860 *Q94 ...[??? JOBLOCKC SECT CENT FGN 21 DOC *QDW # *QYG # *RD6 #MAC JOBLOCKC *RXQ SMO FX2 *SCB LDX 2 JOBNO *SX2 LDN 1 BJOBQ *TBL MJOBLOCKC2 *TW= LDX 1 FPTR(1) *W*W #SKI K6ALLGEO>0 *WTG BXE 1 CXJO,MJOBLOCKC1 *X*6 BXU 2 JOBNUM(1),MJOBLOCKC2 *XSQ #STR %A,1 *Y#B ( *YS2 STO 1 %A *… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JOBSOURCE https://www.george3.co.uk/george/macro/jobsource?rev=1705492539&do=diff JOBSOURCE (GIN Macro) Defined in: MACS PW Used in: JOBLIST867 6464 [??? JOBSOURC SECT COMM FGN 9 DOC 64*W # 64TG # 65*6 #MAC JOBSOURCE 65SQ #STR %A 66#B LDX %B JOBNUM(%A) 66S2 SMO FX2 67?L #STR %A 67R= STO %B ACOMMUNE1 [SAVE NEW JOB NO 68=W #STR %A 68QG #SKI 69=6 STOZ ACOMMUNE1 69PQ DOWN IDFENQS,2 [COPY ASSOCS BLOCK AND JSE3 6=9B #STR %A 6=P2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JONL https://www.george3.co.uk/george/macro/jonl?rev=1705492539&do=diff JONL (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, CLOSEIPB864, ENGAGE867, FREEPER867, HLSREAD867, IPBPM84, LIBINSEC864, LIBMANY867, LIBREQ866, MOPCOM867, MOPCOMB865, RIGHT867, TERM867, UNLOAD7, WHATPER867, WHATPERA867, WHATPERB867, WHATPERX867 BW5G #MAC JONL BWK6 MODD LDX 0 JPSTATE,%A,CPPTR(2) BX4Q ANDN 0 2 BXJB BNZ 0 %B BY42 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JPMFAIL https://www.george3.co.uk/george/macro/jpmfail?rev=1705492539&do=diff JPMFAIL (GIN Macro) Defined in: PMACS Used in: PMDUMP85, PMDUMPMT85 ^55Q ...[??? JPMFAIL SECT DIAG FGN 105 DOC ^5KB #MAC JPMFAIL [M.C.D. MANN ^652 [ ^6JL [ ^74= [ ************* ^7HW [ * JPMFAIL * ^83G [ ************* ^8H6 [ ^92Q [ ^9GB ... LDCT %A #150 [CHECK BITS 2, 3 AND 5 ^=22 ... SMO FXPMDR ^=FL ... ANDX %A JMTRW1 [TRANSFER FAILED IF ANY OF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JPROP https://www.george3.co.uk/george/macro/jprop?rev=1705492539&do=diff JPROP (GIN Macro) Defined in: MACROS EWDAS Used in: BSTS867, CARTCONT867, DUMMYA867, ERASEX866, FLAW866, KARTCONT867, MOVCART867, PARSORT867, PERFLOGS866, SETDISC866 T5ML # T67= [??? JPROP T6LW # ***** T76G # MACRO TO JUMP TO APPROPRIATE LABEL T7L6 # ACCORDING TO DEVICE PROPERTIES T85Q [ T8KB #MAC JPROP T952 # T9JL LPROP %A,0 T=4= #STR %B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JREP https://www.george3.co.uk/george/macro/jrep?rev=1705492539&do=diff JREP (GIN Macro) Defined in: IFMACS Used in: CNF= [??? JREP SECT DEVT FGN 1 DOC CNYW [ CPDG #MAC JREP CPY6 [ ==== CQCQ SMO FX2 CQXB LDX 0 ACOMMUNE9 CRC2 #SKI ANS%B CRWL SBN 0 ANS%B CSB= BZE 0 %A CSTW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JREP2 https://www.george3.co.uk/george/macro/jrep2?rev=1705492539&do=diff JREP2 (GIN Macro) Defined in: IFMACS Used in: CCN2 [??? JREP2 SECT DEVT FGN 1 DOC CD7L [ CDM= #MAC JREP2 CF6W [ ===== CFLG LDX 0 ACOMMUNE9(2) CG66 #SKI ANS%B CGKQ SBN 0 ANS%B CH5B BZE 0 %A CHK2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JREPN https://www.george3.co.uk/george/macro/jrepn?rev=1705492539&do=diff JREPN (GIN Macro) Defined in: IFMACS Used in: CT*G [??? JREPN SECT DEVT FGN 1 DOC CTT6 [ CW#Q #MAC JREPN CWSB [ ===== CX#2 SMO FX2 CXRL LDX 0 ACOMMUNE9 CY?= #SKI ANS%B CYQW SBN 0 ANS%B C^=G BNZ 0 %A C^Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JRESET https://www.george3.co.uk/george/macro/jreset?rev=1705492539&do=diff JRESET (GIN Macro) Defined in: MACROS PERI Used in: CLOSEIPB864, IPCON864, IPCOND864, IPCONE865, IPCSTART864 C3^2 #MAC JRESET C4DL MODD LDX 0 JK52E,%A,CPPTR(2) C4Y= ANDN 0 #40 C5CW BNZ 0 %B C5XG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JRGROP https://www.george3.co.uk/george/macro/jrgrop?rev=1705492539&do=diff JRGROP (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867, GROPE867 C9SG #MAC JRGROP C=#6 MODD LDX 0 JPSTATE,%A,CPPTR(2) C=RQ ANDN 0 512 C??B BNZ 0 %B C?R2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JRIGHT https://www.george3.co.uk/george/macro/jright?rev=1705492539&do=diff JRIGHT (GIN Macro) Defined in: MACROS PERI Used in: FREEPER867, GETFREE867, LISTDEV866, LOADERPM867, PMLP866, PMWHATA866, RIGHT867 CD7L #MAC JRIGHT CDM= MODD LDX 0 JK52B,%A,CPPTR(2) CF6W BPZ 0 %B CFLG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JRPN2 https://www.george3.co.uk/george/macro/jrpn2?rev=1705492539&do=diff JRPN2 (GIN Macro) Defined in: IFMACS Used in: CJ4L [??? JRPN2 SECT DEVT FGN 1 DOC CJJ= [ CK3W #MAC JRPN2 CKHG [ ===== CL36 LDX 0 ACOMMUNE9(2) CLGQ #SKI ANS%B CM2B SBN 0 ANS%B CMG2 BNZ 0 %A CM^L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSBUSY https://www.george3.co.uk/george/macro/jsbusy?rev=1705492539&do=diff JSBUSY (GIN Macro) Defined in: MACROS PERI Used in: CLOSEIPB864, ENGAGE867, GROPE867, IPBERROR867, IPBIN867, IPBPM84, IPBSTARB867, IPBSTART867, IPQUAKER865, JAMSWAP865, UNPLUG867 CKHG #MAC JSBUSY CL36 MODD LDX 0 JSCA1,%A,CPPTR(2) CLGQ BNG 0 %B CM2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSHARED https://www.george3.co.uk/george/macro/jshared?rev=1705492539&do=diff JSHARED (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867, CDUM866, FAILTWIN866, INTWIN866, REQCART866, TWINSET866, TWINSETA866, TWINSETD866, WHATPER867 MNSB # MP#2 [??? JSHARED MPRL # ******* MQ?= #MAC JSHARED MQQW # MR=G MOD LDX 0 BSUNIT,%A MRQ6 ANDX 0 BITS910 MS9Q ERX 0 BIT10 MSPB BZE 0 %B MT92 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSUNBUSY https://www.george3.co.uk/george/macro/jsunbusy?rev=1705492539&do=diff JSUNBUSY (GIN Macro) Defined in: MACROS PERI Used in: CQXB #MAC JSUNBUSY CRC2 MODD LDXC 0 JSCA1,%A,CPPTR(2) CRWL BCC %B CSB= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSWIN https://www.george3.co.uk/george/macro/jswin?rev=1705492539&do=diff JSWIN (GIN Macro) Defined in: MACROS PERI Used in: GROPE867, HLSREAD867, PERFCHAP866, SWITCH867, WHATPER867 D3NL #MAC JSWIN D48= MODD LDX 0 JK52B,%A,CPPTR(2) D4MW ANDN 0 2 D57G BZE 0 %B D5M6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSWOUT https://www.george3.co.uk/george/macro/jswout?rev=1705492539&do=diff JSWOUT (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, DUMMYA867, DUMMYB867, GROPE867, IPBSTART867, PARSORT867, SETUPA867, SHARE866, SWITCH867, WHATPERA867, WHATPERB867 D9J6 #MAC JSWOUT D=3Q MODD LDX 0 JK52B,%A,CPPTR(2) D=HB ANDN 0 2 D?32 BNZ 0 %B D?GL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JSWOVER https://www.george3.co.uk/george/macro/jswover?rev=1705492539&do=diff JSWOVER (GIN Macro) Defined in: MACROS PERI Used in: DUMMYA867, PARSORT867 DCCL #MAC JSWOVER DCX= MODD LDX 0 JPSTATE,%A,CPPTR(2) DDBW ANDN 0 2048 DDWG BNZ 0 %B DFB6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JTWIN https://www.george3.co.uk/george/macro/jtwin?rev=1705492539&do=diff JTWIN (GIN Macro) Defined in: MACROS PERI Used in: CDUM866, FAILTWIN866, INTWIN866, LOADERDB867, TWINSET866, TWINSETA866, TWINSETD866, WHATPER867, WHATPERB867 DFTQ #MAC JTWIN DG*B MODD LDX 0 JK52F,%A,CPPTR(2) DGT2 SLL 0 10 DH#L BNG 0 %B DHS= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JUMPIF https://www.george3.co.uk/george/macro/jumpif?rev=1705492539&do=diff JUMPIF (GIN Macro) Defined in: IFMACS Used in: ?##W [ ?#SG [ ?*#6 [??? JUMPIF SECT DEVT FGN 1 DOC ?*RQ [ ?B?B #MAC JUMPIF ?BR2 [ ====== ?C=L [ ?CQ= [ ?D9W [ %A - JUMP CONDITION DEFINER ?DPG [ %B - LABEL ROOT ?F96 [ %C - PARAMETERS TO JUMP CONDITION DEFINER ?FNQ [ ?G8B [ CALLS 'NESTJUMP' TO PUT THE APPROPRIATE NUMBER (NESTDEPTH MOD 9, ?GN2 [ HELD IN 20?) OF N'S AT THE START OF THE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JUNBUSY https://www.george3.co.uk/george/macro/junbusy?rev=1705492539&do=diff JUNBUSY (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, EMSENG864, IPBSTARB867, IPBSTART867, LISTLOOP867, LISTNEXT867, LISTPREP865, LISTTPCP867, MODE866, MODEA65, PMWHATA866, PMWINDDN84, SETUPA867 DMP= #MAC JUNBUSY DN8W MODD LDX 0 JCCA1,%A,CPPTR(2) DNNG BPZ 0 %B DP86 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JUNDE https://www.george3.co.uk/george/macro/junde?rev=1705492539&do=diff JUNDE (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867, MOVCART867, TWINSET866, TWINSETA866 N25= # N2JW [??? JUNDE N34G # ***** N3J6 #MAC JUNDE N43Q # N4HB MOD LDX 0 BSUNIT,%A N532 ANDX 0 BITS910 N5GL ERX 0 BITS910 N62= BZE 0 %B N6FW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JV7900 https://www.george3.co.uk/george/macro/jv7900?rev=1705492539&do=diff JV7900 (GIN Macro) Defined in: MACROS PERI Used in: ACCESS867, ATTACHA8, DUMMYB867, IPBINB867, IPBOUT867, IPBSCAN867, IPBSTARB867, IPBSTART867, MAKEVCC867, MOPCOM867, RIGHT867, VIPBFREE865 DT56 #MAC JV7900 DTJQ MODD LDX 0 JK52F,%A,CPPTR(2) [CHECK IF 7900 IS NOT ONLINEABLE DW4B ANDN 0 #20 [IE JK52F.B19 = 0 DWJ2 BZE 0 %B [NOT ONLINEABLE : MUST BE A V7900 DX3L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWCONVAD https://www.george3.co.uk/george/macro/jwconvad?rev=1705492539&do=diff JWCONVAD (GIN Macro) Defined in: MACROS WELL Used in: BMJLCONV860, BMSAVJOB864 L546 ...[ L5HQ ...#MAC JWCONVAD L63B ... LDX 0 %B L68J ...#STR %C L6*Q ...( L6H2 ... BPZ 0 MJW1 L72L ...#SKI JWPHASE4 L73X ...( L758 ...#UNS FPARTRES L76F ...( L77Q ... LDCT 0 #010 L793 ... ANDX 0 %B L7=# ... SBN %A 1 L7?K ... BNZ 0 MJW1 L7#W ... ADN %A 2 L7B7 ...) L7CD ...#UNS FPARTRES L7DP ...#SKI L7G= ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWELLADD https://www.george3.co.uk/george/macro/jwelladd?rev=1705492539&do=diff JWELLADD (GIN Macro) Defined in: MACROS WELL Used in: BMJLSLAV864, DSCNCT867, ENWELL867, JWELLONE867, SCHDJOBA867 229S ...[??? JWELLADD SECT CENT FGN 72 DOC 22FL #MAC JWELLADD 22LS ...#STR NCAND,%A 22S2 ...( 22^= #STR LIVE,%A 23DW ( 23YG #STR WELL,%A 24D6 ( 24XQ ! PARAMS TO JWELLADD NOT VALID 25CB #EXI 25X2 ) 26BL LDN 0 JWELLONE 26W= ) 27*W #STR WELL,%A 27TG LDN 0 1 28*6 SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWELLSUB https://www.george3.co.uk/george/macro/jwellsub?rev=1705492539&do=diff JWELLSUB (GIN Macro) Defined in: MACROS WELL Used in: DSCNCT867, JWELLONE867, SCHDJOBA867 2#FY ...[??? JWELLSUB SECT CENT FGN 72 DOC 2#PQ [ 2*9B [ 2*P2 [ 2B8L #MAC JWELLSUB 2BN= JWELLADD %A,SUB 2C7W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWPR https://www.george3.co.uk/george/macro/jwpr?rev=1705492539&do=diff JWPR (GIN Macro) Defined in: MACROS PERI Used in: ILLPERI70, LIBLOAD867, LIBREQ866, LIBREQC867, LIBSEC867, OLMTD65, OLMTE85, PMDUMPMT85, RENAMDIR, RENAMEMT867, RETURNIT867, TAPEWAIT65, WHATPERA867, XENON F2YL #MAC JWPR F3D= MODD LDX 0 JK52E,%A,CPPTR(2) F3XW ANDN 0 16 F4CG BNZ 0 %B F4X6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWRONG https://www.george3.co.uk/george/macro/jwrong?rev=1705492539&do=diff JWRONG (GIN Macro) Defined in: MACROS PERI Used in: CLOSEIPB864, DUMMYB867, EMSENG864, ENGAGE867, FINISHB867, GROPE867, HLSREAD867, IDFCHK867, IPBPM84, IPBSTART867, LABEL866, LIBREQ866, LIBREQC867, LISTEXCP865, LISTINIT867, LOADERFS867, LOADERI867, LOADERMT867, LOADERPM867, MODE866, MODEA65, MOPCOM867, MOPPM84, MOPSTART865, ONLINEB867, ONLINEC867, PM, PMLP866, PMWHATA866, PMWINDDN84, REDON867, RIGHT867, SETIDF867, SETUPA867, TRANSPOT65, UNLOAD7, WHATPERA867, WHATPERB867 F8S6 #MAC JWRON… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWTBSW https://www.george3.co.uk/george/macro/jwtbsw?rev=1705492539&do=diff JWTBSW (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867, IPBINB867, RIGHT867, SHARE866 FB82 #MAC JWTBSW FBML MODD LDX 0 JPSTATE,%A,CPPTR(2) FC7= ANDN 0 64 FCLW BNZ 0 %B FD6G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWTBWR https://www.george3.co.uk/george/macro/jwtbwr?rev=1705492539&do=diff JWTBWR (GIN Macro) Defined in: MACROS PERI Used in: FREEPER867, IPBINB867, LIBLOAD867, LISTNEXT867, MOPCOM867 FJ3G #MAC JWTBWR FJH6 MODD LDX 0 JPSTATE,%A,CPPTR(2) FK2Q ANDN 0 128 FKGB BNZ 0 %B FL22 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) JWWFUPDATE https://www.george3.co.uk/george/macro/jwwfupdate?rev=1705492539&do=diff JWWFUPDATE (GIN Macro) Defined in: MACROS WELL Used in: JOBLIST867 7929 ...[??? JWWFUPDA SECT CENT FGN 72 DOC 792P ...#MAC JWWFUPDATE 793N ... LDCH 0 JDFWFNAME-A1(%A) 794M ... BZE 0 MJW1 795L ... SBN 0 #72 796K ... BNZ 0 MJW2 797J ... NGN 0 #32 798H ...MJW2 ADN 0 #73 799G ... DCH 0 JDFWFNAME-A1(%A) 79=F ... BRN MJW3 79?D ...MJW4 4HBAAA 79#C ...MJW1 SMO FX1 79*B ... LDX 0 MJW4… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEEPCHAP https://www.george3.co.uk/george/macro/keepchap?rev=1705492539&do=diff KEEPCHAP (GIN Macro) Defined in: COREMACROS Used in: CHTAB, INKS, KEEPCHAP863, PUTPER85 L#9Q ...[??? KEEPCHAP SECT CENT FGN 53 DOC L#PB ...#MAC KEEPCHAP L*92 ...[ MACRO USED TO KEEP CHAPTERS IN CORE.IT SETS UP A TABLE OF COUNTS IN L*NL ...[ FIXED CORE AND A TABLE OF CHAPTERS PER PERIPHERAL IN SEGMENT KEEPCHAP LB8= ...[ THE CHAPTER CHANGER IS ALSO MENDED. LBMW ...[ IDENTIFIERS USED ARE AS FOLLOWS LC7G ...[ JKCTABNO - MAX NO. OF TIMES KEEPCHAP MAY BE ISSUED LCM6 ...[ JK… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEEPCHP1 https://www.george3.co.uk/george/macro/keepchp1?rev=1705492539&do=diff KEEPCHP1 (GIN Macro) Defined in: COREMACROS Used in: M?FQ ...[??? KEEPCHP1 SECT CENT FGN 53 DOC M?^B ...#MAC KEEPCHP1 M#F2 ...#STR %A M#YL ...( M*D= ...#SKI JKCTABLEN-2-JKCCHAPPOS<1$1 M*XW ...! TOO MANY PARAMATERS TO KEEPCHAP MBCG ...#SKI JKCTABLEN-2-JKCCHAPPOS MBX6 ...( MCBQ ...#UNS D%A MCWB ...#SKI MDB2 ...! %A IS AN INVALID CHAPTER NAME MDTL ...#UNS D%A MF*= ...( MFSW ...#MEN KEEPCHAP MG#G ...#TRA JKCTABSTRT+JKCTABPOS+2+JKCCHAPPOS MGS6 ...#HA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEEPMESS https://www.george3.co.uk/george/macro/keepmess?rev=1705492539&do=diff KEEPMESS (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTEND867, ERASEX866, EXINONE867, EXINTO867, EXOPEN867, FLAW866, PERION867, SPERION867, TRANSFER70, WRITEFIP867 K7QL # K8== [??? KEEPMESS K8PW # ******** K99G #MAC KEEPMESS K9P6 # K=8Q LDX 0 %A K=NB SMO FX2 K?82 STO 0 ACOMMUNE7 K?ML #STR %B K#7= LDX 0 %B K#LW #S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEEPPAGES https://www.george3.co.uk/george/macro/keeppages?rev=1705492539&do=diff KEEPPAGES (GIN Macro) Defined in: MACS OPER Used in: 22FL [??? KEEPPAGE SECT COMM FGN 1 DOC 22^= [ 23DW #MAC KEEPPAGES 23YG [ ========= 24D6 [ 24XQ [ THIS MACRO SETS THE NUMBER OF PAGES OF OPER 25CB [ LOG RETAINED IN THE RECALL FILE 25X2 [ 26BL [ %A - NUMBER OF PAGES - 20 ASSUMED IF %A MISSING 26W= [ - 2 ASSUMED IF %A ZERO 27*W [ - 510 ASSUMED IF %A -VE OR OVER 510 27TG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEEPREP https://www.george3.co.uk/george/macro/keeprep?rev=1705492539&do=diff KEEPREP (GIN Macro) Defined in: REPLY-MACROS Used in: ANTIC867, BMSJRNL866, BUDGONE83, BUDGTWO84, DICTJOB82, DTREST860, FLAW866, GETDIR860, LEXIFIND5, LIBINSEC864, LIBREQC867, LIBSEC867, LIBTSN867, LISTFIND867, LISTINIT867, LISTLOOP867, LISTOPEN867, LISTPREP865, MTCHECK860, NEWDIR867, OPENREL865, RENAMEMT867, REPERR867, RETRIEVE864, TRANSFER70, USERLIB867, USERONE867, USEROPEN867 4LNY ...[??? KEEPREP SECT FILE FGN 2 DOC 4LYQ #MAC KEEPREP 4MDB LDN %A ANS%B 4MY2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEYREC https://www.george3.co.uk/george/macro/keyrec?rev=1705492539&do=diff KEYREC (GIN Macro) Defined in: INDEX-MACROS Used in: BMINDEX866, DELETE864, INDEX85, INSERT6, REWRITE864 3QBN ...[??? KEYREC SECT FILE FGN 9 DOC 3QLG #MAC KEYREC 3R66 [ 3RKQ [ PARAMETERS 3S5B [ 3SK2 [ %A POINTS TO THE FCB OF THE FILE TO WHICH THE RECORD BELONGS 3T4L [ %B (OPTIONAL) IS THE TYPE OF THE CORE BLOCK CONTAINING THE 3TJ= [ RECORD 3W3W [ %C IF %B GIVEN - SUBTYPE OF ABOVE BLOCK 3WHG [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KEYRECI https://www.george3.co.uk/george/macro/keyreci?rev=1705492539&do=diff KEYRECI (GIN Macro) Defined in: INDEX-MACROS Used in: FHOBJIND860, INCMON865, LOCATE84 5YNN ...[??? KEYRECI SECT FILE FGN 9 DOC 5YYG # 5^D6 [ 5^XQ #MAC KEYRECI 62CB [ THIS MACRO CALCULATES THE KEY OF A GIVEN RECORD OF A FILE,BRANCHING 62X2 [ TO %D IF RECORD HAS NO KEY. PARAMETERS ARE AS FOR KEYREC MACRO EXCEPT 63BL [ CONTAINS THE INDEXNUM OF THE FILE . ALSO X1 CANNOT BE USED AS A PARAME 63W= #STR %B 64*W MHUNTW 1,%B,%C 64TG #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KICKASWINT https://www.george3.co.uk/george/macro/kickaswint?rev=1705492539&do=diff KICKASWINT (GIN Macro) Defined in: LLSMACROS Used in: CORE867, GIVE867, LOADPROG865, RUNPROG840 7JL6 ...[??? KICKASWI SECT CENT FGN 6 DOC 7K8B [ 7KN2 [ MACRO TO KICK ASWINT 7L7L [ 7LM= #MAC KICKASWINT 7M6W LDX 1 FX1 7MLG JBSS MKAS1,,ASWACTIVE 7N66 LDX 2 BSWINT 7NKQ #STR %A 7P5B LINKSET 2,%A 7PK2 #STR %A 7Q4L #SKI 7QJ= ( 7R3W BRN MKAS 7RHG MKAS2 LINK SCHEDIN,1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KILLHANGER https://www.george3.co.uk/george/macro/killhanger?rev=1705492539&do=diff KILLHANGER (GIN Macro) Defined in: MACROSIPC Used in: IPCONB8, IPQUAKE83 =YY? ...[??? KILLHANG SECT COMM FGN 19 DOC =^=N ...[ CAUSE HANGER BLOCK TO COMMIT SUICIDE =^K6 #MAC KILLHANGER ?24Q LDX 0 %A ?2JB LDX 2 FX2 ?342 STO 0 ACOMMUNE1(2) [STORE LINK NUMBER ?3HL MFREE IPCD,ATASK ?43= HUNT2 1,IPCD,IPSTACK,FX2 ?4GW LDX 2 1 ?52G ADX 2 ALOGLEN(2) ?5G6 LDN 1 A1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KREP https://www.george3.co.uk/george/macro/krep?rev=1705492539&do=diff KREP (GIN Macro) Defined in: REPLY-MACROS Used in: 5MCS ...[??? KREP SECT FILE FGN 2 DOC 5MML #MAC KREP 5N7= ORN %A ANQ%B 5NLW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) KREPC https://www.george3.co.uk/george/macro/krepc?rev=1705492539&do=diff KREPC (GIN Macro) Defined in: REPLY-MACROS Used in: GETDIR860, GETDIRX860, USERONE867, USEROPEN867 5KYY ...[??? KREPC SECT FILE FGN 2 DOC 5L8Q #MAC KREPC 5LNB LDN %A ANQ%B 5M82 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LA https://www.george3.co.uk/george/macro/la?rev=1705492539&do=diff LA (GIN Macro) Defined in: MACROS SJ Used in: BCAST867, CHARGESC867, CORESHED861, MESSBE, SCHEDOUT865, UNPLUG867 4J5K ...[ 4J88 ...[ 4J=S ...[??? LA SECT FILE FGN 24 DOC 4JGL #MAC LA 4K2= #DEF 20?=#40000000@L-(%A&#37) 4KFW #STR %B 4K^G #SKI 4LF6 ([%B NULL 4LYQ LA %A,0,%C 4MDB #EXI 4MY2 ) 4NCL #STR %C 4NX= ([INVERT CASE 4PBW #SKI 20?&#7777 4PWG ([B12-23 4QB6 NGN %B 20?+1 4QTQ #EXI 4R*B ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LABFIX https://www.george3.co.uk/george/macro/labfix?rev=1705492539&do=diff LABFIX (GIN Macro) Defined in: MACROS DTP Used in: BSQ867, BSTS867, CASCODE, CHCH865, COOR865, COREALL865, DATUM, EVENTFN, FBUFF860, GSCANTRA, HUNTBLOK, MESOUT, PM, STEP864 #K*B [??? LABFIX SECT DIAG FGN 552 DOC #KT2 #MAC LABFIX [M.C.D. MANN #L#L [ #LS= [ #M?W [ ************ #MRG [ * LABFIX * #N?6 [ ************ #NQQ [ #P=B [ #PQ2 #DEF O%A=0?+37? #Q9L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LADDP https://www.george3.co.uk/george/macro/laddp?rev=1705492539&do=diff LADDP (GIN Macro) Defined in: MACS SPC Used in: ASSOC867, ATTRIBUT867, BRADSPLT867, CAFSCTRL866, CAFSINFO866, CAFSPERI867, CARTCONT867, CDUM866, CHINTEG867, CLOSBAC867, DUMMYB867, ENGAGE867, FAILTWIN866, FINDFS867, FINDRUM866, FLAWMAP866, GETFREE867, GETFREEB864, GROPE867, HLSREAD867, IDFENQS867, INTWIN866, IPBINB867, LIBLOAD867, LIBREQ866, LISTDEV866, LISTEXCP865, LISTFIND867, LISTINIT867, LISTINTC865, LISTLOOP867, LISTRING864, LISTSEAR867, MOVCART867, PERFLOGS866, PROPERTY867, PUTPER85, REA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LAMOP https://www.george3.co.uk/george/macro/lamop?rev=1705492539&do=diff LAMOP (GIN Macro) Defined in: MACS SPC Used in: DUMMYB867, ENGAGE867, GROPE867, IDFCHK867, IPBERROR867, IPBSTARB867, MAKEVCC867, MOPCOM867, RIGHT867, SWITCH867, TERM867, VIPBPERI864, WHATPERX867 B=JG #MAC LAMOP B?46 LADDP %A,%B B?HQ MOD LDX %B 1,%B B#3B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LAS https://www.george3.co.uk/george/macro/las?rev=1705492539&do=diff LAS (GIN Macro) Defined in: MACROS SJ Used in: 6N44 ...[ 6N9= ...[ 6NBG ...[??? LAS SECT FILE FGN 24 DOC 6^MB #MAC LAS 6^NF ...[ THE BASIC PRIMITIVES OF THE MULTI BIT OPERATIONS ARE 6^PJ ...[ LAS-LOADS THE BIT PATTERN IN 19?+9 INTO X%A 6^QM ...[ OPS-TAKES AS %E ETC A STRING OF BIT OR FIELD IDS. FOR EACH WORD 6^RQ ...[ INVOLVED IT COMPILES:- 6^ST ...[ %A,%B,%C,%D 6^TY ...[ WITH 19?+9=BIT PATTERN FOR THAT WORD 6^X3 ...[ 19?+8=DISPLAC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LASS https://www.george3.co.uk/george/macro/lass?rev=1705492539&do=diff LASS (GIN Macro) Defined in: MACROS SJ Used in: *Q6D ...[ *Q94 ...[??? LASS SECT FILE FGN 24 DOC *QDW #MAC LASS [F,A,INVERT *QYG #DEF 20?=%A@L-19+1 [20? = NO OF BRTS *RD6 #SKI 20?-1<1$1 *RXQ ( *SCB [ ONE BIT CASE *SX2 LA %A ,%B,%C *TBL #EXI *TW= ) *W*W MASK %A [21? = FIELD *WTG #STR %C *X*6 #SKI *XSQ ( *Y… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LASTREKA https://www.george3.co.uk/george/macro/lastreka?rev=1705492539&do=diff LASTREKA (GIN Macro) Defined in: RING-MACROS Used in: DELETE864 8PJD ...[??? LASTREKA SECT FILE FGN 20 DOC 8PS= #MAC LASTREKA 8Q?W [ %A -> USAGE BLOCK,%B -> NONZERO R.H 8QRG [ %B ON EXIT -> LAST(ZERO)RECORD 8R?6 M1LASTREKA 8RQQ SMO %B 8S=B LDEX 0 0(%A) 8SQ2 BZE 0 M2LASTREKA 8T9L ADS 0 %B 8TP= BRN M1LASTREKA 8W8W M2LASTREKA 8WNG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LATEST https://www.george3.co.uk/george/macro/latest?rev=1705492539&do=diff LATEST (GIN Macro) Defined in: MACROS DTP Used in: MESSB BCYQ ...[??? LATEST SECT DIAG FGN 562 DOC BCYY ...#MAC LATEST [M.C.D. MANN BC^6 ...[ BC^# ...[ BC^G ...[ ************ BC^N ...[ * LATEST * BC^W ...[ ************ BD24 ...[ BD2= ...[ BD2D ...#SKI ADTP [IF THIS IS AN INTERNAL RESTORE BD2L ...( [ASSIGN THE HIGHEST PUBLIC GENERATION BD2S ...#SKI ADTPFC<1$1 B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LBSUN https://www.george3.co.uk/george/macro/lbsun?rev=1705492539&do=diff LBSUN (GIN Macro) Defined in: MACROSBRBS Used in: CARTCONT867, PMFS85 9JXD ...[??? LBSUN SECT FILE FGN 14 DOC 9K7= #MAC LBSUN 9KLW LADDP %A,%B 9L6G LTYPE %A,0 9LL6 SBN 0 9 9M5Q BZE 0 MBDR 9MKB SBN 0 16 9N52 BZE 0 MBDR 9NJL MOD LDX %B BSUNIT,%B 9P4= BRN MBSU 9PHW MBDR 9Q3G MOD LDX %B BDRUM,%B 9QH6 MBSU ANDN %B #7777 9R2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LBW https://www.george3.co.uk/george/macro/lbw?rev=1705492539&do=diff LBW (GIN Macro) Defined in: MACROS SJ Used in: CLOSEDIR867, INCEOT865, IPBLISTB867, LISTFILE867 #C7D ...[ #C#L ...[ #CFW ...[??? LBW SECT FILE FGN 24 DOC #HWG #MAC LBW [P,I,W #JB6 #ACC %C #JTQ ([ NOT AN ACC #K*B LBW %A,%B,0 #KT2 STO 0 %C #L#L #EXI #LS= ) #M?W LA %B,%C #MRG OP %A,%B,ANDX,%C #N?6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LCAP https://www.george3.co.uk/george/macro/lcap?rev=1705492539&do=diff LCAP (GIN Macro) Defined in: MACS SPC Used in: MODE866, MODEA65, TAPEWAIT65 BCYB #MAC LCAP BDD2 MODD LDX %B JK52B,%A,CPPTR(2) BDXL SLC %B 9 BFC= ANDN %B 15 BFWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LCERRS https://www.george3.co.uk/george/macro/lcerrs?rev=1705492539&do=diff LCERRS (GIN Macro) Defined in: MACS SPC Used in: UNLOADMT867 BKRW #MAC LCERRS BL?G MODD LDX %B JCERR,%A,CPPTR(2) BLR6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDBIT https://www.george3.co.uk/george/macro/ldbit?rev=1705492539&do=diff LDBIT (GIN Macro) Defined in: MACROS JSR Used in: GETWORD867, LIST867, LISTPARS867, LISTPREP865, PLUGIN867 7?MN ...[??? LDBIT SECT CENT FGN 9 DOC 7?XG # 7#C6 # THIS MACRO LOADS BIT %A INTO WORD %B 7#WQ # 7*BB #MAC LDBIT 7*W2 #SKIP %A>23-23 7B*L ! %A EXCEEDS 23 OR IS UNDEFINED 7BT= #ACC %B 7C#W ( 7CSG LDBITZ %A,0 7D#6 STO 0 %B 7DRQ ) 7F?B #ACC %B 7FR2 #SKIP 7G=L LDBITZ %A,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDBITZ https://www.george3.co.uk/george/macro/ldbitz?rev=1705492539&do=diff LDBITZ (GIN Macro) Defined in: MACROS JSR Used in: 7H24 ...[??? LDBITZ SECT CENT FGN 9 DOC 7H9W # 7HPG # THIS MACRO SETS BIT %A OF ACCUMULATOR %B 7J96 # 7JNQ #MAC LDBITZ 7K8B #SKI %A<9-9 7KN2 ( 7L7L LDCT %B 0 7LM= #FID 15+%A 15+%A 1 7M6W ) 7MLG #SKI %A>11-11 7N66 ( 7NKQ LDN %B 0 7P5B #FID %A %A 1 7PK2 ) 7Q4L #SKIP %A$9 7QJ= #SKIP 7R3W LDX %B BIT9 7RHG #SK… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDNBIT https://www.george3.co.uk/george/macro/ldnbit?rev=1705492539&do=diff LDNBIT (GIN Macro) Defined in: MACROS JSR Used in: PRINT70 7WP4 ...[??? LDNBIT SECT CENT FGN 9 DOC 7WYW # 7XDG # THIS MACRO SETS ALL BITS EXCEPT BIT %A OF WORD %B 7XY6 # 7YCQ #MAC LDNBIT 7YXB #SKIP %A>23-23 7^C2 ! %A EXCEEDS 23 OR IS UNDEFINED 7^WL #ACC %B 82B= ( 82TW LDNBITZ %A,0 83*G STO 0 %B 83T6 ) 84#Q #ACC %B 84SB #SKIP 85#2 LDNBITZ %A,%B 85RL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDNBITZ https://www.george3.co.uk/george/macro/ldnbitz?rev=1705492539&do=diff LDNBITZ (GIN Macro) Defined in: MACROS JSR Used in: 863D ...[??? LDNBITZ SECT CENT FGN 9 DOC 86?= # 86QW # THIS MACRO SETS ALL BITS EXCEPT BIT %A OF ACCUMULATOR %B 87=G # 87Q6 #MAC LDNBITZ 889Q #SKIP %A>11-11 88PB ( 8992 NGN %B 1 89NL #FID 0 %A 1 8=8= ) 8=MW #SKIP %A<12-12 8?7G ( 8?M6 NGN %B 2 8#6Q SRC %B %A+1 8#LB ) 8*62 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDNGN https://www.george3.co.uk/george/macro/ldngn?rev=1705492539&do=diff LDNGN (GIN Macro) Defined in: MACROS FIXD Used in: 3=X5 ...[??? LDNGN SECT CENT FGN 11 DOC 3=XH ...[ 3=YB ...[ 3=^9 ...[ 3?2G [ 3?G6 #MAC LDNGN 3?^Q #DEF MLDNGN=%B 3#FB #SKI MLDNGN&#40000000 3#^2 NGN %A -MLDNGN 3*DL #SKI MLDNGN&#40000000<1$1 3*Y= LDN %A MLDNGN 3BCW #FRE MLDNGN 3BXG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LDSA https://www.george3.co.uk/george/macro/ldsa?rev=1705492539&do=diff LDSA (GIN Macro) Defined in: MACROS MACB Used in: BACKMAP864, VIPBFREE865 5Y94 ...[??? LDSA SECT CENT FGN 2 DOC 5YDW #MAC LDSA 5YYG LDX %A %B 5^D6 ANDN %A #7777 5^XQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LEGALLEV https://www.george3.co.uk/george/macro/legallev?rev=1705492539&do=diff LEGALLEV (GIN Macro) Defined in: MACROS FIXD Used in: ASSIGN860 6#X# ...[??? LEGALLEV SECT CENT FGN 11 DOC 6*76 [ THIS MACRO CAUSES J TO %B IF AN ILLEGAL QUALIFIER LEVEL HAS OCCURED 6*LQ #MAC LEGALLEV 6B6B MOD LDX 0 GPER4,%A 6BL2 -1 6C5L MULTIFID -GCOMQU,-23,24,%C,%D,%E,%F,%G,%H,%I,%J 6CK= #TRA 0?-1 6D4W #SKI 34?+0?+0]&#40000000<1$1*GCOMQU [INCL IF ANYCOMMON SPECD & GCOMQU>0 6DJG #FID 24-GCOMQU 23 1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LETOPRUN https://www.george3.co.uk/george/macro/letoprun?rev=1705492539&do=diff LETOPRUN (GIN Macro) Defined in: MACROSAJE Used in: EDITOR867 22NW ...[??? LETOPRUN SECT COMM FGN 8 DOC 22N^ ...[ MACRO TO ALLOW OBJECT PROGRAM TO RUN DURING LARGE 22P4 ...[ REPETITIVE EDITS-ENHANCENENT 8159. 22P7 ...[ 22P9 ...#MAC LETOPRUN 22P? ...[ THE MACRO SUSPENDS THE CURRENT ACTIVITY IF IT FINDS A NUMBER OF 22P* ...[ RUNNABLE OBJECT PROGRAMS EQUAL TO THE NUMBER OF PROCESSORS. 22PC ...[ IT SEARCHES THE PROGRAM RING, FOLLOWING THE 'BPTR' TO IMPROVE 22PF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LF https://www.george3.co.uk/george/macro/lf?rev=1705492539&do=diff LF (GIN Macro) Defined in: MACROS SJ Used in: ARCHIVE867, BMINDEX866, BMSTREAM853, BSPRUNE867, CANCRVX864, CLOSEALT864, CLOSEFUL867, CLOSEND867, CLOSFREZ867, DTREST860, DTSCAN860, DTSTART867, DTSUBS867, DTSUBSS867, LINECTRL864, LISTFILE867, LISTRING864, OPER864, OPERIN867, PCTLISTA867, PCTLISTB867, PERFLOGS866, RENGAGE851, RESTMERG864, RMTLF864, RMTLFEND864, SCHEDENX860, SCHEDMTX867, SHOWCOMM864, WHATPERB867 CK6F ...[ CK94 ...[ CK?N ...[??? LF SECT FILE FGN 24 DOC CKHG #MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFAILS https://www.george3.co.uk/george/macro/lfails?rev=1705492539&do=diff LFAILS (GIN Macro) Defined in: MACS SPC Used in: CARTCONT867, FLAW866, IPCONE865, MOPCOM867, MOPCOMB865, REDONMT867, RELPER867, TRANSPOT65, UNLOADMT867 BQN6 #MAC LFAILS BR7Q MODD LDX %B JK52K,%A,CPPTR(2) BRMB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFAILTYPE https://www.george3.co.uk/george/macro/lfailtype?rev=1705492539&do=diff LFAILTYPE (GIN Macro) Defined in: MACS SPC Used in: BXJB #MAC LFAILTYPE BY42 MODD LDEX %B JK52E,%A,CPPTR(2) BYHL SRL %B 6 B^3= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFALLTRANS https://www.george3.co.uk/george/macro/lfalltrans?rev=1705492539&do=diff LFALLTRANS (GIN Macro) Defined in: MACROS LEF Used in: 4NXD ...#MAC LFALLTRANS 4NXL ...#STR %A,ON 4NXS ...#SKI 4NY2 ...( 4NY8 ...#STR %A 4NYB ...#STR %A,O 4NYJ ...( 4NYQ ...[ALL TRANSFERS TO BE CHARGED 4NYY ...#MEN LISTRING 4N^6 ...#TRA K50LISTRING 4N^# ... CALL 7 K53LISTRING 4N^G ...#TRA K51LISTRING 4N^N ... CALL 7 K53LISTRING 4N^W ...#TRA K52LISTRING 4P24 ... CALL 7 K53LISTRING 4P2= ...#END 4P2D ...) 4P2L ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFAT https://www.george3.co.uk/george/macro/lfat?rev=1705492539&do=diff LFAT (GIN Macro) Defined in: MACROS LEF Used in: IDFASAT867 4P74 ...[??? LFAT SECT DEVT FGN 2 DOC 4PBW #MAC LFAT 4PWG [THIS MACRO UPDATES A GOUT/GPROPNOS BLOCK ASSOCIATED 4QB6 [WITH ANY ACTLF ON THE SCHEDULER'S JOB-RING,WHEN A 4QTQ [PROPERTY IS ATTRIBUTED TO A REMOTE DEVICE 4R*B DOWN LISTEND,5 4RT2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBASOVERFLO https://www.george3.co.uk/george/macro/lfbasoverflo?rev=1705492539&do=diff LFBASOVERFLO (GIN Macro) Defined in: MACROS LEF Used in: 4S4S ...[??? LFBASOVE SECT DEVT FGN 2 DOC 4S#L #MAC LFBASOVERFLO 4SS= #STR %A,ON 4T?W #SKI 4TRG ( 4W?6 #STR %A 4WQQ #STR %A,O 4X=B ( 4XQ2 ...[ACTIONS PAGE OVERFLOW FOR BASIC FILES 4Y9L #MEN LISTLOOP 4YP= #TRA K50LISTLOOP 4^8W NULL 4^NG #END 5286 ) 52MQ ) 537B #STR %A,OFF 53M2 #SKI 546L ( 54L= #STR OFF,%A 555W #SKI 5… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBBS https://www.george3.co.uk/george/macro/lfbbs?rev=1705492539&do=diff LFBBS (GIN Macro) Defined in: MACROS LEF Used in: IPBLISTB867, IPBLISTE867, LISTEND867, LISTFIND867, LISTINTC865, LISTLOOP867, LISTNIP865, LISTOPEN867, LISTPREP865, LISTPROC867, LISTTPCP867 59=N ...[??? LFBBS SECT DEVT FGN 2 DOC 59GG [ 5=26 #MAC LFBBS 5=FQ LDBIT ALFBIT%A,0 5=^B #MOD %B 5?F2 ( 5?YL SMO %B 5#D= ANDX 0 ALFLAG 5#XW ) 5*CG #MOD %B 5*X6 #SKI 5BBQ ANDX 0 ALFLAG(%B) 5BWB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBBUS https://www.george3.co.uk/george/macro/lfbbus?rev=1705492539&do=diff LFBBUS (GIN Macro) Defined in: MACROS LEF Used in: IPBLISTB867, IPBLISTE867, LISTEND867, LISTFIND867, LISTLOOP867, LISTNEXT867, LISTNIP865, LISTOPEN867, LISTPREP865, LISTPROC867, LISTSEAR867, LISTTPCP867, RMTLF864 5CKS ...[??? LFBBUS SECT DEVT FGN 2 DOC 5CTL #MAC LFBBUS 5D*= LDBIT ALFBIT%A,0 5DSW #MOD %B 5F#G ( 5FS6 SMO %B 5G?Q ANDX 0 ALFLAG 5GRB ) 5H?2 #MOD %B 5HQL #SKI 5J== ANDX 0 ALFLAG(%B) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBITCLR https://www.george3.co.uk/george/macro/lfbitclr?rev=1705492539&do=diff LFBITCLR (GIN Macro) Defined in: MACROS LEF Used in: IPBLISTB867, IPBLISTE867, LISTFIND867, LISTINIT867, LISTLOOP867, LISTNEXT867, LISTNIP865, LISTOPEN867, LISTPREP865, LISTPROC867, LISTSEAR867, LISTTPCP867, RENGAGE851 5KF# ...[??? LFBITCLR SECT DEVT FGN 2 DOC 5KP6 #MAC LFBITCLR 5L8Q LDBIT ALFBIT%A,0 5LNB #MOD %B 5M82 ( 5MML SMO %B 5N7= ORS 0 ALFLAG 5NLW SMO %B 5P6G ERS 0 ALFLAG 5PL6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBITSET https://www.george3.co.uk/george/macro/lfbitset?rev=1705492539&do=diff LFBITSET (GIN Macro) Defined in: MACROS LEF Used in: IDFENQS867, IDFPER867, IDFSCON867, LISTFIND867, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNIP865, LISTOPEN867, LISTPREP865, LISTPROC867, LISTTPCP867, PCTSTART867, READFALE866, WLC867 5T?# ...[??? LFBITSET SECT DEVT FGN 2 DOC 5TH6 #MAC LFBITSET 5W2Q LDBIT ALFBIT%A,0 5WGB #MOD %B 5X22 ( 5XFL SMO %B 5X^= ORS 0 ALFLAG 5YDW ) 5YYG #MOD %B 5^D6 #SKI 5^XQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBLCNUM https://www.george3.co.uk/george/macro/lfblcnum?rev=1705492539&do=diff LFBLCNUM (GIN Macro) Defined in: MACS LIST Used in: LISTPROC867, LISTSEAR867 27BD ...[ 27BF ...[ TO CALCULATE THE NUMBER OF BLOCKS IN A GOUT/INFO CHAIN 27BG ...#MAC LFBLCNUM 27BH ...[ %A IS AN ACC TO CONTAIN THE ANSWER NOT X0 27BJ ...[ %B CONTAINS A POINTER TO THE GOUT/INFO BLOCK 27BL ... LDN %A 1 27BQ ... JBS M1LFBLCNUM,%B,BLFONLINE 27BW ... ADN %A 1 27C2 ...M1LFBLCNUM 27C6 ... JBC M2LFBLCNUM,%B,BLFSETUP 27C= ... ADN %A 1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFBLOCK https://www.george3.co.uk/george/macro/lfblock?rev=1705492539&do=diff LFBLOCK (GIN Macro) Defined in: MACROS LEF Used in: 62X2 #MAC LFBLOCK 63BL [ THIS MACRO CONVERTS A FILE/FWB TO A GOUT/CHANGE 63W= #STR %A 64*W #SKI 64TG MHUNTW 2,FILE,FWB 65*6 #STR %A,2 65SQ LDX 2 %A 66#B NAME 2,GOUT,GUPDATE 66S2 LDX 0 GJOBS(2) 67?L STO 0 GOUTYPE(2) 67R= ALTLEND 2,GOPTY+1-A1 68=W STOZ ALFWORDS(2) 68QG STOZ ALFTRANS(2) 69=6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFCCAT https://www.george3.co.uk/george/macro/lfccat?rev=1705492539&do=diff LFCCAT (GIN Macro) Defined in: MACROS LEF Used in: IDFCANC867 69FY ...[??? LFCCAT SECT DEVT FGN 2 DOC 69PQ #MAC LFCCAT 6=9B [THIS DOES THE SAME AS LFAT,EXCEPT THAT THE ATTRIBUTION 6=P2 [IS NOW BEING CANCELLED 6?8L DOWN LISTEND,6 6?N= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFCHAIN https://www.george3.co.uk/george/macro/lfchain?rev=1705492539&do=diff LFCHAIN (GIN Macro) Defined in: MACROS LEF Used in: LISTEND867, LISTNEXT867, LISTPARS867, LISTPROC867, WLC867, WLE862 6?Y4 ...[??? LFCHAIN SECT DEVT FGN 12 DOC 6#7W #MAC LFCHAIN 6#MG [THIS MACRO CHAINS THE NEXT BLOCK OF TYPE %A,SUBTYPE %B 6*76 [IN THE CORRECT POSITION IN THE LFCHAIN 6*8T ...#UNS HWLSLCH 6*=J ...( 6*#? ... MHUNT 1,%A,%B 6*B2 ... CHAIN 1,BLF+1 6*CP ...) 6*FD ...#UNS HWLSLCH 6*H7 ...#SKI 6*JW ...( 6*LQ [X3 IS USED … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFCHANGE https://www.george3.co.uk/george/macro/lfchange?rev=1705492539&do=diff LFCHANGE (GIN Macro) Defined in: MACROS LEF Used in: 7KD8 ...[??? LFCHANGE SECT DEVT FGN 2 DOC 7KN2 #MAC LFCHANGE 7L7L [THIS MACRO IS FOR USE BY CHANGELIST TO REPOSITION THE SPECIFIED ENTRY I 7LM= [:SYSTEM.OUTPUT AT A NEW URGENCY. 7M6W [AFTER EXECUTION THE FILE READ POINTERS WILL BE POSITIONED AFTER THE OLD 7MLG [SITE OF THE REQUEST. 7N66 [%A AND %B HOLD INDEX KEYS OF REQUEST 7NKQ [%C CONTAINS THE NEW URGENCY 7P5B IFACC %A,ACOMMUNE1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFCLOSE https://www.george3.co.uk/george/macro/lfclose?rev=1705492539&do=diff LFCLOSE (GIN Macro) Defined in: MACROS LEF Used in: CLOSEND867, DTREST860 7R?N ...[??? LFCLOSE SECT DEVT FGN 2 DOC 7RHG #MAC LFCLOSE 7S36 #ACC %A 7SGQ LDX 0 %A 7T2B SMO FX2 7TG2 #ACC %A 7T^L STO 0 ACOMMUNE1 7WF= #ACC %A 7WYW #SKI 7XDG STO %A ACOMMUNE1 7XFR ...#UNS AWLSZ 7XH4 ...( 7XHF ...#STR %B 7XHW ...( 7XJ* ...#ACC %B 7XKL ... LDX 0 %B 7XLX ... SMO FX2 7XN8 ...#A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFDBAID https://www.george3.co.uk/george/macro/lfdbaid?rev=1705492539&do=diff LFDBAID (GIN Macro) Defined in: MACROS LEF Used in: 7YCX ...[??? LFDBAID SECT DEVT FGN 2 DOC 7YD5 ...#MAC LFDBAID 7YDD ...[ SPECIAL DEBATCHING AID FOR A SERVICE 7YDR ...#STR %A,ON 7YF6 ...#SKI 7YFF ...( 7YFS ...#STR %A 7YG7 ...#STR %A,O 7YGG ...( 7YGT ...#MEN LISTFIND 7YH8 ...#TRA K60LISTFIND 7YHH ... NULL 7YHL ...#TRA K62LISTFIND 7YHP ... NULL 7YHW ...#END 7YJ9 ...#MEN LISTPARS 7YJJ ...#TRA K60LISTPARS 7YJX ... NULL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFDEBATCHERS https://www.george3.co.uk/george/macro/lfdebatchers?rev=1705492539&do=diff LFDEBATCHERS (GIN Macro) Defined in: MACROS LEF Used in: 7YWY ...[??? LFDEBATC SECT DEVT FGN 2 DOC 7YXB #MAC LFDEBATCHERS 7^C2 [IMPLEMENTS SPECIAL DEBATCHING AID 7^WL #STR %A,ON 82B= #SKI 82TW ( 83*G #STR %A 83T6 #STR %A,O 84#Q ( 84SB #MEN LISTINIT 85#2 #TRA K50LISTINIT 85RL NULL 86?= #TRA K52LISTINIT 86QW NULL 87=G #TRA K54LISTINIT 87Q6 NULL 889Q #END 88PB #MEN L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFDEL https://www.george3.co.uk/george/macro/lfdel?rev=1705492539&do=diff LFDEL (GIN Macro) Defined in: MACROS LEF Used in: LISTEND867, LISTPROC867 8PJD ...[??? LFDEL SECT DEVT FGN 2 DOC 8PS= #MAC LFDEL 8Q?W [THIS MACRO DELETES AN ENTRY FROM SYSOUT 8QRG [%A AND %B ARE INDEX KEYS 8R?6 [%C = GETPER THEN REPLY INDICATES REASON 8RQQ [%C = LOSTM THEN MAINFILE LOST IN LFLOST MACRO 8S=B [%C = LOSTS THEN SETUP FILE LOST IN LFLOST MACRO 8SQ2 [%C = SLIST THEN STOPLIST 8T9L #ACC %A 8TP= LDX 0 %A 8W8W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFEJCNT https://www.george3.co.uk/george/macro/lfejcnt?rev=1705492539&do=diff LFEJCNT (GIN Macro) Defined in: MACROS LEF Used in: CONNECT867, LOGOUT867 9#KS ...[??? LFEJCNT SECT DEVT FGN 2 DOC 9#TL #MAC LFEJCNT 9**= [THIS MACRO OBTAINS A COUNT OF LISTFILES INITIATED BY A JOB. 9*SW [%A TO CONTAIN NUMBER FOR SAME CLUSTER 9B#G [%B TO CONTAIN NUMBER FOR OTHER CLUSTER 9BS6 [%C TO CONTAIN NUMBER FOR MULTIFILES WHICH ARE STILL BEING WRITTEN 9C?Q [IT EXPECTS ALFCNT TO BE SET UP AS FOLLOWS 9CRB [B12 -23 COUNT FOR THIS CLUSTER 9D?2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFEND https://www.george3.co.uk/george/macro/lfend?rev=1705492539&do=diff LFEND (GIN Macro) Defined in: MACROS LEF Used in: IPBLISTA867, IPBLISTC867, IPBLISTD867, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNEXT867, LISTOPEN867, LISTPREP865, LISTTPCP867, PCTLISTA867, PCTLISTB867, RENGAGE851 =8DD ...[??? LFEND SECT DEVT FGN 2 DOC =8N= #MAC LFEND =97W [THIS MACRO TIDIES UP WHEN A LISTFILE IS FINISHED. =9MG [%A IS 'TE' OR 'CD' OR 'EB' OR ABSENT ==76 [%B IS RESTART LINE NUMBER IF %A 'CD' ==LQ LDX 2 FX2 =?6B #STR %A =?L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFENDTHROW https://www.george3.co.uk/george/macro/lfendthrow?rev=1705492539&do=diff LFENDTHROW (GIN Macro) Defined in: MACROS LEF Used in: =WCJ ...[??? LFENDTHR SECT DEVT FGN 2 DOC =WMB #MAC LFENDTHROW =X72 #STR %A,ON =XLL #SKI =Y6= ( =YKW #STR %A =^5G #STR %A,O =^K6 ( ?24Q #MEN LISTINIT ?2JB [THROW THOF BEFORE PRINTING TERMINATORS ?342 #TRA K52LISTINIT ?3HL NULL ?43= #TRA K30LISTINIT ?4GW NULL ?52G #END ?5G6 ) ?5^Q ) ?6FB #STR %A,OFF ?6^2 #SKI ?7DL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFG34VT https://www.george3.co.uk/george/macro/lfg34vt?rev=1705492539&do=diff LFG34VT (GIN Macro) Defined in: MACROS LEF Used in: ?*HY ...[??? LFG34VT SECT DEVT FGN 2 DOC ?*RQ #MAC LFG34VT ?B?B [ALLOWS USER TO WRITE PART OF LF HEADINGS ?BR2 #MEN LISTINIT ?C=L #TRA K40LISTINIT ?CQ= 16HPUT BY %A ?D9W 8H JB': ?DPG #END ?F96 #MEN LISTINTC ?FNQ #TRA K40LISTINTC ?G8B 16HPUT BY %A ?GN2 8H JB': ?H7L #END ?HM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFGETPER https://www.george3.co.uk/george/macro/lfgetper?rev=1705492539&do=diff LFGETPER (GIN Macro) Defined in: MACROS LEF Used in: LISTEND867, LISTPROC867 ?HX4 ...[??? LFGETPER SECT DEVT FGN 2 DOC ?J6W #MAC LFGETPER ?JLG [THIS MACRO ATTEMPTS TO GET A PERIPHERAL AND AN ACTLF TO DRIVE IT ?K66 [FOR A REQUEST IN :SYSTEM.OUTPUT ?KKQ [%A AND %B ARE INDEX KEYS ?L5B [ ?LK2 #ACC %A ?M4L LDX 0 %A ?MJ= SMO FX2 ?N3W #ACC %A ?NHG STO 0 ACOMMUNE1 ?P36 #ACC %A ?PGQ #SKI ?Q2B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFHUNT https://www.george3.co.uk/george/macro/lfhunt?rev=1705492539&do=diff LFHUNT (GIN Macro) Defined in: MACROS LEF Used in: LISTFNDA865, LISTFREE867, LISTOPEN867, LISTPARS867 ?X6D ...[??? LFHUNT SECT DEVT FGN 2 DOC ?XB= #MAC LFHUNT ?XTW [ THIS MACRO LOCATES THE KEY BLOCK IN THE LFCHAIN. ?Y*G [ %A IS TO BE USED AS A CALLING ACCUMULATOR. ?YT6 [ ?^#Q #OPT M1LFHUNT=1 [IDENT. FOR ENSURING CODE COMPILED ONLY ONCE ?^SB #ACC %B #2#2 LDX 4 %B #2RL #ACC %C #3?= LDX 5 %C #3QW #STR %D #4=G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFKEY https://www.george3.co.uk/george/macro/lfkey?rev=1705492539&do=diff LFKEY (GIN Macro) Defined in: MACROS LEF Used in: LISTFILE867, LISTPARS867 #MHN ...[??? LFKEY SECT DEVT FGN 2 DOC #MRG #MAC LFKEY #N?6 # THIS MACRO CREATES A PAIR OF INDEX KEYS AND STORES THEM #NQQ # IN A GOUT/INFO.IT MUST ONLY BE ISSUED BY A CPA. #P=B # %A IF ABSENT THEN X2 MUST = FX2 #PQ2 # IF PRESENT THEN IS POINTER TO JOBLOCK #Q9L # %B MUST CONTAIN POINTER TO GOUT/INFO #QP= # ON EXIT X2=FX2 #R8W #ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFLOST https://www.george3.co.uk/george/macro/lflost?rev=1705492539&do=diff LFLOST (GIN Macro) Defined in: MACROS LEF Used in: SCHEDENX860 *6N4 ...[??? LFLOST SECT DEVT FGN 2 DOC *6XW #MAC LFLOST *7CG MHUNTW 1,FILE,FABSNB *7X6 LDX 2 BLF+1 *8BQ CHAIN 1,2 *8WB STARTACT OUT *9B2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFMAX https://www.george3.co.uk/george/macro/lfmax?rev=1705492539&do=diff LFMAX (GIN Macro) Defined in: MACROS LEF Used in: *9BF ...[??? LFMAX SECT DEVT FGN 2 DOC *9BY ...#MAC LFMAX *9CC ...# THIS MACRO ALLOWS USERS TO SET A LIMIT ON THE NUMBER *9CW ...# OF LISTFILES ISSUED TO LOCAL DEVICES-(%A) *9D* ...# AND TO REMOTE DEVICES-(%B) BY ANY JOB *9DS ...#MEN LISTFREE *9F? ...#TRA K61LISTFREE *9FQ ...#STR %A *9G9 ...#SKI *9GN ... +64 [DEFAULT IS 64 AS NO %A *9H7 ...#STR %A *9HL ...( *9J5 ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFMULT https://www.george3.co.uk/george/macro/lfmult?rev=1705492539&do=diff LFMULT (GIN Macro) Defined in: MACROS LEF Used in: USERSTRM867 *9TL ...[??? LFMULT SECT DEVT FGN 2 DOC **?2 #MAC LFMULT **QL [THIS MACRO IS FOR USE IN USEROPEN.IT REPLACES A GOUT/KEY *B== [BLOCK IN THE LFCHAIN BY A SUITABLY UPDATED GOUT,INFO *BPW [ *C9G LDX 0 %A *CP6 SMO FX2 *D8Q STO 0 ACOMMUNE1 *DNB LDX 0 %B *F82 SMO FX2 *FML STO 0 ACOMMUNE2 *G7= DOWN LISTPA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFNOTFIN https://www.george3.co.uk/george/macro/lfnotfin?rev=1705492539&do=diff LFNOTFIN (GIN Macro) Defined in: MACROS LEF Used in: FINISH867 *GWN ...[??? LFNOTFIN SECT DEVT FGN 2 DOC *H6G [ *HL6 #MAC LFNOTFIN *J5Q [THIS MACRO BRANCHES TO %A IF LF SYSTEM NOT IEADY FOR CLOSE DOWN *JKB BUSACT OUT,%A *K52 POINTACT OUT,1 *KJL M1LFNOTFIN *L4= LDN 0 JOBRING(1) *LHW TXU 0 JOBRING(1) *M3G BCS %A *MH6 LDN 0 BLF *N2Q TXU 0 BLF *NGB BCS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFNTOGEOG https://www.george3.co.uk/george/macro/lfntogeog?rev=1705492539&do=diff LFNTOGEOG (GIN Macro) Defined in: MACROS EWDAS Used in: READFAIL866, READFALE866 X#F= # X#YW ...[??? LFNTOGEOG X*DG # ******** X*Y6 #MAC LFNTOGEOG XBCQ # XBXB FINDBSA %B XCC2 LGEOG ,%A XCWL #STR %A,2 XDB= LDX 2 FX2 XDTW #STR %A,1 XF*G LDX 1 FX1 XFT6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFPACTLF https://www.george3.co.uk/george/macro/lfpactlf?rev=1705492539&do=diff LFPACTLF (GIN Macro) Defined in: MACROS LEF Used in: PAGES867, REPERT867 *P9S ...[??? LFPACTLF SECT DEVT FGN 2 DOC *PFL [ *P^= #MAC LFPACTLF *QDW #ACC %A *QYG LDX 0 %A *RD6 SMO FX2 *RXQ #ACC %A *SCB STO 0 ACOMMUNE1 *SX2 #ACC %A *TBL #SKI *TW= STO %A ACOMMUNE1 *W*W POINTACT OUT,%B *WTG ADN %B JOBRING *X*6 SMO FX2 *XSQ STO %B ACOMMUNE2 *Y#B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFPAPERSAVE https://www.george3.co.uk/george/macro/lfpapersave?rev=1705492539&do=diff LFPAPERSAVE (GIN Macro) Defined in: MACROS LEF Used in: B7BY ...[??? LFPAPERS SECT DEVT FGN 2 DOC B7LQ #MAC LFPAPERSAVE B86B [CONTROLS PAGETHROW AFTER EBI B8L2 #STR %A,ON B95L #SKI B9K= ( B=4W #STR %A B=JG #STR %A,O B?46 ( B?HQ #MEN LISTINIT B#3B #TRA K18LISTINIT B#H2 LDX 0 AWORK1(2) B*2L BZE 0 K19LISTINIT [J IF EBI B*G= #END B*^W ) BBFG ) BB^6 #STR %A,OFF BCDQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFPRINT https://www.george3.co.uk/george/macro/lfprint?rev=1705492539&do=diff LFPRINT (GIN Macro) Defined in: MACROS LEF Used in: BKJ4 ...[??? LFPRINT SECT DEVT FGN 2 DOC BKRW #MAC LFPRINT BL?G #MEN LISTEXCP BLR6 #TRA K50LISTEXCP BM=Q %A BMQB #END BN=2 #MEN LISTINIT BNPL #TRA K57LISTINIT BP9= NULL BPNW #END BQ8G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFRECNUM https://www.george3.co.uk/george/macro/lfrecnum?rev=1705492539&do=diff LFRECNUM (GIN Macro) Defined in: MACROS LEF Used in: LISTEND867, LISTFIND867, LISTFNDA865, LISTFREE867, LISTSEAR867, LOCATE84, WLD864, WLF862, WLG862 BQD# ...[??? LFRECNUM SECT DEVT FGN 2 DOC BQN6 #MAC LFRECNUM BR7Q [ THIS MACRO DETERMINES THE NUMBER OF BLOCKS IN AN ENTRY BRMB [ IN SYSOUT OR THE LFCHAIN BS72 [ BSLL [ %A IS AN ACCUMULATOR TO CONTAIN THE ANSWER,NOT X0 BT6= [ %B IS A WORD CONTAINING A COPY OF GMODE BTKW [ X0 IS ZEROISED BW5G [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFSIZE https://www.george3.co.uk/george/macro/lfsize?rev=1705492539&do=diff LFSIZE (GIN Macro) Defined in: MACS LIST Used in: COMPOST867 27DX ...[ 27DY ...[ 27D^ ...[ TO GET THE SIZE OF A FILE OR ELEMENT IN A GOUT/GESIZE BLOCK 27F2 ...#MAC LFSIZE 27F3 ...#ACC %A 27F4 ... LDX 0 %A 27F5 ... SMO FX2 27F6 ...#ACC %A 27F= ... STO 0 ACOMMUNE1 27FB ...#ACC %A 27FG ...#SKI 27FL ... STO %A ACOMMUNE1 27FQ ...#STR %B 27FW ...( 27G2 ...#ACC %B 27G6 ... LDX 0 %B 27G= ... SMO FX2 27G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFSOFTDEFLT https://www.george3.co.uk/george/macro/lfsoftdeflt?rev=1705492539&do=diff LFSOFTDEFLT (GIN Macro) Defined in: MACS LIST Used in: 27D? ...[ 27D# ...[ MACRO TO ALTER THE SOFTWARE DEFAULT LOOP FOR LP4B PRINTERS 27D* ...#MAC LFSOFTDEFLT 27DB ...#SKI %A 27DC ...( 27DD ...#SKI %B 27DF ...( 27DG ...#MEND FORMLOOP 27DH ...#TRA K40FORMLOOP 27DJ ... +0 27DK ...#FID 1,8,%A<96 27DL ...#FID 15,15,1 27DM ...#TRA K41FORMLOOP 27DN ... +0 27DP ...#FID 1,8,%B<96<%A-1 27DQ ...#FID 23,23,1 27DR ...#END 27DS ...) 27D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFSTARTJL https://www.george3.co.uk/george/macro/lfstartjl?rev=1705492539&do=diff LFSTARTJL (GIN Macro) Defined in: MACS LIST Used in: 27J6 ...[ 27J= ...[ RESTORE TIME MACRO TO SWITCH ON START OF LF MESSAGE 27JB ...#MAC LFSTARTJL 27JG ...#UNS ASTRTJL 27JL ...( 27JQ ...#STR %A,ON 27JW ...#SKI 27K2 ...( 27K6 ...#STR %A 27K= ...#STR %A,0 27KB ...( 27KG ...#MEND LISTOPEN 27KL ...#TRA K50LISTOPEN 27KQ ... NULL 27KW ...#END 27L2 ...) 27L6 ...) 27L= ...#STR %A,OFF 27LB ...#SKI 27LG ...( 27LL ...#STR OFF,%A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFTHAW https://www.george3.co.uk/george/macro/lfthaw?rev=1705492539&do=diff LFTHAW (GIN Macro) Defined in: MACROS LEF Used in: LISTFNDA865, LISTFREE867, LISTNEXT867, LISTOPEN867 C48S ...[??? LFTHAW SECT DEVT FGN 2 DOC C4DL #MAC LFTHAW C4Y= DOWN LISTEND,2 C5CW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFTHROW https://www.george3.co.uk/george/macro/lfthrow?rev=1705492539&do=diff LFTHROW (GIN Macro) Defined in: MACROS LEF Used in: C5MN ...[??? LFTHROW SECT DEVT FGN 2 DOC C5XG #MAC LFTHROW C6C6 [CONTROLS BLANK PAGE BETWEEN LP LFS C6WQ #STR OFF,%A C7BB #SKI C7W2 ( C8*L #STR %B C8T= #SKI C9#W ( C9SG LFTHROW OFF,LOCAL C=#6 LFTHROW OFF,REMOTE C=RQ ) C??B #STR LOCAL,%B C?R2 #SKI C#=L ( C#Q= #MEN LISTINIT C*9W #TRA K70LISTINIT C*PG LDN 0 0 CB96 #E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFUIJPC https://www.george3.co.uk/george/macro/lfuijpc?rev=1705492539&do=diff LFUIJPC (GIN Macro) Defined in: MACROS LEF Used in: CX#2 #MAC LFUIJPC CXRL LDX 0 %A CY?= ADN 0 2 CYQW BZE 0 %B C^=G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFUN https://www.george3.co.uk/george/macro/lfun?rev=1705492539&do=diff LFUN (GIN Macro) Defined in: MACROS SJ Used in: C9X5 ...[ C9^N ...[ C=4# ...[??? LFUN SECT FILE FGN 24 DOC C=#6 #MAC LFUN [P,F,A A=0 BY DEFAULT C=RQ #SKI %B&#37-23<1-1 C??B ( C?R2 #DEF 20?=%B@L-19+1 C#=L #SKI 20?-9<1$1 C#Q= ( C*9W [ 9 BITS C*PG OP %A,%B,LDEX,%C [LS BIT = 23 CB96 #EXI CBNQ ) CC8B #SKI 20?-24<1$1 CCN2 ( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LFWLINFO https://www.george3.co.uk/george/macro/lfwlinfo?rev=1705492539&do=diff LFWLINFO (GIN Macro) Defined in: MACS LIST Used in: LISTEND867, WLOUT865 27N2 ...[ 27N6 ...[ TO FIND THE WLSIZE WORD IN A GOUT/INFO BLOCK 27N= ...#MAC LFWLINFO 27NB ...[ ASSUMES WLSIZE BIT HAS BEEN CHECKED TO BE SET 27NG ...[ EXPECTS X3 TO CONTAIN PTR TO BLOCK PAST A1 27NL ...[ OR PTR TO RECORD AFTER A STEP 27NQ ...[ USES X0,X6,X2 27NW ...[ LEAVES X2 POINTING TO WLSIZE WORD 27P2 ... LDN 2 GHEAD-A1-1 27P6 ... LDX 0 GSUSE-A1(3) 27P= ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LGEOG https://www.george3.co.uk/george/macro/lgeog?rev=1705492539&do=diff LGEOG (GIN Macro) Defined in: MACS SPC Used in: ANTIC867, ATTACHA8, CAFSCTRL866, CAFSINFO866, CAFSPERI867, CARTCONT867, CDUM866, CLOSBAC867, CLOSEMT867, COREALLH860, DETACH867, DETACHB867, DOC867, DRUM852, DUMMYA867, DUMMYB867, ENGAGE867, FINDRUM866, FREEPER867, GETFREE867, GETFREEB864, GETONA867, GROPE867, HARDWARA8, HLSREAD867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, IDFLINE867, IDFOFF867, IDFSCON867, IPBCONS867, IPBERROR867, IPBINB867, IPBINC865, IPBJOURN867, IPBOUT867, IPBSCAN867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LGPERIS https://www.george3.co.uk/george/macro/lgperis?rev=1705492539&do=diff LGPERIS (GIN Macro) Defined in: MACS SPC Used in: CARTCONT867, IPCONE865, MOPCOM867, MOPCOMB865, RELPER867, UNLOADMT867 C9SG #MAC LGPERIS C=#6 MODD LDX %B JK52H,%A,CPPTR(2) C=RQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LIMBO https://www.george3.co.uk/george/macro/limbo?rev=1705492539&do=diff LIMBO (GIN Macro) Defined in: MACROS HL Used in: BCAST867, COMPROB867, CONNECT867, CONNECTA867, LOGOUT867, MESSBI, MESSCE, MESSCG, MESSDA, MONFILE867 3GSG # THIS MACRO TESTS TO SEE IF AN ACTIVITY IS IN LIMBO 3H#6 # 3HRQ #MAC LIMBO 3J?B #STR %A 3JR2 ( 3K=L LDBIT 9,%A 3KQ= MODD ANDX %A EXT+11,%B,FX2 3L9W ) 3LPG #STR %A 3M96 #SKI 3MNQ ( 3N8B LDBIT 9,0 3NN2 MODD ANDX 0 EXT+11,%B,FX2 3P7L ) 3PM=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LINECTRL https://www.george3.co.uk/george/macro/linectrl?rev=1705492539&do=diff LINECTRL (GIN Macro) Defined in: MACS SPC Used in: CHTAB, INKS, LINECTRL864, WHATPERB867 C*PG #MAC LINECTRL CB96 '153 %A %B CBNQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LINK https://www.george3.co.uk/george/macro/link?rev=1705492539&do=diff LINK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ADDICT865, ASSIGN860, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BMAPTWO860, BMCNTRL866, BMJLIST864, BMSJRNL866, CAFSCTRL866, CAFSPERI867, CDCIPB864, CHARGESC867, CLOSEONE867, CONIPB8, CONMXA85, CONMXB8, CONMXC8, CONSTANT864, CONTINUE867, COPYFILE867, CORESHED861, DETACH867, DETACHB867, EVENTS864, FHLIST867, FREEBUFF860, HLSEVENT867, HLSREAD867, IPCEN8, IPCOPENA83, IPCOPENB83, IPCPERI83, IPCSTART864, JAMSWAP865, MESSBA, MESSB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LINKSET https://www.george3.co.uk/george/macro/linkset?rev=1705492539&do=diff LINKSET (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ACCESS867, ADDICT865, ANTIC867, ASSIGN860, BACKMAP864, BACKMASS860, BACKROOM865, BMAPTWO860, BMCNTRL866, BMJLIST864, BMSJRNL866, CAFSCTRL866, CDCIPB864, CHARGESC867, CIMOP867, CLOSEMT867, CLOSEONE867, COMPCHAN84, CONMXC8, CONSOLE867, COOR865, COPYFILE867, CORESHED861, DETACH867, DETACHB867, DRUM852, DSCNCT867, DTSUBSA867, DUMMYB867, ENGAGE867, ERASE867, EVENTFN, FAILTWIN866, FHLIST867, FINISH867, FINISHB867, FREEBUFF860, FREEPE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LINT https://www.george3.co.uk/george/macro/lint?rev=1705492539&do=diff LINT (GIN Macro) Defined in: MACS SPC Used in: CDUM866, DUMMYB867, ENGAGE867, FINDRUM866, FREEPER867, IDFCHK867, LOADERDR867, LOADERI867, LOADERII867, MOVCART867, PMDUMP85, PMDUMPDA85, PMDUMPMT85, RELIEF866, SETIDF867, SWITCH867, TWINSET866 CGKQ #MAC LINT CH5B MODD LDEX %B JK52D,%A,CPPTR(2) CHK2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LISTDC2 https://www.george3.co.uk/george/macro/listdc2?rev=1705492539&do=diff LISTDC2 (GIN Macro) Defined in: MACS IPB Used in: 8P#L #MAC LISTDC2 8PS= #STR %A,ON 8Q?W #SKI 8QRG ( 8R?6 #MEN IPBLISTA 8RQQ #TRA K64IPBLISTA 8S=B ADN 4 4 8SQ2 #TRA K65IPBLISTA 8T9L MVCH 4 4 [ CR DC2 8TP= #TRA K60IPBLISTA 8W8W NULL 8WNG NULL 8X86 NULL 8XMQ NULL 8Y7B #TRA K61IPBLISTA 8YM2 NULL 8^6L #TRA K6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LISTFAIL https://www.george3.co.uk/george/macro/listfail?rev=1705492539&do=diff LISTFAIL (GIN Macro) Defined in: MACROS Used in: BSBLFAIL867, TRANFAIL866 BX#J ...[??? LISTFAIL SECT FILE FGN 9 DOC BXJB #MAC LISTFAIL BY42 LDX 0 %A BYHL SMO FX2 B^3= STO 0 ACOMMUNE1 B^GW LDX 0 %B C22G SMO FX2 C2G6 STO 0 ACOMMUNE2 C2^Q ... DOWN RITEFAIL,1 C3FB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LISTMAX https://www.george3.co.uk/george/macro/listmax?rev=1705492539&do=diff LISTMAX (GIN Macro) Defined in: MACROS HFD8 Used in: 66^8 ...[??? LISTMAX SECT FILE FGN 22 DOC 676C ...#MAC LISTMAX 67DS ...#SKI (%A>511-511)^(%A<1-1)<1-1 67R= ...( 68=W ...#MEN COMPOST 68QG ...#TRA K98COMPOST 69=6 ... SBN 0 %A+1 69PQ ...#END 6=9B ...#MEN USERSTRM 6=P2 ...#TRA K98USERSTRM 6?8L ... SBN 0 %A 6?N= ...#END 6#7W ...#EXI 6#MG ...) 6*76 ...! LISTMAX REJECTED - PARAMETER OUT OF RANGE 6*LQ ...#CON LISTMAX REJECTED - PAR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LJOBNO https://www.george3.co.uk/george/macro/ljobno?rev=1705492539&do=diff LJOBNO (GIN Macro) Defined in: MACS SPC Used in: ENGAGE867, HLSREAD867, LIBINSEC864, LIBMANY867, LIBREQ866, TERM867, UNLOAD7, WHATPER867, WHATPERA867, WHATPERB867, WHATPERX867, XENON CMG2 #MAC LJOBNO CM^L LADDP %A,%B CNF= MOD LDX %B APJOBNO,%B CNYW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LMASK https://www.george3.co.uk/george/macro/lmask?rev=1705492539&do=diff LMASK (GIN Macro) Defined in: MACROS JSRG4 Used in: LOADX60 =Y6= #MAC LMASK =YKW LDCT %A #600 =^5G ANDX %A %B =^K6 LDCH %A BTABLENS(%A) [=#00173777 ?24Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LMODEQ https://www.george3.co.uk/george/macro/lmodeq?rev=1705492539&do=diff LMODEQ (GIN Macro) Defined in: MACS SPC Used in: MODE866, MODEA65, RETURNIT867, SETUPA867, TAPEWAIT65, WHATPERA867 CSTW #MAC LMODEQ CT*G MODD LDX %B JK52E,%A,CPPTR(2) CTT6 SRL %B 18 CW#Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LNLI https://www.george3.co.uk/george/macro/lnli?rev=1705492539&do=diff LNLI (GIN Macro) Defined in: MACS SPC Used in: MOPCOMB865, MOPPM84, MOPSTART865, PARSORT867, PROFLAG83, SCAN865, SETIDF867 D2PB #MAC LNLI D392 MODD LDX %B JK52D,%A,CPPTR(2) D3NL SRL %B 15 D48= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LNORM https://www.george3.co.uk/george/macro/lnorm?rev=1705492539&do=diff LNORM (GIN Macro) Defined in: MACROS SJ Used in: C52T ...[ C55D ...[ C584 ...[??? LNORM SECT FILE FGN 24 DOC C5CW #MAC LNORM [F,A C5XG #DEF 21?=23-(%A&#37) [NO TO SHIFT LEFT C6C6 #EXI 21? C6WQ #STR %B C7BB ( C7W2 SLL %B 21? C8*L #EXI C8T= ) C9#W SLL 0 21? C9SG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOADNOW https://www.george3.co.uk/george/macro/loadnow?rev=1705492539&do=diff LOADNOW (GIN Macro) Defined in: MACROS GLJ Used in: CORE867, GETWORD867, LOADPROG865, PROSTART867, SAVE864, SETPRAMA867 4J=S ...[??? LOADNOW SECT CENT FGN 18 DOC 4JGL # 4K2= # 4KFW # 4K^G # 4LF6 #MAC LOADNOW 4LYQ DOWN LOADPROG,3%C 4MDB BRN %A 4MY2 BRN %B 4NCL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOADNUM https://www.george3.co.uk/george/macro/loadnum?rev=1705492539&do=diff LOADNUM (GIN Macro) Defined in: CLOSE-MACROS Used in: ?8MN ...[??? LOADNUM SECT FILE FGN 11 DOC ?8XG # ?=W2 #MAC LOADNUM ??*L #STR %B ??T= ( ?##W #DEF M1LOADNUM=%B ?#SG #SKI M1LOADNUM ?*#6 ( ?*RQ #DEF M2LOADNUM=-M1LOADNUM ?B?B #DEF M3LOADNUM=M1LOADNUM>M2LOADNUM ?BR2 #SKI M3LOADNUM$M1LOADNUM ?C=L ( ?CQ= #STR %C ?D9W MOD LDN %A M1LOADNUM,%C ?DPG #STR %C ?F96 #SKI ?FNQ LDN %A M1LOA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOBJPERIS https://www.george3.co.uk/george/macro/lobjperis?rev=1705492539&do=diff LOBJPERIS (GIN Macro) Defined in: MACS SPC Used in: OLMTB867, OLMTE85, PUTPER85, RELPER867, UNLOADMT867, WSPERIS867 D85= #MAC LOBJPERIS D8JW MODD LDX %B JK52I,%A,CPPTR(2) D94G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOBSFILE https://www.george3.co.uk/george/macro/lobsfile?rev=1705492539&do=diff LOBSFILE (GIN Macro) Defined in: LOBS-MACROS Used in: DEWELL867, LISTDIR867, LISTSTAR867, LOGANAL864, USEROPEN867, WA864, WHATRVSA867, WHTSTAT867, WLC867 7=ND ...[??? LOBSFILE SECT FILE FGN 5 DOC 7=Y= [ 7?CW #MAC LOBSFILE 7?XG #STR %A 7#C6 #SKI 7#WQ ( 7*BB DOWN INCRCUBS,4 7*W2 #EXIT 7B*L ) 7BT= #ACC %A 7C#W #SKI 7CSG ( 7D#6 SMO FX2 7DRQ STO %A ACOMMUNE1 7F?B ) 7FR2 #ACC %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOCFCB https://www.george3.co.uk/george/macro/locfcb?rev=1705492539&do=diff LOCFCB (GIN Macro) Defined in: RING-MACROS Used in: BSPRUNE867, OPENEND865 H55S ...[??? LOCFCB SECT FILE FGN 20 DOC H5*L #MAC LOCFCB H5T= LDN 1 %A H6#W CALL 0 M1LOCFCB H6SG #OPT M2LOCFCB=1 H7#6 #SKI M2LOCFCB H7RQ ( H8?B BRN M3LOCFCB H8R2 #DEF M1LOCFCB=0? H9=L STO 0 GEN0 H9Q= STO 1 GEN1 H=9W LDN 0 3 H=PG LDN 1 GEN2 H=^# ... MOVE 0 5 H?DY ...[ ACC USE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOCK https://www.george3.co.uk/george/macro/lock?rev=1705492539&do=diff LOCK (GIN Macro) Defined in: COREMACROS Used in: ADDICT865, ASSIGN860, BACKMAP864, BMCNTRL866, BMJLIST864, BMSJRNL866, BSBLFAIL867, BSTS867, CARTCONT867, CLOSEONE867, COMPCHAN84, CORE867, COREALLF867, EMSENG864, ERASE867, FINDRUM866, GETNO865, GIVE867, INCEOT865, INLOOP84, IPBERROR867, IPBSCAN867, IPBSTARB867, IPBSTART867, IPCONG8, IPCOPENA83, IPCOPENB83, IPCPERI83, IPCSTART864, KARTCONT867, LABEL866, LIBREQCA867, LISTDEV866, LISTNIP865, LOADERR70, LOADFIN860, LOADPROG865, MONITOR36, MTDUMP86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOCKC https://www.george3.co.uk/george/macro/lockc?rev=1705492539&do=diff LOCKC (GIN Macro) Defined in: COREMACROS Used in: BACKMAP864, BMCNTRL866, BMSJRNL866, BRADDATA867, BRADEMUL867, CONMXA85, CONTXCOD60, CREATE867, DRUM852, FLAW866, FLAWMAP866, GETWORD867, GROPE867, INCEOT865, INCMON865, INCSTART865, INLOOP84, INRESTAR84, IPBIN867, IPBOUT867, LABEL866, LIBLOAD867, LIBLOADB867, LISTINIT867, LISTINTC865, LISTLOOP867, LISTNEXT867, LISTTPCP867, LOAD60, LOADPROG865, MOPOUT85, MOPSTART865, MOVCART867, MULTIPLX864, OLMTB867, OLMTE85, OPER864, OPERA864, OPERIN867, PATC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOCKCA https://www.george3.co.uk/george/macro/lockca?rev=1705492539&do=diff LOCKCA (GIN Macro) Defined in: MACROS JSR Used in: BEXTRA83, CIMOP867, CONIPB8, CONMXA85, CONMXC8, CPOBJ6, CROBJ6, DROBJ864, DRSTART6, DRUM852, FHLIST867, FHOBJ860, FHOBJBL860, FHOBJIND860, IPCEN8, IPCOPENB83, IPCPERI83, LPOBJ6, LPTWO7, NETOFLNE867, PERION867, SIMULPTR60, TPOBJ867, TROBJ867, VIPBPERI864 FBML #MAC LOCKCA [J S.RAYNER GEORGE 3 VERSION FC7= #STR %C FCLW ( FD6G LDX %C %B FDL6 MOD ADX %C ADATUM,%A FF5Q ) FF#2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOCKM https://www.george3.co.uk/george/macro/lockm?rev=1705492539&do=diff LOCKM (GIN Macro) Defined in: MACROS EWDAS Used in: CONTRACT866, EXINONE867, NEXTUNIT867 6R#= # 6RRW [??? LOCKM 6S?G # ***** 6SR6 #MAC LOCKM 6T=Q # 6TQB LDX 0 %A 6W=2 SMO FX2 6WPL STO 0 ACOMMUNE8 6X9= #STR %B 6XNW LDX 0 %B 6Y8G SMO FX2 6YN6 STO 0 ACOMMUNE9 6^7Q DOWN REQCART,10 6^M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOGACCESS https://www.george3.co.uk/george/macro/logaccess?rev=1705492539&do=diff LOGACCESS (GIN Macro) Defined in: MACROS HFD8 Used in: ANTIC867, DEAD867, ERASEA867, LIBREQCA867, LIBSEC867, LOGCOM864, MAKEFILE863, NEWOWN865, RENAME864, RENAMEMT867, RETURN867, TRAPCHEC867, TRAPGO864, TRAPLIST864, USERLIB867, USEROPEN867, USERSTRM867 7?XG ...[???? LOGACCESS SECT FILE FGN 22 DOC 7#C6 ...#MAC LOGACCESS 7#WQ ...#STR %B 7*BB ... ACCSTO %B,ACOMMUNE1,FX2 7*W2 ... LDN 0 %A 7B*L ... LDX 2 FX2 7BT= ... STO 0 ACOMMUNE2(2) 7C#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOGALL https://www.george3.co.uk/george/macro/logall?rev=1705492539&do=diff LOGALL (GIN Macro) Defined in: MACROS HFD8 Used in: 7YCQ ...[????LOGALL SECT FILE FGN 22 DOC 7YXB ...#MAC LOGALL 7^C2 ...#STR OFF,%A 7^WL ...#SKI 82B= ... RESOFF JLOGALL 82TW ...#STR OFF,%A 83*G ...( 83T6 ...#STR %A 84#Q ...! %A MAY ONLY BE 'OFF' 84SB ...#STR %A 85#2 ...#SKI 85RL ... RESON JLOGALL 86?= ...) 86QW ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOGANAL https://www.george3.co.uk/george/macro/loganal?rev=1705492539&do=diff LOGANAL (GIN Macro) Defined in: MACROS MACB Used in: CHTAB, CONNECT867, INKS, LOGOUT867 6MM4 ...[??? LOGANAL SECT CENT FGN 2 DOC 6MWW #MAC LOGANAL 6NBG DOWN BLOGNAL,1 6NW6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOGAUT https://www.george3.co.uk/george/macro/logaut?rev=1705492539&do=diff LOGAUT (GIN Macro) Defined in: MACROS HFD8 Used in: 7HPG ...[????LOGAUT SECT FILE FGN 22 DOC 7J96 ...#MAC LOGAUT 7JNQ ...#STR OFF,%A 7K8B ...#SKI 7KN2 ...( 7L7L ...#MEN LOGACC 7LM= ...#TRA K50LOGACC 7M6W ... MONOUT JLOGACC,,NONAUT 7MLG ... BRN K51LOGACC 7N66 ...#END 7NKQ ...) 7P5B ...#STR OFF,%A 7PK2 ...( 7Q4L ...#STR %A 7QJ= ...! %A MAY ONLY BE 'OFF' 7R3W ...#STR %A 7RHG ...#SKI 7S36 ...( 7SGQ ...#MEN LOGACC 7T2B ...#TRA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOGOUTBI https://www.george3.co.uk/george/macro/logoutbi?rev=1705492539&do=diff LOGOUTBI (GIN Macro) Defined in: MACRO COMPRO Used in: HTQW ...[???? LOGOUTBI HW=G ...[ LOGOUTBI - RESTORE TIME MACRO TO SWITCH ON OR OFF HWQ6 ...[ A FACILITY TO ALLOW LOGOUT IN BREAKIN CONTEXT OR HX9Q ...[ FROM A MACRO HXPB ...#MAC LOGOUTBI HY92 ...#STR ON,%A HYNL ...#STR H^8= ...( H^MW ... FORBID LT,BREAKIN J27G ... CHANGE LT,BREAKIN J2M6 ...#MEN LOGOUT J36Q ...#TRA K20LOGOUT J3LB ... LDN 6 1 J462 ...#END J4KL ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGCLEAR https://www.george3.co.uk/george/macro/longclear?rev=1705492539&do=diff LONGCLEAR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CONMXA85, CONSROOT867, DETACH867, DETACHB867, FAILTWIN866, HARDIDF867, INTWIN866, ONLINCL864, PROFLAG83, TWINSETA866, TWINSETB866, TWINSETD866 6KNJ ...[??? LONGCLEA SECT CENT FGN 32 DOC 6KYB # THIS MACRO PUTS A SPECIFIED ACTIVITY IN A CONG WAIT ON THE LIST 6LD2 # 6LXL #MAC LONGCLEAR 6MC= #STR %A,2 6MWW LDX 2 %A 6NBG LDEX 0 CLONG1(2) 6NW6 SBN 0 %B 6P*Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGCOOR https://www.george3.co.uk/george/macro/longcoor?rev=1705492539&do=diff LONGCOOR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CIMOP867, CLOSEALT864, CLOSEFUL867, CLOSEND867, LISTNIP865, PERFCHAP866 L8FG ...#MAC LONGCOOR L8^6 ...#STR %B L9DQ ...#SKI L9YB ...( L=D2 ... SMO FX2 L=XL ... STOZ CLONG3 L?C= ...) L?WW ...#STR %B L#BG ... ACCSTO %B,CLONG3,FX2 L#W6 ...MWATE L**Q ...#STR %A%B L*TB ... LDN 1 #4000 LB*2 ...#STR %A%B LBSL ...#SKI LC#= ... LDN 1 0 LCRW ... CALL 0 (COOR3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGHALT https://www.george3.co.uk/george/macro/longhalt?rev=1705492539&do=diff LONGHALT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: INCWAIT860, MOPCOM867, MOPCOMB865, PERFCHAP866, TWINSET866 GFSL ...#MAC LONGHALT GG#= ...#STR %C GGRW ...#SKI GH?G ...( GHR6 ... SMO FX2 GJ=Q ... STOZ CLONG3 GJQB ...) GK=2 ...#STR %C GKPL ... ACCSTO %C,CLONG3,FX2 GL9= ... LDN 1 #6000+%B GLNW ... CALL 0 (COOR3LW2) GM8G ... BRN %A GMN6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGLOCK https://www.george3.co.uk/george/macro/longlock?rev=1705492539&do=diff LONGLOCK (GIN Macro) Defined in: COREMACROS Used in: TAPEWAIT65 54W4 ...[??? LONGLOCK SECT CENT FGN 32 DOC 555W # 556^ ...#MAC LONGLOCK 5584 ... MOD LDX 2 ALOGLEN,%A 5597 ... CALL 0 (GCORE) 55== ... +HMANDAT+HLONGLOCK:0 55?* ...#STR %B 55#D ... CALL 1 %B 55*H ... BLOCKCOPY 55*R ... LDN 0 #4 [SET THE LONGLOCK BIT 55B3 ... SMO BDESTN 55B? ... ORS 0 AFLAG 55BL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGOFF https://www.george3.co.uk/george/macro/longoff?rev=1705492539&do=diff LONGOFF (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ADDJOB867, CIMOP867, CLOSEMT867, DEMAND860, DTSUBSA867, ENWELLB867, GETFREEB864, HLSEVENT867, INCSET865, IPBERROR867, IPBLISTC867, IPBMOP867, IPBMOPB867, IPBMOPC867, LIBINSEC864, LIBMANY867, LIBREQC867, LIBSEC867, LISTFREE867, LISTNIP865, MOPOUT85, MOVCART867, OLPODD865, ONLINEA867, OPENWAIT867, OPENWORK866, ORELHALF82, ORELMAIN867, PCTCON8, PERFCHAP866, PERFPASS864, QUESCOM867, READBULK867, RENAME864, RENGAGE851, REQCART866, SAVEJOB865, S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGON https://www.george3.co.uk/george/macro/longon?rev=1705492539&do=diff LONGON (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ADDJOB867, ANSCOM865, APPEND864, BSUNJAM867, CARTCONT867, CLOSBAC867, CLOSDEL867, CLOSEND867, CLOSFREZ867, COMMFILE82, DEAD867, DOC867, DTSTART867, DUMP860, ENGAGE867, ERASEA867, FAILTWIN866, FINISH867, FREEPER867, GETBAX865, INCEND865, INCSTART865, INSTPARA867, INTWIN866, IPBCCB867, IPBCCD867, IPCOND864, KARTCONT867, LIBLOAD867, LIBLOADB867, LIBMANY867, LIBREQC867, LIBREQCA867, LIBSEC867, LISTEND867, MAKEFILE863, MOPCOM867, MOPCOMB865, MTD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGON1 https://www.george3.co.uk/george/macro/longon1?rev=1705492539&do=diff LONGON1 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ATTRIBUT867, CIOUT8, CLOSEND867, CLOSEONE867, COREALL865, DTSUBSS867, ENGAGE867, GLOBALS867, GROPE867, IPBIN867, IPBOUT867, IPBSTARB867, LISTNEXT867, LISTOPEN867, LISTPREP865, LISTPROC867, MOPCOM867, PAGES867, PERFPASS864 LJ8G ...[??? LONGON1 SECT CENT FGN 32 DOC LJN6 ...# LK7Q ...# THIS MACRO IS LIKE LONGON BUT ONLY WAKES UP ACTIVITIES WITH LKMB ...# A MATCHING CLONG2 LL72 ...#MAC LONGON1 LLLL ...#STR %B LM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGONALL https://www.george3.co.uk/george/macro/longonall?rev=1705492539&do=diff LONGONALL (GIN Macro) Defined in: CHCHCOORMAC2 Used in: FREEZE864 LQHL ...[??? LONGONAL SECT CENT FGN 32 DOC LR3= ...# LRGW ...# THIS MACROS IS LIKE LONGON BUT WAKES UP ALL ACTS IN SPECIFIED LS2G ...# STYLE REGARDLESS OF THE SUBSIDIARY INFO THEY SPECIFIED. THIS IS LSG6 ...# EXTREMELY DANGEROUS BUT IS REQUIRED FOR CERTAIN SPECIALISED LS^Q ...# FILESTORE FUNCTIONS. LTFB ...# LT^2 ...#MAC LONGONALL LWDL ... LDN 2 BACT+ACTRING LWY= ... LDN 0 %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGSET https://www.george3.co.uk/george/macro/longset?rev=1705492539&do=diff LONGSET (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ADDJOB867, ATTACHC867, CHINERR867, CIMOP867, CLOSEALT864, CLOSEFUL867, CLOSEMT867, CLOSEND867, COMMFILE82, COPYB867, DETACH867, ENGAGE867, ENWELL867, FINDOC867, FORMLOOP865, GETBAX865, GETFREEB864, HLSEVENT867, INCSET865, INLOOP84, INPUTJDF82, INPUTMOP82, INRESTAR84, IPBERROR867, IPBINB867, IPBLISTA867, IPBLISTC867, IPBLISTD867, IPBMOP867, IPBMOPB867, IPBSTARB867, IPCOND864, LIBINSEC864, LIBMANY867, LIBQUERY, LIBREQ866, LIBREQC867, LIBSEC8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGSTOP https://www.george3.co.uk/george/macro/longstop?rev=1705492539&do=diff LONGSTOP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ADDJOB867, ATTACHC867, CHINERR867, CLOSEMT867, COPYB867, DEMAND860, DETACH867, ENWELLB867, HLSEVENT867, INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, INRESTAR84, IPBMOPC867, LIBQUERY, LISTFREE867, LISTNIP865, LOADPROG865, MOPOUT85, NEWDIR867, OFFREL867, OLMTE85, OLPODD865, ONLINEA867, OPENWORK866, ORELMAIN867, PCTCON8, PERFPASS864, QUESCOM867, READBULK867, RENAME864, REQCART866, RETURNIT867, SCHEDENX860, SCHEDMTX867, TAPEWAIT65, TIDYREAD850,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGSTOX https://www.george3.co.uk/george/macro/longstox?rev=1705492539&do=diff LONGSTOX (GIN Macro) Defined in: CHCHCOORMAC2 Used in: IPBINB867, OPENWAIT867, REQCART866 H9W6 ...[??? LONGSTOX SECT CENT FGN 32 DOC H9^6 ...#MAC LONGSTOX H=46 ...#STR %C H=76 ... MONOUTX %C H==6 ...%D LONGSTOP %A,%B H=*6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGTARRY https://www.george3.co.uk/george/macro/longtarry?rev=1705492539&do=diff LONGTARRY (GIN Macro) Defined in: CHCHCOORMAC2 Used in: IPBMOP867, IPBMOPB867 S3^G ...#MAC LONGTARRY S4F6 ...#STR %C S4YQ ...#SKI S5DB ...( S5Y2 ... SMO FX2 S6CL ... STOZ CLONG3 S6X= ...) S7BW ...#STR %C S7WG ... ACCSTO %C,CLONG3,FX2 S8B6 ...MWATE S8TQ ...#STR %B%C S9*B ... LDN 1 #6000 S9T2 ...#STR %B%C S=#L ...#SKI S=S= ... LDN 1 #2000 S??W ... CALL 0 (COOR3LW3) S?RG ... BRN %A S#?6 .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LONGWAIT https://www.george3.co.uk/george/macro/longwait?rev=1705492539&do=diff LONGWAIT (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, COMPROB867, CONNECT867, DUMMYB867, FINISH867, HLSEVENT867, IPBMOPB867, LDSTART850, LIBSEC867, LOADPROG865, SCHDJOBA867, SWITCH867, WAIT867 GQR6 ...#MAC LONGWAIT GQW6 ...#STR %C GQ^6 ... MONOUT %C GR46 ...%D GR76 ...#STR %E GR=6 ...#SKI GR*6 ...( GRD6 ... SMO FX2 GRH6 ... STOZ CLONG3 GRL6 ... LDN 1 #6000+%B-(#62$%B<1*#4000) GRP6 ...) GRS6 ...#STR %E GRX6 ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOOPCH https://www.george3.co.uk/george/macro/loopch?rev=1705492539&do=diff LOOPCH (GIN Macro) Defined in: MACROS JSR Used in: LPTWO7 DR6L # DRL= # LOOPCH,NEXTCH ALLOW EACH CHAR OF AN OBJ PROG AREA TO BE ACCESSED DS5W # IN ASCENDING ORDER OF ADDRESS DSKG # DT56 #MAC LOOPCH [DATUM,MOD,ACC DTJQ ADDRESS %A,%B,%B DTM6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOOPD https://www.george3.co.uk/george/macro/loopd?rev=1705492539&do=diff LOOPD (GIN Macro) Defined in: MACROS JSR Used in: CPOBJ6, LPOBJ6 DK?6 # LOOPD,NEXTD ALLOW ACCESS TO THE WORDS OF AN OBJ. PROG AREA DKQQ # IN DESCENDING ORDER OF ADDRESS DL=B # DLQ2 #MAC LOOPD [DATUM,MOD,ACC DM9L ADX %B %C [ADDRESS OF LAST WORD+1 DMP= SBN %B 1 DN8W ADDRESS %A,%B,%B DNC6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOOPW https://www.george3.co.uk/george/macro/loopw?rev=1705492539&do=diff LOOPW (GIN Macro) Defined in: MACROS JSR Used in: DBDB #MAC LOOPW [DATUM,MOD,ACC DBY2 ADDRESS %A,%B,%B DC6= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOSBSBIT https://www.george3.co.uk/george/macro/losbsbit?rev=1705492539&do=diff LOSBSBIT (GIN Macro) Defined in: MACROS Used in: GETBACK865, GETBAX865 D?QD ...[??? LOSBSBIT SECT FILE FGN 9 DOC D#2= # DP=D ...# DP?K ...# DP#Q ...# DP*X ...#MAC LOSBSBIT DPC4 ... FINDFAIL 2,%A,%B,PFL,MLOSBS3 [GET POINTER TO ENTRY IN BFAIL BLOCK DPD9 ... SBN 2 A1 DPFB ... NGN 0 1 [ -1 TERMINATES ENTRIES DPGH ...MLOSBS1 DPHN ... LDX 1 A1+1(2) [NEXT ENTRY DPJT ... TXU 1 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOSELONG https://www.george3.co.uk/george/macro/loselong?rev=1705492539&do=diff LOSELONG (GIN Macro) Defined in: COREMACROS Used in: TAPEWAIT65 55C7 ...[??? LOSELONG SECT CENT FGN 32 DOC 55CP ...#MAC LOSELONG 55DS ... LDN 0 4 55FX ... MOD ORS 0 AFLAG,%A 55H2 ... MOD ERS 0 AFLAG,%A 55J5 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOSEMACRO https://www.george3.co.uk/george/macro/losemacro?rev=1705492539&do=diff LOSEMACRO (GIN Macro) Defined in: MACINTLUDES Used in: *YS2 [??? LOSEMACR SECT DIAG FGN 9 DOC *^?L #MAC LOSEMACRO [M.C.D. MANN AND J.T. WIFFEN *^R= [ B2=W [ B2QG [ *************** B3=6 [ * LOSEMACRO * B3PQ [ *************** B49B [ B4P2 [ B58L [ LOSEMACRO - THIS MACRO CAUSES GIN TO FORGET THE EXISTENCE OF THE MACRO B5N= [ CALLED %A, SO THAT ANOTHER MACRO OF THE SAME NAME MAY BE COMPILED IN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LOSEPARS https://www.george3.co.uk/george/macro/losepars?rev=1705492539&do=diff LOSEPARS (GIN Macro) Defined in: MACROS RJH Used in: ABANDONA867, DICTWELL867, EDITORA865, INCEOT865, REGEN865 52XJ ...[??? LOSEPARS SECT CENT FGN 71 DOC 537B # 53M2 #MAC LOSEPARS [LOSES ANY PARAMETERS SET UP 546L LDX 2 FX2 54L= LDCT 0 #100 555W ANDX 0 CLONG1(2) 55KG BZE 0 MLOSEPARS 5656 ERS 0 CLONG1(2) 56JQ MFREE GMON,ASET 574B MLOSEPARS 57J2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPLOOP https://www.george3.co.uk/george/macro/lploop?rev=1705492539&do=diff LPLOOP (GIN Macro) Defined in: MACROS LEF Used in: C^G# ...[??? LPLOOP SECT DEVT FGN 2 DOC C^Q6 #MAC LPLOOP D29Q #STR %A,ON D2PB #SKI D392 ( D3NL #STR %A D48= #STR %A,O D4MW ( D57G #MEN LISTINIT D5M6 #TRA K80LISTINIT D66Q LDN 0 #17 D6LB #TRA K81LISTINIT D762 LDN 0 #17 D7KL #TRA K82LISTINIT D85= LDN 0 #17 D8JW #END D94G ) D9J6 ) D=3Q #STR %A,OFF D=HB #SKI D?3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPROP https://www.george3.co.uk/george/macro/lprop?rev=1705492539&do=diff LPROP (GIN Macro) Defined in: MACS SPC Used in: DOC867, DRUM852, ENGAGE867, ERASEX866, GROPE867, HLSREAD867, ILLPERI70, KARTCONT867, LIBLOAD867, LIBREQ866, LIBREQC867, LISTEXCP865, LISTPREP865, LOADERDR867, LOADERI867, MODE866, MODEA65, MOVCART867, NEWOWN865, NEWPW867, OLMTB867, OPCA867, PERFAIL866, PMDUMPDA85, PREPREAD867, REDON867, REPERT867, RIGHT867, SETDISC866, SETUPA867, SPERION867, TAPEWAIT65, TRANSPOT65, UNLOAD7, WHATPERA867, XENON D#^G #MAC LPROP D*F6 MODD LDX %B JK52B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPS https://www.george3.co.uk/george/macro/lps?rev=1705492539&do=diff LPS (GIN Macro) Defined in: MACROS HL Used in: 5*CG ...#MAC LPS 5*X6 ...#STR %A,ON 5BBQ ...( 5BWB ...#STR %A,OFF 5CB2 ...( 5CTL ...! PARAMETER MUST BE ON OR OFF 5D*= ...#EXI 5DSW ...) 5F#G ...#MEN EMSENTER 5FS6 ...#TRA K53EMSENTER 5G?Q ... BRN K52EMSENTER 5GRB ...#END 5H?2 ...#MEN ACCESS 5HQL ...#TRA K51ACCESS 5J== ... 0 5JPW ...#END 5K9G ...#EXI 5KP6 ...) 5L8Q ...#MEN EMSENTER 5LNB ...#TRA K53EMSENTER 5M82 ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPSET https://www.george3.co.uk/george/macro/lpset?rev=1705492539&do=diff LPSET (GIN Macro) Defined in: MACS SPC Used in: LISTPREP865 DGT2 #MAC LPSET DH#L LDN 0 256 DHS= MODD ORS 0 JPSTATE,%A,CPPTR(2) DJ?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPTEST https://www.george3.co.uk/george/macro/lptest?rev=1705492539&do=diff LPTEST (GIN Macro) Defined in: MACS SPC Used in: DN8W #MAC LPTEST DNNG MODD LDX 0 JPSTATE,%A,CPPTR(2) DP86 ANDN 0 256 DPMQ BNZ 0 %B DQ7B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LPUNSET https://www.george3.co.uk/george/macro/lpunset?rev=1705492539&do=diff LPUNSET (GIN Macro) Defined in: MACS SPC Used in: ENGAGE867, LISTEXCP865, LISTLOOP867, LISTPREP865, RIGHT867, SETUPA867 DW4B #MAC LPUNSET DWJ2 NGN 0 257 DX3L MODD ANDS 0 JPSTATE,%A,CPPTR(2) DXH= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LREPEATS https://www.george3.co.uk/george/macro/lrepeats?rev=1705492539&do=diff LREPEATS (GIN Macro) Defined in: MACS SPC Used in: CARTCONT867, IPCONE865, REDONMT867, RELPER867, UNLOADMT867 F3D= #MAC LREPEATS F3XW MODD LDX %B JK52J,%A,CPPTR(2) F4CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LREPLYADD https://www.george3.co.uk/george/macro/lreplyadd?rev=1705492539&do=diff LREPLYADD (GIN Macro) Defined in: MACS SPC Used in: PERFAIL866 F8#G #MAC LREPLYADD F8S6 MODD LDX %B JCCA1,%A,CPPTR(2) F9?Q ANDX %B BITS22LS F9RB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LRIDENT https://www.george3.co.uk/george/macro/lrident?rev=1705492539&do=diff LRIDENT (GIN Macro) Defined in: MACROSIPC Used in: FAILTWIN866, INTWIN866 ?JBN ...[??? LRIDENT SECT COMM FGN 19 DOC ?JLG #MAC LRIDENT ?K66 DSCA %A,LDX,1,CHADD ?KKQ ANDX 1 BITS22LS ?L5B SBN 1 CHAINADD ?LK2 JIPCM DS,%C,1 ?M4L DFJUMPN %A,RGM,%D ?MJ= DFLOAD %A,IDENT1 ?N3W STO 0 %B ?NHG DFLOAD %A,IDENT2 ?P36 STO 0 1+%B ?PGQ LDX 1 FX1 ?Q2B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LTIME https://www.george3.co.uk/george/macro/ltime?rev=1705492539&do=diff LTIME (GIN Macro) Defined in: MACS SPC Used in: PERFLOGS866 F*NB #MAC LTIME FB82 '171 %A 0 FBML #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) LTYPE https://www.george3.co.uk/george/macro/ltype?rev=1705492539&do=diff LTYPE (GIN Macro) Defined in: MACS SPC Used in: CARTCONT867, CDUM866, CHARGESC867, DOC867, DRUM852, DUMMYA867, DUMMYB867, EMSENG864, ENGAGE867, FLAWMAP866, FREEPER867, GETFREE867, GETFREEB864, GROPE867, HARDWARA8, HOLDCOM867, IDFASAT867, IDFCANC867, IDFCHK867, IDFOFF867, INLOOP84, IPCGEO8, KARTCONT867, LISTDEV866, LISTINTC865, LOADERI867, LOADERMT867, MODE866, MOPCOM867, PARIDF8, PARSORT867, PERFAIL866, PERFLOGS866, PM, PMDR864, PMDUMPDA85, PMDUMPMT85, PMLP866, PMWHATA866, PMWINDDN84, PREPREA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MACCS https://www.george3.co.uk/george/macro/maccs?rev=1705492539&do=diff MACCS (GIN Macro) Defined in: MACROS JSR Used in: CONMXA85, CONMXB8, CONMXC8, EVENTFN, GIVE867, GIVEA867, IPCOPENB83, LOADFIN860, LOADPROG865, OPCA867, OPCAXCOD5, OPILLS70, PLUGIN867, PNTLAST860, TPINS861 4#YD ...[??? MACCS SECT CENT FGN 9 DOC 4*8= # THIS MACRO LEAVES THE ADDRESS OF X0 OF THE MEMBER (IN %A) IN X0 4*MW # & %C (IF SPECIFIED).%B PTR TO PROG 4B7G #MAC MACCS [JSRAYNER.FIND ADDRESS OF MEMBERS X0 4BM6 MOD LDX 0 ADATUM,%B 4C6Q #STR %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MACINT https://www.george3.co.uk/george/macro/macint?rev=1705492539&do=diff MACINT (GIN Macro) Defined in: MACROSAJE Used in: 5T3G ...[??? MACINT SECT DIAG FGN 18 5TH6 ...[ 5W2Q ...[ MACRO MACINT 5WGB ...[ 5X22 ...[ THIS IS AN INTERLUDE WHICH MENDS FIXED AND SETS THE 5XFL ...[ BITS IN GMESBITS FOR SEGMES 5X^= ...[ 5YDW ...#MAC MACINT 5YYG ...#MEN FIXED 5^D6 ...#TRA GMESBITS + 2 5^XQ ...#INT 62CB ...#ORD 62X2 ...SLINK +0 63BL ...START STO 0 SLINK 63W= ... LDX 0 START-3+21? 64*W ... STO 0 18? + 3]… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAGICNO https://www.george3.co.uk/george/macro/magicno?rev=1705492539&do=diff MAGICNO (GIN Macro) Defined in: DUMP-MACROS Used in: DTSUBSS867, SCHEDENX860 7PSS ...[??? MAGICNO SECT FILE FGN 65 DOC 7Q4L # 7R3W # TO CALCULATE WAITING STYLE FOR FILES BEING RESTORED 7S36 #MAC MAGICNO 7SGQ #STR %A,%C 7T2B LDX %C %A 7TG2 SLL %C 15 7T^L ADX %C %B 7WF= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAGREAD https://www.george3.co.uk/george/macro/magread?rev=1705492539&do=diff MAGREAD (GIN Macro) Defined in: MACROS RMD10 Used in: LDSTART850, LOAD60 2KQS ...[??? MAGREAD SECT FILE FGN 16 DOC 2L2L # READ NEXT RECORD FROM TOP FILE ( MT FILE) 2LG= #MAC MAGREAD 2L^W LDX 2 FX2 2MFG ACCSTO %D,ACOMMUNE9(2) 2M^6 DOWN MATALO,2 2NDQ BRN %A [END OF FILE 2NYB BRN %B [TAPE MARK 2PD2 BRN %C [LONG BLOCK 2PXL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAGSTEP https://www.george3.co.uk/george/macro/magstep?rev=1705492539&do=diff MAGSTEP (GIN Macro) Defined in: MACROS RMD10 Used in: LOAD60 2Q7D ...[??? MAGSTEP SECT FILE FGN 16 DOC 2QWW # READ NEXT MT BLOCK FROM TOP FILE INTO OBJECT PROGRAM AREA 2RBG #MAC MAGSTEP 2RW6 LDX 2 FX2 2S*Q ACCSTO %D,ACOMMUNE9(2) 2STB ACCSTO %E,ACOMMUNE8(2) 2T*2 DOWN MATALO,1 2TSL BRN %A [END OF FILE 2W#= BRN %B [TAPE MARK 2WRW BRN %C … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MANYDA https://www.george3.co.uk/george/macro/manyda?rev=1705492539&do=diff MANYDA (GIN Macro) Defined in: MACROS2JSR Used in: 3^G2 ...[ 3^G5 ...[??? MANYDA SECT CENT FGN 4 DOC 3^G8 ...[ 3^G? ...#MAC MANYDA 3^GB ...#STR %A 3^GF ...#SKI 3^GJ ...( 3^GM ...#MEN PERTYPNO 3^GQ ...#TRA K90PERTYPNO 3^GT ... NULL 3^GY ...#TRA K92PERTYPNO 3^H3 ... NULL 3^H6 ...#END 3^H9 ...#MEN PERCON 3^H# ...#TRA K90PERCON 3^HC ... NULL 3^HG ...#END 3^HK ...#MEN OPCA 3^HN ...#TRA K90OPCA 3^HR ... ANDN 6 #377 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBCH https://www.george3.co.uk/george/macro/mapbch?rev=1705492539&do=diff MAPBCH (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, DELETE864, INSERT6, INSERTHR6, INSERTWO6, RAND864, READFALE866, REWRITE864, RITEFAIL864, STEP864 *CF# ...[??? MAPBCH SECT FILE FGN 11 DOC *CP6 #MAC MAPBCH *D8Q SFMAP %A,%B *DNB ADX 2 0 *F82 LDCT 0 #400 *FML SRL 0 0(1) *G7= ANDX 0 FBITS(2) *GLW LDX 1 FX1 *H6G LDX 2 FX2 *HL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBCIRC https://www.george3.co.uk/george/macro/mapbcirc?rev=1705492539&do=diff MAPBCIRC (GIN Macro) Defined in: CLOSE-MACROS Used in: COMMFILE82 BM2Y ...[??? MAPBCIRC SECT FILE FGN 11 DOC BM=Q [ BR7Q #MAC MAPBCIRC BR9N ...[ THIS MACRO CIRCULATES ALL THE BITS IN A FILE/FMAPP BLOCK BY 1, BR?L ...[ REPLACING THE LAST BIT BY THE FIRST BIT (B1). IT WAS WRITTEN SPECIALLY BR*J ...[ FOR D.C.F.'S (COMMFILE SEGMENT) AND I SUSPECT THAT THIS IS THE ONLY BRCG ...[ PLACE WHERE IT SHOULD BE USED. BRFD ...[ BRHB ...[ [%A] = POINTER TO FCB BR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBDEL https://www.george3.co.uk/george/macro/mapbdel?rev=1705492539&do=diff MAPBDEL (GIN Macro) Defined in: CLOSE-MACROS Used in: CLOSTIDY860, DELETE864, FILEMAP *Q94 ...[??? MAPBDEL SECT FILE FGN 11 DOC *QDW #MAC MAPBDEL *RD6 SFMAP %A,%B *RXQ STO 0 GEN0 *SCB STO 1 GEN1 *SX2 STO 2 GEN2 *TBL LDX 2 0 *TW= LDN 1 3 *W*W ORS 1 FBCOMM(2) *WTG LDX 1 FBITMOD(2) *XSQ BZE 1 M6MAPBDEL *Y#B LDN 0 1 *YS2 SBS 0 FBITMOD(2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBIN https://www.george3.co.uk/george/macro/mapbin?rev=1705492539&do=diff MAPBIN (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, CLOSTIDY860, COPYB867, DELETE864, INSERTBL6, RAND864, REWRITE864 #4=G ...[??? MAPBIN SECT FILE FGN 11 DOC #59Q # #5PB #MAC MAPBIN #692 #STR %A,0 #6NL LDX 0 %A #78= SMO FX2 #7MW STO 0 EXEC2 #87G #STR %C #8M6 #SKI #96Q LDN 0 1 #9LB #STR %C #=62 LDX 0 %C #=KL SMO FX2 #?5= STO 0 EXEC1 #?JW #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBOREL https://www.george3.co.uk/george/macro/mapborel?rev=1705492539&do=diff MAPBOREL (GIN Macro) Defined in: OPEN-MACROS Used in: ORELEND860 ?TMJ ...[??? MAPBOREL SECT FILE FGN 20 DOC ?TXB #MAC MAPBOREL ?WC2 LDX 1 ALOGLEN(%A) ?WWL SBN 1 FBITS-A1 ?XB= BZE 1 M2MAPBOREL ?XTW NGN 0 1 ?Y*G M1MAPBOREL ?YT6 SBN 1 1 ?^#Q SMO 1 ?^SB STO 0 FBITS(%A) #2#2 BNZ 1 M1MAPBOREL #2RL M2MAPBOREL #3?= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBSE https://www.george3.co.uk/george/macro/mapbse?rev=1705492539&do=diff MAPBSE (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, DELETE864, INSERT6, INSERTHR6, INSERTWO6, RAND864, REWRITE864 *?4N ...[??? MAPBSE SECT FILE FGN 11 DOC *?#G #MAC MAPBSE *?S6 SFMAP %A,%B,CHANGE *#?Q ADX 2 0 *#RB LDCT 0 #400 **?2 SRL 0 0(1) **QL ORS 0 FBITS(2) *B== LDX 1 FX1 *BPW LDX 2 FX2 *C9G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MAPBSECH https://www.george3.co.uk/george/macro/mapbsech?rev=1705492539&do=diff MAPBSECH (GIN Macro) Defined in: CLOSE-MACROS Used in: INSERTBL6 *HTY ...[??? MAPBSECH SECT FILE FGN 11 DOC *J5Q #MAC MAPBSECH *JKB SFMAP %A,%B,CHANGE *K52 ADX 2 0 *KJL LDCT 0 #400 *L4= SRL 0 0(1) *LHW LDX 1 0 *M3G ANDX 0 FBITS(2) *MH6 ORS 1 FBITS(2) *N2Q BNZ 0 M1MAPBSECH *NGB M1MAPBSECH *P22 LDX 1 FX1 *PFL LDX 2 FX2 *P^= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MARK https://www.george3.co.uk/george/macro/mark?rev=1705492539&do=diff MARK (GIN Macro) Defined in: COMMPRIVMACS Used in: CANTDO867, LOADERPM867, LOADERR70, MESSAD, MESSBA, MESSI, MTOBJ864, ONLINCL864, PMSUMA867, RESTERR864 2K3B #MAC MARK [THIS MACRO IS USED IN SEGMENT ONLINC 2KH2 LDN 0 1 2L2L MOD ADS 0 AEXCO,%A 2LG= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MARKAXES https://www.george3.co.uk/george/macro/markaxes?rev=1705492539&do=diff MARKAXES (GIN Macro) Defined in: MACRO COMPRO Used in: MOPCOM867, MOPCOMB865, QUESCOM867, REDON867, SPEAK8, TRACE867, WHENEVER867 ?RP4 ...[??? MARKAXES SECT CENT FGN 21 DOC ?RYW [ MACRO FOR MARKING ALL PARAMETERS AS ACCESSED ?SDG #MAC MARKAXES ?SY6 #STR %A ?TCQ #SKI ?TXB ... DOWN PARAMB,4 ?WC2 #STR %A ?WWL ( ?XB= BRN MARK3 ?XTW MARK4 -1 ?Y*G MARK3 ?YT6 MHUNT 2,CPB,CALAS ?^#Q ADN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MASK https://www.george3.co.uk/george/macro/mask?rev=1705492539&do=diff MASK (GIN Macro) Defined in: MACROS SJ Used in: ADDJOB867, ADJUNCTS85, ALASB867, CANTDO867, CHNUMCON867, CONCEPT85, CROBJ6, DELCON867, DOC867, EMSENTER867, FINDOC867, IDFCHK867, IDFCLEAN867, INMOP867, IPCPERI83, JOBDATA867, LISTAST867, LISTCONK83, LISTIDF867, LOADX60, NEWOWN865, NEWPW867, PARAM865, PMACT867, PMCHAINS864, PMCHAP867, PMCRABS860, PMDR864, PMFILE860, PMFIXSTO84, PMFS85, PMOBJIII860, PMSUMA867, PROGISH850, QUOTA850, RESTERR864, SETIDF867, TRAPLIST864, UNSAVE867, USERSTRM867 BTR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MASKSTOZ https://www.george3.co.uk/george/macro/maskstoz?rev=1705492539&do=diff MASKSTOZ (GIN Macro) Defined in: MACROS HL Used in: BLOGNAL865, LOGANAL864 4KYF ...[??? MASKSTOZ SECT CENT FGN 5 DOC 4K^G # MACRO TO BE USED BY BLOGNAL AND LOGANAL TO ENSURE AMFMSK IS ALWAYS 4LF6 # ZERO WHEN THE MONITORING FILE IS CLOSED.THE PROBLEM IS ALL TIED UP 4LYQ # WITH CLEANUP AND TRACING LEVELS.MUST BE ISSUED BEFORE INTERNALLY 4MDB # ISSUING ANY COMMANDS AND,BY LOGANAL,AT THE END,IN CASE A FULLTRACE 4MY2 # HAS BEEN OBEYED DURING THE MACR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBC https://www.george3.co.uk/george/macro/mbc?rev=1705492539&do=diff MBC (GIN Macro) Defined in: MACROS SJ Used in: APPEND864, BACKMASS860, BMAPDIR865, BMAPONE867, BMAPTWO860, BMSJRNL866, BMSTREAM853, BSUNJAM867, CLOSEFUL867, CLOSEMAS863, CLOSEND867, COMMFILE82, COMPROB867, CORESHED861, DTSCAN860, DTSUBSA867, ENWELL867, EVENTS864, FHDIRTWO864, FHLIST867, FHOBJDIR860, FHOBJIND860, INCEND865, INCEOT865, INCOM864, INCSET865, INCSTART865, INCWRITE865, IPBLISTA867, IPCONE865, JAMSWAP865, JOBDATA867, JSASCAN867, JWELLONE867, LIBLOAD867, LOGOUT867, OFFREL867, OPENREL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBCI https://www.george3.co.uk/george/macro/mbci?rev=1705492539&do=diff MBCI (GIN Macro) Defined in: MACROS SJ Used in: 84^J ...[ 856Q ...[ 85#2 ...[??? MBCI SECT FILE FGN 24 DOC 86?= #MAC MBCI 86QW #SKI 19?+6]-1<1-1 87=G ( 87Q6 FC %A,19?+7] [SINGLE ID CASE 889Q #EXI 88PB ) 8992 #SKI 19?+9]$#77777777 89NL ( [NOT WHOLE WORD 8=8= #SKI 19?+9]<#7777-#7777 8=MW ( 8?7G NGN 0 19?+9]+1 8?M6 MOD ANDS 0 19?+8],%A 8#6Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBI https://www.george3.co.uk/george/macro/mbi?rev=1705492539&do=diff MBI (GIN Macro) Defined in: MACROS SJ Used in: BSUNJAM867, COOR865, COPYA867, CORESHED861, JAMSWAP865, PLUGIN867, SCHEDOUT865, SWAP865, UNPLUG867 8T#9 ...[ 8TBS ...[ 8TFD ...[??? MBI SECT FILE FGN 24 DOC 8TP= #MAC MBI 8W8W OPS MBSII %A,ERS,,,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,- 8WNG %S,%T,%U,%V[ 8X86 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBMASK https://www.george3.co.uk/george/macro/mbmask?rev=1705492539&do=diff MBMASK (GIN Macro) Defined in: MACROS SJ Used in: ?F?P ...[ ?FB# ...[ ?FDY ...[??? MBMASK SECT FILE FGN 24 DOC ?FNQ #MAC MBMASK ?G8B #DEF 19?+8=%A/BITMULT&#7777 [WORD ADDR ?GN2 #DEF 19?+9=0 [BIT MASK ?H7L MBMASK2 %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S- ?HM= ,%T,%U,%V,%W,%X[ ?J6W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBMASK2 https://www.george3.co.uk/george/macro/mbmask2?rev=1705492539&do=diff MBMASK2 (GIN Macro) Defined in: MACROS SJ Used in: ?J9F ...[ ?J#4 ...[ ?JBN ...[??? MBMASK2 SECT FILE FGN 24 DOC ?JLG #MAC MBMASK2 ?K66 #SKI 19?+8]-(%A/BITMULT&#7777 ) ?KKQ ( [NOT IN SAME WORD ?L5B ! BITS NOT IN SAME WORD ?LK2 GEOERR BRIEFPM,BSXMACS ?M4L #EXI ?MJ= ) ?N3W MASK %A [21?=MASK FOR THIS ID ?NHG #DEF 19?+9=19?+9]^21? ?P36 #STR %B ?PGQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBOP https://www.george3.co.uk/george/macro/mbop?rev=1705492539&do=diff MBOP (GIN Macro) Defined in: MACROS SJ Used in: ?QJK ...[ ?QM8 ...[ ?QPS ...[??? MBOP SECT FILE FGN 24 DOC ?Q^L #MAC MBOP ?RF= #SKI %A&#7777$(%A)<1-1 ?RYW ( [ALL IN LS12BITS ?SDG %BN %C %A&#7777 ?SY6 #EXI ?TCQ ) ?TXB #STR %B,LD ?WC2 ( [NOT LD OPERATION ?WWL #STR %D ?XB= ( [%D SPECIFIED ?XTW %BX %C %D ?Y*G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBOP2 https://www.george3.co.uk/george/macro/mbop2?rev=1705492539&do=diff MBOP2 (GIN Macro) Defined in: MACROS SJ Used in: #4SP ...[ #4X# ...[ #4^Y ...[??? MBOP2 SECT FILE FGN 24 DOC #59Q #MAC MBOP2 #5PB #SKI %A&#70000 #692 ( [SOME IN B9-11 #6NL LDN %B %A@L-12 #78= SLL %B 12 #7MW #SKI %A&#7777 #87G ORN %B %A&#7777 #8M6 #EXI #96Q ) #9LB ... LDCT %B %A@L-15 #=62 #SKI %A&#7777 #=KL ORN %B %A&#7777 #?5= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBS https://www.george3.co.uk/george/macro/mbs?rev=1705492539&do=diff MBS (GIN Macro) Defined in: MACROS SJ Used in: ABANDONA867, APPEND864, ASSIGN860, BACKMAP864, BACKMARK850, BACKMASS860, BMAPDIR865, BMAPTWO860, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BSUNJAM867, CLOSEAB863, CLOSEFUL867, CLOSEND867, CLOSTIDY860, COMMFILE82, CORESHED861, CREALEX864, DELETE864, DOIHEMS867, DOXCODE867, DTREST860, DTSCAN860, DTSUBSS867, EDSTART860, ENWELL867, ERASEA867, FHDIRTWO864, FHOBJDIR860, INCCHECK860, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBSII https://www.george3.co.uk/george/macro/mbsii?rev=1705492539&do=diff MBSII (GIN Macro) Defined in: MACROS SJ Used in: 8NGJ ...[ 8NMQ ...[ 8NT2 ...[??? MBSII SECT FILE FGN 24 DOC 8PS= #MAC MBSII 8Q?W LAS 0 8QRG MOD %B 0 19?+8],%A 8R?6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MBSXD https://www.george3.co.uk/george/macro/mbsxd?rev=1705492539&do=diff MBSXD (GIN Macro) Defined in: MACROS SJ Used in: CHARGESC867, CLOSEDIR867, INCCHECK860, INCRCUBS860, LIBLOAD867, LIBMANY867, LIBPROPS, LISTOPEN867, MOVCART867, OPERIN867, PERFLOGS866, RESTOREG864, SCHEDMTA860, SCHEDMTX867, UNPLUG867, USEROPEN867 ##LP ...[ ##P# ...[ ##RY ...[??? MBSXD SECT FILE FGN 24 DOC #*3Q #MAC MBSXD #*HB MBMASK %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%- #B32 U,%V,%W,%X [ #BGL MBOP 19?+9],LD,%A #C2= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MCONTEXT https://www.george3.co.uk/george/macro/mcontext?rev=1705492539&do=diff MCONTEXT (GIN Macro) Defined in: MACRO COMPRO Used in: F4BD ...[??? MCONTEXT SECT CENT FGN 21 DOC F4CG # F4X6 [ THIS MACRO ALLOWS SPECIFIED CONTEXT BITS TO BE SET UP IN A WORD F5BQ # F5WB #MAC MCONTEXT F6B2 +CTX%A+CTX%B+CTX%C+CTX%D+CTX%E+CTX%F F6TL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MD https://www.george3.co.uk/george/macro/md?rev=1705492539&do=diff MD (GIN Macro) Defined in: MACROS DTP Used in: 7JXR ...[??? MD SECT DIAG FGN 579 DOC 7K8B #MAC MD [M.C.D. MANN 7KN2 [ 7L7L [ 7LM= [ ******** 7M6W [ * MD * 7MLG [ ******** 7N66 [ 7NKQ [ 7NL5 ...#SKI GFIXCORE<1$1 [NOT COMPILING FIXED CORE 7NLD ...( 7NLR ...#UNS K%A [ NON-PM SEGMENT? 7NM6 ...( 7NMF ...#SKI K%A<20-20 [FIXED CO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MEEPLP https://www.george3.co.uk/george/macro/meeplp?rev=1705492539&do=diff MEEPLP (GIN Macro) Defined in: MACS MISW Used in: 87Q6 #MAC MEEPLP [R.WEYAND 889Q #MEN SETUPA 88PB #TRA K30SETUPA 8992 SBN 0 %A [%A = THE GEOGRAPHIC NO. OF THE MEEP 89NL [LP 8=8= #END 8=MW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MELADJUST https://www.george3.co.uk/george/macro/meladjust?rev=1705492539&do=diff MELADJUST (GIN Macro) Defined in: LLSMACROS Used in: SCHDJOBA867, SCHEDJOB867 96*K ...#MAC MELADJUST 96*M ...[ 96*P ...[ MACRO TO ALTER THE MILL PRIORITIES IN THE PCA TO THE VALUES IN THE 96*R ...[ JOB BLOCK,RE-RINGING THE PROGRAM MEMBERS ON THE PROGRAM RING IF TH 96*T ...[ PROGRAM IS PLUGGED IN 96*X ...[ %A - -> TO JOB BLOCK.MAY NOT BE X0 96*^ ...[ %B - -> TO PCA.IF ABSENT,PCA WILL BE FOUND FROM %A. 96B3 ...[ 96B5 ...#STR 1,%B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MELPTR https://www.george3.co.uk/george/macro/melptr?rev=1705492539&do=diff MELPTR (GIN Macro) Defined in: MACROS FIXD Used in: GIVEA867, MONRESUM850 2=3S ...[??? MELPTR SECT CENT FGN 11 DOC 2=?L # 2=R= #MAC MELPTR [GIVES PNTR TO MEL OF GIVEN MEMBER NO 2?=W #STR %B 2?QG LDX 0 %B 2#=6 #STR %B 2#PQ #SKI 2*9B LDX 0 ANM(%A) 2*P2 ANDN 0 3 2B8L LDN 1 AFW1(%A) 2BN= LDN 2 K61 2C7W MPA 0 2 2CMG #SKI %A>1-1 2D76 ( 2DLQ LD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MELRERING https://www.george3.co.uk/george/macro/melrering?rev=1705492539&do=diff MELRERING (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867, REALTIME867, REQESLIP861 6L*L ...[??? MELRERIN SECT CENT FGN 6 DOC 6LD2 [ 6LXL #MAC MELRERING 6MC= XMELPARS %A,%B 6MWW MELRE1 SMO 5 6NBG LDX 0 ABW 6NW6 BZE 0 MELRE2 [J IF NOT RINGED IN 6P*Q DERING 5 6PTB MELRE2 XMELGUTS MELRE1,%B 6Q*2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MELRING https://www.george3.co.uk/george/macro/melring?rev=1705492539&do=diff MELRING (GIN Macro) Defined in: LLSMACROS Used in: PLUGIN867, TPINS861 6HYN ...[??? MELRING SECT CENT FGN 6 DOC 6H^W [ 6JFG #MAC MELRING 6J^6 XMELPARS %A,%B 6KDQ MELR1 XMELGUTS MELR1,%B 6KYB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MELUNRING https://www.george3.co.uk/george/macro/melunring?rev=1705492539&do=diff MELUNRING (GIN Macro) Defined in: LLSMACROS Used in: REQESLIP861, UNPLUG867 6QMQ ...[??? MELUNRIN SECT CENT FGN 6 DOC 6QSL [ 6R#= [ THIS MACRO REMOVES A MEL OR ALL MELS FROM THE PROGRAM RING 6RRW [ 6S?G #MAC MELUNRING 6SR6 STO 3 GEN0 6T=Q #STR %A,3 6TQB LDX 3 %A [X3 -> PCA 6W=2 #STR %B 6WPL ( 6X9= LDN 0 AFW2-AFW1 6XNW #STR %B,3 6Y8G MPY 0 %B 6YN6 #STR %B,3 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MEND https://www.george3.co.uk/george/macro/mend?rev=1705492539&do=diff MEND (GIN Macro) Defined in: MACROSAJE Used in: ABANDONA867, BACKROOM865, MTCODE864, MTOBJ864, PMDUMP85, REGEN865 4BWY ...[??? MEND SECT DEVT FGN 8 DOC 4C6Q # 4CLB # 4D62 ...[ MACRO MEND [MFN 4DKL # 4F5= ...[ THIS MACRO MUST BE USED TO INTRODUCE 'NO PART' AND 'MULTI PART' 4FJW ...[ MENDS 4G4G # 4GJ6 #MAC MEND 4GP# ...#SKI 67?&#171700<1$1 4GWG ... MENDON %A 4H3Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDAREA https://www.george3.co.uk/george/macro/mendarea?rev=1705492539&do=diff MENDAREA (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ADDICT865, ADJCHECK85, ADJUNCTS85, ALASB867, ALLOW84, ALTINST60, ANALYSE865, ANALYSEA3, ANSCOM865, ANTIC867, ARCHIVE867, ASSIGN860, ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTWO860, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BMXEMS83, BMXEND7, BQUERY84, BSALFAIL, BSPRUNE867, BSUJSTAT867, BSUNJAM867,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDIT https://www.george3.co.uk/george/macro/mendit?rev=1705492539&do=diff MENDIT (GIN Macro) Defined in: MACROS DTP Used in: 6NBG ...[??? MENDIT SECT DIAG FGN 571 DOC 6NW6 ...#MAC MENDIT [M. DRUKKER 6P*Q [ 6PTB [ 6Q*2 [ ************ 6QSL [ * MENDIT * 6R#= [ ************ 6RRW [ 6S?G [ 6SR6 #DEF 31?=1? [REMEMBER THE LISTING LEVEL 6T=Q #DEF 92?=0 [INITIALISE MENDIT'S VERSION NUMBER 6TQB #STR :,%A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDITA https://www.george3.co.uk/george/macro/mendita?rev=1705492539&do=diff MENDITA (GIN Macro) Defined in: MACROS DTP Used in: 74K6 [??? MENDITA SECT DIAG FGN 552 DOC 754Q #MAC MENDITA [M.C.D. MANN 75JB [ 7642 [ 76HL [ ************* 773= [ * MENDITA * 77GW [ ************* 782G [ 78G6 [ 78^Q MENDIT %A,%B,%C,%D,%E,%F,%G,A 79FB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDITF https://www.george3.co.uk/george/macro/menditf?rev=1705492539&do=diff MENDITF (GIN Macro) Defined in: MACROS DTP Used in: 7J=C ...[??? MENDITF SECT DIAG FGN 562 DOC 7J?N ...#MAC MENDITF [M.C.D. MANN 7J#^ ...[ 7JB= ...[ 7JCH ...[ ************* 7JDS ...[ * MENDITF * 7JG5 ...[ ************* 7JHB ...[ 7JJM ...[ 7JKY ... MENDIT %A,%B,%C,%D,%E,%F,%G,F 7JM9 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDITMP https://www.george3.co.uk/george/macro/menditmp?rev=1705492539&do=diff MENDITMP (GIN Macro) Defined in: MACROS DTP Used in: 7C#W [??? MENDITMP SECT DIAG FGN 552 DOC 7CSG #MAC MENDITMP [M.C.D. MANN 7D#6 [ 7DRQ [ 7F?B [ ************** 7FR2 [ * MENDITMP * 7G=L [ ************** 7GQ= [ 7H9W [ 7HPG MENDIT %A,%B,%C,%D,%E,%F,%G,MP 7J96 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDITP https://www.george3.co.uk/george/macro/menditp?rev=1705492539&do=diff MENDITP (GIN Macro) Defined in: MACROS DTP Used in: 79^2 [??? MENDITP SECT DIAG FGN 552 DOC 7=DL #MAC MENDITP [M.C.D. MANN 7=Y= [ 7?CW [ 7?XG [ ************* 7#C6 [ * MENDITP * 7#WQ [ ************* 7*BB [ 7*W2 [ 7B*L MENDIT %A,%B,%C,%D,%E,%F,%G,P 7BT= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MENDON https://www.george3.co.uk/george/macro/mendon?rev=1705492539&do=diff MENDON (GIN Macro) Defined in: MACROSAJE Used in: 4NCL ...[??? MENDON SECT DEVT FGN 8 DOC 54L= # 555W ...[ MACRO MENDON [MFN 55KG # 5656 ...[ THIS MACRO CAUSES MENDS TO BE COMPILED ALTHOUGH THEIR 56JQ ...[ STATUSES ARE SUCH THAT THEY WOULD NORMALLY NOT BE INCLUDED 574B # 57J2 #MAC MENDON 57MX ...#UNS %A!+1 57RS ...#SKI 57XP ...#STA %A,75?+1 583L #SKI %A!$#40000000<1$1 58H= ( 592W ! MEND %A HAS 59GG ! ALREADY BEEN C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MESCHAPS https://www.george3.co.uk/george/macro/meschaps?rev=1705492539&do=diff MESCHAPS (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHTAB 2BDD ...[??? MESCHAPS SECT CENT FGN 32 DOC 2BN= # 2C7W #MAC MESCHAPS 2CMG #SKI %A 2D76 ( 2DLQ #OPT KMESSX=0? 2F6B #SKI KMESSX-0? 2FL2 ! KMESSX IS WRONG 2G5L +0 2GK= #DEF 20?=%A 2H4W MESCHAPS 0,A,B,C,D,E,F,G,H,I,J,A,B,C,D,E,F,G,H,I 2HJG #EXI 2J46 ) 2JHQ CHAPENT MESS%B 2K3B #DEF 20?=20?-1 2KH2 #EXI 20? 2L2L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MESSAGES https://www.george3.co.uk/george/macro/messages?rev=1705492539&do=diff MESSAGES (GIN Macro) Defined in: MACROS MSYS Used in: MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAE, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSBA, MESSBB, MESSBC, MESSBD, MESSBE, MESSBF, MESSBG, MESSBH, MESSBI, MESSBJ, MESSC, MESSCA, MESSCB, MESSCC, MESSCD, MESSCE, MESSCF, MESSCG, MESSCH, MESSCI, MESSCJ, MESSD, MESSDA, MESSDB, MESSDC, MESSDJ, MESSE, MESSF, MESSG, MESSH, MESSI 22FL # 22^= # 23DW # HEREIN LIE MACROS USED BY THE MESSAGE SYSTEM. 24D6 # 24… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MESSMON https://www.george3.co.uk/george/macro/messmon?rev=1705492539&do=diff MESSMON (GIN Macro) Defined in: MACROS MSYS Used in: MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAE, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSBA, MESSBB, MESSBC, MESSBD, MESSBE, MESSBF, MESSBG, MESSBH, MESSBI, MESSBJ, MESSC, MESSCA, MESSCD, MESSD, MESSE, MESSF, MESSG, MESSH, MESSI 3D6J ...[??? MESSMON SECT CENT FGN 56 DOC 3DBB # 3DW2 # 3F*L # HERE FOLLOWS MESSMON **** MESSMON 3FT= # IT IS USED TO INTRODUCE A MESSAGE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MESSMONA https://www.george3.co.uk/george/macro/messmona?rev=1705492539&do=diff MESSMONA (GIN Macro) Defined in: MACROS MSYS Used in: MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAE, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSBA, MESSBB, MESSBC, MESSBD, MESSBE, MESSBF, MESSBG, MESSBH, MESSBI, MESSBJ, MESSC, MESSCA, MESSCB, MESSCC, MESSCD, MESSCE, MESSCF, MESSCG, MESSCH, MESSCI, MESSCJ, MESSD, MESSDA, MESSDB, MESSDC, MESSDJ, MESSE, MESSF, MESSG, MESSH, MESSI 3S*8 ...[??? MESSMONA SECT CENT FGN 56 DOC 3SK2 # 3T4L # 3TJ= # HERE FOLLOWS MESSM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MESSNO https://www.george3.co.uk/george/macro/messno?rev=1705492539&do=diff MESSNO (GIN Macro) Defined in: MACROS MSYS Used in: #Y#Y ...[??? MESSNO SECT CENT FGN 56 DOC #YJQ # #^4B # #^J2 #MAC MESSNO *23L ... +0?+34?+0]&#777 *2H= #FID 0 11 %A *32W #SKI 0?+34?+0]&#10000000 *3GG ( *426 #DEF 0?=0?-1 *4FQ ...#DEF 0?=0?+34?+0]&#777+11/4+0? *4^B MESSNO %A *5F2 ) *5YL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFCATS https://www.george3.co.uk/george/macro/mfcats?rev=1705492539&do=diff MFCATS (GIN Macro) Defined in: MACROS MSYS Used in: 7H^# ...[??? MFCATS SECT CENT FGN 56 DOC 7J96 # 7JNQ # 7K8B # HERE FOLLOWS MFCATS **** MFCATS 7KN2 # IT IS USED TO SET AND CHECK THE CATEGORY 7L7L # WORD OF A MESSAGE PART. 7LM= # PARAMETERS ARE CATEGORY NAMES 7M6W # 7MLG #MAC MFCATS 7N66 #SKI 24?<1$1 [SKIP IF NOT FIRST TIME THROUGH 7NKQ ( 7P5B #DEF 24… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFDEFS https://www.george3.co.uk/george/macro/mfdefs?rev=1705492539&do=diff MFDEFS (GIN Macro) Defined in: MACROS VB Used in: MONFILE867, MONFILEA864, MONOLITH864 =D=D ...[??? MFDEFS SECT CENT FGN 7 DOC =DG= #MAC MFDEFS [LOCAL DEFINES FOR MONFILE SEGS =D^W # ACOMMUNE2 SAVED FOR JOURNAL O/P =FFG #DEF MDESTINY=AWORK2 =F^6 #DEF PTRASET=AWORK1 =GDQ #DEF THISPART=ACOMMUNE7 =GYB #DEF REMAINS=AWORK3 =HD2 #DEF SIGNW=ACOMMUNE9 =HXL #DEF X2=ACOMMUNE3 =JC= #DEF PARTPTR=AWORK4 =JWW #DEF OUTCHAR=ACOMMUNE4 =… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFERROR https://www.george3.co.uk/george/macro/mferror?rev=1705492539&do=diff MFERROR (GIN Macro) Defined in: MACROS MSYS Used in: 8**S ...[??? MFERROR SECT CENT FGN 56 DOC 8*KL # 8B5= # 8BJW # HERE FOLLOWS MFERROR **** MFERROR 8C4G # IT IS USED BY ALTMESS ETC. WHEN AN ERROR IS 8CJ6 # DETECTED. IT CLEANS UP,SETS THE ERROR IDENTIFIER, 8D3Q # AND OUTPUTS A MEANINGFUL MESSAGE. IT THEN SKIPS 8DHB # THE REMAINING EXPENSION OF THE CALLING MACRO. 8F32 # IT HAS ONE PARA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFIND https://www.george3.co.uk/george/macro/mfind?rev=1705492539&do=diff MFIND (GIN Macro) Defined in: HUNTMACS1 Used in: FLAWMAP866, NNORM83 5?98 ...[??? MFIND SECT CENT FGN 1 DOC 5?F2 # 5?YL #MAC MFIND 5#D= LDX 0 %B 5#XW CALL %A (JMFIND%A) 5*CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFINDEXOF https://www.george3.co.uk/george/macro/mfindexof?rev=1705492539&do=diff MFINDEXOF (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, CHINERR867, CHINTEG867, CLOSBAC867, CLOSDEL867, CONTEND867, CONTRACT866, EXINONE867, EXINTO867, EXTEND866, NEXTUNIT867, PATCH, PERION867, READSPEC867, RENAMEX867, SCEX866, SCEXEND867, SPERION867, WRITEFIP867 9356 # 93JQ [??? MFINDEXOF 944B # ********* 94J2 #MAC MFINDEXOF 953L # 95H= LDX 0 %B 962W LDN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFINDSU https://www.george3.co.uk/george/macro/mfindsu?rev=1705492539&do=diff MFINDSU (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, BRADSPLT867, CHINTEG867, ERASEX866, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FINDFS867, FLAW866, FLAWMAP866, KARTCONT867, NEXTUNIT867, PATCH, PERION867, READSPEC867, REQCART866, SCEX866, SCEXEND867, SPERION867, SQOPEN867, TWINSETB866, WRITEFIP867 7*W2 # 7B*L [??? MFINDSU 7BT= # ******* 7C#W #MAC MFINDSU 7CSG # 7D#6 LD… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFINDSUD https://www.george3.co.uk/george/macro/mfindsud?rev=1705492539&do=diff MFINDSUD (GIN Macro) Defined in: MACROS EWDAS Used in: 8BJW # 8C4G [??? MFINDSUD 8CJ6 # ******** 8D3Q #MAC MFINDSUD 8DHB # 8F32 LDCT 0 #400 8FGL ORX 0 %B 8G2= LDN %A BCCB 8GFW MFINDSU 8G^G LDX %A FPTR(%A) 8HF6 #SKI K6EXOFILE>199-199 8HYQ ( 8JDB TXU %A CXCC 8JY2 BCS MFINDSU1 8KCL GEOERR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFINDSUX https://www.george3.co.uk/george/macro/mfindsux?rev=1705492539&do=diff MFINDSUX (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSBAC867, EXTEND866 7T^L # 7WF= [??? MFINDSUX 7WYW # ******** 7XDG #MAC MFINDSUX 7XY6 # 7YCQ LDN %A BCCB 7YXB MFINDSU 7^C2 LDX %A FPTR(%A) 7^WL #SKI K6EXOFILE>199-199 82B= ( 82TW TXU %A CXCC 83*G BCS MFINDSU1 83T6 GEOERR 1,MFINDSUX 84#Q MFINDSU1 84SB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFLOCAL https://www.george3.co.uk/george/macro/mflocal?rev=1705492539&do=diff MFLOCAL (GIN Macro) Defined in: MACROS MSYS Used in: 7?84 ...[??? MFLOCAL SECT CENT FGN 56 DOC 7?CW # 7?XG # 7#C6 # HERE FOLLOWS MFLOCAL **** MFLOCAL 7#WQ # GIVEN A TABENTRY NUMBER IT FINDS THE VALUE OF 7*BB # THE LOCAL HELD IN THAT TABENTRY 7*W2 # PARAMETERS:- 7B*L # 7BT= # %A=TABENTRY NUMBER 7C#W # %B=A COMPILER VARIABLE WHICH WILL BE SET TO 7CSG # THE VALUE OF THE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFORDER https://www.george3.co.uk/george/macro/mforder?rev=1705492539&do=diff MFORDER (GIN Macro) Defined in: MACROS VB Used in: MONFILE867, MONFILEA864 9W8# ...[??? MFORDER SECT CENT FGN 7 DOC 9WD6 #MAC MFORDER [ALLOWS ORDERING OF O/P ROTA 9WXQ %A F,SJPAK,SJNPK,SCANB,MONFILE,MOP,OP,REMOTE 9XCB %A MALL,MBOTH,RETAIN,REPLY,SEMBL 9XX2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFPDCTAB https://www.george3.co.uk/george/macro/mfpdctab?rev=1705492539&do=diff MFPDCTAB (GIN Macro) Defined in: MACROS MSYS Used in: MONFIL865, MONJRNAL850 ?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 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFREE https://www.george3.co.uk/george/macro/mfree?rev=1705492539&do=diff MFREE (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDONA867, ACCESS867, ADDICT865, ADJUNCTS85, ALLOCATE867, ALLOW84, ALTINST60, ANALYSEA3, ANTIC867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASTONIF867, BACKMAP864, BACKMASS860, BCAST867, BLOGNAL865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMOUTPUT867, BMQUEST866, BMSAVJOB864, BQUERY84, BRADEMUL867, BUDGET84, BUDGTWO84, CAFSPERI867, CANCOM863, CANCRVX864, CANTDO867, CDUM866, CHANG867, CHEKPRIV867, CHINERR867, CLOSBAC867, CLOSEAB863, CLOSEALT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFREEALL https://www.george3.co.uk/george/macro/mfreeall?rev=1705492539&do=diff MFREEALL (GIN Macro) Defined in: MACROS HFD8 Used in: BACKMAP864, IDFASAT867, IDFCANC867, IDFCONS8, IDFENQS867, IDFOFF867, IDFONLIN867, IDFPER867, IDFSCON867, INITJOB867, MULTIPLX864, PARIDF8, RENAME864, XATTACH861 384Q ...[??? MFREEALL SECT FILE FGN 22 DOC 3942 #MAC MFREEALL 39?S ...[ MFREEALL FREES ALL BLOCKS OF TYBE %A/%B 39HL M1MFREEALL 3=3= HUNT 1,%A,%B 3=GW BNG 1 M2MFREEALL 3?2G FREECORE 1 3?G6 BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFREEBAX https://www.george3.co.uk/george/macro/mfreebax?rev=1705492539&do=diff MFREEBAX (GIN Macro) Defined in: MACROS HFD8 Used in: COPYB867, ORELEMPT70, USERONE867 2QC= ...[??? MFREEBAX SECT FILE FGN 22 DOC 2RBG #MAC MFREEBAX 2RHN ...[ 2RNW ...[ FREEBAX BLOCKS IN FULLB & FREECORE RESULTING EMPTYB 2RW6 FREEBAX 2S*Q MFREEW BSTB,EMPTYB 2STB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFREECELL https://www.george3.co.uk/george/macro/mfreecell?rev=1705492539&do=diff MFREECELL (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, HARDIDF867, IDFCHK867, IDFCLEAN867, IDFCONF867, IDFCONFA867, SETIDF867 8JCS ...[??? MFREECEL SECT COMM FGN 25 DOC 8JDB #MAC MFREECELL 8JY2 LDX 0 BRECNO(%A) 8KCL SMO FX2 8KX= STO 0 ACOMMUNE3 [STO REC.NO. 8LBW SMO FX2 8LWG STO %B ACOMMUNE2 8MB6 DOWN IDFSEG,23 8MTQ LDX %B ACOMMUNE2(2) [LD. VALUE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFREEW https://www.george3.co.uk/george/macro/mfreew?rev=1705492539&do=diff MFREEW (GIN Macro) Defined in: HUNTMACS1 Used in: ACCESS867, ADDICT865, ADDJOB867, ALAS822, ALASB867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, BEXTRA83, BEXTSJ84, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEND7, BSPRUNE867, BSUJSTAT867, BSUNJAM867, BUDGTWO84, CAFSINFO866, CANCRVX864, CDCIPB864, CDUM866, CHANG867, CHNUMCON867, CIOUT8, CLOSEAB863, CLOSEALT864, CLOSEFUL867, CLOSEMAS8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFSAVE https://www.george3.co.uk/george/macro/mfsave?rev=1705492539&do=diff MFSAVE (GIN Macro) Defined in: MACROS MSYS Used in: MONFIL865 ?4Y? ...[??? MFSAVE SECT CENT FGN 56 DOC ?4YC ...# ?4YJ ...#MAC MFSAVE ?4YP ... SMO FX2 ?4YW ... STO 3 OUTCHAR ?4^3 ... CALL 6 SET ?4^8 ...#STR %A ?4^* ... CALL 6 SAVEB ?4^G ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFSETAB https://www.george3.co.uk/george/macro/mfsetab?rev=1705492539&do=diff MFSETAB (GIN Macro) Defined in: MACROS VB Used in: MONFILE867, MONFILEA864 9Y6S ...[??? MFSETAB SECT CENT FGN 7 DOC 9YBL #MAC MFSETAB 9YW= #STR %A 9^*W ( 9^TG #STR %A,F =2*6 #STR =2SQ ( =3#B #DEF 20?=#4000 =3S2 ) =4?L #STR %A,F =4R= ( =5=W #DEF %A=20? =5QG #DEF 20?=20?/2 =6=6 ) =6PQ MFSETAB %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M =79B ) =7P2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFTAB https://www.george3.co.uk/george/macro/mftab?rev=1705492539&do=diff MFTAB (GIN Macro) Defined in: MACROS MSYS Used in: 32YN ...[??? MFTAB SECT CENT FGN 56 DOC 338G # 33N6 # 347Q # HERE FOLLOWS MFTAB **** MFTAB 34MB # IT IS USED IN AUXILMF TO SET UP BY RECURSIVELY 3572 # CALLING ITSELF A TABLE OF HALF-WORD ENTRIES. 35LL # %A=NUMBER OF ENTRIES LEFT TO SET UP 35P9 ...# %B=SEGMENT ADDRESS SCANNED TO SO FAR 35RS ...# 35WC ...# OR IT IS USED WITH %A NULL TO S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MFUNSAVE https://www.george3.co.uk/george/macro/mfunsave?rev=1705492539&do=diff MFUNSAVE (GIN Macro) Defined in: MACROS MSYS Used in: MONFIL865 ?4^J ...[??? MFUNSAVE SECT CENT FGN 56 DOC ?4^M ...#MAC MFUNSAVE ?4^S ...#STR %A ?4^^ ... CALL 6 UNSVB ?526 ... CALL 6 RESET ?52? ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MGETCELL https://www.george3.co.uk/george/macro/mgetcell?rev=1705492539&do=diff MGETCELL (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, IDFPROP867, ONLINEC867, SETIDF867 8P4S ...[??? MGETCELL SECT COMM FGN 25 DOC 8P#L #MAC MGETCELL 8PS= LDX 0 BRECNO(%A) [LD. REC.NO. TO BE HUNTED FOR 8Q?W SMO FX2 8QRG STO 0 ACOMMUNE3 [ST. VALUE OF %A 8R?6 SMO FX2 8RQQ STO %B ACOMMUNE5 [ST. VALUE OF %B 8S=B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MHUNT https://www.george3.co.uk/george/macro/mhunt?rev=1705492539&do=diff MHUNT (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDON867, ABANDONA867, ACCESS867, ADDICT865, ADJUNCTS85, ALAS822, ALLOCATE867, ALLOW84, ALTINST60, ANSCOM865, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ASTONIF867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BACKMARK850, BACKMASS860, BACKROOM865, BCAST867, BLOGNAL865, BMFIXIT864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEND7, BRADDATA867, BRADEMUL867, BRADSPLT867, BSALFAIL, BSBLFAIL867, BSTS867, BUDGET8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MHUNTW https://www.george3.co.uk/george/macro/mhuntw?rev=1705492539&do=diff MHUNTW (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDON867, ABANDONA867, ACCESS867, ADDICT865, ADDJOB867, ADJUNCTS85, ALAS822, ALASB867, ALLOCATE867, ANALYSEA3, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ASTONIF867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BACKMAP864, BACKMARK850, BACKMASS860, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMJLIST864, BMJLSL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MHUNTX https://www.george3.co.uk/george/macro/mhuntx?rev=1705492539&do=diff MHUNTX (GIN Macro) Defined in: HUNTMACS1 Used in: ALAS822, ANALYSEA3, CAPCA50, COMPRO867, COMPROB867, CONSERNO6, IDFSEG867, INPRIN, IPBMOP867, IPBMOPB867, MOPOUT85, PARAMA865, PMINPRIN 55T# ...[??? MHUNTX SECT CENT FGN 1 DOC 5656 # 56JQ #MAC MHUNTX 574B LDX 0 %B 57J2 ANDX 0 HALFTOP 583L CALL %A (JMHUNTX%A) 58H= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MIDFAS https://www.george3.co.uk/george/macro/midfas?rev=1705492539&do=diff MIDFAS (GIN Macro) Defined in: MACS JIB Used in: ASSOC867 8T^4 ...[??? MIDFAS SECT COMM FGN 25 DOC 8W8W # 92=L ...#MAC MIDFAS 92?S ... LDX 2 FX2 92*2 ... STO %B ACOMMUNE1(2) 92B8 ... STO %C ACOMMUNE2(2) 92CB ... DOWN IDFASAT,10 92DJ ... BRN %A [BRK-IN 92FQ ... BRN %D 92GY ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MILL https://www.george3.co.uk/george/macro/mill?rev=1705492539&do=diff MILL (GIN Macro) Defined in: MACROS NI Used in: CMEMILL866, MESSDB, MONJRNAL850, PMJOBS866 2YQB ...[??? MILL SECT CENT FGN 1 DOC 2^=2 ...# 2^PL ...# VARY OR INTERROGATE DME MILL PERCENTAGE IN CME 2^R* ...# THIS MACRO ISSUES '171 X #100 EXTRACODE 2^T4 ...# (READ/WRITE MILL PERCENTAGE) 2^WR ...# IN X: B0 = 0 - READ/WRITE OVERALL MILL PERCENTAGE 2^YG ...# B0 = 1 - READ/WRITE MILL OF OCP SPECIFIED 3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MKPROG https://www.george3.co.uk/george/macro/mkprog?rev=1705492539&do=diff MKPROG (GIN Macro) Defined in: MACROS GLJ Used in: 5L8Q #MAC MKPROG 5LNB #SKIP IZUNSTABLE+IZSTABLE&IZ%A 5M82 ( 5MML LDX 0 BIT11 5N7= ANDX 0 JMISC(%B) [JUMP IF PROG SWAPPED OUT 5NLW BNZ 0 MMKPROG 5P6G ) 5PL6 #SKIP IZUNSWAP&IZ%A 5Q5Q ( 5QKB LDX 0 BIT10 5R52 ANDX 0 JMISC(%B) 5RJL BZE 0 (GEOERR) [ERROR UNLESS PROG SWAPPED IN 5S4= ADS 0 JMISC(%B) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MNAME https://www.george3.co.uk/george/macro/mname?rev=1705492539&do=diff MNAME (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, IDFCONS8, IDFOFF867, IDFONLIN867, XATTACH861 92JS ...[??? MNAME SECT COMM FGN 25 DOC 92KG #MAC MNAME 9356 LDX 0 %A 93JQ SMO FX2 944B STO 0 ACOMMUNE2 [STO PTR THAT CONTAINS POSITION DOWN 94J2 LDX 0 %B 953L SMO FX2 95H= STO 0 ACOMMUNE4 962W MZNA DOWN IDFSEG,21 96GG LDX %B ACOMMUNE2(2) 9726 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOBJQUOTA https://www.george3.co.uk/george/macro/mobjquota?rev=1705492539&do=diff MOBJQUOTA (GIN Macro) Defined in: COREMACROS Used in: CORESHED861, LLSMESS867, SCHEDOUT865, UNJAMMER866 KCXG ...#MAC MOBJQUOTA KDC6 ...[ KDWQ ...[ MACRO TO OBTAIN EITHER OBJECTQUOTA MIN OR MAX KFBB ...[ %A - EITHER MIN OR MAX DEPENDING WHICH IS REQ'D KFW2 ...[ %B - ACC. IN WHICH TO STORE RESULT.IF ABSENT,X0 IS USED KG*L ...[ KGT= ...#STR MIN,%A KH#W ...#SKI KHSG ...( KJ#6 ...#STR %B KJRQ ...#SKI KK?B ... LDX 0 COBJQUOTA KKR2 ...#STR %B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOCH https://www.george3.co.uk/george/macro/moch?rev=1705492539&do=diff MOCH (GIN Macro) Defined in: MACROS RME10 Used in: ALTINST60, LIBMANY867, LIBREQ866, LIBREQC867, TRANSPOT65 4PLN ...[??? MOCH SECT FILE FGN 4 DOC 4PWG #MAC MOCH 4QB6 #STR %A 4QTQ ( 4R*B #STR %A,0 4RT2 LDX 0 %A 4S#L LDX 2 FX2 4SS= ) 4T?W #STR %A 4TRG #SKI 4W?6 ( 4WQQ LDX 2 FX2 4X=B LDX 0 CPPTR(2) 4XQ2 ) 4Y9L STO 0 ACOMMUNE1(2) 4YP= STOZ ACOMMUNE2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOCHAS https://www.george3.co.uk/george/macro/mochas?rev=1705492539&do=diff MOCHAS (GIN Macro) Defined in: MACROS RME10 Used in: LIBREQC867, LIBSEC867, XENON 4DTD ...[??? MOCHAS SECT FILE FGN 4 DOC 4F5= #MAC MOCHAS 4FJW #STR %A 4G4G ( 4GJ6 #STR %A,0 4H3Q LDX 0 %A 4HHB LDX 2 FX2 4J32 ) 4JGL #STR %A 4K2= #SKI 4KFW ( 4K^G LDX 2 FX2 4LF6 LDX 0 CPPTR(2) 4LYQ ) 4MDB STO 0 ACOMMUNE1(2) 4MY2 LDN 0 1 4NCL STO 0 ACOMMUNE2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOD https://www.george3.co.uk/george/macro/mod?rev=1705492539&do=diff MOD (GIN Macro) Defined in: MACROS BJE Used in: SETLIST864 4GP# ...[??? MOD SECT CENT FGN 3 DOC 4H3Q # 4HHB # MACRO TO MODIFY A SPECIFIED INSTRUCTION (%A) BY %B. IF %B=1,2 OR 3 4J32 # MODIFICATION RESULTS, OTHERWISE THE INSTRUCTION IS PREMODIFIED. 4JGL # 4K2= #MAC MOD 4KFW #MOD %B 4K^G ( 4LF6 #STR %B 4LYQ SMO %B 4MDB %A 4MY2 ) 4NCL #MOD %B 4NX= #SKI 4PBW %A(%B) 4PWG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MODCHANGE https://www.george3.co.uk/george/macro/modchange?rev=1705492539&do=diff MODCHANGE (GIN Macro) Defined in: OPEN-MACROS Used in: =4HD ...[??? MODCHANG SECT FILE FGN 20 DOC =4R= [ =5=W [ =5QG # THIS MACRO CHANGES THE MODE OF OPENING OF THE TOP FILE OPEN =6=6 # FROM GENERAL TO READ MODE. IT DOES NOT GURANTEE THAT THE =6PQ # FILE WILL BE LISTFILED IF FROZEN. =79B #MAC MODCHANGE [CAN'T USE MODECHANGE AS MODE =7P2 [IS AN INSTRUCTION ('125) =88L TOPFC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MODD https://www.george3.co.uk/george/macro/modd?rev=1705492539&do=diff MODD (GIN Macro) Defined in: MACS SPC Used in: FMYG #MAC MODD FND6 #STR %B FNXQ MOD %A,%B FPCB #STR %B FPX2 #SKI FQBL MOD %A,%C FQW= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MODSENT https://www.george3.co.uk/george/macro/modsent?rev=1705492539&do=diff MODSENT (GIN Macro) Defined in: MACROS DTP Used in: =5=W [??? MODSENT SECT DIAG FGN 570 DOC =5QG #MAC MODSENT [M. DRUKKER =6=6 [ =6PQ [ =79B [ ************* =7P2 [ * MODSENT * =88L [ ************* =8N= [ =97W [ =9MG [ THIS MACRO ISSUES A "#FILE" DIRECTIVE TO CAUSE GIN TO SET UP ==76 [ A RECORD IN ONE OF THE "MODS" SEGMENTS FOR THE SEGMENT JUST ==LQ [ MENDITED =?6B [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONEND https://www.george3.co.uk/george/macro/monend?rev=1705492539&do=diff MONEND (GIN Macro) Defined in: MACROS FIXD Used in: EVENTFN 4DTD ...[??? MONEND SECT CENT FGN 11 DOC 4F5= #MAC MONEND [GENERATES MONITOR EVENT IF END OF 4FJW [MONRESUME.OBEYED WITH O/P PLUGGED, 4G4G [FROM OLPA OR PCA.X0,1,2 DESTROYED 4GJ6 [AND STOP BIT CLEARED IF NO MONEVENT 4H3Q CALL 0 (GMONEND) 4HHB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONENDB https://www.george3.co.uk/george/macro/monendb?rev=1705492539&do=diff MONENDB (GIN Macro) Defined in: MACROS FIXD Used in: RUNPROG840 4HR8 ...[??? MONENDB SECT CENT FGN 11 DOC 4J32 # 4JGL # 4K2= #MAC MONENDB [GENERATES MONITOR EVENT IF END OF MONRESUME. OBEYED FROM 4KFW [CPA OR PCA WITH O/P UNPLUGGED AND X2-> PCA . 4K^G [ON EXIT X0,X1,X2 DESTROYED 4LF6 LDCT 0 #600 4LYQ ANDX 0 AMON(2) 4MDB ERS 0 AMON(2) [ERASE MONRESUME BITS 4MY2 BPZ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONICA https://www.george3.co.uk/george/macro/monica?rev=1705492539&do=diff MONICA (GIN Macro) Defined in: MACROS RME10 Used in: LIBREQ866, LIBREQC867, XENON 4^Y# ...[??? MONICA SECT FILE FGN 4 DOC 5286 #MAC MONICA 52MQ DOWN MODE,3 537B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONITOR https://www.george3.co.uk/george/macro/monitor?rev=1705492539&do=diff MONITOR (GIN Macro) Defined in: MACROS2JSR Used in: CHTAB, DISEVENT65, DRSTART6, EDSTART860, INKS, MESSE, OPCAXCOD5 2BDD ...[??? MONITOR SECT CENT FGN 2 DOC 2BN= # MACRO FOR REPORTING MONITOR EVENTS 2C7W #MAC MONITOR 2CMG SMO FX1 2D76 LDX 5 MMON 2DLQ ACROSS MONEVENT,1 2F6B MMON +JY%A 2FL2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONMEND https://www.george3.co.uk/george/macro/monmend?rev=1705492539&do=diff MONMEND (GIN Macro) Defined in: MACROS VB Used in: 22FL # [ RICHARD GRIMWADE 22^= # 23DW # THIS SUBFILE CONTAINS MACROS THAT ARE USED BY THE 23YG # MONITORING FILE SYSTEM AND THE SYSTEM JOURNAL. 24D6 # 24MY ...[??? MONMEND SECT CENT FGN 7 DOC 24XQ #MAC MONMEND 25CB #STR %B 25X2 ( 26BL #SKI 20?<1$1 26W= #MEN MESS%A 27*W #SKI 20? 27TG ( 28*6 #DEF 20?=20?-1 28SQ #ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONOUT https://www.george3.co.uk/george/macro/monout?rev=1705492539&do=diff MONOUT (GIN Macro) Defined in: MACROS VB Used in: ABANDONA867, ADDICT865, ADDJOB867, ALAS822, ALASB867, ALLOCATE867, ALLOW84, ARCHIVE867, ATTACHB866, ATTJOUNL861, BACKMAP864, BACKROOM865, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMCNTRL866, BMFIXIT864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTATS850, BSPRUNE867, BSUNJAM867, BUDGET84, CAFSPERI867, CARTCONT867, CHINERR867, CLEAN867, CLOSDEL867, CMEMILL866, COMPRESS864, COMPRO867, COMPROB8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONOUTR https://www.george3.co.uk/george/macro/monoutr?rev=1705492539&do=diff MONOUTR (GIN Macro) Defined in: MACROS VB Used in: 6834 ...[??? MONOUTR SECT CENT FGN 7 DOC 68=W #MAC MONOUTR 68QG JOBAUT %C,%D,MMONOUTR 69=6 #SKI MMONOUTR-1 69PQ LDX 2 FX2 6=9B LDN 0 %B&511 6=P2 STO 0 HMON1(2) 6?8L #STR %A 6?N= #STR 6#7W STOZ ACOMMUNE1(2) 6#MG #STR %A 6*76 ( 6*LQ LDN 0 %A 6B6B STO 0 ACOMMUNE1(2) 6BL2 ) 6C5L #SKI MMONOUTR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONOUTRX https://www.george3.co.uk/george/macro/monoutrx?rev=1705492539&do=diff MONOUTRX (GIN Macro) Defined in: MACROS VB Used in: 59=N ...[??? MONOUTRX SECT CENT FGN 7 DOC 59GG #MAC MONOUTRX 5=26 #STR 0,%A 5=FQ #STR 5=^B GEOERR 1,SOORRYY 5?F2 LDX 0 %B 5?YL #STR %A%C%D 5#D= ( 5#XW SMO FX2 5*CG STO 0 HMON1 5*X6 ) 5BBQ #STR %A%C%D 5BWB #STR 5CB2 ( 5CTL LDX 2 FX2 5D*= STO 0 HMON1(2) 5DSW ) 5F#G #STR %A 5FS6 #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MONOUTX https://www.george3.co.uk/george/macro/monoutx?rev=1705492539&do=diff MONOUTX (GIN Macro) Defined in: MACROS VB Used in: ABANDON867, ABANDONA867, ARCHIVNW83, ASSOC867, ATTACHC867, BACKMAP864, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BQUERY84, CAFSCTRL866, CANCRVX864, CDUM866, CHINERR867, COMPROB867, DISPCOM867, DTSUBS867, DTSUBSS867, DUMMYB867, ENGAGE867, ERROR867, EXMESS70, EXPRESS864, FILESECU83, HLSEMS864, HLSEVENT867, INCCHECK860, INCEOT865, INRESTAR84, IPBMOP867, IPBMOPB867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPASAT https://www.george3.co.uk/george/macro/mopasat?rev=1705492539&do=diff MOPASAT (GIN Macro) Defined in: MACS PW Used in: ASSOC867, ATTRIBUT867 6C79 # CREATES AN APERI,ASSOCS0 BLOCK IF ONE NOT THERE 6C7Q # 6C8? #MAC MOPASAT 6C8S HUNTW 1,APERI,ASSOCS0 6C9* BPZ 1 MCN10 6C9W LDN %A 1 6C=C HUNTW 1,APERI,ASSOCS 6C=Y BNG 1 MCN11 6C?F ADX %A ALOGLEN(1) 6C#2 MCN11 SETUPCORE %A,1,APERI,ASSOCS0 6C#H SBN %A 1 6C*4 LDX 0 JSOURCE3(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPCLOSE https://www.george3.co.uk/george/macro/mopclose?rev=1705492539&do=diff MOPCLOSE (GIN Macro) Defined in: MACS MISW Used in: ATTACHC867, COMPROA867, IPBLOG866, LOGOUT867, MORNING867 8*KL #MAC MOPCLOSE 8B5= SMO FX2 8BJW LDX 1 ACTRING 8C4G LDX 2 FX1 8CJ6 SBN 1 ACTRING 8D3Q MRET LDX 1 BPTR(1) 8DHB LDX 0 ATYPE(1) 8F32 BXE 0 MLCB(2),MLCB1 8FGL BXE 0 MDCB(2),MDCB1 8G2= BXU 1 FX2,MRET 8GFW LDX 1 FX1 8G^G LDX 2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPCREATE https://www.george3.co.uk/george/macro/mopcreate?rev=1705492539&do=diff MOPCREATE (GIN Macro) Defined in: CENTCSSMACS Used in: 32F4 ...[??? MOPCREAT SECT CENT FGN 18 DOC 32NW [ 338G #MAC MOPCREATE 33N6 #MEN VERBCLAS 347Q #TRA K82VERBCLAS 34MB #STR OFF,%A 3572 #SKI 35LL LDN 0 0 366= #STR OFF,%A 36KW LDX 0 CONTEXT(2) 375G #END 37K6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPIDENT https://www.george3.co.uk/george/macro/mopident?rev=1705492539&do=diff MOPIDENT (GIN Macro) Defined in: CENTCSSMACS Used in: 52MQ ...#MAC MOPIDENT 537B ...#MEN ENWELLB 53M2 ...#TRA K1ENWELLB 546L ...#STR OFF,%A 54L= ... BRN K55ENWELLB 555W ...#STR OFF,%A 55KG ...#SKI 5656 ... BRN K50ENWELLB 56JQ ...#END 574B ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPOFF https://www.george3.co.uk/george/macro/mopoff?rev=1705492539&do=diff MOPOFF (GIN Macro) Defined in: MACS JIB Used in: IPBERROR867, MOPCOMB865 97PJ ...[??? MOPOFF SECT COMM FGN 25 DOC 97^B [THIS MACRO MOPS OFF A UNIT 9*DW ...#MAC MOPOFF 9*FR ...#STR %C 9*GN ... LDX 0 %C 9*HK ...#STR %C 9*JG ...#SKI 9*KC ... LDX 0 CPPTR(2) 9*L# ... SMO FX2 9*M9 ... STO 0 ACOMMUNE1 9*N6 ... DOWN IDFOFF,20 9*P3 ... BRN %A [BRK-IN 9*PY ... BRN %B [ALREADY M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPON https://www.george3.co.uk/george/macro/mopon?rev=1705492539&do=diff MOPON (GIN Macro) Defined in: MACS JIB Used in: MOPCOMB865 9*RY ...[??? MOPON SECT COMM FGN 25 DOC 9GSQ ...#MAC MOPON 9GTM ...#STR %C 9GWJ ... LDX 0 %C 9GXF ...#STR %C 9GYB ...#SKI 9G^? ... LDX 0 CPPTR(2) 9H28 ... LDX 2 FX2 9H35 ... STO 0 ACOMMUNE2(2) 9H42 ... DOWN IDFSCON,3 9H4X ... BRN %A 9H5S ... BRN %B 9H6P ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPOUT https://www.george3.co.uk/george/macro/mopout?rev=1705492539&do=diff MOPOUT (GIN Macro) Defined in: MACS MISW Used in: CHTAB, INKS, MONFILEA864, MULTIPLX864, PNTLAST860 8WNG #MAC MOPOUT 8X86 #STR %A,0 8XMQ LDX 0 %A [NO. OF CHS. 8Y7B #STR %A 8YM2 #SKI 8^6L NGN 0 1 8^L= LDX 2 FX2 925W STO 0 ACOMMUNE7(2) 92KG #UNS ECS 9356 TRUEDORM 93JQ #STR %B 944B #SKI 94J2 ( 953L LDCH 0 JSOURCE1(2) 95H= SBN 0 #30 962W… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPSTATE https://www.george3.co.uk/george/macro/mopstate?rev=1705492539&do=diff MOPSTATE (GIN Macro) Defined in: MACS MISW Used in: DUMMYB867, RIGHT867, WHATPERB867, WHATPERX867 9B#G [??? MOPSTATE SECT COMM FGN 40 DOC 9BS6 [ 9C?Q [ 9CRB [ MACRO TO FIND THE STATE OF A REMOTE UNIT 9D?2 [ IE WHETHER IT IS MOPPED ON OR OFF OR WHETHER IT IS BEING 9DQL [ MOPPED ON OR OFF 9F== [ 9FPW [ 9G9G #MAC MOPSTATE 9GP6 JALLOC %A,MMOPSTATE1 [J. IF ALLOCATED TO AN ACTIVITY 9H8Q BRN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPWAIT https://www.george3.co.uk/george/macro/mopwait?rev=1705492539&do=diff MOPWAIT (GIN Macro) Defined in: MACS MISW Used in: MOPOUT85 =KW6 #MAC MOPWAIT [M. WILSON =L*Q DOWN MULTIPLX,3 =LTB #STR %B =M*2 ( =MSL LDCH 0 JSOURCE1(2) =N#= SBN 0 7 =NRW BZE 0 %B [J IF INOPERABLE =P?G ) =PR6 #STR 1,%A =Q=Q SMOPWAIT =QQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOPWIDTH https://www.george3.co.uk/george/macro/mopwidth?rev=1705492539&do=diff MOPWIDTH (GIN Macro) Defined in: MACS MISW Used in: =X72 #MAC MOPWIDTH =XLL #DEF 19?+9=1? =Y6= #LIS %C+0 =YKW #DEF 19?+0=33? =^5G #SKI %A =^K6 ( ?24Q #SKI 19?+0]-33?<1$1 ?2JB ( ?342 #STR %B,CHAR ?3HL #SKI ?43= ( ?4GW RESET CMOPWIDTH,%A>40 ?52G #SKI %A>511$511 ?5G6 RESET CMOPWIDTH,511 ?5^Q #MEN SCAN ?6FB #TRA K31SCAN ?6^2 +CMOPWIDTH ?7DL #FID 0 5 6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOUSE https://www.george3.co.uk/george/macro/mouse?rev=1705492539&do=diff MOUSE (GIN Macro) Defined in: MACROS MSYS Used in: =R^D ...[??? MOUSE SECT CENT FGN 56 DOC =S9= # =SNW # =T8G # HERE FOLLOWS MOUSE. **** MOUSE =TN6 # IT IS USED (?) BY CAT. =W7Q # =WMB #MAC MOUSE =X72 MFLOCAL 22?+1,26? =XLL #EXI 26? =Y6= #DEF 0?=25?+1 =YKW #DEF 25?=34?+0?] =^5G #SKI 25?&#77777-23?<1$1 =^K6 +24?^25? ?24Q #DEF 25?=26? ?2JB #DEF 22?=2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOVLONG https://www.george3.co.uk/george/macro/movlong?rev=1705492539&do=diff MOVLONG (GIN Macro) Defined in: MACROS EWDAS Used in: BRADDATA867, CHINTEG867, CONTRACT866, EXINONE867, IPBINB867, IPBSTARB867, IPBSTART867, NEWINST867, SCEX866, TWINSETB866 S8TQ # S9*B [??? MOVLONG S9T2 # ******* S=#L #MAC MOVLONG S=S= # S??W STO %A BSL1 [PRESERVE PARAMETERS S?RG STO %B BSL2 S#?6 STO %C BSL3 S#QQ MOVLONG1 S*=B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MOVX https://www.george3.co.uk/george/macro/movx?rev=1705492539&do=diff MOVX (GIN Macro) Defined in: PMACS Used in: PMCRABS860, PMDR864, PMJOURNL866 22FL # 22^= # 23DW # THIS SUBFILE CONTAINS THE POST-MORTEM MACROS 23YG # AND IS OWNED BY M.C.D. MANN 24D6 # 24XQ # 25CB [??? MOVX SECT DIAG FGN 104 DOC 25X2 #MAC MOVX [M.C.D. MANN 26BL [ 26W= [ 27*W [ ********** 27TG [ * MOVX * 28*6 [ ********** 28SQ [ 29#B [ 2B8L LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MPERTYPNO https://www.george3.co.uk/george/macro/mpertypno?rev=1705492539&do=diff MPERTYPNO (GIN Macro) Defined in: MACROS2JSR Used in: MONOLITH864 3^F* ...[ 3^FD ...[??? MPERTYPN SECT CENT FGN 4 DOC 3^FH ...[ 3^FL ...#MAC MPERTYPNO 3^FP ... ACCSTO %A,ACOMMUNE9,FX2 3^FS ... DOWN PERTYPNO,2 3^FX ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MPROPCON https://www.george3.co.uk/george/macro/mpropcon?rev=1705492539&do=diff MPROPCON (GIN Macro) Defined in: MACROS SAR Used in: MONJRNAL850, MONOLITH864 3JR2 #MAC MPROPCON 3K=L [ 3KQ= [ THIS MACRO CONVERTS EACH PROPERTY NUMBER LIST IN A GMON/ASET 3L9W [ INTO A STRING OF NAMES SEPARATED BY AMPERSANDS IN AN 3LPG [ ADATA/GMONACC. 3M96 [ 3MNQ DOWN WHATPROP,3 3N8B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MSEARCH https://www.george3.co.uk/george/macro/msearch?rev=1705492539&do=diff MSEARCH (GIN Macro) Defined in: MACS JIB Used in: HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, IDFCONFA867, IDFENQS867, IDFLINE867, IDFOFF867, IDFSCON867, ONLINEC867, SPOOL83, XATTACH861 9H88 ...[??? MSEARCH SECT COMM FGN 25 DOC 9H8Q #MAC MSEARCH 9HNB LDX 0 BRECNO(%A) [LOAD REC NO 9J82 SMO FX2 9JML STO 0 ACOMMUNE3 [ST. REC.NO. 9K7= SMO FX2 9KLW STO %B ACOMMUNE2 [S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MSPLITCORE https://www.george3.co.uk/george/macro/msplitcore?rev=1705492539&do=diff MSPLITCORE (GIN Macro) Defined in: MACS JIB Used in: IDFSEG867, SETIDF867 9P#4 ...[??? MSPLITCO SECT COMM FGN 25 DOC 9PHW #MAC MSPLITCORE 9Q3G ADN %A A1 9QH6 SMO FX2 9R2Q LDX 0 ACOMMUNE3 9RGB STO 0 BRECNO(%A) 9S22 SLL 0 9 9SFL LDN 1 GSBS-1 9S^= ADX 1 0 9TDW ADN 0 CELLEN 9TYG MXAS BXGE 0 1,MXBA 9WD6 STO 0 0(%A) 9WXQ ADN %A CELLEN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MT21SMES https://www.george3.co.uk/george/macro/mt21smes?rev=1705492539&do=diff MT21SMES (GIN Macro) Defined in: MACROS RME10 Used in: LIBMANY867, LIBSEC867, XENON ?RYW ...[??? MT21SMES SECT FILE ?SDG ...#MAC MT21SMES ?SY6 ... JNOTMT21S %A,MNOT ?TCQ ... HUNT 2,CPAR,GPERCON ?TXB ... BNG 2 MNOT ?WC2 ... LDX 0 A1+2(2) ?WWL ... ANDX 0 A1+1(2) ?XB= ... ANDN 0 #10 ?XTW ... LDX 2 FX2 ?Y*G ... BNZ 0 MNOT ?YT6 ... LGEOG %A,1 ?^#Q ... OUTNUM 1,0 ?^SB ... MONICA #2#2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTCENTREAD https://www.george3.co.uk/george/macro/mtcentread?rev=1705492539&do=diff MTCENTREAD (GIN Macro) Defined in: DUMP-MACROS Used in: 5BLJ ...[??? MTCENTRE SECT FILE FGN 65 DOC 5BWB #MAC MTCENTREAD 5CB2 #FRE MTCENTREAD 5CTL #DEF MTCENTREAD=0? 5D*= SBX 4 FX1 [A CENTRAL SR TO READ A BLOCK WHOSE 5DSW LDX 1 CPPTR(2) 5F#G DCA 1,STO,0,COUNT 5FS6 LDN 0 0 5G?Q DCA 1,DLA,0,MODE 5GRB LDN 0 A1(3) 5H?2 DCA 1,STO,0,CTSA 5HQL ANSOK2 5J== M2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTCHAR https://www.george3.co.uk/george/macro/mtchar?rev=1705492539&do=diff MTCHAR (GIN Macro) Defined in: MACROS RME10 Used in: ADJUNCTS85, LIBREQ866, LIBREQC867, NEWOWN865, NEWPW867, TRANSPOT65, UNLOAD7, XENON =*#N ...[??? MTCHAR SECT FILE FGN 4 DOC =*JG #MAC MTCHAR =B46 #STR %A,0 =BHQ LDX 0 %A =C3B SMO FX2 =CH2 STO 0 ACOMMUNE1 =D2L DOWN LIBPROPS,3 =DG= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTCHECK https://www.george3.co.uk/george/macro/mtcheck?rev=1705492539&do=diff MTCHECK (GIN Macro) Defined in: MACROS RMD10 Used in: CHTAB, COPYA867, FHOBJBL860, INCTAPES867, INKS, MTCHECK860 326B ...[??? MTCHECK SECT FILE FGN 17 DOC 32H6 ...[ %A=BLOCK TYPE; %B=BLOCK SUBTYPE; %C=BULK FILE ADDRESS 32XW ...[ %D(OPTIONAL)=SIZE OF BULK FILE IN BLOCKS 33#L ...#MAC MTCHECK 33PB ... LDX 2 FX2 3466 ... ACCSTO %C,ACOMMUNE2(2) 34GW ...#STR %D 34XL ... ACCSTO %D,ACOMMUNE3(2) 35#B ... SMO FX1 35P6 ... LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTEXPROP https://www.george3.co.uk/george/macro/mtexprop?rev=1705492539&do=diff MTEXPROP (GIN Macro) Defined in: MACROS RME10 Used in: GETON867, LIBCOM867, OLMTA85, TRANSPOT65, UNLOAD7 =6FY ...[??? MTEXPROP SECT FILE FGN 4 DOC =6PQ #MAC MTEXPROP =79B #STR %A,TAPE =7P2 ( =88L #STR %A,DECK =8N= ! %A INVALID =97W LDN 0 2 =9MG ) ==76 #STR %A,TAPE ==LQ #SKI =?6B LDN 0 1 =?L2 SMO FX2 =#5L STO 0 ACOMMUNE1 =#K= DOWN LIBPROPS,2 =*4W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTGR https://www.george3.co.uk/george/macro/mtgr?rev=1705492539&do=diff MTGR (GIN Macro) Defined in: DUMP-MACROS Used in: 32NX ...[??? MTGR SECT FILE FGN NN DOC 32NY ...# 32N^ ...# THIS MACROS GIVES OR REMOVES THE FACILITY OF ALLOWING DUMPER 32P2 ...# TO PRODUCE A RESTORABLE BATCH OF INCREMENTS 32P3 ...# THE PARAMETER MAY BE ON,OFF OR NULL. NULL = ON. 32P4 ...# 32P5 ...#MAC MTGR 32P6 ...#STR %A 32P7 ...#STR 32P8 ...( 32P9 ... MTGR ON 32P= ...#EXI 32P? ...) 32P# ...#STR %A,ON 32P* ...#STR 32PB ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTHWSER https://www.george3.co.uk/george/macro/mthwser?rev=1705492539&do=diff MTHWSER (GIN Macro) Defined in: MACROS RME10 Used in: LIBLOAD867, NEWOWN865, NEWPW867 #JB6 ...[??? MTHWSER SECT FILE FGN 12 #JTQ ...#MAC MTHWSER #K*B ... LDX %B %A #KT2 ... ANDN %B HWPTRACK9 #L#L ... BZE %B M1MTHWSER [7-TRACK #LS= ... LDX %B %A #M?W ... ANDN %B 3 #MRG ... BZE %B M2MTHWSER [NOT PE,NRZI,GCR #N?6 ... SBN %B 1 #NQQ ... BZE %B M3MTHWSER [NRZI #P=B ... SBN %B 1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTHWSPD https://www.george3.co.uk/george/macro/mthwspd?rev=1705492539&do=diff MTHWSPD (GIN Macro) Defined in: MACROS RME10 Used in: GETONA867, OLMTC85 #Y56 ...[??? MTHWSPD SECT FILE FGN 12 #YJQ ...#MAC MTHWSPD #^4B ... LDN 0 #400 #^J2 ... ANDX 0 %A *23L ... BZE 0 M1MTHWSPD *2H= ... LDN 0 HWPTRACK9 *32W ... ANDX 0 %A *3GG ... LDN %B GLIBTRA7 *426 ... BNZ 0 M2MTHWSPD *4FQ ... LDN %B GLIBTRA9 *4^B ... BRN M2MTHWSPD *5F2 ...M1MTHWSPD *5YL ... LDN 0 HWPTRACK9 *6D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTINFORM https://www.george3.co.uk/george/macro/mtinform?rev=1705492539&do=diff MTINFORM (GIN Macro) Defined in: MACROS RME10 Used in: DEAD867, DEADA867, GET6, LIBLOAD867, LIBLOADB867, LIBQUERY, LIBREQ866, LIBREQCA867, MODE866, MODEA65, NEWOWN865, RETURNIT867, TAPEWAIT65, TRANSPOT65, UNLOAD7, UNLOADMT867 6K*2 ...[??? MTINFORM SECT FILE FGN 4 DOC 6K*K ...#MAC MTINFORM 6KB8 ... INFORM 1,%A,1 6KBR ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTINITIAL https://www.george3.co.uk/george/macro/mtinitial?rev=1705492539&do=diff MTINITIAL (GIN Macro) Defined in: MACROS RME10 Used in: *JKB ...#MAC MTINITIAL *K52 ...#UNS JMODGCR *KJL ...( *L4= ...#STR %A *LHW ...( *M3G ...#STR %A,PE *MH6 ...( *N2Q ...#STR %A,NRZI *NGB ...( *P22 ...#STR %A,GCR *PFL ...! INCORRECT MODE SPECIFIED *P^= ...) *QDW ...) *QYG ...#STR %A,PE *RD6 ...#STR *RXQ ...( *SCB ...#MEND SETUPA *SX2 ...#TRA K40SETUPA *TBL ... LDN 5 HWP%A *TW= ...#END *W*W ...) *WTG ...#STR %A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTMAC https://www.george3.co.uk/george/macro/mtmac?rev=1705492539&do=diff MTMAC (GIN Macro) Defined in: DUMP-MACROS Used in: 456D ...[??? MTMAC SECT FILE FGN 65 DOC 45B= # 45TW [ MAGNETIC TAPE ACCESS MACROS FOR MARK 3 46T6 #MAC MTMAC 47#Q #FRE MTPERI 47SB #DEF MTACCDUMP=0? 48#2 STO 3 ACOMMUNE1(2) 48RL STO 4 ACOMMUNE2(2) 49?= STO 5 ACOMMUNE3(2) 49QW STO 6 ACOMMUNE4(2) 4==G STO 7 ACOMMUNE5(2) 4=Q6 EXIT 0 0 4?9Q #DEF MTACCUND=0… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTMERGPROP https://www.george3.co.uk/george/macro/mtmergprop?rev=1705492539&do=diff MTMERGPROP (GIN Macro) Defined in: MACROS RME10 Used in: GETON867, OLMTA85 9W8# ...[??? MTMERGPR SECT FILE FGN 4 DOC 9WD6 #MAC MTMERGPROP 9WXQ LDX 0 %B 9XCB ANDX 0 %C 9XX2 BNZ 0 %G 9YBL LDX 0 %D 9YW= ANDX 0 %A 9^*W BNZ 0 %G 9^TG LDX 0 %A =2*6 ORX 0 %C =2SQ STO 0 %E =3#B LDX 0 %B =3S2 ORX 0 %D =4?L STO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTPTR https://www.george3.co.uk/george/macro/mtptr?rev=1705492539&do=diff MTPTR (GIN Macro) Defined in: MACROS RME10 Used in: CONTXCOD60, MONITOR36, OPCA867, RELPER867, SETPC867, WSPERIS867 6L88 ...[??? MTPTR SECT FILE FGN 4 DOC 6LD2 #MAC MTPTR 6LXL #STR %A,%B 6MC= ( 6MWW SMO %A 6NBG LDX %B CPPTR 6NW6 BNZ %B M0MTPTR 6P*Q SMO %A 6PTB LDX %B AWORK4 6Q*2 M0MTPTR 6QSL ) 6R#= #STR %A,%B 6RRW #SKI 6S?G ( 6SR6 SMO %A 6T=Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTREAD https://www.george3.co.uk/george/macro/mtread?rev=1705492539&do=diff MTREAD (GIN Macro) Defined in: DUMP-MACROS Used in: DTREST860, MTCHECK860, PMDUMPMT85 5PB# ...[??? MTREAD SECT FILE FGN 65 DOC 5PL6 #MAC MTREAD 5Q5Q #OPT MTREAD=0 5QKB #SKI MTREAD 5R52 #SKI 5RJL ( 5S4= BRN M1MTREAD 5SHW #OPT MTPERI=0 5T3G #SKI MTPERI 5TH6 #SKI 5W2Q MTMAC 5WGB #OPT MTCENTREAD=0 5X22 #SKI MTCENTREAD 5XFL #SKI 5X^= MTCENTREAD [READ X0 SIZED BLOCK 5YDW #FRE M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTREQUEST https://www.george3.co.uk/george/macro/mtrequest?rev=1705492539&do=diff MTREQUEST (GIN Macro) Defined in: MACROS RME10 Used in: LIBREQ866, LIBREQC867, XENON 6KCB ...[??? MTREQUES SECT FILE FGN 4 DOC 6KC^ ...#MAC MTREQUEST 6KDJ ... INFORM 1,%A,0 6KF7 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTREW https://www.george3.co.uk/george/macro/mtrew?rev=1705492539&do=diff MTREW (GIN Macro) Defined in: DUMP-MACROS Used in: DTSCAN860, LOADERGO867, PMDUMPMT85 4WGY ...[??? MTREW SECT FILE FGN 65 DOC 4WQQ #MAC MTREW 4X=B #OPT MTREW=0 4XQ2 #SKI MTREW 4Y9L #SKI 4YP= ( 4^8W BRN M1MTREW 4^NG #OPT MTPERI=0 5286 #SKI MTPERI 52MQ #SKI 537B MTMAC 53M2 #FRE MTREW 546L #DEF MTREW=0? 54L= SBX 0 FX1 555W LDX 2 FX2 55KG STO 0 ACOMMUNE6(2) 5656 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTSERSPD https://www.george3.co.uk/george/macro/mtserspd?rev=1705492539&do=diff MTSERSPD (GIN Macro) Defined in: MACROS RME10 Used in: LIBMANY867, LIBSEC867 ##J6 ...[??? MTSERSPD SECT FILE FGN 12 #*3Q ...#MAC MTSERSPD #*HB ...#ACC %A #B32 ...( #BGL ... LDX 0 %A #C2= ... SMO FX2 #CFW ... STO 0 ACOMMUNE1 #C^G ...) #DF6 ...#ACC %A #DYQ ...#SKI #FDB ...( #FY2 ... SMO FX2 #GCL ... STO %A ACOMMUNE1 #GX= ...) #HBW ... DOWN LIBPROPS,5 #HWG ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MTSKIP https://www.george3.co.uk/george/macro/mtskip?rev=1705492539&do=diff MTSKIP (GIN Macro) Defined in: DUMP-MACROS Used in: DTREST860, DTSCAN860, PMDUMPMT85 6*WJ ...[??? MTSKIP SECT FILE FGN 65 DOC 6B6B #MAC MTSKIP [SKIP TO TAPE MARK AND READ A BLOCK 6BL2 #OPT MTSKIP=0 6C5L MHUNT 3,%A,%B 6CK= #SKI MTSKIP 6D4W #SKI 6DJG ( 6F46 BRN M1MTSKIP 6FHQ #OPT MTPERI=0 6G3B #SKI MTPERI 6GH2 #SKI 6H2L MTMAC 6HG= #OPT MTCENTREAD=0 6H^W #SKI MTCENTREAD 6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MULTIFID https://www.george3.co.uk/george/macro/multifid?rev=1705492539&do=diff MULTIFID (GIN Macro) Defined in: MACROS FIXD Used in: 3=H? ...[??? MULTIFID SECT CENT FGN 11 DOC 3=HP ...[ 3=JJ ...#MAC MULTIFID [INVERTS BITS SPECIFIED BY A STRING OF PARAMETERS 3=KC ...#STR %D 3=L= ...( 3=M5 ...#DEF 20?=%A 3=MY ...#DEF 21?=%D 3=NR ...#SKI 21?-20?/%C [ERROR UNLESS %A <OR= %D < %A+%C 3=PL ...!ERROR 3=QF ...#DEF 20?=%B+21?-20? [20?=+ OR - BIT NO TO BE INVERTED 3=R# ...#DEF 20?=20?&#40000000<1$1*2-1*20?[TAKE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MUNS https://www.george3.co.uk/george/macro/muns?rev=1705492539&do=diff MUNS (GIN Macro) Defined in: MACROS DTP Used in: JW26 ...[??? MUNS SECT DIAG FGN 576 JWFQ ...#MAC MUNS JW^B ...[ JXF2 ...[ JXYL ...[ ************ JYD= ...[ * MUNS * JYXW ...[ ************ J^CG ...[ J^X6 ...[ K2BQ ...#LIS 0 K2WB ...#ORD K3B2 ...#INT K3TL ...XERR +72? K4*= ...XBUF 10HWARNING : K4SW ...XNUM 8H K5#G ...XBUF1 22H UNSETS %A %BMENDIT K5S6 ...XMESS 40:XBUF K6?Q ...XLN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MURDER https://www.george3.co.uk/george/macro/murder?rev=1705492539&do=diff MURDER (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CDCIPB864, CLOSBAC867, CLOSEONE867, CONMXA85, DRUM852, GETNO865, IPBSCAN867, LISTNIP865, MAKEVCC867, OFFREL867, OLMTB867, OLMTD65, OLMTE85, PROSTART867, RELPER867, RENAMEMT867, REQESLIP861, SAVEBLOK65, UNSAVE867, VIPBPERI864 KB5Q ...[??? MURDER SECT CENT FGN 32 DOC KBKB ...# KC52 ...# THIS MACRO MURDERS THE ACTIVITY POINTED TO BY %A WHICH MUST BE AN ACC KCJL ...#MAC MURDER KD4= ... SMO FX2 KDHW ... STO %A EXE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MUSEST https://www.george3.co.uk/george/macro/musest?rev=1705492539&do=diff MUSEST (GIN Macro) Defined in: MACROS EWDAS Used in: EXINONE867, EXOPEN867, FLAWMAP866, NEXTUNIT867, SCEX866, WRITEFIP867 42Y6 # 43CQ [??? MUSEST 43XB # ****** 44C2 #MAC MUSEST 44WL # 45B= #STR %D 45TW ( 46*G LDX 0 %D 46T6 SMO FX2 47#Q STO 0 ACOMMUNE8 47SB ) 48#2 #STR %D 48RL #SKI 49?= ( 49QW SMO FX2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) MXB https://www.george3.co.uk/george/macro/mxb?rev=1705492539&do=diff MXB (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, HARDIDF867, IDFASAT867, IDFCANC867, IDFCHK867, IDFCONF867, IDFCONFA867, IDFCONS8, IDFENQS867, IDFLINE867, IDFOFF867, IDFONLIN867, IDFPER867, IDFSCON867, IDFSEG867, LISTAST867, LISTCONK83, LISTIDF867, LISTPROP867, PARIDF8, SETIDF867, SPOOL83, XATTACH861 =534 ...[??? MXB SECT COMM FGN 25 DOC =5=W #MAC MXB =5QG MHUNT2A =6=6 LDX %A FPTR(%A) =6PQ LDX 0 ATYPE(%A) =79B TXL 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NAME https://www.george3.co.uk/george/macro/name?rev=1705492539&do=diff NAME (GIN Macro) Defined in: COREMACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ADJUNCTS85, ALAS822, ALASB867, ALLOW84, ANALYSE865, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSOC867, ATTACHA8, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEND7, BRADSPLT867, BSALFAIL, BSPRUNE867, BSQ867, BSUJSTAT867, BUDGET84, BUDGTWO84, CANCRVX864, CDCIPB864, CHANG86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NAMETOP https://www.george3.co.uk/george/macro/nametop?rev=1705492539&do=diff NAMETOP (GIN Macro) Defined in: COREMACROS Used in: ALLOCATE867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASTONIF867, BACKROOM865, BMFIXIT864, BUDGTWO84, CANCRVX864, CONCEPT85, COPYA867, COPYB867, CREATE867, CROBJ6, DEAD867, DIRENT867, DUMP860, EDIT867, EDITMFO867, ENWELL867, ERASE867, FILESECU83, FREEZE864, GETON867, HOWBIG867, IFEXPAN867, INCOM864, INITJOB867, INLOOP84, INPUTMOP82, INRESTAR84, IPCOPENB83, JDTWO864, LABEL866, LDSTART850, LIBCOM867, LIBLOAD867, LISTDIR867, LISTDIRF867, LISTEND867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NAMEX https://www.george3.co.uk/george/macro/namex?rev=1705492539&do=diff NAMEX (GIN Macro) Defined in: COREMACROS Used in: ATTRIBUT867, BEXTRA83, BMSJRNL866, BSQ867, BSTS867, ENWELL867, JWELLTWO867, MONFILEA864, MTOBJ864, MTSTART864, PCTSTART867, PROPERTY867, SCAN865, SJOPEN863, WHENEVER867 7*L8 ...[??? NAMEX SECT CENT FGN 32 DOC 7*W2 # 7B*L # MACRO FOR GIVING A BLOCK THE TYPE AND SUB-TYPE HELD IN X0 7BT= #MAC NAMEX 7C#W MOD STO 0 ATYPE,%A 7CSG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NAMFREEW https://www.george3.co.uk/george/macro/namfreew?rev=1705492539&do=diff NAMFREEW (GIN Macro) Defined in: MACROS FIXD Used in: BSTS867 7JDY ...[??? NAMFREEW SECT CENT FGN 11 DOC 7JNQ # 7K8B [ THIS MACRO MUST BE USED TO RENAME BUFFER BLOCKS BSTB/BFREEW 7KN2 # 7L7L #MAC NAMFREEW 7LM= LDBIT 22,0 7M6W MOD ANDX 0 AFLAG,%A 7MLG BNZ 0 %B 7N66 LDX 0 BJFREEW 7NKQ NAMEX %A 7P5B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NBITMASK https://www.george3.co.uk/george/macro/nbitmask?rev=1705492539&do=diff NBITMASK (GIN Macro) Defined in: MACROS JSR Used in: 8FQD ...[??? NBITMASK SECT CENT FGN 9 DOC 8G2= # 8GFW # THIS MACRO SETS UP A MASK OF ALL BITS EXCEPT THE SPECIFIED BITS 8G^G # 8HF6 #MAC NBITMASK 8HYQ -1 8JDB BITMASKZ %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M 8JY2 #STR %N 8KCL BITMASKZ %N,%O,%P,%Q,%R,%S,%T,%U,%V,%W,%V,%W,%X 8KX= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NBREAKIN https://www.george3.co.uk/george/macro/nbreakin?rev=1705492539&do=diff NBREAKIN (GIN Macro) Defined in: MACROS JSR Used in: CIMOP867, IPBIN867, IPBINC865, IPBMOPC867, MOPCOM867, MOPCOMB865, MOPSTART865, MULTIPLX864, SPUNLOAD867 4QL# ...#MAC NBREAKIN 4QLD ...[ 4QLJ ...[ IF %B IS 5,9 OR 16,UP=REJECTED,UPPLUS 1,OK 4QLN ...[ IF %B IS 3,4,8,UP IS OK,UPPLUS 1 REJECTED 4QLS ...[ 4QLY ...#STR %A,1 4QM4 ... LDX 1 %A 4QM8 ... LDX 2 FX2 4QM# ... ACCSTO JOBNO(1),ACOMMUNE1,2 4QMD ... ACCSTO ACTNUM(1),ACOMMUNE2,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NESTBRANCH https://www.george3.co.uk/george/macro/nestbranch?rev=1705492539&do=diff NESTBRANCH (GIN Macro) Defined in: IFMACS Used in: ?M4L [ ?MJ= [ ?N3W [??? NESTBRANCH SECT DEVT FGN 1 DOC ?NHG [ ?P36 #MAC NESTBRANCH ?PGQ [ ========== ?Q2B [ ?QG2 [ ?Q^L [ %A - BRANCH ROOT, E.G. 'CC' OR 'ZE 7' OR 'XGE 5 BCOUNT' ?RF= [ %B - LABEL ROOT ?RYW [ ?SDG [ PREFIXES THE LABEL ROOT WITH 20? N'S AND SETS UP THE BRANCH OR ?SY6 [ BRANCH MACRO FOR COMPILATION ?TCQ [ ?TXB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NESTFBRANCH https://www.george3.co.uk/george/macro/nestfbranch?rev=1705492539&do=diff NESTFBRANCH (GIN Macro) Defined in: IFMACS Used in: #4=G [ #4Q6 [ #59Q [??? NESTFBRANCH SECT DEVT FGN 1 DOC #5PB [ #692 #MAC NESTFBRANCH #6NL [ =========== #78= [ #7MW [ #87G [ AS NESTBRANCH ABOVE, BUT FREES THE LABEL AFTER COMPILING THE BRANCH #8M6 [ (SAVES AN EXTRA CALL - TO NESTFREE) #96Q [ #9LB #SKI 20? #=62 ( #=KL #ALT 20?=20?-1 #?5= NESTFBRANCH … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NESTFREE https://www.george3.co.uk/george/macro/nestfree?rev=1705492539&do=diff NESTFREE (GIN Macro) Defined in: IFMACS Used in: #DYQ [ #FDB [ #FY2 [??? NESTFREE SECT DEVT FGN 1 DOC #GCL [ #GX= #MAC NESTFREE #HBW [ ======== #HWG [ #JB6 [ #JTQ [ %A - LABEL ROOT #K*B [ #KT2 [ PREFIXES %A WITH 20? N'S AND #FRE'S THE RESULT #L#L [ #LS= #SKI 20? #M?W ( #MRG #ALT 20?=20?-1 #N?6 NESTFREE N%A #NQQ #EXI #P=B ) #PQ2 #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NESTJUMP https://www.george3.co.uk/george/macro/nestjump?rev=1705492539&do=diff NESTJUMP (GIN Macro) Defined in: IFMACS Used in: =Y6= [ =YKW [ =^5G [??? NESTJUMP SECT DEVT FGN 1 DOC =^K6 [ ?24Q #MAC NESTJUMP ?2JB [ ======== ?342 [ ?3HL [ ?43= [ %A - LABEL ROOT ?4GW [ %B - JUMP CONDITION DEFINER ?52G [ %C - PARAMETERS TO JUMP CONDITION DEFINER ?5G6 [ ?5^Q [ PREFIXES THE LABEL ROOT WITH 20? N'S AND SETS UP THE JUMP ?6FB [ FOR COMPILATION ?6^2 [ ?7DL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NESTLABEL https://www.george3.co.uk/george/macro/nestlabel?rev=1705492539&do=diff NESTLABEL (GIN Macro) Defined in: IFMACS Used in: #QP= [ #R8W [ #RNG [??? NESTLABEL SECT DEVT FGN 1 DOC #S86 [ #SMQ #MAC NESTLABEL #T7B [ ========= #TM2 [ #W6L [ #WL= [ %A - LABEL ROOT #X5W [ #XKG [ PREFIXES %A WITH 20? N'S AND USES THE RESULT AS A LABEL #Y56 [ IF IDENTIFIER 'NOIFLABELS' IS SET NON-ZERO THEN THIS IS DONE #YJQ [ BY #DEF LABEL=CURRENT WORD ADDRESS (TO AVOID SHOWING LABEL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEW https://www.george3.co.uk/george/macro/new?rev=1705492539&do=diff NEW (GIN Macro) Defined in: MACS JIB Used in: DELCON867, EDITER867, IDFCHK867, IDFCONF867, IDFCONFA867, MESSA, MESSAH, MESSAI, MESSCC, MESSCF, MESSG, PCTLISTA867, PCTLISTB867, SETIDF867, SPOOL83, SYSPROP867, XATTACH861 =HMS ...[??? NEW SECT COMM FGN 25 DOC =HXL #MAC NEW =JC= LDX %A FX2 =JWW MA HUNT2 %A,FILE,FRRB =KBG LDX 0 BRECNO+A1(%A) =KW6 SMO FX2 =L*Q TXU 0 ACOMMUNE3 =LTB BCS MA =M*2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWCHAP https://www.george3.co.uk/george/macro/newchap?rev=1705492539&do=diff NEWCHAP (GIN Macro) Defined in: MACROS DTP Used in: DG*B [??? NEWCHAP SECT DIAG FGN 552 DOC DGT2 #MAC NEWCHAP [M.C.D. MANN DH#L [ DHS= [ DJ?W [ ************* DJRG [ * NEWCHAP * DK?6 [ ************* DKQQ [ DL=B [ DLQ2 NEWCHENT %A,%B DM9L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWCHENT https://www.george3.co.uk/george/macro/newchent?rev=1705492539&do=diff NEWCHENT (GIN Macro) Defined in: MACROS DTP Used in: D#2= [??? NEWCHENT SECT DIAG FGN 552 DOC D#FW #MAC NEWCHENT [M.C.D. MANN D#^G [ D*F6 [ D*YQ [ ************** DBDB [ * NEWCHENT * DBY2 [ ************** DCCL [ DCX= [ DDBW #MEN CHTABLE DDWG CHAPENT %A DFB6 #END %B DFBQ ...#SKI 23? DFCB ...#EXI DFD4 ...#SKI G3 DFG2 ...( DFHY ...#MEN LOADEREM DFKW ...#TRA JLXCHPCT D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWCOMP https://www.george3.co.uk/george/macro/newcomp?rev=1705492539&do=diff NEWCOMP (GIN Macro) Defined in: MACROS DTP Used in: TPOBJ867 **?2 ...[??? NEWCOMP SECT DIAG FGN 562 DOC **QL #MAC NEWCOMP [M.C.D. MANN *B== [ *BPW [ *C9G [ ************* *CP6 [ * NEWCOMP * *D8Q [ ************* *DNB [ *F82 [ *FML #DEF 31?=1? [REMEMBER THE LISTING LEVEL *FSS ...#STR *,%A *G22 ...( *G7= #LIS %B+0 [DEFAULT LISTING LEVEL IS ZERO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWDICTENT https://www.george3.co.uk/george/macro/newdictent?rev=1705492539&do=diff NEWDICTENT (GIN Macro) Defined in: BMAP MACROS Used in: 6W=2 ...[??? NEWDICTE SECT FILE FGN 36 DOC 6WPL ...#MAC NEWDICTENT 6X9= ...[ 6XNW ...[ THIS MACRO SETS UP A PASSWORD FOR 6Y8G ...[ RECREATED DICTIONARY ENTRIES 6YN6 ...[ 6^7Q ...#MEN ADDICT 6^MB ...#TRA K50ADDICT 7272 ... 12H%A 72LL ...#END 736= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWDIR https://www.george3.co.uk/george/macro/newdir?rev=1705492539&do=diff NEWDIR (GIN Macro) Defined in: MACROS RMD10 Used in: BACKMASS860, BMSJRNL866, CHTAB, INKS =4HD ...[??? NEWDIR SECT FILE FGN 16 DOC =5=W [CREATES A NON-PSEUDO DIRECTORY GIVEN A FABSNB & A CREATE BLOCK ==76 #MAC NEWDIR ==LQ DOWN NEWDIR,1 =?6B BRN %A =?L2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWDTASK https://www.george3.co.uk/george/macro/newdtask?rev=1705492539&do=diff NEWDTASK (GIN Macro) Defined in: DUMP-MACROS Used in: C6S3 ...[??? NEWDTASK SECT FILE FGN ? DOC C7?M ...#MAC NEWDTASK C7R? ...[ THIS MACRO FORCES DUMPER TO ASK FOR A DUMP COMMAND IF IT NEEDS NEW C8=X ...[ AND NO DUMP COMMAND HAS ALREADY BEEN ISSUED FOR THE INCREMENT C8QH ...[ ITS PARAMETER MUST BE ON OR OFF C9=7 ...[ C9PR ...#MEN INCSET C=9C ...#TRA K83INCSET C=P3 ...#STR %A,ON C?8M ...#SKI C?N? ...( C#7X ... NULL C#MH ...#END C*77 ...#E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWDTPOOL https://www.george3.co.uk/george/macro/newdtpool?rev=1705492539&do=diff NEWDTPOOL (GIN Macro) Defined in: DUMP-MACROS Used in: CH2M ...[??? NEWDTPOOL SECT FILE FGN ? DOC CHG? ...#MAC NEWDTPOOL CH^X ...[ THIS MACRO CAUSES DUMPER TO IGNORE SPARE DUMP TAPES CJFH ...[ WHEN SELECTING NEW TAPES CJ^7 ...[ UNLESS DUMP SPARE IS SPECIFIED CKDR ...#MEN INCTAPES CKYC ...#TRA K80INCTAPES CLD3 ...#STR %A,ON CLXM ...#SKI CMC? ... NULL CMWX ...#END CNBH ...#EXI CNW7 ...) CP*R ...#STR %A,OFF CPTC ...#SKI CQ*3 ...( CQSM ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWFCEND https://www.george3.co.uk/george/macro/newfcend?rev=1705492539&do=diff NEWFCEND (GIN Macro) Defined in: MACROS DTP Used in: 2NYB ...[??? NEWFCEND SECT DIAG FGN 578 DOC 2PD2 #MAC NEWFCEND [M. DRUKKER 2PXL [ 2QC= [ 2QWW [ ************** 2RBG [ * NEWFCEND * 2RW6 [ ************** 2S*Q [ 2STB [ 2SX^ ...#SKI ADTPNF<1$1 2T2J ( 2T57 ! NOT ALLOWED IN THIS CONTEXT [NEWFCEND NOT ALLOWED EXTERNALLLY 2T7Q #EXI 2T=* ) 2TF* ...#SKI ADTPFC<1$1 2TN* ...( 2T^M … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWFCST https://www.george3.co.uk/george/macro/newfcst?rev=1705492539&do=diff NEWFCST (GIN Macro) Defined in: MACROS DTP Used in: 22FL # 22^= # *************** 23DW # * MARK 8.50 * 23YG # *************** 24D6 # 24XQ # 25CB # THIS FILE CONTAINS THE "DEVELOPMENT TOOLS" MACROS 25X2 ...# AND IS OWNED BY MARK DRUKKER 26BL # 26W= # 27*W ...[??? NEWFCST SECT DIAG FGN 573 DOC 27TG #MAC NEWFCST [M. DRUKKER 28… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWFIXED https://www.george3.co.uk/george/macro/newfixed?rev=1705492539&do=diff NEWFIXED (GIN Macro) Defined in: MACROS DTP Used in: 3DW2 ...[??? NEWFIXED SECT DIAG FGN 578 DOC 3F*L #MAC NEWFIXED [M. DRUKKER 3FT= [ 3G#W [ 3GSG [ ************** 3H#6 [ * NEWFIXED * 3HRQ [ ************** 3J?B [ 3JR2 [ 3JTK ...#SKI ADTPNF<1$1 3JY8 ( 3K2R ! NOT ALLOWED IN THIS CONTEXT [NEWFIXED NOT ALLOWED EXTERNALLY 3K5B #EXI 3K7^ ) 3K=L #ALT AHD=1 3KQ= #ALT AHDCHTAB=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWIP https://www.george3.co.uk/george/macro/newip?rev=1705492539&do=diff NEWIP (GIN Macro) Defined in: MACROS DTP Used in: 6#7W [??? NEWIP SECT DIAG FGN 552 DOC 6#MG #MAC NEWIP [M.C.D. MANN 6*76 [ 6*LQ [ 6B6B [ *********** 6BL2 [ * NEWIP * 6C5L [ *********** 6CK= [ 6D4W [ 6DJG #STR %A 6F46 ( 6FHQ #SKI INSTGAPEND-INSTPARAM-INSTPARL<1$1 6G3B ( 6GH2 ! INSTALLATION PARAMETER TABLE FULL ! 6H2L #CON INSTALLATION PARAMETER TABLE F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWJBNUM https://www.george3.co.uk/george/macro/newjbnum?rev=1705492539&do=diff NEWJBNUM (GIN Macro) Defined in: MACROS WELL Used in: JOBLIST867, LIST867 3K2S ...[??? NEWJBNUM SECT CENT FGN 72 DOC 3K=L [ 3KQ= [ 3L9W [ 3LPG #MAC NEWJBNUM 3M96 LDX %A JOBNUMBER 3MNQ ADNC %A 1 3MSM BCC MNEWJ 3MYJ LDN %A 1 3N4F MNEWJ 3N8B STO %A JOBNUMBER 3NN2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWJOBDATA https://www.george3.co.uk/george/macro/newjobdata?rev=1705492539&do=diff NEWJOBDATA (GIN Macro) Defined in: MACROS WELL Used in: M^62 ...#MAC NEWJOBDATA M^KL ... NEWJOBLI ,,%A,%B N25= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWJOBLIST https://www.george3.co.uk/george/macro/newjoblist?rev=1705492539&do=diff NEWJOBLIST (GIN Macro) Defined in: MACROS WELL Used in: LH9= ...[ LHNW ...#MAC NEWJOBLIST LJ8G ...#STR @,%A LJN6 ...( LK7Q ...#SKI JWPHASE4<1$1 LKMB ...( LL72 ...#STR %A LLLL ...( LM6= ...! NOT ALLOWED LMKW ...#EXI LN5G ...) LNK6 ...#OPT JDTABLES4=1 LP4Q ...#OPT JDTABLES3=0 LPJB ...) LQ42 ...#DEF 20?=FACILNO-FACILITIES LQHL ...#STR %A LR3= ...#DEF 20?=1 LRGW ...#SKI 20?*(JDTABLES4-JDTABLES3)<1$1 LS2G ...( LSG6 ...! NO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWLEN https://www.george3.co.uk/george/macro/newlen?rev=1705492539&do=diff NEWLEN (GIN Macro) Defined in: MACROS MSYS Used in: #6DS ...[??? NEWLEN SECT CENT FGN 56 DOC #6NL # NEWLEN : FIND EXCESS OF WORDS IN 20? #78= #MAC NEWLEN #7MW #STR %B #87G ( #8M6 #DEF 21?=%B+11/4 #96Q #DEF 20?=20?-21? #9LB ) #=62 #SKI 0? #=KL ( #?5= #STR %B #?JW ...#DEF 20?=0?+34?+0]&#777+11/4+20? ##4G #DEF 21?=0?+34?+1]&#10000000 ##J6 #SKI 21? #*3Q ...#DEF 0?=0?+34?+0]&#777+11/4+0? #*HB #SKI 21… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWMAC https://www.george3.co.uk/george/macro/newmac?rev=1705492539&do=diff NEWMAC (GIN Macro) Defined in: MACROS DTP Used in: ?HM= [??? NEWMAC SECT DIAG FGN 555 DOC ?J6W #MAC NEWMAC [M.C.D. MANN ?JLG [ ?K66 [ ?KKQ [ ************ ?L5B [ * NEWMAC * ?LK2 [ ************ ?M4L [ ?MJ= [ ?MN7 #UNS AMACDEVSYS [PRE- MACRO HANDLING ENHANCEMENT ?MS4 #SKI ?MX^ ( ?N3W #DEF 31?=1? [REMEMBER THE LISTING LEVEL ?NHG #DEF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWMESS https://www.george3.co.uk/george/macro/newmess?rev=1705492539&do=diff NEWMESS (GIN Macro) Defined in: MACROS MSYS Used in: ?52B ...[??? NEWMESS SECT CENT FGN 56 DOC ?52G # THE FOLLOWING BORING MACROS ARE TO PROVIDE 'NEWMESS' IN ?5G6 # THE EARLY VERSION(S) OF MARK 8. I HOPE THEY CAN BE REMOVED SOON. ?5^Q # ?6FB # ?6^2 #MAC NEWMESS ?7DL VALIDATE 2,%A,%B ?7Y= ( ?8CW #DEF 20?=0 ?8XG VALIDNEW %C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V ?9C6 #EXI 20?+1 ?9WQ ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWMODE https://www.george3.co.uk/george/macro/newmode?rev=1705492539&do=diff NEWMODE (GIN Macro) Defined in: MACS JIB Used in: =N4D ...[??? NEWMODE SECT COMM FGN 25 DOC ?3HL #MAC NEWMODE ?43= #STR %B ?4GW #SKI ?52G LDX 0 CPPTR(2) ?5G6 #STR %B ?5^Q LDX 0 %B ?6FB SMO FX2 ?6^2 STO 0 ACOMMUNE2 [PROG PROP NO OR DEVICE LIST PTR ?7DL LDX 0 %C ?7Y= SMO FX2 ?8CW STO 0 ACOMMUNE1 [IDENTIFIER NO. ?8XG LDX 0 %D … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWMXB https://www.george3.co.uk/george/macro/newmxb?rev=1705492539&do=diff NEWMXB (GIN Macro) Defined in: MACS JIB Used in: CONCEPT85, DELCON867, IDFSEG867 ?#54 ...[??? NEWMXB SECT COMM FGN 25 DOC ?##W #MAC NEWMXB ?#SG LDX %A FX2 ?*#6 XST HUNT2OPT %A,FILE,FRRB ?*RQ BNG %A MXE ?B?B LDX 0 BRECNO+A1(%A) ?BR2 SMO FX2 ?C=L TXU 0 ACOMMUNE3 ?CQ= BCS XST ?D9W ADN %A A1 ?DPG MXE ?F96 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWNEEDS https://www.george3.co.uk/george/macro/newneeds?rev=1705492539&do=diff NEWNEEDS (GIN Macro) Defined in: MACROS WELL Used in: CH5B ...#MAC NEWNEEDS CHK2 ...#DEF 20?=#40000000 CJ4L ...#STR %A CJJ= ...( CK3W ...#STR ON,%A CKHG ...( CL36 ...#STR OFF,%A CLGQ ...( CM2B ...! 1ST PARAMETER NOT RECOGNISEX CMG2 ...#EXI CM^L ...) CNF= ...#DEF 20?=0 CNYW ...) CPDG ...) CPY6 ...#MEN BMSAVJOB CQCQ ...#DEF 21?=34?+JLTEMPLATE4+1]&#40000000 CQXB ...#SKI 20?$21? CRC2 ...( CRWL ...#DEF 21?=16 CSB= ...#SKI 20? … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWORKS https://www.george3.co.uk/george/macro/neworks?rev=1705492539&do=diff NEWORKS (GIN Macro) Defined in: MACROS MSYS Used in: #DNY ...[??? NEWORKS SECT CENT FGN 56 DOC #DYQ #MAC NEWORKS #FDB #STR %D #FY2 #STR #GCL ( #GX= ... +0?+34?+0]&#777 #HBW #STR %B #HWG ( #JB6 +0?+34?+0]&#77700000^%B #JTQ #DEF 0?=0?-1 #K*B ) #KT2 #DEF 22?=0?+34? #L#L #DEF 22?=22?-1 #LS= #DEF 22?=22?+0] #M?W ...#DEF 22?=22?&#777 #MRG #DEF 22?=22?+11 #N?6 #DEF 22?=22?/4 #NQQ #DEF 0… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWPERI https://www.george3.co.uk/george/macro/newperi?rev=1705492539&do=diff NEWPERI (GIN Macro) Defined in: COREMACROS Used in: PUTPER85 MMNB ...[??? NEWPERI SECT CENT FGN 53 DOC MN82 ...#MAC NEWPERI MNML ...[ USED IN KEEPCHAP SYSTEM WHEN A PERIPHERAL IS ONLINED MP7= ... BRN MNEWPERI MPLW ... SMO FX2 MQ6G ... STO %A ACOMMUNE1 MQL6 ... DOWN KEEPCHAP,1 MR5Q ...MNEWPERI MRKB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWSEG https://www.george3.co.uk/george/macro/newseg?rev=1705492539&do=diff NEWSEG (GIN Macro) Defined in: MACINTLUDES Used in: *QYG [??? NEWSEG SECT DIAG FGN 9 DOC *RD6 #MAC NEWSEG [M.C.D. MANN AND J.T. WIFFEN *RXQ [ *SCB [ *SX2 [ ************ *TBL [ * NEWSEG * *TW= [ ************ *W*W [ *WTG [ *X*6 #STR %A [NULL IF %A MISSING *XSQ #NEW %A%B *Y#B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWSLETTER https://www.george3.co.uk/george/macro/newsletter?rev=1705492539&do=diff NEWSLETTER (GIN Macro) Defined in: CENTCSSMACS Used in: 27KN ...[??? NEWSLETT SECT CENT FGN 18 DOC 27TG [ 28*6 #MAC NEWSLETTER 28SQ #STR OFF,%A 29#B #SKI 29S2 ( 2=?L #MEN DEWELL 2=R= #TRA K90DEWELL 2?=W BRN K91DEWELL 2?QG #TRA K92DEWELL 2#=6 BRN K93DEWELL 2#PQ #END 2*9B #EXI 2*P2 ) 2*QP ...#UNS JNEWSLETTER+1 2*SD ...#SKI 2*W7 ...( 2*XW ... ADDMESS 2*^K ... MESSMONA 2,JNEWSLETT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWUSER https://www.george3.co.uk/george/macro/newuser?rev=1705492539&do=diff NEWUSER (GIN Macro) Defined in: MACROS RM59B Used in: NEWDIR867, USELEX5 7#7# ...[??? NEWUSER SECT FILE FGN 6 DOC 7#C6 #MAC NEWUSER 7#WQ DOWN USELEX,2 7*BB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEWVAL https://www.george3.co.uk/george/macro/newval?rev=1705492539&do=diff NEWVAL (GIN Macro) Defined in: MACROS DTP Used in: *5F2 [??? NEWVAL SECT DIAG FGN 552 DOC *5YL #MAC NEWVAL [M.C.D. MANN *6D= [ *6XW [ *7CG [ ************ *7X6 [ * NEWVAL * *8BQ [ ************ *8WB [ *9B2 [ *9TL #STR %A [FINISH RECURSION WHEN ALL PARAMS ACC *=*= ( *=SW #ALT %A [ALTER EACH PARAMETER IN TURN *?#G NEWVAL %B,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTCH https://www.george3.co.uk/george/macro/nextch?rev=1705492539&do=diff NEXTCH (GIN Macro) Defined in: MACROS JSR Used in: BMQUESTB866, LPTWO7 DWJ2 #MAC NEXTCH [MOD,ACC,LABEL DX3L BCHX %A £ DXH= BCT %B %C DXPG ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTD https://www.george3.co.uk/george/macro/nextd?rev=1705492539&do=diff NEXTD (GIN Macro) Defined in: MACROS JSR Used in: CPOBJ6, LPOBJ6 DP86 #MAC NEXTD [MOD,ACC,LABEL DPMQ SBN %A 1 DQ7B BCT %B %C DQ*L ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTENT https://www.george3.co.uk/george/macro/nextent?rev=1705492539&do=diff NEXTENT (GIN Macro) Defined in: ACCESSMACROS Used in: BMFIXIT864, GETDIRX860, LISTDIR867, LOCATE84 #*HB ...[??? NEXTENT SECT FILE FGN 19 DOC #DF6 #MAC NEXTENT #DYQ [ THIS MACRO EXPECTS A DIRECTORY OPEN AT LEVEL %A, POSITIONED ON #FDB [ A NAME RECORD,AND IT EXPECTS A FILE/ENT BLOCK FOR THIS ENTRY TO #FY2 [ BE IN THE ACTIVITY CHAIN. #GCL MHUNTW 1,FILE,ENT #GX= #SKI K6ACCESS>99$99 #HBW ( #HWG BPZ 1 M1NEXTENT #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTENT3 https://www.george3.co.uk/george/macro/nextent3?rev=1705492539&do=diff NEXTENT3 (GIN Macro) Defined in: ACCESSMACROS Used in: DIRENT867, GETDIR860 #X*N ...[??? NEXTENT3 SECT FILE FGN 19 DOC #XKG #MAC NEXTENT3 #Y56 [ AS FOR NEXTENT,EXCEPT THAT IT ASSUMES X3 -> ENTRY RATHER THAN #YJQ #SKI K6ACCESS>99$99 #^4B CALL 1 M1NEXTENT3 #^J2 LDEX 2 ECOPS-A1(3) *23L ADX 2 ENUSE-A1(3) *2H= LDN 0 #1000 *32W ANDX 0 EINF2-A1(3) *3GG BZE 0 M2NEXTENT3 *426 ADN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTFCB https://www.george3.co.uk/george/macro/nextfcb?rev=1705492539&do=diff NEXTFCB (GIN Macro) Defined in: RING-MACROS Used in: BACKROOM865, CLOSEALT864, OPENREL865, OPENWAIT867, ORELEMPT70, ORELMAIN867, PERFPASS864, PMJOURNL866, RENAME864, USERSTRM867 =HL= ...[??? NEXTFCB SECT FILE FGN 20 DOC =HPW ...#MAC NEXTFCB =HTG ...[ =H^6 ...[ MOVE TO NEXT FCB =J4Q ...[ PARAMETERS AS BASEFCB =J8B ...[ EXCEPT LABEL USED IF MORE FCBS ARE PRESENT =J#2 ...#STR %D =JCL ...#STR =JH= ... NEXTFCB %A,%B,%C,0,%E =JLW ...#STR %D =JQG ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTPART https://www.george3.co.uk/george/macro/nextpart?rev=1705492539&do=diff NEXTPART (GIN Macro) Defined in: MACROS VB Used in: MONFIL865, MONFILE867, MONJRNAL850 =7YS ...[??? NEXTPART SECT CENT FGN 7 DOC =88L #MAC NEXTPART =8N= SMO PARTPTR(2) =97W LDEX 0 0 =9MG ADN 0 11 ==76 SRL 0 2 ==LQ ADS 0 PARTPTR(2) =?6B #STR %A =?L2 LDX %A PARTPTR(2) =#5L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTW https://www.george3.co.uk/george/macro/nextw?rev=1705492539&do=diff NEXTW (GIN Macro) Defined in: MACROS JSR Used in: CONNECT867, PARSORT867 DCX= #MAC NEXTW [MOD,ACC,LABEL DDBW ADN %A 1 DDWG BCT %B %C DF4Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NEXTWX https://www.george3.co.uk/george/macro/nextwx?rev=1705492539&do=diff NEXTWX (GIN Macro) Defined in: MACROS JSR Used in: DFTQ #MAC NEXTWX [MOD,ACC,LABEL,NUMBER DG*B ADX %A %D DGT2 SBX %B %D DH#L BZE %B MNEXTWX1 DHS= BPZ %B %C DJ?W MNEXTWX1 DJG6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIP https://www.george3.co.uk/george/macro/nip?rev=1705492539&do=diff NIP (GIN Macro) Defined in: MACROS HL Used in: IPBINB867, WAIT867 53M2 ...[???NIP SECTION CENT FGN 546L ...#MAC NIP 54L= ...#STR %A,ON 555W ...( 55KG ...#STR %A,OFF 5656 ...( 56JQ ...! PARAMETER MUST BE ON OR OFF 574B ...#EXI 57J2 ...) 583L ... LPS OFF 58H= ...#EXI 5=FQ ...) 5=^B ... LPS ON 5#XW ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIPENDLF https://www.george3.co.uk/george/macro/nipendlf?rev=1705492539&do=diff NIPENDLF (GIN Macro) Defined in: MACS LIST Used in: FHLIST867 27S6 ...[ 27TG [ TO END A LISTFILE FOR THE NIP PROGRAM 28*6 #MAC NIPENDLF 28B7 ...#ACC %B 28C8 ...( 28D9 ... LDX 0 %B 28F= ... SMO FX2 28G? ... STO 0 ACOMMUNE1 28H# ...) 28J* ...#ACC %B 28KB ...#SKI 28LC ...( 28MD ... SMO FX2 28NF ... STO %B ACOMMUNE1 28PG ...) 28QH ... DOWN LISTNIP,4 28RJ ... BRN %A 28SQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIPLINES https://www.george3.co.uk/george/macro/niplines?rev=1705492539&do=diff NIPLINES (GIN Macro) Defined in: MACS LIST Used in: FHLIST867 29#B [ TO PASS SEVERAL LINES OF A LISTING TO THE NIP PROGRAM 29S2 #MAC NIPLINES 29T3 ...#ACC %B 29W4 ...( 29X5 ... LDX 0 %B 29Y6 ... SMO FX2 29^7 ... STO 0 ACOMMUNE1 2=28 ...) 2=39 ...#ACC %B 2=4= ...#SKI 2=5? ...( 2=6# ... SMO FX2 2=7* ... STO %B ACOMMUNE1 2=8B ...) 2=9C ... DOWN LISTNIP,3 2==D ... BRN %A 2=?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIPREL https://www.george3.co.uk/george/macro/niprel?rev=1705492539&do=diff NIPREL (GIN Macro) Defined in: MACS LIST Used in: RELPER867 2=R= [ TO CLOSEDOWN THE NIP ACTLF FOR THE NIP PROGRAM 2?=W #MAC NIPREL 2??X ...#ACC %B 2?#Y ...( 2?*^ ... LDX 0 %B 2?C2 ... SMO FX2 2?D3 ... STO 0 ACOMMUNE1 2?F4 ...) 2?G5 ...#ACC %B 2?H6 ...#SKI 2?J7 ...( 2?K8 ... SMO FX2 2?L9 ... STO %B ACOMMUNE1 2?M= ...) 2?N? ... DOWN LISTNIP,5 2?P# ... BRN %A 2?QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIPREP https://www.george3.co.uk/george/macro/niprep?rev=1705492539&do=diff NIPREP (GIN Macro) Defined in: MACS LIST Used in: FHLIST867 2#=6 [ TO GIVE THE REPERTOIRE INFO TO A NIP ACTLF 2##4 ...#MAC NIPREP 2#B2 ...#ACC %B 2#CY ...( 2#FW ... LDX 0 %B 2#HS ... SMO FX2 2#KQ ... STO 0 ACOMMUNE1 2#MN ...) 2#PL ...#ACC %B 2#RJ ...#SKI 2#TG ...( 2#XD ... SMO FX2 2#^B ... STO %B ACOMMUNE1 2*3# ...) 2*5= ... DOWN LISTNIP,2 2*78 ... BRN %A 2*9B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NIPSTART https://www.george3.co.uk/george/macro/nipstart?rev=1705492539&do=diff NIPSTART (GIN Macro) Defined in: MACS LIST Used in: FHLIST867 2*P2 [ TO BEGIN A NIP LISTING FOR THE NIP PROGRAM 2B8L #MAC NIPSTART 2B9M ...#ACC %B 2B=N ...( 2B?P ... LDX 0 %B 2B#Q ... SMO FX2 2B*R ... STO 0 ACOMMUNE1 2BBS ...) 2BCT ...#ACC %B 2BDW ...#SKI 2BFX ...( 2BGY ... SMO FX2 2BH^ ... STO %B ACOMMUNE1 2BK2 ...) 2BL3 ... DOWN LISTNIP,1 2BM4 ... BRN %A 2BN= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOBITS https://www.george3.co.uk/george/macro/nobits?rev=1705492539&do=diff NOBITS (GIN Macro) Defined in: MACROS SJ Used in: BMAPDIR865, BMAPONE867, FILEMAP, PCTLISTA867, REPORT865, SJOPEN863 3#6Y ...[ 3##6 ...[ 3#FB ...[??? NOBITS SECT FILE FGN 24 DOC 3*Y= #MAC NOBITS 3B47 ...[ NOBITS 3B84 ...[%A TABLE NUMBER (SEE TABLSET) 3B?^ ...[%B NO OF BITS IN TABLE FIELD (SEE TABLSET) 3BCW #FRE MNOBITS 3BXG #DEF MNOBITS%A=%B 3CC6 #DEF MNOBITS=%B 3CWQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOBOPCM https://www.george3.co.uk/george/macro/nobopcm?rev=1705492539&do=diff NOBOPCM (GIN Macro) Defined in: MACROS SHFSB Used in: 2WRW # 2X?G [??? NOBOPCM SECT FILE FGN 1 DOC 2XR6 #MAC NOBOPCM 2Y=Q FSHCODE AORB 2YQB ( 2^=2 #UNS FSHTEST 2^PL #SKI 329= ( 32NW FSHSKIP A 338G ( 3572 HIDECOM DU 35LL HIDECOM FN 36KW HIDECOM LK 3=3= HIDECCCM DU 3=GW HIDECCCM FN 3?G6 ) 3?^Q ) 3#FB ) 3#^2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOCORJOB https://www.george3.co.uk/george/macro/nocorjob?rev=1705492539&do=diff NOCORJOB (GIN Macro) Defined in: LLSMACROS Used in: LOADPROG865, PROSTART867 88MQ ...[??? NOCORJOB SECT CENT FGN 6 DOC 88PB # 8992 # THIS MACRO INITIALISES OR RE-INITIALISES A JOB BLOCK FOR NO CORE 89NL # IMAGE CONTEXT 8=8= # 8=MW #MAC NOCORJOB 8?7G #STR %A,3 8?M6 ( 8#6Q SMO FX2 8#LB STO 3 ACC3 8*62 LDX 3 %A 8*KL ) 8B5= LDX 2 FX2 8BJW STO 5 ACC5(2) 8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOFILES https://www.george3.co.uk/george/macro/nofiles?rev=1705492539&do=diff NOFILES (GIN Macro) Defined in: MACROSBRBS Used in: 2^28 ...[??? NOFILES SECT FILE FGN 14 DOC 2^=2 # 2^PL #MAC NOFILES 329= #MEND GETBAX 32NW #STR %A 338G ( 33N6 #TRA INOF 347Q +%A 34MB ) 3572 #STR %B 35LL ( 366= #TRA INOFA 36KW +%B 375G ) 37K6 #STR %C 384Q ( 38JB #TRA FACTOR 3942 +%C 39HL ) 3=3= #END 3=GW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOFLASH https://www.george3.co.uk/george/macro/noflash?rev=1705492539&do=diff NOFLASH (GIN Macro) Defined in: MACS IPB Used in: 9KLW #MAC NOFLASH 9L6G #MEN IPBMOPB 9LL6 #TRA K70IPBMOPB 9M5Q BRN K71IPBMOPB 9MKB #TRA K72IPBMOPB 9N52 BRN K73IPBMOPB 9NJL #END 9P4= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOINTEGRITY https://www.george3.co.uk/george/macro/nointegrity?rev=1705492539&do=diff NOINTEGRITY (GIN Macro) Defined in: MACROSBRBS Used in: 2#7B ...[??? NOINTEGR SECT FILE FGN 14 DOC 2#8= ...# 2#=6 #MAC NOINTEGRITY 2#PQ ...!! NOINTEGRITY SPECIAL NOT SUPPORTED IN MK 867 !! 2YQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOJUGG https://www.george3.co.uk/george/macro/nojugg?rev=1705492539&do=diff NOJUGG (GIN Macro) Defined in: DUMP-MACROS Used in: 3MYJ ...[??? NOJUGG SECT FILE FGN 65 DOC 3N8B # 3NN2 #MAC NOJUGG 3P7L #MEN EMSENTER 3PM= #TRA K20EMSENTER 3Q6W LDN 0 0 3QLG #END 3R66 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOLOBSFILE https://www.george3.co.uk/george/macro/nolobsfile?rev=1705492539&do=diff NOLOBSFILE (GIN Macro) Defined in: LOBS-MACROS Used in: USEROPEN867 7KD8 ...[??? NOLOBSFI SECT FILE FGN 5 DOC 7KN2 [ 7L7L #MAC NOLOBSFILE 7N66 DOWN INCRCUBS,7 7XY6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOMCONS https://www.george3.co.uk/george/macro/nomcons?rev=1705492539&do=diff NOMCONS (GIN Macro) Defined in: MACS PW Used in: IDFENQS867 6F46 #MAC NOMCONS 6FHQ LDX 2 FX2 6G3B LDCH 0 JSOURCE1(2) 6GH2 SBN 0 #77 6H2L BNZ 0 %B [NOT A CONSOLE 6HG= HUNTMISB 1,APERI,CONSOLE 6H^W BNG 1 %A 6JFG LDX 6 A1(1) 6J^6 BNZ 6 MNOM1 6KDQ GEOERR 1,HUIDGE 6KYB MNOM1 LDX 4 JSOURCE1(2) 6LD2 LDX 0 JSOURCE2(2) 6LXL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOMIDN https://www.george3.co.uk/george/macro/nomidn?rev=1705492539&do=diff NOMIDN (GIN Macro) Defined in: CENTCSSMACS Used in: 5YDW ...[ 5YYG ...[??? NOMIDN SECT CENT FGN 26 DOC 5^D6 ...[ 5^XQ ...[ RESTORE TIME MACRO FOR SPECIAL 4968 62CB ...[ 62X2 ...#MAC NOMIDN 63BL ...#MEN DATECON 63W= ...#TRA K50DATECON 64*W ... NULL 64TG ...#TRA K51DATECON 64YL ...#STR %A 653Q ...#SKI 656W ... +0,+0 65=2 ...#STR %A 65*6 ... 8H%A000 65SQ ...#SKI 34?+0?-1]&#77 66#B ...( 66S2 ...#TRA K51DATECON 67?L ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOOWNERACC https://www.george3.co.uk/george/macro/noowneracc?rev=1705492539&do=diff NOOWNERACC (GIN Macro) Defined in: MACROS RM59B Used in: 7C#W ...[??? NOOWNERA SECT FILE FGN 6 DOC 7CSG ...#MAC NOOWNERACC 7D#6 ...#MEN OWNERCHE 7DRQ ...#TRA K55OWNERCHE 7F?B ... BRN K56OWNERCHE 7FR2 ...#END 7G=L ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOPARTRES https://www.george3.co.uk/george/macro/nopartres?rev=1705492539&do=diff NOPARTRES (GIN Macro) Defined in: BMAP MACROS Used in: BMAPDIR865 83T6 ...[??? NOPARTRE SECT FILE FGN 36 DOC 84#Q ...[ 84SB ...[ THIS MACRO PROHIBITS RESTORES OF ALL 85#2 ...[ OR SPECIFIED DIRECTORIES. 85RL ...[ 86?= ...#MAC NOPARTRES 86QW ...#STR %A 87=G ...#SKI 87Q6 ...( 889Q ...#MEN BMCNTRL 88PB ...#TRA K80BMCNTRL 8992 ... NULL 89NL ...#END 89RQ ...#MEN BMPRCHEK 89SR ...#TRA AFORBIDN 89TS ... -1 89WW ...#TRA K50BMPR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOPRERASE https://www.george3.co.uk/george/macro/noprerase?rev=1705492539&do=diff NOPRERASE (GIN Macro) Defined in: BMAP MACROS Used in: 78^Q ...[??? NOPRERAS SECT FILE FGN 36 DOC 79FB ...[ 79^2 ...[ THIS MACRO ASSEMBLES A TABLE OF USERS WHO 7=DL ...[ MAY NOT BE ERASED IF PARTIAL RESTORES FAIL 7=Y= ...[ 7?CW ...#MAC NOPRERASE 7?XG ...#STR %A 7#C6 ...#SKI 7#WQ ...( 7*BB ...#MEN BMQUESTB 7*W2 ...#TRA K80BMQUESTB 7B*L ... NULL 7BT= ...#END 7C#W ...#EXI 7CSG ...) 7D#6 ...#STR %A,*OFF 7DRQ ...( 7F?B ...#SKI AVSFPTR-AVSF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOSUSPEND https://www.george3.co.uk/george/macro/nosuspend?rev=1705492539&do=diff NOSUSPEND (GIN Macro) Defined in: MACROSIPC Used in: G65L ...#MAC NOSUSPEND G6K= ...#DEF 20?=1? G74W ...#LIS 0 G7JG ...#MEND PROCONTB G846 ...#TRA K72PROCONTB G8HQ ...#REP K73PROCONTB-K72PROCONTB G93B ... NULL G9H2 ...#END G=2L ...#LIST 20? G=G= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOTALIEN https://www.george3.co.uk/george/macro/notalien?rev=1705492539&do=diff NOTALIEN (GIN Macro) Defined in: MACROS SHFS Used in: INCRCUBX860, LISTFNDA865, MACRALAS864, MULTIPLX864, NEWOWN865, NORMALUS864, REALTIME867, RETURNA867, SAVEJOB865, WA864 53M2 [??? NOTALIEN SECT FILE FGN 1 DOC 546L #MAC NOTALIEN 54L= #STR %B 555W JBC %A,%B,FSHALIEN 55KG #STR %B 5656 #STR 56JQ JBC %A,FX2,FSHALIEN 574B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOTALLOC https://www.george3.co.uk/george/macro/notalloc?rev=1705492539&do=diff NOTALLOC (GIN Macro) Defined in: MACROSBRBS Used in: LIBREQCA867, LIBSEC867 9RGB ...[??? NOTALLOC SECT FILE FGN 14 DOC 9S22 ...#MAC NOTALLOC 9SFL ...#UNS FSHB 9S^= ...( 9TDW ...#UNS FSHTEST 9TYG ...#SKI 9WD6 ...( 9WXQ ...!! NOTALLOC ILLEGAL IN MACHINE B !! 9XCB ...#EXIT 9XX2 ...) 9YBL ...) 9YW= ...#STR %A 9^*W ...( 9^TG ...#SKI (%A<4$4)^(%A>63$63) =2*6 ...( =2SQ ...!! RESIDENCE NO. OUT OF RANGE: %A !! =3#B ...#EXIT =3S2 ...) =4?L ...#M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NOTBUSY https://www.george3.co.uk/george/macro/notbusy?rev=1705492539&do=diff NOTBUSY (GIN Macro) Defined in: LLSMACROS Used in: CORESHED861, FREEPER867, LISTPREP865 3KND ...[??? NOTBUSY SECT CENT FGN 6 DOC 3KQ= # THIS MACRO ENSURES THAT A PROGRAM HAS NO BUSY ONLINE PERIPHERALS 3L9W #MAC NOTBUSY 3LPG #STR %A,2 3M96 LDX 2 %A 3MNQ SMO FX2 3N8B STO 2 ACOMMUNE1 3NN2 FJOTP 2,,N 3P7L LBW 2,JBPLUG,0 3PM= LDX 1 FX1 3Q6W LDX 2 FX2 3QLG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NPUOUTLP https://www.george3.co.uk/george/macro/npuoutlp?rev=1705492539&do=diff NPUOUTLP (GIN Macro) Defined in: MACS IPB Used in: 9PHW [??? NPUOUTLP SECT COMM 9Q3G [ 9QH6 [ RESTORE TIME MACRO TO CHANGE NO. OF NPU'S OUTPUT AT ANY TIME TO 9R2Q [ ALLEVIATE DCP OVERLOAD PROBLEMS 9RGB [ DEFAULT = 2 CHANGED TO = 1 9S22 [ 9SFL #MAC NPUOUTLP 9S^= #MEN IPBLISTB 9TDW #TRA K40IPBLISTB 9TYG SBN 5 2 9WD6 #END 9WXQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NPUSIZE https://www.george3.co.uk/george/macro/npusize?rev=1705492539&do=diff NPUSIZE (GIN Macro) Defined in: MACS IPB Used in: =3#B #MAC NPUSIZE =3S2 #SKI %A>7$7 =4?L ( =4R= #SKI JSKI21<1$1 =5=W #SKI %A<509$509 =5QG ( =6=6 #SKI JSKI21 =6PQ #SKI %A<598$598 =79B ( =7P2 #MEN IPBSTART =88L #TRA K50IPBSTART =8N= #HAL %A+3,%A+3 =97W #TRA K51IPBSTART =9MG ADN 3 %A+1 ==76 #TRA K52IPBSTART ==LQ LDN 5 %A+3 =?6B #TRA K53IPBSTART =?L2 LDN 5 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NUDGE https://www.george3.co.uk/george/macro/nudge?rev=1705492539&do=diff NUDGE (GIN Macro) Defined in: MACS PCT Used in: PCTCON8, PCTINOP8, PCTLPTP851 45B= #MAC NUDGE 45TW LDX 1 2 46*G PCTFACT 2 46T6 LDXC 0 EWAIT(1) 47#Q BCC MNUDGEWAIT 47SB STO 0 EWAIT(1) 48#2 FPUT 48RL BRN MNUDGEND 49?= MNUDGEWAIT 49QW LONGCLEA 2,#36,MNUDGEND 4==G MNUDGEND 4=Q6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NULFIX https://www.george3.co.uk/george/macro/nulfix?rev=1705492539&do=diff NULFIX (GIN Macro) Defined in: MACROS DTP Used in: 5Q5Q [??? NULFIX SECT DIAG FGN 552 DOC 5QKB #MAC NULFIX [J.T. WIFFEN 5R52 [ 5RJL [ 5S4= [ ************ 5SHW [ * NULFIX * 5T3G [ ************ 5TH6 [ 5W2Q [ 5WGB #STR REP,%C 5X22 #SKI 5XFL ( 5X^= ...#MEN REPLAC 5YDW #TRA %A 5YYG -1 5^D6 #END 5^XQ ...#EXI 62CB ) 62X2 #STR CH,%C 63BL #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NUMLINK https://www.george3.co.uk/george/macro/numlink?rev=1705492539&do=diff NUMLINK (GIN Macro) Defined in: MACROSIPC Used in: IPQUAKE83, WHATPER867 ?QPS ...[??? NUMLINK SECT COMM FGN 19 DOC ?Q^L #MAC NUMLINK ?RF= DFLOAD %A,LKCT ?RYW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NWFX https://www.george3.co.uk/george/macro/nwfx?rev=1705492539&do=diff NWFX (GIN Macro) Defined in: MACROS DTP Used in: 58H6 ...[??? NWFX SECT DIAG FGN 571 DOC 58H= #MAC NWFX [M. DRUKKER 592W [ 59GG [ 5=26 [ ********** 5=FQ [ * NWFX * 5=^B [ ********** 5?F2 [ 5?YL [ 5#D= #SKI %C 5#XW #SKI 5*CG #NEW %B 5*M# ...#DEF 92?=0 [NULL VERSION 5*X6 #SKI AHD%B 5BBQ ( 5BWB #SKI AHD-1 5CB2 USEFILE %A.%B 5CTL #SKI A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NWFX1 https://www.george3.co.uk/george/macro/nwfx1?rev=1705492539&do=diff NWFX1 (GIN Macro) Defined in: MACROS DTP Used in: 5HQL [??? NWFX1 SECT DIAG FGN 552 DOC 5J== #MAC NWFX1 [J.T. WIFFEN 5JPW [ 5K9G [ 5KP6 [ *********** 5L8Q [ * NWFX1 * 5LNB [ *********** 5M82 [ 5MML [ 5N7= #ALT AHD%A=1 5NLW #STR %B 5P6G NWFX1 %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M 5PL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NWFXX https://www.george3.co.uk/george/macro/nwfxx?rev=1705492539&do=diff NWFXX (GIN Macro) Defined in: MACROS DTP Used in: 5H?H ...[??? NWFXX SECT DIAG FGN 571 DOC 5H#4 ...#MAC NWFXX [M. DRUKKER 5H#K ...[ 5H*6 ...[ 5H*M ...[ *********** 5HB8 ...[ * NWFXX * 5HBP ...[ *********** 5HC= ...[ 5HCR ...[ 5HD# ...#SKI %D 5HDT ...#SKI 5HFB ...#NEW %B 5HFH ...#SKI %C 5HFN ...#DEF 92?=%C [VERSION 5HFX ...#SKI AHD%B 5HGD ...( 5HG^ ...#SKI AHD-1 5HHG ... USEF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NWMC https://www.george3.co.uk/george/macro/nwmc?rev=1705492539&do=diff NWMC (GIN Macro) Defined in: MACROS DTP Used in: ?TCQ [??? NWMC SECT DIAG FGN 552 DOC ?TXB #MAC NWMC [M.C.D. MANN ?WC2 [ ?WWL [ ?XB= [ ********** ?XTW [ * NWMC * ?Y*G [ ********** ?YT6 [ ?^#Q [ ?^SB #STR %A #2#2 ( #2RL LOSEMACR %A #3?= NWMC %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M #3QW ) #4=G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) NXFCA https://www.george3.co.uk/george/macro/nxfca?rev=1705492539&do=diff NXFCA (GIN Macro) Defined in: RING-MACROS Used in: BMINDEX866, ORELMAIN867 9HDJ ...[??? NXFCA SECT FILE FGN 20 DOC 9HNB #MAC NXFCA 9J82 # 9JML # TO GIVF A POINTER IN %B TO NEXT ELEMENT IN FILERING AFTER %B, 9K7= # AND BRANCH TO %C IF IT DOES NOT EXIST. 9KLW LDX %B FPTRF(%A) 9L6G LDX 0 %B 9LL6 SMO FX2 9M5Q SBN 0 FILERING 9MKB BZE 0 %C 9N52 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OCPSMILL https://www.george3.co.uk/george/macro/ocpsmill?rev=1705492539&do=diff OCPSMILL (GIN Macro) Defined in: MACROS NI Used in: CMEMILL866, PMJOBS866 35LL ...[??? OCPSMILL SECT CENT FGN 1 DOC 366= ...# 36KW ...# IN CME WITH DUALS THIS MACRO IS USED TO INTERROGATE 375G ...# THE MILL PERCENTAGE ALLOCATED TO EACH ACTIVE 37K6 ...# OCP AND ALLOW THE CHAPTER TO TAKE ACTION ON EACH ONE. 384Q ...# 38JB ...#MAC OCPSMILL 3942 ... LDX 6 APROCNO 39HL ... BNZ 6 M0OCPSMILL 3=3= ... LDN 6 63 3=GW ...M0OCPSMI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OCTCON https://www.george3.co.uk/george/macro/octcon?rev=1705492539&do=diff OCTCON (GIN Macro) Defined in: WORK-MACROS Used in: OPENWORK866, WORKFILE860 58R4 ...[??? OCTCON SECT FILE FGN 4 DOC 592W #MAC OCTCON 59GG LDX 3 %A 5=26 LDN 0 4 5=FQ LDN 4 0 5=^B LDN 5 0 5?F2 BZE 3 M4OCTCON 5?YL BRN M2OCTCON 5#D= M1OCTCON 5#XW SLA 5 3 5*CG M2OCTCON 5*X6 LDN 2 0 5BBQ SLL 23 6 5BWB BNZ 5 M3OCTCON 5CB2 BNZ 2 M3OCTC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OFF https://www.george3.co.uk/george/macro/off?rev=1705492539&do=diff OFF (GIN Macro) Defined in: MACROS FIXD Used in: ARCHIVE867, BACKMAP864, BSTS867, CANTDO867, COMPROB867, COMPSPM, CORESHED861, DELETE864, DSCNCT867, EDITER867, IDFPROP867, INITJOB867, IPBCONS867, IPBSTARB867, IPBSTART867, LIBSEC867, LISTDIRF867, LISTIDF867, LLSMESS867, LOADERDA867, LOADERFS867, LOADERR70, MES INTLUDES, MESSAJ, MESSBE, MESSBJ, MESSCF, MESSCG, MESSCH, MESSCJ, MESSDA, MESSDB, MESSDC, MESSI, MONFILEA864, PMENDITS867, REALTIME867, RELPER867, REWRITE864, SCEDITAR84, SCHEDIN867, SCH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OFF7020 https://www.george3.co.uk/george/macro/off7020?rev=1705492539&do=diff OFF7020 (GIN Macro) Defined in: MACS PCT Used in: MOPCOMB865 4BM6 #MAC OFF7020 4C6Q HUNT2B 1,A7020,INFORM 4CLB LDX 0 GSIGN 4D62 ORS 0 ALINESTAT(1) 4DKL SMO FX2 4F5= STO 2 ACOMMUNE9 4FJW LDX 0 APCTNUM(1) [MAKE ALL OPERABLE PCTS LOOK ACTIVE. 4G4G SBX 0 APCTINOP(1) 4GJ6 ANDX 0 BITS22LS 4H3Q LDX 2 1 4HHB STO 0 APCTACT(1) 4J32 B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OFFLTEST https://www.george3.co.uk/george/macro/offltest?rev=1705492539&do=diff OFFLTEST (GIN Macro) Defined in: MACROS LEF Used in: LISTFREE867 DG5J ...[??? OFFLTEST SECT DEVT FGN 2 DOC DG*B #MAC OFFLTEST DGT2 MHUNTW 1,FILE,ENT DH#L LDEX 0 ECOPS(1) DHS= BNZ 0 %A DJ?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OFFPRIV https://www.george3.co.uk/george/macro/offpriv?rev=1705492539&do=diff OFFPRIV (GIN Macro) Defined in: MACROS MACB Used in: PRIVLEG84 4^Y# ...[??? OFFPRIV SECT CENT FGN 2 DOC 5286 # 52MQ #MAC OFFPRIV 537B LDN 0 1 53M2 SMO %A [%A CONTAINS PRIVILEGE TYPE 546L SRC 0 1 54L= STO 0 GSAVE 555W NGN 0 1 55KG ERX 0 GSAVE [%B IS A MODIFIER POINTING TO THE 5656 ANDS 0 CPRIV(%B) [RELEVANT FILE,ADICTENT 56JQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OFFQUE https://www.george3.co.uk/george/macro/offque?rev=1705492539&do=diff OFFQUE (GIN Macro) Defined in: MACROS Used in: BSBLFAIL867, BSTS867, RITEFAIL864, TRANFAIL866 2#2# ...[??? OFFQUE SECT FILE FGN 9 DOC 2#=6 # 2#PQ #MAC OFFQUE 2*9B #STR %A,3 2*P2 LDX 3 %A 2B8L CALL 0 (BSTS6) 2BN= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLDA2SJMESS https://www.george3.co.uk/george/macro/olda2sjmess?rev=1705492539&do=diff OLDA2SJMESS (GIN Macro) Defined in: MACROSBRBS Used in: 2?GN ...[??? OLDA2SJM SECT FILE FGN 14 DOC 2?QG # 2?S9 ...# 2?TY ...#MAC OLDA2SJMESS 2?XM ...#MEN SOUP 2?^B ...#TRA AOLDA2SJMES 2#35 ... NULL 2#4S ...#END 2#6H ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLDJOBLIST https://www.george3.co.uk/george/macro/oldjoblist?rev=1705492539&do=diff OLDJOBLIST (GIN Macro) Defined in: MACROS WELL Used in: MJCQ ...#MAC OLDJOBLIST MJXB ...#ALT FACILITIES=FACORIG MKC2 ...#MEN BMSAVJOB MKWL ...#TRA JLTEMPLATE1-1 MLB= ... JLTEMPLATE JL MLTW ...#END MM*G ...#SKI JWPHASE4 MMT6 ...( MN#Q ...#MEN JDWRITE MNSB ...#TRA JDTEMPLATE1-1 MP#2 ... JLTEMPLATE JD MPRL ...#END MQ?= ...#MEN JOBDATA MQQW ...#TRA JDTABLES1 MR=G ... JDTABLES V,W,X,Y,Z MRQ6 ...#END MS9Q ...#MEN SETJOBQ MSPB ...#TRA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLDMAC https://www.george3.co.uk/george/macro/oldmac?rev=1705492539&do=diff OLDMAC (GIN Macro) Defined in: MACROS DTP Used in: ?SYN ...[??? OLDMAC SECT DIAG FGN 556 DOC ?S^= #MAC OLDMAC [M.C.D. MANN ?S^S [ ?T2B [ ?T2Y [ ************ ?T3G [ * OLDMAC * ?T44 [ ************ ?T4L [ ?T58 [ ?T6W #DEF 31?=1? [REMEMBER THE LISTING LEVEL ?T7D #DEF 83?=1 [SUPPRESS "G" FLAGS ON #MACS ?T82 #LIS 0 ?T8J NWMC %B,%C,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLMF https://www.george3.co.uk/george/macro/olmf?rev=1705492539&do=diff OLMF (GIN Macro) Defined in: MACROS RJH Used in: INMOP867 #DNY ...[??? OLMF SECT CENT FGN 71 DOC #DYQ # #FDB #MAC OLMF #FY2 LDX 2 %A #GCL STEP -1,0(2) #GX= TESTREPN FILEFULL,M1OLMF #HBW DOWN PROCONTX,12 #HWG FCAPCA 2,APETADDR(2) #JB6 STOZ AMFMSK(2) #JTQ LDX 2 FX2 #K*B BRN %C #KT2 M1OLMF #L#L LDX 0 %A #LS= STO 0 0(3) #M?W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLMFA https://www.george3.co.uk/george/macro/olmfa?rev=1705492539&do=diff OLMFA (GIN Macro) Defined in: MACROS RJH Used in: INMOP867 #*R8 ...[??? OLMFA SECT CENT FGN 71 DOC #B32 # #BGL #MAC OLMFA #C2= TESTREPN FNEARLY,M1OLMFA #CFW DOWN PROCONTX,12 #C^G M1OLMFA #DF6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLPEND https://www.george3.co.uk/george/macro/olpend?rev=1705492539&do=diff OLPEND (GIN Macro) Defined in: OLPMACROS Used in: CPOBJ6, CROBJ6, FHLIST867, FHOBJ860, LPOBJ6, LPTWO7, TPOBJ867, TROBJ867 4RK8 ...[??? OLPEND SECT FILE FGN 7 DOC 4RT2 [ 4S#L ...[ DOES TICKLE IF DRM & NOT COMMUNE : THEN OLPFIN1 4SS= #MAC OLPEND 4T?W LDX 2 FX2 4TF4 ... TOPFCA2 3 4TL= ... JBS M1OLPEND,3,BACOMM 4TRG JNOTFDRM M1OLPEND 4W?6 TICKLES 2,3 4WQQ M1OLPEND 4X=B OLPFIN1 4XQ2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLPFIN https://www.george3.co.uk/george/macro/olpfin?rev=1705492539&do=diff OLPFIN (GIN Macro) Defined in: MACROS BJE Used in: HLSREAD867, IPCEN8, IPCOPENB83, IPCPERI83, OLMTD65, PERION867, SIMULPTR60, VIPBPERI864 22FL ...[??? OLPFIN SECT CENT FGN 3 DOC 2JHQ # 2K3B # 2KH2 # 2LG= #MAC OLPFIN 2L^W LDX 2 %A 2MFG CLEAR 2,0 [CLEAR LOCKDOWN COUNTS:NULL IN G3. 2M^6 MONEND [CLEAR STOP WORD ELSE GENERATE MONEVN 2NDQ COOR1 2NYB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLPFIN1 https://www.george3.co.uk/george/macro/olpfin1?rev=1705492539&do=diff OLPFIN1 (GIN Macro) Defined in: MACROS BJE Used in: ANTIC867, BEXTRA83, CAFSPERI867, CONIPB8, CONMXA85, CONMXB8, CONMXC8, DRSTART6, DRUM852, EDSTART860, EXINONE867, EXTEND866, READSPEC867, RENAMEX867, SCHDJOBA867, SCHEDJOB867, SPERION867 2P88 ...[??? OLPFIN1 SECT CENT FGN 3 DOC 2PD2 # 2PXL # 2QC= #MAC OLPFIN1 2QWW LDX 2 FX2 2RBG #STR %A 2RW6 LINKSET 2,%A 2S*Q LDX 2 APETADDR(2) 2STB CLEAR 2,0 2T*2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLPFINX https://www.george3.co.uk/george/macro/olpfinx?rev=1705492539&do=diff OLPFINX (GIN Macro) Defined in: MACROS BJE Used in: CIMOP867, NETOFLNE867 2YGJ ...[??? OLPFINX SECT CENT FGN 3 DOC 2YQB # 2^=2 # 2^PL #MAC OLPFINX 329= LDX 2 %A 32NW CLEAR 2,0 [CLEAR LOCKDOWN COUNTS:NULL IN G3 338G MONEND 33N6 COOR1X 347Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OLREJECT https://www.george3.co.uk/george/macro/olreject?rev=1705492539&do=diff OLREJECT (GIN Macro) Defined in: MACS LIST Used in: 2BNF ...[ 2BNN ...[ 2BNX ...[ ERRORS ONLINE IF ALL SLOW OUTPUT DEVICES OF REQUIRED TYPE 2BP6 ...[ ARE WRONGED OR NOT AVAILABLE PREVENTING ONLINE WAITING. 2BP* ...[ ERRORS NOPROP OR PERMEXCL REPLIES FROM ISPER FOR ONLINE 2BPJ ...[ I.E. DOES NOT IMPLEMENT LFDBAID FOR ONLINE 2BPR ...#MAC OLREJECT 2BQ2 ...#STR ON,%A 2BQ9 ...#SKI 2BQD ...( 2BQM ...#STR %B 2BQW ...#SKI 2BR5 ...( 2BR# ...#MEN LISTPARS 2B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ON https://www.george3.co.uk/george/macro/on?rev=1705492539&do=diff ON (GIN Macro) Defined in: MACROS FIXD Used in: ADJCHECK85, ANALYSEA3, BMCNTRL866, CANTDO867, CHARGESC867, COOR865, COREALL865, ERROR867, EXPRESS864, IDFPROP867, IPBLISTA867, JOBLIST867, LIBREQCA867, LISTCONK83, LISTDEV866, LISTDIRF867, LISTIDF867, LISTINIT867, LISTINTC865, LISTSTAR867, LOADERDA867, LOADERDR867, LOADERI867, MES INTLUDES, MESSAA, MESSAB, MESSAC, MESSAD, MESSAE, MESSAF, MESSAG, MESSAH, MESSAI, MESSAJ, MESSB, MESSBA, MESSBB, MESSBC, MESSBD, MESSBF, MESSBG, MESSBH, MESSBI, MESSBJ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ONEURG https://www.george3.co.uk/george/macro/oneurg?rev=1705492539&do=diff ONEURG (GIN Macro) Defined in: CENTCSSMACS Used in: 4H63 ...[??? ONEURG SECT CENT FGN 18 DOC 4H65 ...[ 4H68 ...[ RESTORE TIME MACRO TO ALLOW ONLY ONE URGENCY PER JOB 4H6? ...#MAC ONEURG 4H6# ...#SKI JWPHASE4<1$1 4H6* ...( 4H6B ...#MEN URGELOAD 4H6F ...#TRA K1URGELOAD 4H6G ...) 4H6H ...#SKI JWPHASE4 4H6J ...( 4H6K ...#MEN JDWRITE 4H6L ...#TRA K2JDWRITE 4H6M ...) 4H6N ...#STR OFF,%A 4H6P ...#SKI 4H6Q ...( 4H6R ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ONPRIV https://www.george3.co.uk/george/macro/onpriv?rev=1705492539&do=diff ONPRIV (GIN Macro) Defined in: MACROS MACB Used in: PRIVLEG84 4WGY ...[??? ONPRIV SECT CENT FGN 2 DOC 4WQQ # 4X=B #MAC ONPRIV [MACRO TO GIVE A SPECIFIED PRIVILEGE 4XQ2 LDN 0 1 [ %A CONTAINS PRIVILEGE TYPE 4Y9L SMO %A [%B IS A MODIFIER POINTING TO THE 4YP= SRC 0 1 [ RELEVANT FILE,ADICTENT 4^8W ORS 0 CPRIV(%B) 4^NG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ONQUE https://www.george3.co.uk/george/macro/onque?rev=1705492539&do=diff ONQUE (GIN Macro) Defined in: MACROS Used in: BSQ867 285# ...[??? ONQUE SECT FILE FGN 9 DOC 28*6 # 28SQ #MAC ONQUE 29#B #STR %A,3 29S2 LDX 3 %A 2=?L #STR %B,2 2=R= LDX 2 %B 2?=W CALL 0 (BSTS5) 2?QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ONR https://www.george3.co.uk/george/macro/onr?rev=1705492539&do=diff ONR (GIN Macro) Defined in: MACROS JSR Used in: OPILLS70 4D*S ...[??? ONR SECT CENT FGN 9 DOC 4DKL # THIS MACRO OBTAINS THE ONR OF A MEMBER.%A-ADDRESS OF X0 4F5= #MAC ONR [JSRAYNER.GET ORDER NO.REGISTER (1907) 4FJW LDX 0 JWCON1 4G4G SMO %A 4GJ6 ANDX 0 8 4H3Q #SKIP %B 4HHB STO 0 %B 4J32 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OP https://www.george3.co.uk/george/macro/op?rev=1705492539&do=diff OP (GIN Macro) Defined in: MACROS SJ Used in: CLOSEIPB864, INCPROC850, IPBPM84, MESSAH, MONFILE867, MONFILEA864, WORKFILE860 5=LY ...[ 5=S6 ...[ 5=^B ...[??? OP SECT FILE FGN 24 DOC 5?YL #MAC OP 5#5S ...[ THE NEXT MACRO IS TO ALLOW ANY SENSIBLE OPERATION CONCERNING THE 5#?2 ...[ CONTENTS OF X0 AND THE WORD CONTAINING THE IDENTIFIER. 5#D= #ACC %D 5#XW ([NOT AN ACC 5*CG #STR %D [SKIP IF NULL 5*X6 LDX 0 %D 5BBQ MOD %C 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPB https://www.george3.co.uk/george/macro/opb?rev=1705492539&do=diff OPB (GIN Macro) Defined in: MACROS SJ Used in: IPCONB8, IPCOND864, USERDIR842 7FTK ...[ 7FY8 ...[ 7G2S ...[??? OPB SECT FILE FGN 24 DOC 7G=L #MAC OPB 7GQ= #DEF 19?+9=0 [MASK OF BITS IN NEXT WORD 7H9W #DEF 19?+1=0 [COUNT OF PARAMS EXAMINED 7HPG #DEF 19?+6=0 [COUNT OF IDS IN NEXT WORD 7J96 #DEF 19?+5=0 [SET 'LAST WORD' INDICATOR 7JNQ OPC %A,%B,%C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPC https://www.george3.co.uk/george/macro/opc?rev=1705492539&do=diff OPC (GIN Macro) Defined in: MACROS SJ Used in: IPCOND864, USERDIR842 7MP5 ...[ 7MRN ...[ 7MW# ...[??? OPC SECT FILE FGN 24 DOC 7N66 #MAC OPC 7NKQ #SKI 19?+0]&#40000000$#40000000 7P5B ( [BIT 0 = 0 7PK2 #SKI 19?+6]<1$1 [SKIP IF NOT 1ST THIS SCAN 7Q4L #DEF 19?+8=%E/BITMULT&#7777[START OF GENERATE FOR THIS WORD 7QJ= #SKI %E/BITMULT&#7777-(19?+8])<1$1 7R3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPEN https://www.george3.co.uk/george/macro/open?rev=1705492539&do=diff OPEN (GIN Macro) Defined in: OPEN-MACROS Used in: ABANDON867, ALASB867, ALLOW84, ASSIGN860, BACKMASS860, BEXTSJ84, BLOGNAL865, BMAPTWO860, BMJLIST864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEMS83, BQUERY84, BSUJSTAT867, BUDGET84, BUDGTWO84, CHEKPRIV867, COMHOOK867, COMPRESS864, CONCEPT85, CONSET864, COPYA867, COPYB867, CREALEX864, DICTJOB82, DOC867, DRSTART6, DTWRONG867, EDITER867, EDSTART860, FILELOG, FINDOC867, FORMLOOP865, GET6, GETFREE867, GETFREEB864, GETON867, GETONA867, GROPE867, HLS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENBUDG https://www.george3.co.uk/george/macro/openbudg?rev=1705492539&do=diff OPENBUDG (GIN Macro) Defined in: MACROS MACB Used in: REALTIME867, SECURE5 5=9Y ...[??? OPENBUDG SECT CENT FGN 2 DOC 5=FQ # 5=^B # 5?F2 # MACRO TO PREPARE BUDGET ENTRY FOS BUDGET NACROS (I.E. TO OPEN THE 5?YL #MAC OPENBUDG [DICTIONARY AND READ THE USER'S 5#D= DOWN BUDGTWO,3 [ENTRY) 5#XW BRN %A [%A IS LABEL IF BREAK-IN ROURINE 5*CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENBUDO https://www.george3.co.uk/george/macro/openbudo?rev=1705492539&do=diff OPENBUDO (GIN Macro) Defined in: MACROS RMD10 Used in: ATTACHC867, CONNECT867, DEAD867, GET6, LIBQUERY, NEWOWN865, RETURNIT867 #248 ...[??? OPENBUDO SECT FILE FGN 16 DOC #2#2 # #2RL #MAC OPENBUDO #3?= # OPENS DICT & READS ENTRY FOR OWNER OF FILES IN DIRECTORY #3QW # NAMED BY FIRST FABSNB IN CHAIN #4=G DOWN BUDGTWO,31 #4Q6 BRN %A #59Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENCREN https://www.george3.co.uk/george/macro/opencren?rev=1705492539&do=diff OPENCREN (GIN Macro) Defined in: OPEN-MACROS Used in: 872N ...[??? OPENCREN SECT FILE FGN 20 DOC 87=G #MAC OPENCREN 87Q6 SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 889Q OPENCREX %A,0 88PB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENCREX https://www.george3.co.uk/george/macro/opencrex?rev=1705492539&do=diff OPENCREX (GIN Macro) Defined in: OPEN-MACROS Used in: DEWELL867, OPENREL865, USERLIB867, USERONE867, USERSTRM867 844Y ...[??? OPENCREX SECT FILE FGN 20 DOC 84#Q [ 84SB #MAC OPENCREX 85#2 ACCSTO %B,ACOMMUNE7,FX2 85RL DOWN OPENREL,3 86?= BRN %A 86QW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPEND https://www.george3.co.uk/george/macro/opend?rev=1705492539&do=diff OPEND (GIN Macro) Defined in: OPEN-MACROS Used in: BACKMASS860, CLOSEONE867, COPYFILE867, CREATE867, DEWELL867, IDFPROP867, JSASCAN867, LISTPROC867, MONFILEA864, PERFPASS864, USERDIR842 8?C# ...[??? OPEND SECT FILE FGN 20 DOC 8?M6 #MAC OPEND 8#6Q ACCSTO %B,ACOMMUNE7,FX2 8#LB DOWN OPENFILE,1 8*62 BRN %A [BREAKIN 8*KL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENDIR https://www.george3.co.uk/george/macro/opendir?rev=1705492539&do=diff OPENDIR (GIN Macro) Defined in: OPEN-MACROS Used in: ADDICT865, ALLOCATE867, ANTIC867, ARCHIVE867, ARCHIVNW83, ASTONIF867, ATTACHC867, BACKMARK850, BMAPTWO860, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BSPRUNE867, CAFSPERI867, CLOSEAB863, CLOSFREZ867, COPYB867, COPYFILA867, CREALEX864, DEAD867, DEADA867, DIRENT867, DOIHEMS867, DOXCODE867, DTREST860, EDIT867, EMSENTER867, ENWELLB867, ERASE867, ERASEA867, FHOBJIND860, FILESECU83, FREEZE864, HOWBIG867, IFEXPAN867, INCEOT865,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENEND https://www.george3.co.uk/george/macro/openend?rev=1705492539&do=diff OPENEND (GIN Macro) Defined in: OPEN-MACROS Used in: CHTAB, INKS, OPENEND865, OPENREL865 8D?J ...[??? OPENEND SECT FILE FGN 20 DOC 8DHB #MAC OPENEND 8F32 SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 8FGL OPENENDX %A,0 8G2= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENENDX https://www.george3.co.uk/george/macro/openendx?rev=1705492539&do=diff OPENENDX (GIN Macro) Defined in: OPEN-MACROS Used in: ERASEA867 8*TD ...[??? OPENENDX SECT FILE FGN 20 DOC 8B5= #MAC OPENENDX [OPENREL LAST COMPONENT (SEE 3.6.3.6) 8BJW ACCSTO %B,ACOMMUNE7,FX2 8C4G DOWN OPENEND,1 8CJ6 BRN %A [BREAKIN 8D3Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENINC https://www.george3.co.uk/george/macro/openinc?rev=1705492539&do=diff OPENINC (GIN Macro) Defined in: OPEN-MACROS Used in: BSUNJAM867, DTQUEST860, DTSUBS867, DTSUBSS867, DTWRONG867, DUMP860, INCCHECK860, INCDTA865, INCEND865, INCOBS867, INCRV850, INCSET865, INCSTART865, INCTAPES867, INCWAIT860, RESTEND850, SCHEDMTX867 8S2J ...[??? OPENINC SECT FILE FGN 20 DOC 8S=B # THIS MACRO OPENS :SYSTEM.INCINDEX - N TYPE MODE 8SQ2 #MAC OPENINC 8T9L SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 8TP= OPENSYSX %A,INCINDEX,0 8W8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENINCX https://www.george3.co.uk/george/macro/openincx?rev=1705492539&do=diff OPENINCX (GIN Macro) Defined in: OPEN-MACROS Used in: 8Q44 ...[??? OPENINCX SECT FILE FGN 20 DOC 8Q?W # THIS MACRO OPENS ?SYSTEM.INCINDEX - MODE IN %B 8QRG #MAC OPENINCX 8R?6 OPENSYSX %A,INCINDEX,%B 8RQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENMAS https://www.george3.co.uk/george/macro/openmas?rev=1705492539&do=diff OPENMAS (GIN Macro) Defined in: OPEN-MACROS Used in: BACKMAP864, BACKMASS860, BSUNJAM867, COMPRESS864, INCWAIT860, SETIDF867 2T58 ...[??? OPENMAS SECT FILE FGN 20 DOC 2T*2 #MAC OPENMAS 2TSL SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 2W#= OPENMASD %A,0 2WRW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENMASD https://www.george3.co.uk/george/macro/openmasd?rev=1705492539&do=diff OPENMASD (GIN Macro) Defined in: OPEN-MACROS Used in: OPENFILE867, OPENTWO867 88^8 ...[??? OPENMASD SECT FILE FGN 20 DOC 8992 #MAC OPENMASD [OPENMAS IN MODE GIVEN IN %A 89NL ACCSTO %B,ACOMMUNE7,FX2 8=8= DOWN ORELHALF,1 8=MW BRN %A [BREAKIN 8?7G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENREL https://www.george3.co.uk/george/macro/openrel?rev=1705492539&do=diff OPENREL (GIN Macro) Defined in: OPEN-MACROS Used in: CHTAB, CLOSEAB863, INKS, NEWDIR867, OPENREL865 2PMS ...[??? OPENREL SECT FILE FGN 20 DOC 2PXL #MAC OPENREL 2QC= SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 2QWW OPENRELD %A,0 2RBG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENRELD https://www.george3.co.uk/george/macro/openreld?rev=1705492539&do=diff OPENRELD (GIN Macro) Defined in: OPEN-MACROS Used in: ERASEA867, OPENTWO867 7T=8 ...[??? OPENRELD SECT FILE FGN 20 DOC 7TG2 #MAC OPENRELD [OPENREL IN MODE GIVEN IN %A 7T^L ACCSTO %B,ACOMMUNE7,FX2 7WF= DOWN OPENREL,2 7WYW BRN %A [BREAKIN 7XDG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENRELN https://www.george3.co.uk/george/macro/openreln?rev=1705492539&do=diff OPENRELN (GIN Macro) Defined in: OPEN-MACROS Used in: ARCHIVNW83, BACKMAP864, BSPRUNE867, COMPRESS864, CREALEX864, DTREST860, INCEOT865, INCWRITE865 7XN# ...[??? OPENRELN SECT FILE FGN 20 DOC 7XY6 #MAC OPENRELN 7YCQ SETMODE 0,%B,%C,%D,%E,%F,%G,%H,%I 7YXB OPENRELX %A,0 7^C2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENRELX https://www.george3.co.uk/george/macro/openrelx?rev=1705492539&do=diff OPENRELX (GIN Macro) Defined in: OPEN-MACROS Used in: OPENREL865, USEROPEN867, USERSTRM867 7^LS ...[??? OPENRELX SECT FILE FGN 20 DOC 7^WL #MAC OPENRELX 82B= ACCSTO %B,ACOMMUNE7,FX2 82TW DOWN OPENREL,1 83*G BRN %A 83T6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENSOUT https://www.george3.co.uk/george/macro/opensout?rev=1705492539&do=diff OPENSOUT (GIN Macro) Defined in: MACROS LEF Used in: LISTFNDA865, LISTSEAR867 DJHN ...[??? OPENSOUT SECT DEVT FGN 2 DOC DJRG [ DK?6 #MAC OPENSOUT DKQQ SETMODE 2,%B,%C,%D,%E,%F DL=B SMO FX2 DLQ2 STO 2 ACOMMUNE1 DM9L DOWN LISTPROC,2 DMP= BRN %A DN8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENST https://www.george3.co.uk/george/macro/openst?rev=1705492539&do=diff OPENST (GIN Macro) Defined in: MACROS EWDAS Used in: BRADSPLT867, CHINTEG867, CLOSDEL867, CONTRACT866, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FINDFS867, FLAWMAP866, SCEX866, SCEXEND867, WRITEFIP867 ??T= # ?##W [??? OPENST ?#SG # ****** ?*#6 #MAC OPENST ?*RQ # ?B?B #STR %A ?BR2 ( ?C=L LDX 0 %A ?CQ= STO 0 ESERL(3) ?D9W ) ?DPG MFINDSU… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENSYS https://www.george3.co.uk/george/macro/opensys?rev=1705492539&do=diff OPENSYS (GIN Macro) Defined in: OPEN-MACROS Used in: ABANDON867, ATTRIBUT867, BMAPTWO860, BMSAVJOB864, CLOSEMT867, COMPRESS864, CONSERNO6, DEAD867, DEWELL867, DICTJOB82, DICTWELL867, DIRENT867, DSCNCT867, DTWRONG867, DUMP860, ENWELL867, ERASE867, ERASEA867, FREEZE864, GETFREE867, GETFREEB864, IFXCODES864, INCCHECK860, IPDBATCH867, JDWRITE867, JOBLIST867, JSASCAN867, JWELLONE867, LABEL866, LIBCOM867, LIBINSEC864, LIBLOAD867, LIBMANY867, LIBQUERY, LIBREQC867, LIBREQCA867, LIBSEC867, LIST867, LI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENSYSX https://www.george3.co.uk/george/macro/opensysx?rev=1705492539&do=diff OPENSYSX (GIN Macro) Defined in: OPEN-MACROS Used in: INSTPARA867, SETJD867, SYSPROP867 8WDN ...[??? OPENSYSX SECT FILE FGN 20 DOC 8WNG [ 8X86 #MAC OPENSYSX 8XMQ # THIS MACRO OPENS A CERTAIN SYSTEM FILE AS SPECIFIED BY %B. 8Y7B # %A IS A BREAKIN ADDRESS. %B IS A LOCAL NAME OF AN ALLOWED FILE. 8YM2 # %C CONTAINS THE OPENING MODES. 8^6L # 8^L= ACCSTO %C,ACOMMUNE7,FX2 925W #STR DICTIONARY,%B 92KG #SKI 9356 DOWN OPENFIL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENTEST https://www.george3.co.uk/george/macro/opentest?rev=1705492539&do=diff OPENTEST (GIN Macro) Defined in: WORK-MACROS Used in: LISTFREE867, OPENWORK866 5MCS ...[??? OPENTEST SECT FILE FGN 4 DOC 5MML #MAC OPENTEST 5N7= DOWN OPENWORK,5 5NLW BRN %A 5P6G BRN %B 5PL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENWORK https://www.george3.co.uk/george/macro/openwork?rev=1705492539&do=diff OPENWORK (GIN Macro) Defined in: WORK-MACROS Used in: CHTAB, INKS, LISTDEV866, LISTSTAR867, OPENWORK866 5PTY ...[??? OPENWORK SECT FILE FGN 4 DOC 5Q5Q #MAC OPENWORK 5QKB BRN M2OPENWORK 5R52 M1OPENWORK +A%B+A%C+A%D+A%E+A%F+A%G+A%H+A%I 5RJL M2OPENWORK 5S4= SMO FX1 5SHW LDX 0 M1OPENWORK 5T3G SMO FX2 5TH6 STO 0 EXEC1 5W2Q DOWN OPENWORK,1 5WGB BRN %A 5X22… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPENWORX https://www.george3.co.uk/george/macro/openworx?rev=1705492539&do=diff OPENWORX (GIN Macro) Defined in: WORK-MACROS Used in: OPENFILE867, USEROPEN867 5X9S ...[??? OPENWORX SECT FILE FGN 4 DOC 5XFL #MAC OPENWORX 5X^= #STR %B,0 5YDW LDX 0 %B 5YYG LDX 2 FX2 5^D6 STO 0 EXEC1(2) 5^XQ DOWN OPENWORK,1 62CB BRN %A 62X2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPERTIME https://www.george3.co.uk/george/macro/opertime?rev=1705492539&do=diff OPERTIME (GIN Macro) Defined in: MACS OPER Used in: 2J46 [ 2JHQ [ 2K3B [??? OPERTIME SECT COMM FGN 1 DOC 2KH2 [ 2L2L #MAC OPERTIME 2LG= [ ======== 2L^W [ 2MFG [ THIS MACRO SWITCHES ON OR OFF THE TIME/DATE MESSAGES 2M^6 [ BEING OUTPUT TO THE OPER LOG 2NDQ [ 2NYB [ %A MAY BE 'ON' OR 'OFF' - DEFAULT IS 'OFF' 2PD2 [ 2PXL #UNS ENHOPER 2QC= ( 2QWW #STR %A 2RBG #SKI 2RW6 ( 2S*Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPND https://www.george3.co.uk/george/macro/opnd?rev=1705492539&do=diff OPND (GIN Macro) Defined in: MACROS GLJ Used in: 995S ...[??? OPND SECT CENT FGN 18 DOC 99D= # 99XW #MACRO OPND 9=CG #STRING %B 9=X6 #SKIP 9?BQ OPND %A,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N 9?WB #STRING %B 9#B2 %A %B 9#TL #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPS https://www.george3.co.uk/george/macro/ops?rev=1705492539&do=diff OPS (GIN Macro) Defined in: MACROS SJ Used in: FINISH867 7CCF ...[ 7CG4 ...[ 7CJN ...[??? OPS SECT FILE FGN 24 DOC 7CSG #MAC OPS 7D#6 #DEF 19?+0=0 [BIT WORD GIVING PARAMS ALREADY DEALT 7DRQ OPB %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T- 7F?B ,%U,%V,%W,%X,%Y,%Z 7FR2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPSCON https://www.george3.co.uk/george/macro/opscon?rev=1705492539&do=diff OPSCON (GIN Macro) Defined in: MACRO COMPRO Used in: WHATPER867, WHATRVS867, WHTSTAT867, WLA867, WSPARAM867 F4#7 ...[??? OPSCON SECT CENT FGN 21 DOC F4#= ...#MAC OPSCON F4#D ... LDX 2 FX2 F4#L ... LDX 0 CONTEXT(2) F4#S ... ANDN 0 #20 F4*2 ... BNZ 0 %A F4*8 ... JBS %B,2,EXOPCOM F4*B ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPTMESS https://www.george3.co.uk/george/macro/optmess?rev=1705492539&do=diff OPTMESS (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, NEXTUNIT867, SCEXEND867, WRITEFIP867 JM7B # JMM2 # ********************************************************************** JN6L # * JNL= # * MESSAGE HANDLING JP5W # * JPKG # * OPTMESS,KEEPMESS,EXMESS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPTMOD https://www.george3.co.uk/george/macro/optmod?rev=1705492539&do=diff OPTMOD (GIN Macro) Defined in: MACROS JSR Used in: 2M9N ...[??? OPTMOD SECT CENT FGN 9 DOC 2MFG # 2M^6 #MACRO OPTMOD 2NDQ #STRING %A 2NYB MOD %C,%A 2PD2 #STRING %A 2PXL #SKIP 2QC= MOD %C,%B 2QWW #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OPTRAN https://www.george3.co.uk/george/macro/optran?rev=1705492539&do=diff OPTRAN (GIN Macro) Defined in: MACROS Used in: BSBLFAIL867, RITEFAIL864, TRANFAIL866 2K3B ...[??? OPTRAN SECT FILE FGN 9 DOC 2L2L #MAC OPTRAN 2L7S ...#SKI BSOPT 2L*2 ...( 2LG= LDN 0 CHAINADD(%A) 2L^W STO 0 EX6 2MFG LDX 0 %B 2M^6 ANDX 0 GMIN4 2NDQ STO 0 EX5 2NYB LDX 3 %C 2PD2 CALL 0 (BSTS13) 2PMS ...) 2PXL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OR https://www.george3.co.uk/george/macro/or?rev=1705492539&do=diff OR (GIN Macro) Defined in: IFMACS Used in: CDUM866, CHNUMCON867, FORMLOOP865, INCRCUBX860, IPBLISTA867, IPBLISTD867, LISTAST867, LISTOPEN867, LISTPARS867, LISTRING864, LOADERI867, LOADERMT867, MESSA, MESSAB, MESSAC, MESSAE, MESSAJ, MESSB, MESSBH, MESSC, MESSCC, MESSCG, MESSCH, MESSCI, MESSCJ, MESSD, MESSDA, MESSDB, MESSE, MESSH, MESSI, OPER864, OPERA864, OPERIN867, PMBUFFS84, RESTERR864, SHOWCOMM864, WA864, WHATRVS867, WHATRVSA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLOUT865, WT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ORELP https://www.george3.co.uk/george/macro/orelp?rev=1705492539&do=diff ORELP (GIN Macro) Defined in: OLPMACROS Used in: PROSTART867, RELPER867 2K?8 ...[??? ORELP SECT FILE FGN 7 DOC 2KH2 [ 2L2L #MAC ORELP 2LG= #ACC %A 2L^W LDX 0 %A 2MFG SMO FX2 2M^6 #ACC %A 2NDQ #SKI 2NYB STO %A ACOMMUNE8 2PD2 #ACC %A 2PXL STO 0 ACOMMUNE8 2QC= DOWN OFFREL,3 2QWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ORIF https://www.george3.co.uk/george/macro/orif?rev=1705492539&do=diff ORIF (GIN Macro) Defined in: MACROSAJE Used in: 2Y2Y ...[??? ORIF SECT DEVT FGN 9 DOC 2Y=Q # 2YQB # 2^=2 #MAC ORIF 2^PL #STR %C 329= ...#DEF 26?=26?*256+%C 32NW #STR %C 338G #SKI 33N6 ...#DEF 26?=26?*256+GEORGE 347Q #STR %B 34MB ...#DEF 25?=25?*256+%B 3572 #STR %B 35LL #SKI 366= ...#DEF 25?=25?*256+G3ISSUE 36KW ...#DEF 24?=24?*256+%A 375G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ORIGIN https://www.george3.co.uk/george/macro/origin?rev=1705492539&do=diff ORIGIN (GIN Macro) Defined in: MACS PW Used in: DEWELL867, ENWELLB867, IPBINC865, LOGACC863, QPRINT867 7QS4 [??? ORIGIN SECT COMM FGN 9 DOC 7R3W # 7RHG # 7S36 #MAC ORIGIN [P.WARNER 7SGQ DOWN OUTPER,2 7T2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ORR https://www.george3.co.uk/george/macro/orr?rev=1705492539&do=diff ORR (GIN Macro) Defined in: IFMACS Used in: OPER864 8TCB ...[ 8TCL ...[ 8TCW ...[??? ORR SECT COMM FGN 1 DOC 8TD6 ...[ 8TDB ...#MAC ORR 8TDL ...[ === 8TDW ...[ 8TF6 ...[ CONTRACTION OF 'OR EITHER' 8TFB ...[ 8TFL ... OR EITHER,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, - 8TFW ... %Q,%R,%S,%T 8TG6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTBLOCK https://www.george3.co.uk/george/macro/outblock?rev=1705492539&do=diff OUTBLOCK (GIN Macro) Defined in: MACROS RJH Used in: ALLOW84, ANSCOM865, ATTACHB866, ATTJOUNL861, BACKMAP864, BEXTSJ84, BMAPDIR865, BMAPTAPE865, BMAPTWO860, BQUERY84, BRADDATA867, BRADEMUL867, BUDGET84, CLOSDEL867, COMPROB867, DELCOM5, DEWELL867, DISPCOM867, DRUM852, EVENTS864, EXMESS70, FAIL5, FLAWMAP866, HALT5, INSTPARA867, IPALL864, IPBERROR867, IPBINC865, IPBJOURN867, LISTNEXT867, LOADFIN860, MONITOR36, MOVCART867, ONLINEC867, OPCAXCOD5, OPER864, OPERIN867, OPILLSA206, PATCH, PERFLOGS866,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTBLOCN https://www.george3.co.uk/george/macro/outblocn?rev=1705492539&do=diff OUTBLOCN (GIN Macro) Defined in: MACROS RJH Used in: ADDICT865, ADDJOB867, ATTACHC867, ATTJOUNL861, BACKMAP864, BMSTATS850, CONCEPT85, CORE867, EDWRITE867, ENWELLB867, EXPRESS864, FINISH867, GIVE867, HLSEVENT867, IDFSCON867, INCCHECK860, INCEND865, INCSTART865, IPBCONS867, IPBMOPB867, IPBSTARB867, IPBSTART867, JWELLONE867, LOGACC863, MONEVENT867, MOPCOM867, MOPCOMB865, MOPOUT85, MORNING867, MULTIPLX864, ONLINEB867, ONLINEC867, OPCA867, PERFCAS865, PRINT70, PUTPER85, QPRINT867, READFAIL866, RE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTEXES https://www.george3.co.uk/george/macro/outexes?rev=1705492539&do=diff OUTEXES (GIN Macro) Defined in: MACROS CBK Used in: ALAS822, ALASB867, DEWELL867, DTSUBS867, GOTO867, PNTLAST860, SCEDITOR84 32YN ...[??? OUTEXES SECT CENT FGN 2 DOC 338G # 33N6 # NOTE:- HMON ARE DEFINED IN COMPS MACB 347Q # 34MB #MAC OUTEXES 3572 #STR 0,%A 35LL LDX 0 %A 366= LDX 2 FX2 36KW STO 0 HMON1(2) 375G SRL 0 11 37K6 BZE 0 MLESS 384Q LDN 0 2048 38JB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTEXESX https://www.george3.co.uk/george/macro/outexesx?rev=1705492539&do=diff OUTEXESX (GIN Macro) Defined in: MACROS CBK Used in: 3D6J ...[??? OUTEXESX SECT CENT FGN 2 DOC 3DBB #MAC OUTEXESX 3DW2 #STR 0,%A 3F*L LDX 0 %A 3FT= SMO FX2 3G#W STO 0 HMON1 3GSG SRL 0 11 3H#6 BZE 0 MLESS1 3HRQ LDN 0 2048 3J?B SMO FX2 3JR2 STO 0 HMON1 3K=L MLESS1 3KQ= LDX 0 %B 3L9W LDX 2 FX2 3LPG STO 0 HM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTINCS https://www.george3.co.uk/george/macro/outincs?rev=1705492539&do=diff OUTINCS (GIN Macro) Defined in: DUMP-MACROS Used in: BSUNJAM867, COMPRESS864, INCEND865, INCOBS867, INCRV850 99N4 ...[??? OUTINCS SECT FILE FGN 65 DOC 99XW # 9=CG # MACROS THAT USE THE PARAMETER OUTPUTTING SUBROUTINES IN DTSUBS 9=X6 # 9?BQ #MAC OUTINCS 9?WB DOWN DTSUBS,13 9#B2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTINCTSNS https://www.george3.co.uk/george/macro/outinctsns?rev=1705492539&do=diff OUTINCTSNS (GIN Macro) Defined in: DUMP-MACROS Used in: 9D38 ...[??? OUTINCTS SECT FILE FGN 65 DOC 9D?2 #MAC OUTINCTSNS 9DQL DOWN DTSUBS,12 9F== #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTLEN https://www.george3.co.uk/george/macro/outlen?rev=1705492539&do=diff OUTLEN (GIN Macro) Defined in: MACROS VB Used in: IPBMOPB867, IPBOUT867, MORNING867 4BWY ...[??? OUTLEN SECT CENT FGN 7 DOC 4C6Q #MAC OUTLEN [GET CHAR LEN OF RE3AINED BLOCK 4CLB MOD LDEX %B ARECB,%A 4D62 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMESS https://www.george3.co.uk/george/macro/outmess?rev=1705492539&do=diff OUTMESS (GIN Macro) Defined in: MACROS VB Used in: ABANDONA867, ADDJOB867, BSUNJAM867, COMPROB867, DEWELL867, DIRENT867, FINISH867, FSERR867, HLSEVENT867, LABEL866, LIBLOADB867, LIBREQ866, LIBREQC867, LOADFIN860, QPRINT867, RETRIEVE864, USERDIR842, WHATJBS867, WHATPERA867, WHATPERB867, WHATPERX867, WHATPROP865, WHATRVSA867, WLB867, WLC867, XENON 4PLN ...[??? OUTMESS SECT CENT FGN 7 DOC 4PWG #MAC OUTMESS 4QB6 LDN 0 %A&511 4QTQ SMO FX2 4R*B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMESSX https://www.george3.co.uk/george/macro/outmessx?rev=1705492539&do=diff OUTMESSX (GIN Macro) Defined in: MACROS CBK Used in: ADDJOB867, CDUM866, COMPROB867, DTSUBSS867, ERROR867, FORMLOOP865, NORMERR860, PNTLAST860, QPRINT867, SCHEDMTA860, WHATJBS867, WHATPERA867, WHATPERB867, WHATPERX867, WLB867 4DTD ...[??? OUTMESSX SECT CENT FGN 2 DOC 4FJW # 4G4G #MAC OUTMESSX [M. WILSON 4GJ6 LDX 0 %A 4H3Q SMO FX2 4HHB STO 0 HMON1 4J32 DOWN SETMON,5 4JGL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMILL https://www.george3.co.uk/george/macro/outmill?rev=1705492539&do=diff OUTMILL (GIN Macro) Defined in: MACROS VB Used in: CONNECT867, CONNECTA867, DELCOM5, DSCNCT867, FAIL5, HALT5, LOGOUT867, MONEVENT867, REALTIME867 9*K4 ...[??? OUTMILL SECT CENT FGN 7 DOC 9*SW #MAC OUTMILL 9B#G DOWN SETMON,13 9BS6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMON https://www.george3.co.uk/george/macro/outmon?rev=1705492539&do=diff OUTMON (GIN Macro) Defined in: MACROS CBK Used in: ARCHIVNW83, BACKMAP864, CIOUT8, DTSUBS867, EDIT867, EDITER867, EDWRITE867, HLSEVENT867, IPBMOP867, LISTMOP867, LOGANAL864, MOPOUT85, PNTLAST860, PRINT70, RESTERR864, SCEDITOR84, TRAPLIST864, WA864, WHATRVSA867, WHTSTAT867, WLC867 4JQD ...[??? OUTMON SECT CENT FGN 2 DOC 4KFW #MAC OUTMON 4K^G #STR 0,%A 4LF6 LDX 0 %A 4LYQ SMO FX2 4MDB STO 0 HMON1 4MY2 LDX 0 %C 4NCL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMOND https://www.george3.co.uk/george/macro/outmond?rev=1705492539&do=diff OUTMOND (GIN Macro) Defined in: MACROS RJH Used in: INCEND865, INCSTART865, MORNING867, WHATPERA867 4*XN ...[??? OUTMOND SECT CENT FGN 71 DOC 4B7G #MAC OUTMOND 4BM6 LDN 0 %A 4C6Q SMO FX2 4CLB STO 0 HMON1 4D62 LDX 0 %C 4DKL LDX 2 FX2 4F5= STO 0 HMON3(2) 4FJW LDN 0 %B 4G4G STO 0 HMON2(2) 4GJ6 #SKI %D 4H3Q ( 4HHB #STR %E 4J32 LDN 0 %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMONDX https://www.george3.co.uk/george/macro/outmondx?rev=1705492539&do=diff OUTMONDX (GIN Macro) Defined in: MACROS RJH Used in: 4N7S ...[??? OUTMONDX SECT CENT FGN 71 DOC 4NCL #MAC OUTMONDX 4NX= LDN 0 %A 4PBW SMO FX2 4PWG STO 0 HMON1 4QB6 LDX 0 %C 4QTQ SMO FX2 4R*B STO 0 HMON3 4RT2 LDX 0 %B 4S#L LDX 2 FX2 4SS= STO 0 HMON2(2) 4T?W #STR %D 4TRG ( 4W?6 #STR %E 4WQQ LDN 0 %D+%E 4X=B #STR %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMONX https://www.george3.co.uk/george/macro/outmonx?rev=1705492539&do=diff OUTMONX (GIN Macro) Defined in: MACROS CBK Used in: EDITOR867, EDITORA865, EDWRITE867, INMOP867, LISTMOP867, SETPRAMA867 4X^S ...[??? OUTMONX SECT CENT FGN 2 DOC 4Y9L #MAC OUTMONX 4YP= #STR 0,%A 4^8W LDX 0 %A 4^NG SMO FX2 5286 STO 0 HMON1 52MQ LDX 0 %B 537B SMO FX2 53M2 STO 0 HMON2 546L LDX 0 %C 54L= LDX 2 FX2 555W STO 0 HMON3(2) 55KG #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMONY https://www.george3.co.uk/george/macro/outmony?rev=1705492539&do=diff OUTMONY (GIN Macro) Defined in: MACROS CBK Used in: 5?98 ...[??? OUTMONY SECT CENT FGN 2 DOC 5?F2 #MAC OUTMONY 5?YL #STR 0,%A 5#D= LDX 0 %A 5#XW SMO FX2 5*CG STO 0 HMON1 5*X6 LDX 0 %B 5BBQ SMO FX2 5BWB STO 0 HMON2 5CB2 LDX 0 %C 5CTL LDX 2 FX2 5D*= STO 0 HMON3(2) 5DSW LDX 0 %D 5F#G ORS 0 HMON1(2) 5FS6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMOP https://www.george3.co.uk/george/macro/outmop?rev=1705492539&do=diff OUTMOP (GIN Macro) Defined in: OLPMACROS Used in: CPOBJ6, FHOBJ860, LPOBJ6, MOPPM84, TPOBJ867 9NJL ...#MAC OUTMOP 9P4= ... DOWN INMOP,2 [DOWN TO DEAL WITH OUTMOP 9PHW ... BRN %A [EXIT TO OLPFIN 9Q3G ... MHUNTW 1,FILE,FRB [HUNT FOR UNIVERSAL 9QH6 ... CHAIN 1,APETADDR(2) [RE-CHAIN BLK 1FTER PCA 9R2Q ... LDCT 7 #100 9RGB ... ANDX 7 ALTMARK(2) [LD. NEWLINE SUPPRESSION WORD. 9S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMOVE https://www.george3.co.uk/george/macro/outmove?rev=1705492539&do=diff OUTMOVE (GIN Macro) Defined in: MACROS JSR Used in: DROBJ864, EDOBJ864, FHOBJDIR860, GETONA867, MTCODE864, MTOBJ864, OLMTC85, OLMTE85, PROGISH850, TPINS861 3DBB #MAC OUTMOVE [MOVE OBJ PROG AREA TO GEORGE AREA 3DW2 STO 1 JWSP1 3F*L LDX 0 %D 3FT= STO 0 JWSP2 3G#W SMO %A 3GSG LDX 0 ADATUM 3H#6 ADX 0 %B 3HRQ LDX 1 %C 3J?B SMO JWSP2 3JR2 MOVE 0 0 3K=L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTMTPROP https://www.george3.co.uk/george/macro/outmtprop?rev=1705492539&do=diff OUTMTPROP (GIN Macro) Defined in: MACROS RME10 Used in: LIBREQ866, LIBREQC867, XENON #4Q6 ...[??? OUTMTPROP SECT FILE FGN 12 #59Q ...#MAC OUTMTPROP #5PB ...#ACC %A #692 ...( #6NL ... LDX 0 %A #78= ... SMO FX2 #7MW ... STO 0 ACOMMUNE1 #87G ...) #8M6 ...#ACC %A #96Q ...#SKI #9LB ...( #=62 ... SMO FX2 #=KL ... STO %A ACOMMUNE1 #?5= ...) #?JW ... DOWN LIBPROPS,4 ##4G ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTNULL https://www.george3.co.uk/george/macro/outnull?rev=1705492539&do=diff OUTNULL (GIN Macro) Defined in: MACROS CBK Used in: ABANDONA867, ATTACHB866, BQUERY84, BSPRUNE867, COMPRO867, COMPROB867, DELCOM5, DEWELL867, DOXCODE867, DTSUBS867, DTSUBSS867, DTWRONG867, DUMP860, ERROR867, EVENTS864, EXMESS70, FAIL5, HALT5, HLSEVENT867, INCEND865, INCEOT865, INCMON865, INCSTART865, INCTAPES867, INMOP867, INPUTMOP82, IPBERROR867, IPBINB867, LIBPROPS, LIBREQ866, LIBREQC867, LOADFIN860, LOGACC863, MOPOUT85, NORMERR860, OPCAXCOD5, OPER864, OPERIN867, OPILLSA206, REDONMT867, REL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTNUM https://www.george3.co.uk/george/macro/outnum?rev=1705492539&do=diff OUTNUM (GIN Macro) Defined in: MACROS RJH Used in: ALLOCATE867, ALLOW84, ARCHIVE867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, BACKMAP864, BEXTSJ84, BLOGNAL865, BMSTATS850, BQUERY84, BRADDATA867, BRADEMUL867, BUDGET84, CLOSDEL867, COPYB867, COREALLH860, DELCOM5, DETACH867, DRUM852, DTSUBS867, DUMMYA867, DUMMYB867, EDWRITE867, ENGAGE867, ERASE867, EXMESS70, EXPRESS864, FAIL5, FINDRUM866, FINISH867, FSERR867, GETFREEB864, GROPE867, HALT5, HARDIDF867, HARDWARA8, HOWBIG867, IDFASAT867, IDFCA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPACK https://www.george3.co.uk/george/macro/outpack?rev=1705492539&do=diff OUTPACK (GIN Macro) Defined in: MACROS VB Used in: ADDICT865, ATTJOUNL861, BACKMAP864, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMCNTRL866, BMFIXIT864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BSUNJAM867, CAFSPERI867, CARTCONT867, CDUM866, CHINERR867, CLOSBAC867, CLOSDEL867, CMEMILL866, COMPCHAN84, COMPRESS864, COMPROB867, CONTEND867, CONTXCOD60, COREALLH860, DICTJOB82, DISEVENT65, DTSTART867, DTWRONG867, DUMP860, EDITORA865, ENGAGE867, EXINONE867, FAILTWIN866, FREEPER867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPACKB https://www.george3.co.uk/george/macro/outpackb?rev=1705492539&do=diff OUTPACKB (GIN Macro) Defined in: MACROS VB Used in: LIBLOAD867, OLMTA85, OLMTC85, UNLOADMT867 97PJ ...[??? OUTPACKB SECT CENT FGN 7 DOC 97^B #MAC OUTPACKB 98F2 OUTPACK %A,%B,%C,%D 98YL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPACKC https://www.george3.co.uk/george/macro/outpackc?rev=1705492539&do=diff OUTPACKC (GIN Macro) Defined in: MACROS VB Used in: CORE867, DELCOM5, FAIL5, GIVE867, HALT5, IPBCONS867, IPBINB867, MONEVENT867, MULTIPLX864, OPCAXCOD5, OPILLSA206, PUTPER85, RELPER867, TPINS861 998D ...[??? OUTPACKC SECT CENT FGN 7 DOC 99D= #MAC OUTPACKC 99XW OUTPACK %A,%B,%C,%D 9=CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPACKX https://www.george3.co.uk/george/macro/outpackx?rev=1705492539&do=diff OUTPACKX (GIN Macro) Defined in: MACROS VB Used in: ADDICT865, ARCHIVE867, BACKMAP864, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BSPRUNE867, BSUNJAM867, CARTCONT867, CLOSFREZ867, CONNECT867, CONNECTA867, DEWELL867, DIRENT867, DSCNCT867, DTREST860, ENGAGE867, ENWELL867, ENWELLB867, INCMON865, INCTAPES867, IPBERROR867, LISTNEXT867, LOGACC863, LOGOUT867, MOPCOM867, MOPCOMB865, OPER864, OPERIN867, REGEN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPAR https://www.george3.co.uk/george/macro/outpar?rev=1705492539&do=diff OUTPAR (GIN Macro) Defined in: MACROS VB Used in: ALASB867, BACKMAP864, BCAST867, BSPRUNE867, BSUNJAM867, CARTCONT867, COMPRO867, COMPROB867, CONNECT867, CONNECTA867, DEWELL867, DSCNCT867, DTREST860, EDIT867, EDITORA865, EVENTS864, FINISH867, FINISHB867, GETONA867, GLOBALS867, GOTO867, HLSEVENT867, IPBJOURN867, IPBMOP867, IPBMOPB867, LLSMESS867, LOGACC863, LOGOUT867, NETOFLNE867, OLMTA85, OLMTC85, ONLINEC867, OPCA867, OUTPER867, PARAMA865, PERFCAS865, PERFLOGS866, REDONMT867, SAVEJOB865, UNLO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARAM https://www.george3.co.uk/george/macro/outparam?rev=1705492539&do=diff OUTPARAM (GIN Macro) Defined in: MACROS CBK Used in: ABANDON867, ABANDONA867, ACCESS867, ADDJOB867, ALLOW84, ANSCOM865, ARCHIVE867, ASSOC867, ATTACHB866, ATTACHC867, ATTJOUNL861, BCAST867, BEXTSJ84, BLOGNAL865, BUDGET84, CANCRVX864, CHINERR867, CLOSDEL867, COMPRESS864, COMPRO867, COMPROB867, CONCEPT85, COPYA867, DEAD867, DEADA867, DELCOM5, DISPCOM867, DOXCODE867, DRUM852, DTQUEST860, DTSUBS867, DTSUBSS867, DTWRONG867, DUMMYA867, DUMMYB867, EDITOR867, EDITORA865, ENGAGE867, ERROR867, EXINONE86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARAX https://www.george3.co.uk/george/macro/outparax?rev=1705492539&do=diff OUTPARAX (GIN Macro) Defined in: MACROS CBK Used in: EDITOR867, EDITORA865, FORMLOOP865, FSERR867, IPALL864, IPBINC865, LIBREQ866, MONEVENT867, OPILLSA206, SETPRAMA867, XENON 474Y ...[??? OUTPARAX SECT CENT FGN 2 DOC 47SB #MAC OUTPARAX 48#2 LDX 0 %A 48RL SMO FX2 49?= STO 0 HMON1 49QW LDX 0 %B 4==G LDX 2 FX2 4=Q6 STO 0 HMON2(2) 4?9Q #STR %C 4?PB ( 4#92 #STR %D 4#NL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARB https://www.george3.co.uk/george/macro/outparb?rev=1705492539&do=diff OUTPARB (GIN Macro) Defined in: MACROS VB Used in: LIBLOAD867, OLMTA85, OLMTC85, UNLOADMT867 9=M# ...[??? OUTPARB SECT CENT FGN 7 DOC 9=X6 #MAC OUTPARB 9?BQ OUTPAR %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T 9?WB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARC https://www.george3.co.uk/george/macro/outparc?rev=1705492539&do=diff OUTPARC (GIN Macro) Defined in: MACROS VB Used in: CORE867, GIVE867, LOADFIN860, MOPOUT85, MORNING867, OPCAXCOD5, OPILLSA206, PROSTART867, PUTPER85, REALTIME867, RELPER867, TPINS861 9#68 ...[??? OUTPARC SECT CENT FGN 7 DOC 9#B2 #MAC OUTPARC 9#TL OUTPAR %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T 9**= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARN https://www.george3.co.uk/george/macro/outparn?rev=1705492539&do=diff OUTPARN (GIN Macro) Defined in: MACROS RJH Used in: ATTACHC867, DELCOM5, DETACH867, DUMP860, FAIL5, GROPE867, HALT5, INCEND865, INCFIN864, INCOBS867, INCPROC850, INCSET865, INCSTART865, INCTAPES867, IPBINC865, LISTINTC865, MORNING867, NEWPASSW867, ONLINEB867, PCTINOP8, QPRINT867, RESTOREA866, SWITCH867, WHATPER867, WHATPERA867, WHATPERB867 3S*8 ...[??? OUTPARN SECT CENT FGN 71 DOC 3SK2 #MAC OUTPARN 3T4L LDN 0 %A 3TJ= LDX 2 FX2 3W3W STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPARNX https://www.george3.co.uk/george/macro/outparnx?rev=1705492539&do=diff OUTPARNX (GIN Macro) Defined in: MACROS RJH Used in: 456D ...[??? OUTPARNX SECT CENT FGN 71 DOC 45B= #MAC OUTPARNX 45TW LDN 0 %A 46*G LDX 2 FX2 46T6 STO 0 HMON1(2) 47#Q LDX 0 %B 47SB STO 0 HMON2(2) 48#2 #STR %C 48RL ( 49?= #STR %D 49QW LDN 0 %C+%D 4==G #STR %D 4=Q6 #SKI 4?9Q LDN 0 %C 4?PB SLL 0 12 4#92 ORS 0 HMON1(2) 4#NL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPAUSE https://www.george3.co.uk/george/macro/outpause?rev=1705492539&do=diff OUTPAUSE (GIN Macro) Defined in: MACROS CBK Used in: LIBREQ866, LIBREQC867, MOPSTART865, ONLINEA867, ONLINEB867, ONLINEC867, XENON 22FL ...[??? OUTPAUSE SECT CENT FGN 2 DOC 22^= # 23DW #MAC OUTPAUSE 23YG LDN 0 %D 24D6 SMO FX2 24XQ STO 0 EXEC3 25CB #STR %E 25X2 %E 26BL #STR %C 26W= #SKI 27*W ( 27TG BRN MMMMSKIP 28*6 MNOCANTDO 28SQ GEOERR 1,CANTDONP 29#B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPER https://www.george3.co.uk/george/macro/outper?rev=1705492539&do=diff OUTPER (GIN Macro) Defined in: MACS PW Used in: ADDJOB867, CHTAB, DUMMYB867, FORMLOOP865, GETFREEB864, IDFENQS867, INKS, INRESTAR84, IPBLISTA867, IPBLISTC867, IPBLISTD867, LISTINTC865, LISTLOOP867, LISTNEXT867, LISTPREP865, LISTTPCP867, READBULK867, RENGAGE851, WHATPROP865 7T=8 [??? OUTPER SECT COMM FGN 9 DOC 7TG2 # 7T^L # 7WF= # 7WYW #MAC OUTPER 7XDG DOWN OUTPER,1 7XY6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPERA https://www.george3.co.uk/george/macro/outpera?rev=1705492539&do=diff OUTPERA (GIN Macro) Defined in: MACS PW Used in: ERROR867, IPBLISTA867, LISTINIT867, LISTINTC865, PCTLISTA867, READBULK867, WHATPROP865 7Y7Y [??? OUTPERA SECT COMM FGN 9 DOC 7YCQ # 7YXB # FORM PERIPHERAL IDENTIFIER FROM JSCE WORDS, PLACE RN ACOMMUNE1.... 7^C2 # 7^WL #MAC OUTPERA 82B= DOWN OUTPER,3 82TW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTPMILL https://www.george3.co.uk/george/macro/outpmill?rev=1705492539&do=diff OUTPMILL (GIN Macro) Defined in: MACROS RJH Used in: CORE867, GIVE867, LOADFIN860, REALTIME867 *9KS ...[??? OUTPMILL SECT CENT FGN 71 DOC *9TL #MAC OUTPMILL *=*= FJOCA 2,FX2,N *=SW LDXC 0 HCLOCKTIME(2) *?#G LDX 1 HCLOCKTIME+1(2) *?S6 BNZ 0 M2OUTP *#?Q ... SBN 1 1000 **?2 BNG 1 M1OUTP **QL M2OUTP OUTPARC PROGMILL *B== M1OUTP LDX 1 FX1 *BPW LDX 2 FX2 *C9G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTRVCT https://www.george3.co.uk/george/macro/outrvct?rev=1705492539&do=diff OUTRVCT (GIN Macro) Defined in: DUMP-MACROS Used in: HLSREAD867 #T*M ...[??? OUTRVCT SECT FILE FGN 65 DOC #TKF ...[ #W55 ...#MAC OUTRVCT #WJP ...[ #X4* ...[ THIS MACRO SCANS ROUND OFFLINE CHAIN #XH^ ...[ AND PUTS THE NUMBER OF OUTSTANDING #Y3K ...[ AUTONOMOUS RETRIEVES FOR THE #YH9 ...[ JOBNUMBER IN %A INTO %B; %A MUST #^2T ...[ BE AN ACCUMULATOR (X3 -> X7), IT CAN #^GF ...[ BE THE SAME AS %B......WRITTEN INITIALLY *225 ...[ FOR AN HLS EXTRACODE. *2FP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OUTTSNS https://www.george3.co.uk/george/macro/outtsns?rev=1705492539&do=diff OUTTSNS (GIN Macro) Defined in: DUMP-MACROS Used in: DUMP860, INCEND865, INCOBS867, INCRV850, INCTAPES867, RESTOREA866 9#KS ...[??? OUTTSNS SECT FILE FGN 65 DOC 9#TL #MAC OUTTSNS 9**= #STR ARE,%A 9*SW DOWN DTSUBS,14 9B#G #STR ARE,%A 9BS6 #SKI 9C?Q DOWN DTSUBS,15 9CRB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OVER https://www.george3.co.uk/george/macro/over?rev=1705492539&do=diff OVER (GIN Macro) Defined in: MACROS FIXD Used in: BSUNJAM867, CHINTEG867, CHNUMCON867, CONSOLE867, MONJRNAL850, OPERIN867, PREPREAD867, RAND864, RIGHT867, SPOOL83 2MP# ...[??? OVER SECT CENT FGN 11 DOC 2M^6 [ 2NDQ #MAC OVER 2NYB MBI ,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V 2PD2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) OWNERCHE https://www.george3.co.uk/george/macro/ownerche?rev=1705492539&do=diff OWNERCHE (GIN Macro) Defined in: MACROS RM59B Used in: ASSIGN860, CHTAB, INKS, NEWDIR867, OWNERCHE84 2YQB ...[??? OWNERCHE SECT FILE FGN 6 DOC 2^PL #MAC OWNERCHE 2^PY ...[ THIS MACRO CHECKS IF FILES IN THE DIRECTORY OPEN AT THE TOP LEVEL 2^Q= ...[ ARE OWNED BY THE PROPER USER. 2^QK ...#UNS FTS1 2^RJ ...( 2^SH ...#STR NOADJ,%A 2^TG ...#SKI 2^WF ...( 2^XD ... LDN 0 1 2^YC ... SMO FX2 2^^B ... STO 0 ACOMMUNE8 322* ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) P https://www.george3.co.uk/george/macro/p?rev=1705492539&do=diff P (GIN Macro) Defined in: MACROS SAR Used in: ASSIGN860, ATTRIBUT867, CHANG867, EDITAR867, FFFNORM7, IDFENQS867, ILLEXC70, INPRIN, INPUTMOP82, LISTSTAR867, MACRALAS864, MESSAF, MESSCI, ONLINEC867, PMDR864, PMINPRIN, PMJOBS866, PMWHATA866, PROPERTY867, PSPLIT82, USERTYPE83 3P7L #MAC P 3PM= [THIS MACRO SETS THE SEMAPHORE GIVEN BY %A. IF THE SEMAPHORE IS 3Q6W [ALREADY SET,THE ACTIVITY IS SET WAITING BY LONGSTOP UNTIL THE 3QLG [SEMAPHORE IS FREE. 3R66 [%A GIVES THE BIT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PAGE7020 https://www.george3.co.uk/george/macro/page7020?rev=1705492539&do=diff PAGE7020 (GIN Macro) Defined in: MACS PCT Used in: 4SS= #MAC PAGE7020 4T?W #DEF 19?+9=1? 4TRG #STR %B 4W?6 #LIS %B 4WQQ #SKI %A&#40000000 4X=B #SKI 4XQ2 ( 4Y9L #ALT A7021PAGE=%A-1>HEADINGS 4^8W #MEN IPBLISTB 4^B4 ...#SKI JSKI17<1$1 [7503 4^H= ...( 4^NG #TRA K55IPBLISTB 5286 LDN 6 A7021PAGE<63 52CY ...) 52FR ...#TRA K55IPBLISTB 52HL ... SBN 0 A7021PAGE-1<62 52KG ...#TRA K… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PAIR https://www.george3.co.uk/george/macro/pair?rev=1705492539&do=diff PAIR (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ACCESS867, ANTIC867, BACKMASS860, BEXTRA83, CDCIPB864, CDUM866, CHARGESC867, CIMOP867, CLOSBAC867, CLOSEMT867, COMPCHAN84, CONIPB8, CONSOLE867, CONSTANT864, CPOBJ6, CREATE867, CROBJ6, DETACHB867, DROBJ864, DRSTART6, DRUM852, DSCNCT867, DTSUBSA867, DUMMYB867, EDITOR867, EDITPT867, EDSTART860, ENGAGE867, ENWELL867, ERASE867, EXINONE867, EXTEND866, FAILTWIN866, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, FIXED867, FREEPER867, GROPE867, HLSRE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PAPARAM https://www.george3.co.uk/george/macro/paparam?rev=1705492539&do=diff PAPARAM (GIN Macro) Defined in: MACRO COMPRO Used in: MACRALAS864, MONRESUM850, PROSTART867 4^DN ...[??? PAPARAM SECT CENT FGN 21 DOC 4^NG # 5286 #MAC PAPARAM 52MQ ... DOWN PARAMB,2 537B BRN %A 53C8 ... BRN %B 53M2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARABEG https://www.george3.co.uk/george/macro/parabeg?rev=1705492539&do=diff PARABEG (GIN Macro) Defined in: MACRO COMPRO Used in: ATTACHC867, DETACH867, EDIT867, ENGAGE867, ENWELL867, GOTO867, INITJOB867, INSTPARA867, JWELLTWO867, LINECTRL864, LISTFILE867, LOGOUT867, MAKEVCC867, MOPCOM867, MOPCOMB865, ONLINEA867, PARAMB865, PERCON867, QUOTA850, REPERT867, REPORT865, RESET83, SCRATCH866, SJMESS867, WHATRVS867, WLAA867 3MDY ...[??? PARABEG SECT CENT FGN 21 DOC 3MNQ # 3N8B #MAC PARABEG 3NN2 LDX 2 FX2 3P7L STOREN %A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARABEGX https://www.george3.co.uk/george/macro/parabegx?rev=1705492539&do=diff PARABEGX (GIN Macro) Defined in: MACRO COMPRO Used in: LDSTART850, PAGES867, PRINT70 3Y=8 ...[??? PARABEGX SECT CENT FGN 21 DOC 3YG2 # 3Y^L #MAC PARABEGX 3^F= LDX 2 FX2 3^YW STOREX %A,EXT+3 42DG STOREG %B,%C,EXT+4 42Y6 STOREX %D,EXT+2 43CQ STOREN %E,EXT 43XB DOWN PARAM,4 44C2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARABRAC https://www.george3.co.uk/george/macro/parabrac?rev=1705492539&do=diff PARABRAC (GIN Macro) Defined in: MACRO COMPRO Used in: PRINT70, REALTIME867 59Q# ...[??? PARABRAC SECT CENT FGN 21 DOC 5=26 # 5=FQ #MAC PARABRAC 5=^B DOWN PARAMA,1 5?F2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARAFREE https://www.george3.co.uk/george/macro/parafree?rev=1705492539&do=diff PARAFREE (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, ADJUNCTS85, ASSOC867, ASTONIF867, ATTACHC867, CANCOM863, DECODE860, ENWELL867, GLOBALS867, IFEXPAN867, JDTWO864, JOBDATA867, JOBDATAB867, JWELLTWO867, LISTPARS867, MONITOR36, MONRESUM850, NORMALUS864, NORMERR860, ONOFFALT60, OPERATOR867, PARAMA865, PARSORT867, PERCON867, PRINT70, PROPERTY867, REPORT865, SCHEDULE867, SETPARAM867, SETPC867, SETPE867, SETPF867, SETPN867, SETPR867, SETPRAMA867, SETPRAMB867, SJMESS867, UNLOAD7, WA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARALAS https://www.george3.co.uk/george/macro/paralas?rev=1705492539&do=diff PARALAS (GIN Macro) Defined in: MACRO COMPRO Used in: ASSOC867 5PTY ...[??? PARALAS SECT CENT FGN 21 DOC 5Q5Q # 5QKB [ TO EXTRACT ALL THE PARAMETERS FROM A CPB/CALAS AND MOVE THEM TO 5R52 [ AN ADATA/CSTORE AS A CHARACTER STRING WITH COMMAS BETWEEN THE 5RJL [ PARAMETERS. 5S4= # 5SHW #MAC PARALAS 5T3G DOWN PARAMA,3 5TH6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARALYSE https://www.george3.co.uk/george/macro/paralyse?rev=1705492539&do=diff PARALYSE (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, ADJUNCTS85, ATTACHA8, CONCEPT85, DIRENT867, GLOBALS867, HARDWARA8, HOWBIG867, JOBDATA867, LIST867, LISTPARS867, MONITOR36, NORMALUS864, ONLINEA867, ONOFFALT60, PARAMB865, PATCH, PERCON867, PREPREAD867, PRINT70, PROPERTY867, REPORT865, SCHEDULE867, SCRATCH866, SETPB867, SETPE867, SETPG867, SETPR867, SJMESS867, UNLOAD7, WA864, WAIT867, WHATRVS867, WLAA867, WLB867 2S5Y ...[??? PARALYSE SECT CENT FGN 21 DOC 2S*Q # 2S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARALYSX https://www.george3.co.uk/george/macro/paralysx?rev=1705492539&do=diff PARALYSX (GIN Macro) Defined in: MACRO COMPRO Used in: ASSOC867, ENWELL867, INITJOB867, JWELLTWO867, PRINT70, REGEN865, SETPE867 2Y2Y ...[??? PARALYSX SECT CENT FGN 21 DOC 2Y=Q # 2YQB #MAC PARALYSX 2^=2 LDX 2 FX2 2^PL STOREX %A,EXT+4 329= STOREX %B,EXT+2 32NW STOREX %C,EXT+3 338G DOWN ANALYSE,1 33N6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARAMOVE https://www.george3.co.uk/george/macro/paramove?rev=1705492539&do=diff PARAMOVE (GIN Macro) Defined in: MACRO COMPRO Used in: CANCOM863, DUMMYB867, JDTWO864, LISTPARS867, OPERATOR867, PROPERTY867, SETJD867, SHARE866, SPOOL83, SWITCH867 55T# ...[??? PARAMOVE SECT CENT FGN 21 DOC 5656 # 56JQ #MAC PARAMOVE 574B LDX 0 %A 57J2 LDX 2 FX2 583L STO 0 ACOMMUNE1(2) 58H= STOREX %B,ACOMMUNE2 592W ... DOWN PARAMB,5 59GG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARAMSUB https://www.george3.co.uk/george/macro/paramsub?rev=1705492539&do=diff PARAMSUB (GIN Macro) Defined in: MACRO COMPRO Used in: INPUTJDF82 GMD# ...[??? PARAMSUB SECT CENT FGN 21 DOC GMN6 #MAC PARAMSUB GN7Q LDX 2 FX2 GNMB LDN 0 %B+%A GP72 SLL 0 12 GPLL ADN 0 %E+%D GQ6= STO 0 ACOMMUNE1(2) GQKW #STR %C GR5G #STR GRK6 ( GS4Q LDN 0 CPDATA GSJB ) GT42 #STR %C GTHL ( GW3= LDN 0 %C GWGW ) GX2G STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARANEXT https://www.george3.co.uk/george/macro/paranext?rev=1705492539&do=diff PARANEXT (GIN Macro) Defined in: MACRO COMPRO Used in: ADJUNCTS85, ALTINST60, CANCOM863, DECODE860, DETACH867, NORMALUS864, ONLINEB867, ONOFFALT60, OPERATOR867, PARSORT867, PATCH, REALTIME867, SETPARAM867, SETPC867, SETPE867, SETPG867, SETPN867, SETPR867 493D ...[??? PARANEXT SECT CENT FGN 21 DOC 49?= # 49QW #MAC PARANEXT 4==G LDX 2 FX2 4=Q6 STOREN %A,EXT+4 4?9Q STOREX %B,EXT+2 4?PB STOREX %C,EXT+3 4#92 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARANOT https://www.george3.co.uk/george/macro/paranot?rev=1705492539&do=diff PARANOT (GIN Macro) Defined in: MACRO COMPRO Used in: ACCESS867, ALTINST60, DECODE860, DETACH867, EXPRESS864, JDTWO864, LIBCOM867, MACDEF8, PATCH, REDONMT867, REPORT865, SETDISC866, SETPARAM867 39RD ...[??? PARANOT SECT CENT FGN 21 DOC 3=3= # 3=GW #MAC PARANOT 3?2G LDX 2 FX2 3?G6 STOREN %A,EXT+3 3?^Q STOREX %B,EXT+2 3#FB DOWN PARAM,3 3#^2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARANOTX https://www.george3.co.uk/george/macro/paranotx?rev=1705492539&do=diff PARANOTX (GIN Macro) Defined in: MACRO COMPRO Used in: ASSOC867, BUDGET84, INITJOB867, INSTPARA867, JDTWO864, LINECTRL864, MAKEVCC867, PERCON867, SETJD867, SETPARAM867, SHOWCOMM864, WHATPER867 3DL8 ...[??? PARANOTX SECT CENT FGN 21 DOC 3DW2 # 3F*L #MAC PARANOTX 3FT= LDX 2 FX2 3G#W STOREX %A,EXT+3 3GSG STOREX %B,EXT+2 3H#6 DOWN PARAM,3 3HRQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARANUMB https://www.george3.co.uk/george/macro/paranumb?rev=1705492539&do=diff PARANUMB (GIN Macro) Defined in: MACRO COMPRO Used in: ADJUNCTS85, ALTINST60, ANSCOM865, ASSIGN860, ASSOC867, ATTACHA8, ATTRIBUT867, COPYA867, DECODE860, DETACH867, DOC867, DUMMYB867, ENTRUST, GOTO867, INSTPARA867, IPBJOURN867, JOBDATA867, JOBDATAB867, LDSTART850, LIBCOM867, LISTFILE867, LISTPARS867, MACDEF8, MAKEVCC867, MONITOR36, NORMALUS864, ONLINEA867, ONLINEB867, ONOFFALT60, PAGES867, PARSORT867, PATCH, PERCON867, PREPREAD867, PROPERTY867, REALTIME867, REDON867, REGEN865, REPERT867, REPO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARANXTX https://www.george3.co.uk/george/macro/paranxtx?rev=1705492539&do=diff PARANXTX (GIN Macro) Defined in: MACRO COMPRO Used in: PARSORT867, SETPARAM867, SETPRAMB867 4DTD ...[??? PARANXTX SECT CENT FGN 21 DOC 4F5= # 4FJW #MAC PARANXTX 4G4G LDX 2 FX2 4GJ6 STOREX %A,EXT+4 4H3Q STOREX %B,EXT+2 4HHB STOREX %C,EXT+3 4J32 DOWN ANALYSE,2 4JGL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARAPASS https://www.george3.co.uk/george/macro/parapass?rev=1705492539&do=diff PARAPASS (GIN Macro) Defined in: MACRO COMPRO Used in: ADJUNCTS85, ALTINST60, ATTACHA8, BUDGTWO84, CANTDO867, CMEMILL866, CONCEPT85, CONTINUE867, CORE867, DATECON37, DISPCOM867, DOC867, DOXCODE867, EDIT867, ENTRUST, EXPRESS864, FINISH867, GLOBALS867, GOTO867, HOWBIG867, IFEXPAN867, INSTPARA867, JOBDATA867, JOBDATAB867, LABEL866, LIBCOM867, LIST867, LISTDEV866, LISTDIR867, MONITOR36, MONRESUM850, NORMALUS864, ONOFFALT60, PARSORT867, PATCH, PATINF, PERCON867, PREPREAD867, PRINT70, PROSTART867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARAREST https://www.george3.co.uk/george/macro/pararest?rev=1705492539&do=diff PARAREST (GIN Macro) Defined in: MACRO COMPRO Used in: 4XG8 ...[??? PARAREST SECT CENT FGN 21 DOC 4XQ2 # 4Y9L #MAC PARAREST 4YP= ... DOWN PARAMB,3 4^8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARASTRING https://www.george3.co.uk/george/macro/parastring?rev=1705492539&do=diff PARASTRING (GIN Macro) Defined in: MACRO COMPRO Used in: ASTONIF867, IFEXPAN867 5F4N ...[??? PARASTRI SECT CENT FGN 21 DOC 5F#G # 5FS6 [ PARASTRING MACRO-TO PASS A CHARACTER STRING WITHIN A 5G?Q [ BLOCK TO A CPB/CMULTI BLOCK. 5GRB # 5H?2 #MAC PARASTRING 5HQL LDX 0 %A 5J== LDX 2 FX2 5JPW STO 0 ACOMMUNE1(2) 5K9G LDX 0 %B 5KP6 STO 0 ACOMMUNE2(2) 5L8Q #STR %D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARATYPE https://www.george3.co.uk/george/macro/paratype?rev=1705492539&do=diff PARATYPE (GIN Macro) Defined in: MACRO COMPRO Used in: PARSORT867, SETPE867 4NMD ...[??? PARATYPE SECT CENT FGN 21 DOC 4NX= # 4PBW #MAC PARATYPE 4PWG LDX 2 FX2 4QB6 STOREN %A,EXT+3 4QTQ STOREX %B,EXT+2 4R*B DOWN PARAM,8 4RT2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARFNAME https://www.george3.co.uk/george/macro/parfname?rev=1705492539&do=diff PARFNAME (GIN Macro) Defined in: MACRO COMPRO Used in: EDITMFO867, WLAA867, WLB867 5TQY ...[??? PARFNAME SECT CENT FGN 21 DOC 5W2Q # 5WGB [ TO TAKE A PARAM IN A FILE/FNAME AND SET IN A CPB/CMULTI 5X22 # 5XFL #MAC PARFNAME 5X^= DOWN PARAMA,4 5YDW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARSORT https://www.george3.co.uk/george/macro/parsort?rev=1705492539&do=diff PARSORT (GIN Macro) Defined in: MACROS PERI Used in: CHTAB, DUMMYB867, HARDWARA8, HOLDCOM867, IDFASAT867, IDFCANC867, INKS, LABEL866, LINECTRL864, MAKEVCC867, MOVCART867, ONLINEB867, REDON867, RIGHT867, SHARE866, SPOOL83, SWITCH867, TERM867, VIPBFREE865 FQW= #MAC PARSORT FR*W LDN 0 B%B+B%C+B%D+B%E+B%F FRTG SMO FX2 FS*6 STO 0 ACOMMUNE1 FSSQ DOWN PARSORT,1 FT#B BRN %A FTS2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARSORTB https://www.george3.co.uk/george/macro/parsortb?rev=1705492539&do=diff PARSORTB (GIN Macro) Defined in: MACROS PERI Used in: PARSORT867, WHATPER867 G846 #MAC PARSORTB G8HQ LDN 0 4+B%B+B%C+B%D+B%E+B%F G93B SMO FX2 G9H2 STO 0 ACOMMUNE1 G=2L DOWN PARSORT,1 G=G= BRN %A G=^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARSORTX https://www.george3.co.uk/george/macro/parsortx?rev=1705492539&do=diff PARSORTX (GIN Macro) Defined in: MACROS PERI Used in: ACCESS867, ASSOC867, ATTACHA8, ATTRIBUT867, MODE866, MOPCOM867, PAGES867, PARSORT867, PROPERTY867, REPERT867, TWINSET866, UNLOAD7 GK=2 #MAC PARSORTX GKPL LDX 2 FX2 GL9= LDN 0 B%C+B%D+B%E+B%F GLNW STO 0 ACOMMUNE1(2) GM8G LDX 0 %B GMN6 STO 0 ACOMMUNE2(2) GN7Q DOWN PARSORT,2 GNMB BRN %A GP72 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARSPLIT https://www.george3.co.uk/george/macro/parsplit?rev=1705492539&do=diff PARSPLIT (GIN Macro) Defined in: MACROS MACB Used in: FINISH867, JOBDATA867, JOBDATAB867, SJMESS867, TIME6, WAIT867 4SJD ...[??? PARSPLIT SECT CENT FGN 2 DOC 4SS= #MACRO PARSPLIT 4T?W DOWN PSPLIT,1 4TRG LDX %A ACOMMUNE2(2) 4W?6 #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PARUNACC https://www.george3.co.uk/george/macro/parunacc?rev=1705492539&do=diff PARUNACC (GIN Macro) Defined in: MACRO COMPRO Used in: DSCNCT867, EDIT867, INITJOB867, LINECTRL864, LISTFILE867, PRINT70, REPERT867, SJMESS867, WHATRVS867, WLAA867, WLB867 5YNN ...[??? PARUNACC SECT CENT FGN 21 DOC 5YYG # 5^D6 [ TWO MACROS TO GET THE FIRST UNACCESSED PARAMETER IN A CPB/CALAS 5^XQ [ BLOCK USING THE PARAPASS POINTER 62CB # 62X2 #MAC PARUNACC 63BL LDX 2 FX2 63W= STOREN %A,EXT+2 64*W DOWN PAR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PATCH https://www.george3.co.uk/george/macro/patch?rev=1705492539&do=diff PATCH (GIN Macro) Defined in: MACROS DTP Used in: CHTAB, COMPS EWDAS, INKS, MESSCB, PATCH ?24Q [??? PATCH SECT DIAG FGN 552 DOC ?2JB #MAC PATCH [J.T. WIFFEN ?342 [ ?3HL [ ?43= [ *********** ?4GW [ * PATCH * ?52G [ *********** ?5G6 [ ?5^Q [ ?6FB #UNS K%A [SKIP IF THE CHAPTER IS NEW ?6^2 ( ?7DL #MEN PATINF [UPDATE PATCH INFORMATION A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PATCHCOM https://www.george3.co.uk/george/macro/patchcom?rev=1705492539&do=diff PATCHCOM (GIN Macro) Defined in: MACROS RJDG Used in: 22FL # MISCELLANEOUS MACROS 22^= # 2394 ...[??? PATCHCOM SECT CENT FGN 7 DOC 23DW #MAC PATCHCOM 23YG #MEN VCLASTWO 24D6 #TRA K97VCLASTWO 24XQ #STR %A,ON 25CB BICE ??,??,#10315,PATCH,1 25X2 #STR %A,OFF 26BL BICE PC,PATCH,#10315,PATCH,1 26W= #END 27*W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCAPLUG https://www.george3.co.uk/george/macro/pcaplug?rev=1705492539&do=diff PCAPLUG (GIN Macro) Defined in: LLSMACROS Used in: FHLIST867, GIVE867, INMOP867, MONRESUM850, RUNPROG840, TPINS861 3?8Q ...[??? PCAPLUG SECT CENT FGN 6 DOC 3?^Q # 3#FB # PCAPLUG MACRO : PLUGS IN,GOES TO PCA,RECOGNISES BREAK IN 3#^2 # 3*Y= #MAC PCAPLUG 3BCW #STR %B 3BXG LDN 0 %B+%C 3CC6 #STR %B 3CWQ #SKI 3DBB LDN 0 0 3DW2 #STR %D 3F*L ( 3FT= SLL 0 12 3G#W ADN 0 %D+%E 3GSG ) 3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCATEST https://www.george3.co.uk/george/macro/pcatest?rev=1705492539&do=diff PCATEST (GIN Macro) Defined in: MACROS GLJ Used in: CHARGESC867, CORESHED861, JAMSWAP865, PLUGIN867, REALTIME867, RELPER867, REQESLIP861, SWAP865, UNPLUG867, WSPERIS867 9*5D ...[??? PCATEST SECT CENT FGN 18 DOC 9**= #MACRO PCATEST 9*SW MOD LDX 0 ATYPE,%A 9B#G SRL 0 12 9BS6 SBN 0 APET 9C?Q OPND BZE 0, %B,MPCATEST 9CRB SBN 0 ATP 9D?2 OPND BZE 0, %C,MPCATEST 9DQL SBADN 0, APUC-ATP 9F== OP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCT7020 https://www.george3.co.uk/george/macro/pct7020?rev=1705492539&do=diff PCT7020 (GIN Macro) Defined in: MACS PCT Used in: PCTCON8, PCTINOP8, RIGHT867 5CTL #MAC PCT7020 5D*= PCT7020S %A,%B 5DSW SBN %A FPTPCT 5F#G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCT7020S https://www.george3.co.uk/george/macro/pct7020s?rev=1705492539&do=diff PCT7020S (GIN Macro) Defined in: MACS PCT Used in: 5L8Q #MAC PCT7020S 5LNB ADN %A FPTPCT 5M82 PCTFIND %A,%B 5MML #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTFACT https://www.george3.co.uk/george/macro/pctfact?rev=1705492539&do=diff PCTFACT (GIN Macro) Defined in: MACS PCT Used in: ATTACHC867, PCTCON8, REDON867 5S4= #MAC PCTFACT 5SHW MPCTF LDX %A BPTR(%A) 5T3G LDX 0 ATYPE(%A) 5TH6 BXL 0 CACT,MPCTF 5W2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTFIND https://www.george3.co.uk/george/macro/pctfind?rev=1705492539&do=diff PCTFIND (GIN Macro) Defined in: MACS PCT Used in: IDFPER867, PCTCON8 62X2 #MAC PCTFIND 63BL MPCTFIND 63W= LDX %A FPCT(%A) 64*W BXU %B APCTID-FPTPCT(%A),MPCTFIND 64TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTHUNT https://www.george3.co.uk/george/macro/pcthunt?rev=1705492539&do=diff PCTHUNT (GIN Macro) Defined in: MACS PCT Used in: PCTCOUT8, PCTDIS8, READOPLN867 69=6 #MAC PCTHUNT 69PQ ADN %A FPTPCT 6=9B MPCT LDX %A FPCT(%A) 6=P2 LDXC 0 APCTID-FPTPCT(%A) 6?8L BCC MPCT 6?N= SBN %A FPTPCT 6#7W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTHUNTB https://www.george3.co.uk/george/macro/pcthuntb?rev=1705492539&do=diff PCTHUNTB (GIN Macro) Defined in: MACS PCT Used in: MORNING867, RENGAGE851 6DJG #MAC PCTHUNTB 6F46 PCTHUNTS %A 6FHQ SBN %A FPTPCT 6G3B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTHUNTS https://www.george3.co.uk/george/macro/pcthunts?rev=1705492539&do=diff PCTHUNTS (GIN Macro) Defined in: MACS PCT Used in: 6LXL #MAC PCTHUNTS 6MC= ADN %A FPTPCT 6MWW MHPCT LDX %A BPCT(%A) 6NBG LDXC 0 APCTID-FPTPCT(%A) 6NW6 BCC MHPCT 6P*Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PCTMESA https://www.george3.co.uk/george/macro/pctmesa?rev=1705492539&do=diff PCTMESA (GIN Macro) Defined in: MACS PW Used in: CONSROOT867, MORNING867 835N [??? PCTMESA SECT COMM FGN 9 DOC 83*G # 83T6 # 84#Q #MAC PCTMESA [P.WARNER 84SB DOWN PCTMES,1 [SET UP TRANSMISSION BLOCKS FROM 85#2 #NOR [A CONBUFF/IREMTW MESSAGE BLOCK. text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PDCSET https://www.george3.co.uk/george/macro/pdcset?rev=1705492539&do=diff PDCSET (GIN Macro) Defined in: MACROS VB Used in: 9JXD ...[??? PDCSET SECT CENT FGN 7 DOC 9K7= # 9KLW # SPECIAL MACROS LOCAL TO MONFILE, MONFIL :- 9L6G #MAC PDCSET 9LL6 #STR %A 9M5Q ( 9MKB #STR KNOWN,%C 9N52 +%B:Q%A 9NJL #STR KNOWN,%C 9P4= #STR 9PHW #400+%B:Q%A 9Q3G #SKI 0?-PDCTAB-JPD%A-1 9QH6 ! OUT OF PLACE 9R2Q #STR %D 9RGB #FID 1 1 1 9S22 ) 9SFL #STR %A 9S^= #STR 9TDW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERCHARS https://www.george3.co.uk/george/macro/perchars?rev=1705492539&do=diff PERCHARS (GIN Macro) Defined in: MACS PW Used in: IPBERROR867, MONOLITH864 85HS [??? PERCHARS SECT COMM FGN 9 DOC 85RL # 86?= # 86QW # 87=G #MAC PERCHARS 87Q6 #STR %A 889Q ( 88PB #ACC %A 8992 ( 89NL LDX 0 %A 8=8= SMO FX2 8=MW STO 0 ACOMMUNE1 8?7G ) 8?M6 #ACC %A 8#6Q #SKI 8#LB ( 8*62 SMO FX2 8*KL STO %A ACOMMUNE1 8B5= ) 8BJW )… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERCON https://www.george3.co.uk/george/macro/percon?rev=1705492539&do=diff PERCON (GIN Macro) Defined in: MACROS RJDG Used in: ACCESS867, ASSIGN860, CHTAB, DISPCOM867, GETON867, INKS, LISTDEV866, LISTFILE867, MODEA65, NETOFLNE867, ONLINEA867, QUESCOM867, RELCOM 2P88 ...[??? PERCON SECT CENT FGN 7 DOC 2PD2 # 2PXL # UTILITY ROUTINES 2QC= # 2QWW [ 2RBG [MACRO FOR ENTERING THE CONVERT PERIPHERAL PARAMETER ROUTINE 2RW6 [ 2S*Q #MAC PERCON 2STB #STR %A 2T*2 LDN 0 %A [LOAD PARAMETER NUMBER… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERCONA https://www.george3.co.uk/george/macro/percona?rev=1705492539&do=diff PERCONA (GIN Macro) Defined in: MACROS RJDG Used in: ASSOC867, DETACH867, IFEXPAN867, MONITOR36, PARSORT867, SETPC867 2^28 ...[??? PERCONA SECT CENT FGN 7 DOC 2^=2 # 2^PL #MAC PERCONA 329= DOWN PERCON,3 32NW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERCOUNT https://www.george3.co.uk/george/macro/percount?rev=1705492539&do=diff PERCOUNT (GIN Macro) Defined in: MACROS2JSR Used in: COMPROB867, CONNECTA867, CORE867, DSCNCT867, EVENTS864, FINISH867, GIVE867, HLSEVENT867, LOADFIN860, REALTIME867 4478 ...[??? PERCOUNT SECT CENT FGN 2 DOC 44C2 #MAC PERCOUNT 44WL #STR %A 45B= #SKI 45TW ( 46*G LDX 1 FX1 46T6 FJOCA 2,FX2,N 47#Q LDEX 0 JMISC(2) 47SB BZE 0 M1PER 48#2 DOWN RELPER,3 48RL M1PER LDX 2 FX2 49?= ) 49QW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERFLIM https://www.george3.co.uk/george/macro/perflim?rev=1705492539&do=diff PERFLIM (GIN Macro) Defined in: MACROS IAN Used in: 3MNQ ...[ 3N8B ...[ 3^RM ...[??? PERFLIM SECT DEVT FGN 2 DOC 4264 ...#MAC PERFLIM [- A.P.HOLDEN 42DG ...[ THIS MACRO LIMITS THE MAX. SIZE OF :SYSTEM.PERFORMANCE 42Y6 ...#ALT APCSZ=%A 43CQ ...#MEN PERFCHAP 43XB ...#TRA APC14 44C2 ... LDN 0 %A 44WL ...#END 45B= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERFSTORE https://www.george3.co.uk/george/macro/perfstore?rev=1705492539&do=diff PERFSTORE (GIN Macro) Defined in: MACROS IAN Used in: 28#R ...[??? PERFSTORE SECT DEVT FGN 2 DOC 28*N ...#MAC PERFSTORE [- A.P.HOLDEN 28BK ... FSDESC 28CG ... FSFILE 3,6,PERF STORE,721053 28DC ... FSFILE 4,6,PERF SWAP,721053,SWAP 28F# ... ENDESC 28G9 ... FSLOAD SAME 28H6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERMACT https://www.george3.co.uk/george/macro/permact?rev=1705492539&do=diff PERMACT (GIN Macro) Defined in: MACROS LEF Used in: COMPS SAR9 22FL ...[ 22^= ...[ 23DW ...[ R.T.RUSHTON 23YG ...[ 24D6 ...[ 26W= [CONTENTS LIST:- 27*W [ 27H4 ...[ PERMACT 27N= ...[ TEMPACT 27TG [ ANOTHER 28*6 [ BUSACT 28SQ [ CLOSEOUT 29#B [ HSPACTLF 29S2 [ IFACC 2=3S ...[ LFALLTRANS 2=?L [ LFAT 2=R= [ LFBASOVERFLO 2?=W [ LFBBS 2?QG [ LFBBUS 2#=6 [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERMITBRK https://www.george3.co.uk/george/macro/permitbrk?rev=1705492539&do=diff PERMITBRK (GIN Macro) Defined in: MACROS BJE Used in: ATTACHC867, COMPROB867, CONNECT867, CONTXCOD60, DETACH867, DEWELL867, ENWELL867, ERASEA867, INCFIN864, INCSET865, LOADERR70, LOADFIN860, LOGOUT867, MACRALAS864, REGEN865, RENAMAG864 3TS4 ...[??? PERMITBR SECT CENT FGN 3 DOC 3W3W # 3WHG # MACRO TO TERMINATE INHIBIT OF BREAK-IN 3X36 # 3XGQ #MAC PERMITBRK 3Y2B NGN 0 2 3YG2 SRC 0 4 [REMOVE INHIBIT BIT(B3) 3Y^L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERMOFF https://www.george3.co.uk/george/macro/permoff?rev=1705492539&do=diff PERMOFF (GIN Macro) Defined in: MACROS PERI Used in: MONITOR36 H3C6 #MAC PERMOFF H3WQ NGN 0 5 H4BB MODD ANDS 0 JPSTATE,%A,CPPTR(2) H4W2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERMON https://www.george3.co.uk/george/macro/permon?rev=1705492539&do=diff PERMON (GIN Macro) Defined in: MACROS PERI Used in: MONITOR36 H8R2 #MAC PERMON H9=L LDN 0 4 H9Q= MODD ORS 0 JPSTATE,%A,CPPTR(2) H=9W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PEROFF https://www.george3.co.uk/george/macro/peroff?rev=1705492539&do=diff PEROFF (GIN Macro) Defined in: MACROS PERI Used in: CLOSEMT867, DRUM852 HB6W #MAC PEROFF HBLG NGN 0 3 HC66 MODD ANDS 0 JPSTATE,%A,CPPTR(2) HCKQ LADDP %A,0 HD5B SMO 0 HDK2 STOZ APJOBNO HF4L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERON https://www.george3.co.uk/george/macro/peron?rev=1705492539&do=diff PERON (GIN Macro) Defined in: MACROS PERI Used in: DRUM852, LIBREQCA867, LIBSEC867, LISTFREE867, ONLINEA867, ONLINEB867, ONLINEC867, XENON HJ^L #MAC PERON HKF= LDN 0 2 HKYW MODD ORS 0 JPSTATE,%A,CPPTR(2) HLDG STO 1 GEN1 HLY6 LADDP %A,1 HMCQ SMO FX2 HMXB LDX 0 JOBNO HNC2 STO 0 APJOBNO(1) HNWL LDX 1 GEN1 HPB= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERTEST https://www.george3.co.uk/george/macro/pertest?rev=1705492539&do=diff PERTEST (GIN Macro) Defined in: MACROS PERI Used in: DISEVENT65 HTQW #MAC PERTEST HW=G MODD LDX 0 JPSTATE,%A,CPPTR(2) HWQ6 ANDN 0 4 HX9Q BNZ 0 %B HXPB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PERTYPNO https://www.george3.co.uk/george/macro/pertypno?rev=1705492539&do=diff PERTYPNO (GIN Macro) Defined in: MACROS2JSR Used in: CHTAB, DETACH867, ILLPERI70, INKS, INMOP867, MONOLITH864, OFFREL867, PERFAIL866 3T#D ...[??? PERTYPNO SECT CENT FGN 2 DOC 3TJ= [ 3W3W [MACRO FOR ENTERING PERIPHERAL TYPE AND UNIT NO. CONVERSION ROUTINE 3WHG [BINARY TO CHARACTER 3X36 #MAC PERTYPNO 3XGQ LDX 0 %A 3Y2B SMO FX2 3YG2 STO 0 EXEC3 3Y^L DOWN PERTYPNO,1%B 3^F= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PHOLD https://www.george3.co.uk/george/macro/phold?rev=1705492539&do=diff PHOLD (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867 Q=*Q # Q=TB [??? PHOLD Q?*2 # ***** Q?SL #MAC PHOLD [%A=UNIT NO. %B-IPB FAIL %C - G.DOWN Q##= # Q#RW LDX 0 %A Q*?G SMO FX2 Q*R6 STO 0 ACOMMUNE9 QB=Q DOWN TWINSETB,5 QBQB BRN %B QC=2 BRN %C QCPL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PHOTO https://www.george3.co.uk/george/macro/photo?rev=1705492539&do=diff PHOTO (GIN Macro) Defined in: COREMACROS Used in: ALAS822, ANALYSE865, ANALYSEA3, ATTACHA8, BEXTRA83, BEXTSJ84, BMINDEX866, BUDGONE83, BUDGTWO84, CHINTEG867, COMPRO867, CONTRACT866, COREALLG82, DELCOM5, DICTJOB82, DOC867, EDIT867, EDITAR867, EDITER867, EDITET7, EDITEX7, EDITMFO867, EDITOR867, EDITORA865, EDITPT867, EDWRITE867, FAIL5, FFFNORM7, FINDOC867, FINDRUM866, HALT5, HARDWARA8, HLSEMS864, IPBIN867, IPBLISTB867, IPBLISTE867, IPBSCAN867, LEXIFIND5, LISTDIR867, LISTFILE867, LISTLOOP867, LI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PICKREP https://www.george3.co.uk/george/macro/pickrep?rev=1705492539&do=diff PICKREP (GIN Macro) Defined in: REPLY-MACROS Used in: BEXTSJ84, CHEKPRIV867, CHINTEG867, DICTJOB82, DTREST860, GET6, GETON867, GETONA867, LIBCOM867, LIBREQ866, LIBREQC867, LIBSEC867, LISTFNDA865, LISTSTAR867, MODE866, OLMTA85, OPENTWO867, PERFCHAP866, PERION867, REDONMT867, RENAMEMT867, SJLOOP864, USERDIR842, WRITEFIP867 4RK8 ...[??? PICKREP SECT FILE FGN 2 DOC 4RT2 #MAC PICKREP [PICK UP REPLY 4S#L SMO FX2 4SS= LDX %A ACOMMUNE9 4T?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PICKREP2 https://www.george3.co.uk/george/macro/pickrep2?rev=1705492539&do=diff PICKREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDON867, COMPOST867, HOWBIG867, LISTOPEN867, LISTPROC867, NETOFLNE867, RENAMDIR, REPERR867, SCHEDENX860, TAPEWAIT65, USERDIR842, USERLIB867, USERONE867, USEROPEN867, USERSTRM867 4THN ...[??? PICKREP2 SECT FILE FGN 2 DOC 4TRG #MAC PICKREP2 4W?6 LDX %A ACOMMUNE9(2) 4WQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PID https://www.george3.co.uk/george/macro/pid?rev=1705492539&do=diff PID (GIN Macro) Defined in: MACROS IH Used in: =DG= # =D^W #MAC PID =FFG #STR ON,%A =F^6 #SKI =GDQ ( =GYB #MEN CHANG =HD2 #TRA K30CHANG =HXL NULL =JC= #TRA K32CHANG =JWW NULL =KBG #TRA K34CHANG =KW6 NULL =L*Q #END =LTB #EXI =M*2 ) =MSL #STR OFF,%A =N#= #SKI =NRW ( =P?G #MEN CHANG =PR6 #TRA K30CHANG =Q=Q BRN K31CHANG =QQB #TRA K32CHANG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PLOCKSU https://www.george3.co.uk/george/macro/plocksu?rev=1705492539&do=diff PLOCKSU (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSBAC867, CLOSDEL867, CONTRACT866, NEXTUNIT867, RENAMEX867, REQCART866, SQOPEN867 62X2 # 63BL # ********************************************************************** 63W= # * 64*W # * SCA LOCK-OUT SYSTEM MACROS 64TG # * 65*6 # * … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PLOGGING https://www.george3.co.uk/george/macro/plogging?rev=1705492539&do=diff PLOGGING (GIN Macro) Defined in: MACS SPC Used in: FLAW866 FT#B # CHECKS WHETHER ELOG ACTIVITY HAS ALREADY LOGGED FAIL FTS2 #MAC PLOGGING FW?L LDX 2 FX2 FWR= STO 4 ACOMMUNE1(2) FX=W STO 5 ACOMMUNE2(2) FXQG STO 6 ACOMMUNE3(2) FY=6 STO 7 ACOMMUNE4(2) FYPQ LDX 4 %A F^9B #STR 4,%B F^P2 LDX 5 %B G28L #STR 4,%B G2N= #SKI G37W LDX 5 ACOMMUNE1(2) G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMACTYPE https://www.george3.co.uk/george/macro/pmactype?rev=1705492539&do=diff PMACTYPE (GIN Macro) Defined in: PMACS Used in: PMSUBSA, PMSUBSB, PMSUBSC BJ#W [??? PMACTYPE SECT DIAG FGN 104 DOC BJRL #MAC PMACTYPE [M.C.D. MANN BK=B [ BKP6 [ BL7W [ ************** BLLL [ * PMACTYPE * BM5B [ ************** BMJ6 [ BN2W [ BNFL [ THIS MACRO WILL SET UP TYPE AND SUBTYPE TABLES BNYB [ BPC6 #STRING R,%B BPTW ( BQ#L #MEN PMTYPES [INSERT TY… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMADD https://www.george3.co.uk/george/macro/pmadd?rev=1705492539&do=diff PMADD (GIN Macro) Defined in: COMMPRIVMACS Used in: IPBPM84 2M^6 # 2NDQ # THIS MACRO ADDS 1 TO THE SYSTEM OVERLOAD COUNT IF NECESSARY 2NYB # 2PD2 #MAC PMADD [THIS MACRO IS USED IN SEGMENT IPBPM 2PXL BNZ 0 M1 2QC= LDN 0 1 2QWW ADS 0 PMCOUNT 2RBG BRN %A 2RW6 M1 2S*Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMADDS https://www.george3.co.uk/george/macro/pmadds?rev=1705492539&do=diff PMADDS (GIN Macro) Defined in: PMACS Used in: PMFSADDA866, PMFSADDB86, PMFSADDC86 F#NJ [??? PMADDS SECT DIAG FGN 104 DOC F*87 #MAC PMADDS [M.C.D. MANN F*M8 [ FB69 [ FBK= [ ************ FC4? [ * PMADDS * FCH# [ ************ FD2* [ FDFB [ FDYC [ 19?+0 CONTAINS THE HIGHEST FIXED CORE ADDRESS FFCD [ ENCOUNTERED SO FAR FFWF [ FG*G [ 20? C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMBLOX https://www.george3.co.uk/george/macro/pmblox?rev=1705492539&do=diff PMBLOX (GIN Macro) Defined in: PMACS Used in: PMOVERLAY 9TF4 [??? PMBLOX SECT DIAG FGN 104 DOC 9TXG #MAC PMBLOX [M.C.D. MANN 9W*Y [ 9WSB [ 9X=S [ ************ 9XP= [ * PMBLOX * 9Y7N [ ************ 9YL6 [ 9^4J [ 9^H2 [ IS A #MEN MACRO TO PMACT OR PMCHAINS IT ALTERS THE LENGTH 9^^D [ OF PARTICULAR TYPES ( OR TYPES AND SUB TYPES ) OF BLOCK =2CW [ THE MACRO IS RECURSIVE =2W# [ %A :… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMBSADD https://www.george3.co.uk/george/macro/pmbsadd?rev=1705492539&do=diff PMBSADD (GIN Macro) Defined in: PMACS Used in: PMACT867, PMCHAINS864, PMCHAP867, PMCHECK867, PMCRABS860, PMDR864, PMDUMP85, PMENDITS867, PMFILE860, PMFIXSTO84, PMJOURNL866, PMSUMA867, PMWHATA866 2JHQ [??? PMBSADD SECT DIAG FGN 104 DOC 2K3B #MAC PMBSADD [M.C.D. MANN 2KH2 [ 2L2L [ 2LG= [ ************* 2L^W [ * PMBSADD * 2MFG [ ************* 2M^6 [ 2NDQ [ 2NYB [ GENERAL B/S TRANSFER MA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMBSNUM https://www.george3.co.uk/george/macro/pmbsnum?rev=1705492539&do=diff PMBSNUM (GIN Macro) Defined in: PMACS Used in: PMFS85 42T2 [??? PMBSNUM SECT DIAG FGN 104 DOC 43?B #MAC PMBSNUM [M.C.D. MANN 43PQ [ 4486 [ 44LG [ ************* 454W [ * PMBSNUM * 45H= [ ************* 45^L [ 46D2 [ 46WB [ GENERAL B/S TRANSFER MACRO 47#Q [ FOR NON-UDAS DEVICES 47R6 [ 489G [ 48MW [ %A START ADDRESS IN CORE 496=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMCHAINP https://www.george3.co.uk/george/macro/pmchainp?rev=1705492539&do=diff PMCHAINP (GIN Macro) Defined in: PMACS Used in: PMCHAINS864 4FJW [??? PMCHAINP SECT DIAG FGN 104 DOC 4G4G #MAC PMCHAINP [M.C.D. MANN 4GJ6 [ 4H3Q [ 4HHB [ ************** 4J32 [ * PMCHAINP * 4JGL [ ************** 4K2= [ 4KFW [ 4K^G [ THIS MACRO CAUSES ENTRY TO CHAIN AND RING PRINTING ROUTINES 4LF6 [ 4LYQ [ %A=NO. OF CHARS. IN %B 4MDB [ %B=CHAIN(RING) HEADING 4MY2 [ %C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMCORES https://www.george3.co.uk/george/macro/pmcores?rev=1705492539&do=diff PMCORES (GIN Macro) Defined in: PMACS Used in: CLOSEIPB864, IPBPM84, MOPPM84, PMACT867, PMBDTS863, PMBUFFS84, PMCHAINS864, PMCHAP867, PMCHECK867, PMCRABS860, PMFS85, PMFSB84, PMJOBS866, PMJOURNL866, PMOBJIII860, PMSUMA867 5B9= [??? PMCORES SECT DIAG FGN 104 DOC 5BNL #MAC PMCORES [M.C.D. MANN 5C82 [ 5CMB [ 5D6Q [ ************* 5DL6 [ * PMCORES * 5F5G [ ************* 5FJW [ 5G4= [ 5GHL [ MACRO US… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMCOUNT https://www.george3.co.uk/george/macro/pmcount?rev=1705492539&do=diff PMCOUNT (GIN Macro) Defined in: PMACS Used in: IPBPM84, PMDUMPMT85 G=MF [??? PMCOUNT SECT DIAG FGN 104 DOC G?5Y #MAC PMCOUNT [M.C.D. MANN G?JC [ G#2W [ G#F* [ ************* G#XS [ * PMCOUNT * G*B? [ ************* G*SQ [ GB?9 [ GBPN [ THIS MACRO INSERTS A RECORD OF THE NUMBER OF SUBTYPES IN THE TYPE GC87 [ MNEMONIC AREA GCLL #STRING %A GD55 ( GDHJ #SKI %A>64$64 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMDLGET https://www.george3.co.uk/george/macro/pmdlget?rev=1705492539&do=diff PMDLGET (GIN Macro) Defined in: PMACS Used in: PMACT867, PMCHAINS864, PMCHECK867, PMCRABS860, PMDR864, PMDUMP85, PMFILE860, PMFIXSTO84, PMSUMA867, PMWHATA866 89BM [??? PMDLGET SECT DIAG FGN 104 DOC 89T4 #MAC PMDLGET [M.C.D. MANN 8=?F [ 8=PW [ 8?8? [ ************* 8?LN [ * PMDLGET * 8#55 [ ************* 8#HG [ 8#^X [ 8*D# [ OBTAINS D AND OR L VALUES OF A PM SEGMENT 8*WP [ 8B*6 [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMDLSET https://www.george3.co.uk/george/macro/pmdlset?rev=1705492539&do=diff PMDLSET (GIN Macro) Defined in: PMACS Used in: PMFIXINT85 GK^8 [??? PMDLSET SECT DIAG FGN 104 DOC GLCM #MAC PMDLSET [M.C.D. MANN GLW6 [ GM#K [ GMR4 [ ************* GN9H [ * PMDLSET * GNN2 [ ************* GP6F [ GPJY [ GQ3C #STR %A GQFW ( GQY* FIXTRA J%A GRBS +D%A/128 GRT? #FID 0 8 +L%A/4 GS?Q PMDLSET %B,%C,%D,%E,%F,%G,%H,%I,%J GSQ9 ) GT8N #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMESSAGE https://www.george3.co.uk/george/macro/pmessage?rev=1705492539&do=diff PMESSAGE (GIN Macro) Defined in: PMACS Used in: PMBDTS863, PMBRKCHS84, PMBUFFS84, PMCHAP867, PMCHECK867, PMCRABS860, PMENDITS867, PMENDNOS84, PMFIXSTO84, PMFS85, PMFSB84, PMOBJIII860 693J [??? PMESSAGE SECT DIAG FGN 104 DOC 69GP #MAC PMESSAGE [M.C.D. MANN 69^W [ 6=F3 [ 6=Y8 [ ************** 6?C* [ * PMESSAGE * 6?WG [ ************** 6#*M [ 6#SS [ 6*?^ [ 6*R6 [ THIS MACRO IS USED BY PMBUFFS TO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMFILE https://www.george3.co.uk/george/macro/pmfile?rev=1705492539&do=diff PMFILE (GIN Macro) Defined in: PMACS Used in: =Q3J [??? PMFILE SECT DIAG FGN 104 DOC =QGF #MAC PMFILE [M.C.D. MANN =Q^B [ =RD? [ =RX8 [ ************ =SB5 [ * PMFILE * =ST2 [ ************ =T?X [ =TQS [ =W9P [ RESTORE TIME MACRO TO SPECIFY THOSE FILES FOR WHICH,IF AN ENTRY =WNL [ IS FOUND BY F/S PM IN THE FILE CHAIN,A FULL PRINT WILL BE GIVEN. =X7H [ THERE IS A MAXIMUM O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMFMODE https://www.george3.co.uk/george/macro/pmfmode?rev=1705492539&do=diff PMFMODE (GIN Macro) Defined in: PMACS Used in: PMSUMA867 GTM7 [??? PMFMODE SECT DIAG FGN 104 DOC GW5L #MAC PMFMODE [M.C.D. MANN GWJ5 [ GX2J [ GXF3 [ ************* GXXG [ * PMFMODE * GY*^ [ ************* GYSD [ G^=X [ G^PB [ THIS MACRO IS USED IN SETTING UP A TABLE OF OPEN FILE MODES. H27T [ USED IN PM SEGMENT PMSUM H2L# [ %A=BIT IN FCA5 THAT IS SET FOR MODE H34R [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMFSEGS https://www.george3.co.uk/george/macro/pmfsegs?rev=1705492539&do=diff PMFSEGS (GIN Macro) Defined in: PMACS Used in: FIXINT H5RK ...[??? PMFSEGS SECT DIAG FGN 105 DOC H6=4 #MAC PMFSEGS [M.C.D. MANN H6NH [ H772 [ H7KF [ ************* H83Y [ * PMFSEGS * H8GC [ ************* H8YW [ H9C* [ H9TS [ THIS MACRO IS USED IN SETTING UP A TABLE OF FIXED CORE SEGMENTS, H=#? [ HOLDING SEGMENT NAME,LENGTH,AND DRUM ADDRESS H=QQ [ USED IN PM SEGMENT PMSUM H?99… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMFULLFS https://www.george3.co.uk/george/macro/pmfullfs?rev=1705492539&do=diff PMFULLFS (GIN Macro) Defined in: PMACS Used in: ?=T8 [??? PMFULLFS SECT DIAG FGN 104 DOC ??#C #MAC PMFULLFS [M.C.D. MANN ??RL [ ?#=T [ ?#Q4 [ ************** ?*9? [ * PMFULLFS * ?*NG [ ************** ?B7P [ ?BLY [ ?C67 [ RESTORE TIME MACRO TO GIVE A FULL FILESTORE PM ?CKB [ ?D4K #MEN PMDR ?DHS #TRA APMBRKCHS ?F33 +1 ?FG= #END ?F^F #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMLIST https://www.george3.co.uk/george/macro/pmlist?rev=1705492539&do=diff PMLIST (GIN Macro) Defined in: PMACS Used in: PMTABLEA, PMTABLEB, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEF, PMTABLEG, PMTABLEH, PMTABLEI, PMTABLEJ HGBQ [??? PMLIST SECT DIAG FGN 104 DOC HGS6 #MAC PMLIST [M.C.D. MANN HH9G [ HHLW [ HJ4= [ ************ HJFL [ * PMLIST * HJX2 [ ************ HK#B [ HKPQ [ HL76 #FREE XXX,Y,NUM,XA HLJG #DEF XXX=0? [INDICATES START OF TABLE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMLISTC https://www.george3.co.uk/george/macro/pmlistc?rev=1705492539&do=diff PMLISTC (GIN Macro) Defined in: PMACS Used in: PMTABLEA, PMTABLEB, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEF, PMTABLEG, PMTABLEH, PMTABLEI, PMTABLEJ HT=G [??? PMLISTC SECT DIAG FGN 104 DOC HTMW #MAC PMLISTC [M.C.D. MANN HW5= [ HWGL [ HWY2 [ ************* HX*B [ * PMLISTC * HXQQ [ ************* HY86 [ HYKG [ H^2W #DEF 19?+0=Y H^D= #DEF 19?+1=XXX H^TL #FREE XXX,Y,NUM,XA J2?2 #DEF Y=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMMATCH https://www.george3.co.uk/george/macro/pmmatch?rev=1705492539&do=diff PMMATCH (GIN Macro) Defined in: PMACS Used in: X?J6 [??? PMMATCH SECT DIAG FGN 104 DOC X?YB #MAC PMMATCH [M.C.D. MANN X##L [ X#NW [ X*56 [ ************* X*FB [ * PMMATCH * X*TL [ ************* XB9W [ XBL6 [ XC2B [ PARAMETERS XCBL [ %A=:USERNAME,%B=FILENAME, %C,%E,...FILENAME, %D,%F,...FGN XCQW #STR %C XD76 ( XDHB #STR %B,%C XDXL #SKI XF?W ( XFN6 MENDIT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMMBRK https://www.george3.co.uk/george/macro/pmmbrk?rev=1705492539&do=diff PMMBRK (GIN Macro) Defined in: MACS IPB Used in: ?QG2 #MAC PMMBRK ?Q^L #MEN CLOSEIPB ?RF= #STR %A ?RYW ( ?SDG #STR OFF,%A ?SY6 ( ?TCQ #STR ALL,%A ?TXB ( ?WC2 #SKI 34?+K99CLOSEIPB]-21 ?WWL ( ?XB= #TRA K99CLOSEIPB ?XTW 34?+K99CLOSEIPB]+3 ?Y*G #TRA 34?+K99CLOSEIPB]+K50CLOSEIPB ?YT6 8H%A ?^#Q #STR %B,EXEC ?^SB ( #2#2 #TRA 34?+K99CLOSEIPB]+K50CLOSEIPB+2 #2RL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMMEND https://www.george3.co.uk/george/macro/pmmend?rev=1705492539&do=diff PMMEND (GIN Macro) Defined in: PMACS Used in: ?GDN ...[??? PMMEND SECT DIAG FGN 108 DOC ?GXX #MAC PMMEND [M.C.D. MANN ?HC6 [ ?HW* [ ?J*J [ ************ ?JSR [ * PMMEND * ?K#2 [ ************ ?KR9 [ ?L=D [ ?LPM [ MACRO TO ALTER THE SIZE OF POSTMORTEM LISTINGS OF GIVEN CHAINS ?M8W [ ?MN5 [ PARAMETERS ARE IN PAIRS ?N7# [ %A,%C,%E ETC.= IND. OF CHAIN (SEE GTM 2.5 ?NLH … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMNEWCHENT https://www.george3.co.uk/george/macro/pmnewchent?rev=1705492539&do=diff PMNEWCHENT (GIN Macro) Defined in: PMACS Used in: RBT= [??? PMNEWCHE SECT DIAG FGN 104 DOC RC?L #MAC PMNEWCHENT [M.C.D. MANN RCQ2 [ RD8B [ RDLQ [ **************** RF56 [ * PMNEWCHENT * RFHG [ **************** RF^W [ RGD= [ RGWL [ THIS MACRO UPDATES THE PM CHAPTER TABLE IN PMFIXINT WITH RH*2 [ THE NEW D & L VALUES OF THE SEGMENT(CHAPTER) SPECIFIED RHRB [ IN %A.IF IT IS A NEW SEG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMOBJ https://www.george3.co.uk/george/macro/pmobj?rev=1705492539&do=diff PMOBJ (GIN Macro) Defined in: PMACS Used in: *B== [??? PMOBJ SECT DIAG FGN 104 DOC *BPW #MAC PMOBJ [M.C.D. MANN *C9G [ *CP6 [ *D8Q [ *********** *DNB [ * PMOBJ * *F82 [ *********** *FML [ *G7= [ *GLW [ RESTORE TIME MACRO THAT CAUSES POSTMORTEM TO PRINT *H6G [ UP TO 3 SPECIFIED OBJECT/SUBJECT PROGRAMS IN FULL *HL6 [ IN A G3/4 PM *J5Q [ *JKB #STR %A *K52 (… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMODES https://www.george3.co.uk/george/macro/pmodes?rev=1705492539&do=diff PMODES (GIN Macro) Defined in: MACROS JSR Used in: CIMOP867, CONMXA85, CONMXB8, CONMXC8, CPOBJ6, CROBJ6, DROBJ864, DRUM852, EDOBJ864, FHLIST867, FHOBJ860, LPOBJ6, LPTWO7, MTOBJ864, NETOFLNE867, OPCA867, OPCAXCOD5, OPILLS70, PERION867, SPERION867, TPOBJ867, TROBJ867 4=72 ...[??? PMODES SECT CENT FGN 9 DOC 4==G # THIS MACRO OBTAINS THE BRANCHING & STORE MODES OF A PROG. MEMBER 4=Q6 # %A-MODIFIER CONTAINING MEMBER.NO.%B-PTR TO PCA 4?9Q #MAC PMODES 4?PB OPND SMO,%B,F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMOLCH https://www.george3.co.uk/george/macro/pmolch?rev=1705492539&do=diff PMOLCH (GIN Macro) Defined in: COMMPRIVMACS Used in: IPBPM84 366= # 36KW # THIS MACRO CHECKS TO SEE IF THE SYSTEM OVERLOAD COUNT IS NON-ZERO, 375G # AND TO SEE IF THE HIGHEST PRIORITY FOR STOPPING OUTPUT IS > 10. 37K6 # IF EITHER OF THESE CONDITIONS EXISTS THE MACRO JUMPS TO %A. 384Q # 38JB #MAC PMOLCH [THIS MACRO IS USED IN SEGMENT IPBPM 3942 LDX 0 PMCOUNT 39HL BNZ 0 %A 3=3= LDX 0 PRIORI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMOVE https://www.george3.co.uk/george/macro/pmove?rev=1705492539&do=diff PMOVE (GIN Macro) Defined in: PMACS Used in: GSCANTRA, PMACT867, PMBRKCHS84, PMBUFFS84, PMCHAINS864, PMCHAP867, PMCHECK867, PMCRABS860, PMDUMP85, PMDUMPDA85, PMDUMPMT85, PMFILE860, PMFIXSTO84, PMFSB84, PMJOBS866, PMOBJIII860, PMSUMA867, PMWHATA866, SETJD867 6JX= [??? PMOVE SECT DIAG FGN 104 DOC 6KBC #MAC PMOVE [M.C.D. MANN 6KTJ [ 6L#P [ 6LRW [ *********** 6M?3 [ * PMOVE * 6MQ8 [ *********** 6N9* [ 6NNG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMOVSEG https://www.george3.co.uk/george/macro/pmovseg?rev=1705492539&do=diff PMOVSEG (GIN Macro) Defined in: PMACS Used in: X4R3 [??? PMOVSEG SECT DIAG FGN 104 DOC X56Y #MAC PMOVSEG [M.C.D. MANN X5GT [ X5WQ [ X6=M [ ************* X6LJ [ * PMOVSEG * X72F [ ************* X7BB [ X7Q? [ X868 [ PARAMETERS X8G5 [ %A=:USERNAME,%B=FILENAME, %C,%E,...FILENAME, %D,%F,...FGN X8W2 [ X99X ...#ALT JPMRR=1 X9KS PMMATCH %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMP https://www.george3.co.uk/george/macro/pmp?rev=1705492539&do=diff PMP (GIN Macro) Defined in: PMACS Used in: J654 [??? PMP SECT DIAG FGN 104 DOC J6J6 #MAC PMP [M.C.D. MANN J73Q [ J7HB [ J832 [ ********* J8GL [ * PMP * J92= [ ********* J9FW [ J9^G [ J=F6 [ THIS MACRO SETS UP 'REPEAT' TABLES CALLED BY MACROS PMREP J=YQ [ AND PMREPCON J?DB #STR %A J?Y2 ( J#CL #STR %A,+ J#X= ( J*BW #SKI %A<0$0 [F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMREADCT https://www.george3.co.uk/george/macro/pmreadct?rev=1705492539&do=diff PMREADCT (GIN Macro) Defined in: COMMPRIVMACS Used in: IPBPM84 3LPG # 3M96 # THIS MACRO GETS THE COUNT OF THE NUMBER OF WORDS READ INTO X6 3MNQ # 3N8B #MAC PMREADCT [THIS MACRO IS USED IN SEGMENT IPBPM 3NN2 LDX 0 PMRW 3P7L ANDN 0 #777 3PM= LDN 6 PMLEN 3Q6W SBX 6 0 3QLG SBN 6 1 3R66 BZE 6 %A [BLOCK STATUS WORD ONLY: ERROR 3RKQ LDN 1 1 3… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMREP https://www.george3.co.uk/george/macro/pmrep?rev=1705492539&do=diff PMREP (GIN Macro) Defined in: PMACS Used in: PMTABLEB, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEF, PMTABLEH K4S= [??? PMREP SECT DIAG FGN 104 DOC K5?= #MAC PMREP [M.C.D. MANN K5Q= [ K69= [ K6N= [ *********** K77= [ * PMREP * K7L= [ *********** K85= [ K8J= [ K93= [ THIS MACRO SETS UP TABLES OF BLOCK IDENTIFIERS AND INDICATORS TO K9G= [ THE WAY THE CONTENTS OF EACH BLOCK SHOULD BE PRI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMREPCON https://www.george3.co.uk/george/macro/pmrepcon?rev=1705492539&do=diff PMREPCON (GIN Macro) Defined in: PMACS Used in: PMTABLEA, PMTABLEB, PMTABLEC, PMTABLED, PMTABLEE, PMTABLEF, PMTABLEG, PMTABLEH, PMTABLEJ KMJ= [??? PMREPCON SECT DIAG FGN 104 DOC KN3= #MAC PMREPCON [M.C.D. MANN KNG= [ KN^= [ KPD= [ ************** KPX= [ * PMREPCON * KQB= [ ************** KQT= [ KR#= [ KRR= [ THIS MACRO IS A CONTINUATION MACRO FOR PMREP OR PMLIST OR PMLISTC KS=W [ KSQG #OP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSCFREAD https://www.george3.co.uk/george/macro/pmscfread?rev=1705492539&do=diff PMSCFREAD (GIN Macro) Defined in: PMACS Used in: PMACT867, PMCHAP867, PMCHECK867 3DBN ...[??? PMSCFREA SECT DIAG FGN 109 DOC 3DTL #MAC PMSCFREAD [M.C.D. MANN 3F#J [ 3FRG [ 3G=D [ *************** 3GPB [ * PMSCFREAD * 3H8# [ *************** 3HM= [ 3J68 [ 3JK6 [ B/S TRANSFER MACRO TO READ 3K44 [ FROM SCF DEVICE 3KH2 [ 3K^Y ...[ %A COUNT 3LDW [ %B START ADDRESS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSEG https://www.george3.co.uk/george/macro/pmseg?rev=1705492539&do=diff PMSEG (GIN Macro) Defined in: PMACS Used in: PMDR864 LJ5L [??? PMSEG SECT DIAG FGN 104 DOC LJJH #MAC PMSEG [M.C.D. MANN LK3D [ LKG* [ LK^= [ *********** LLD7 [ * PMSEG * LLX4 [ *********** LM*^ [ LMSW [ LN?R +%C LNQN #HAL J%A,+K%B%A LP9K #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSHRINK https://www.george3.co.uk/george/macro/pmshrink?rev=1705492539&do=diff PMSHRINK (GIN Macro) Defined in: PMACS Used in: YGT# [??? PMSHRINK SECT DIAG FGN 104 DOC YH=W #MAC PMSHRINK [M.C.D. MANN YHND [ YJ62 [ YJHJ [ ************** YJ^6 [ * PMSHRINK * YKBN [ ************** YKS= [ YL9S [ YLMB [ RESTORE TIME MACRO TO REDUCE PM TIME YM4Y [ YMGG [ %A=ON FOR SHRINKING YMY4 [ %A=OFF FOR REVERSION TO NORMAL PM YN*L [ YNR8 #STR ON,%A YP8Q ( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSIZE https://www.george3.co.uk/george/macro/pmsize?rev=1705492539&do=diff PMSIZE (GIN Macro) Defined in: PMACS Used in: PMOVERLAY RSQW #MAC PMSIZE [M.C.D. MANN RT9= [ RTML [ RW62 [ ************ RWH9 [ * PMSIZE * RWYD [ ************ RX*M [ RXQW [ RY85 [ RYK# [ THIS MACRO IS CALLED FROM THE MENDIT MACRO(AND PMOVERLAY) AND R^2H [ IS USED TO UPDATE A WORD IN LOADER WHENEVER A PM SEGMENT IS R^CQ [ MENDITED.THIS WORD CONTAINS THE MINIMUM LENGTH OF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSIZEUP https://www.george3.co.uk/george/macro/pmsizeup?rev=1705492539&do=diff PMSIZEUP (GIN Macro) Defined in: PMACS Used in: SBMB #MAC PMSIZEUP [M.C.D. MANN SC56 [ SCGW [ SCYL [ ************** SDBB [ * PMSIZEUP * SDS6 [ ************** SF9W [ SFML [ SG5B [ THIS MACRO IS CALLED FROM THE NEWFIXED MACRO AND IS USED TO SGH6 [ UPDATE A WORD IN LOADER WHICH CONTAINS THE MINIMUM LENGTH OF SGYW [ FIXED CORE WHICH PM REQUIRES TO RUN IN. SHBL [ SHSB [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSTOPR https://www.george3.co.uk/george/macro/pmstopr?rev=1705492539&do=diff PMSTOPR (GIN Macro) Defined in: COMMPRIVMACS Used in: IPBPM84 47#Q # 47SB # THIS MACRO RESETS THE PRIORITY FOR STOP OUTPUT IF NECESSARY 48#2 # 48RL #MAC PMSTOPR [THIS MACRO IS USED IN SEGMENT IPBPM 49?= BNZ 0 M1 49QW LDX 0 PMADDR+1(1) 4==G STO 0 PRIORITY 4=Q6 BRN %A 4?9Q M1 4?PB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSUB https://www.george3.co.uk/george/macro/pmsub?rev=1705492539&do=diff PMSUB (GIN Macro) Defined in: COMMPRIVMACS Used in: IPBPM84 4K^G # 4LF6 # THIS MACRO SUBTRACTS 1 FROM THE SYSTEM OVERLOAD COUNT IF NECESSARY 4LYQ # 4MDB #MAC PMSUB [THIS MACRO IS USED IN SEGMENT IPBPM 4MY2 BNZ 0 M1 4NCL LDX 0 PMCOUNT 4NX= BZE 0 %A 4PBW LDN 0 1 4PWG SBS 0 PMCOUNT 4QB6 BRN %A 4QTQ M1 4R*B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMSUBSREAD https://www.george3.co.uk/george/macro/pmsubsread?rev=1705492539&do=diff PMSUBSREAD (GIN Macro) Defined in: PMACS Used in: PMACT867, PMCHAINS864, PMCRABS860, PMFILE860 92KG [??? PMSUBSRE SECT DIAG FGN 104 DOC 9356 #MAC PMSUBSREAD [M.C.D. MANN 93JQ [ 944B [ 94J2 [ **************** 953L [ * PMSUBSREAD * 95H= [ **************** 962W [ 96GG [ 9726 #STR %A 97FQ LDX 0 %A 97^B CALL 7 (JSUBSREAD) 98F2 #STR %B 98YL BRN %B 99D= #ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMT https://www.george3.co.uk/george/macro/pmt?rev=1705492539&do=diff PMT (GIN Macro) Defined in: PMACS Used in: DUMMYB867, LOADERR70, LOADFIN860, SWITCH867 LPNG [??? PMT SECT DIAG FGN 104 DOC LQ7C #MAC PMT [M.C.D. MANN LQL# [ LR59 [ LRJ6 [ ********* LS33 [ * PMT * LSFY [ ********* LSYT [ LTCQ [ LTWM [ THIS MACRO INSERTS TYPES AND SUBTYPES IN TABLES LW*J [ LWSF #SKI %A/#100>64$64 LX?B ?%A TYPE VALUE GREATER THAN 64 LXQ? #SKI %A/#100… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMTABMIT https://www.george3.co.uk/george/macro/pmtabmit?rev=1705492539&do=diff PMTABMIT (GIN Macro) Defined in: PMACS Used in: TH2= [??? PMTABMIT SECT DIAG FGN 104 DOC THDG #MAC PMTABMIT [M.C.D. MANN THWQ [ TJ*2 [ TJR= [ ************** TK9G [ * PMTABMIT * TKMQ [ ************** TL62 [ TLJ= [ TM2G [ PARAMETERS:- TMDQ [ %A = :USERNAME, %B,%D,%F,... FILENAME(NO VERD_SION NO. TMX2 [ %C,%E,%G,... FGN TN*= [ %B,%D,%F,... FGN TNRG [ OR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMTASMIT https://www.george3.co.uk/george/macro/pmtasmit?rev=1705492539&do=diff PMTASMIT (GIN Macro) Defined in: PMACS Used in: SM=B [??? PMTASMIT SECT DIAG FGN 104 DOC SMN6 #MAC PMTASMIT [M.C.D. MANN SN5W [ SNHL [ SN^B [ ************** SPC6 [ * PMTASMIT * SPSW [ ************** SQ=L [ SQNB [ SR66 [ PARAMETERS:- SRKQ ...[ %A=* - NO NEWMAC FOR PMACS SS5B ...[ %A=:USERNAME OR OMITTED,PMACS IS "NEWMAC"ED SSK2 ...[ (USERNAME OF PMACS.IF OMITTED CURRENT USER AS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMTCON https://www.george3.co.uk/george/macro/pmtcon?rev=1705492539&do=diff PMTCON (GIN Macro) Defined in: PMACS Used in: MM#G [??? PMTCON SECT DIAG FGN 104 DOC MMQY #MAC PMTCON [M.C.D. MANN MN9B [ MNMS [ MP6= [ ************ MPJN [ * PMTCON * MQ36 [ ************ MQFJ [ MQY2 [ MRBD [ THIS MACRO IS USED AS A CONTINUATION TO #MACRO PMT MRSW [ MS?# PMT %A,C,%B,%C,%D,%E,%F,%G,%H,%I MSPQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMTRACE https://www.george3.co.uk/george/macro/pmtrace?rev=1705492539&do=diff PMTRACE (GIN Macro) Defined in: PMACS Used in: 77TP [??? PMTRACE SECT DIAG FGN 104 DOC 78#S #MAC PMTRACE [M.C.D. MANN 78RX [ 79?2 [ 79Q5 [ ************* 7=98 [ * PMTRACE * 7=N? [ ************* 7?7B [ 7?LF [ 7#5J [ ALL ACCUMULATORS ARE PRESERVED BY THIS MACRO 7#JM [ 7*3Q [ %A GIVES AN 8H STRING TO BE PRINTED BESIDE THE FIRST 7*GT [ WORD OF THE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMTZ https://www.george3.co.uk/george/macro/pmtz?rev=1705492539&do=diff PMTZ (GIN Macro) Defined in: PMACS Used in: MT88 [??? PMTZ SECT DIAG FGN 104 DOC MTLL #MAC PMTZ [M.C.D. MANN MW54 [ MWHG [ MW^Y [ ********** MXDB [ * PMTZ * MXWS [ ********** MY*= [ MYRN [ M^=6 [ THIS MACRO IS USED BY #MAC PMT TO SET UP SUBTYPE MNEMONIC TABLES M^NJ [ N272 #STR %C N2KD ( N33W #SKI %C>64$64 N3G# ?%C SUBTYPE VALUE GREATER THAN 64 OR UNSET N3YQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PMVAL https://www.george3.co.uk/george/macro/pmval?rev=1705492539&do=diff PMVAL (GIN Macro) Defined in: PMACS Used in: PMCHAINS864 N?96 [??? PMVAL SECT DIAG FGN 104 DOC N?MQ #MAC PMVAL [M.C.D. MANN N#6B [ N#K2 [ N*3L [ *********** N*G= [ * PMVAL * N*YW [ *********** NBCG [ NBW6 [ NC#Q [ THIS MACRO SETS UP A TABLE DEFINING THE WORDS TO BE LISTED IN A NCRB [ SELECTIVE PRINT OF A CHAIN OR RING. MACRO MUST BE ISSUED ND=2 [ IMMEDIATELY FOLLOWING… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) POINTACT https://www.george3.co.uk/george/macro/pointact?rev=1705492539&do=diff POINTACT (GIN Macro) Defined in: MACROS LEF Used in: IDFENQS867, IDFPER867, IDFSCON867, LISTEND867, LISTINIT867, LISTINTC865, LISTNIP865, LISTPROC867, LISTSEAR867, SJOPEN863, WLC867 DNNG ...[??? POINTACT SECT DEVT FGN 2 DOC DT56 #MAC POINTACT DTJQ #SKI G%AACT DW4B #SKI DWJ2 ( DX3L BBUS B%AACT,FLAGACT,M2POINTACT DXH= #STR %E DY2W #SKI DYGG ( D^26 LDX %B GSIGN D^FQ BRN M3POINTACT D^^B ) F2F2 #STR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) POP https://www.george3.co.uk/george/macro/pop?rev=1705492539&do=diff POP (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ADDICT865, BACKMAP864, BACKROOM865, BMAPDIR865, BMAPONE867, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMQUEST866, BMQUESTB866, BMSAVJOB864, CLOSEDIR867, DICTWELL867, DSCNCT867, ENWELL867, ENWELLB867, ERASE867, FREEZE864, INCEND865, INCEOT865, IPCGEO8, JOBLIST867, JSASCAN867, OFFREL867, PROPERTY867, REGEN865, SCHDJOBA867, SCHEDULE867, WSJOBS867 *9FX ...[ *9KS ...[ *9PP ...[??? POP SECT FILE FGN 25 DOC *9TL #MAC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PPCUBS https://www.george3.co.uk/george/macro/ppcubs?rev=1705492539&do=diff PPCUBS (GIN Macro) Defined in: LOBS-MACROS Used in: LDSTART850 7Y7Y ...[??? PPCUBS SECT FILE FGN 5 DOC 7YCQ [ 7YXB #MAC PPCUBS 7^C2 MHUNTW 1,FILE,ENT 7^WL LDX 0 EALLOC(1) 82?6 ... ANDN 0 #77 82ML ... SBN 0 48 8346 ... BPZ 0 M1PPCUBS [J IF FILE ALLOCATED TO SPECIAL RESID 83DL ... JBS M1PPCUBS,1,BEALLINCS 83T6 LDX 7 ECOPS(1) 84#Q SRL 7 15 84H= ... INCREAMBS %A,7 84PQ ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PREP https://www.george3.co.uk/george/macro/prep?rev=1705492539&do=diff PREP (GIN Macro) Defined in: REPLY-MACROS Used in: EDITOR867, INPCT84, USERLIB867, WHTSTAT867 6*BY ...[??? PREP SECT FILE FGN 2 DOC 6*LQ #MAC PREP 6B6B SMO FX2 6BL2 LDX %A ACOMMUNE2 6C5L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PREP2 https://www.george3.co.uk/george/macro/prep2?rev=1705492539&do=diff PREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: USERDIR842, USERONE867, USEROPEN867, USERSTRM867 6C*D ...[??? PREP2 SECT FILE FGN 2 DOC 6CK= #MAC PREP2 6D4W LDX %A ACOMMUNE2(2) 6DJG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRESETRP https://www.george3.co.uk/george/macro/presetrp?rev=1705492539&do=diff PRESETRP (GIN Macro) Defined in: MACROS GEM Used in: 5XFL ...[ 5X^= ...[ 5YDW ...#MAC PRESETRP 5YYG ...#STR %A 5^D6 ...#SKI 5^XQ ...#EXI [IF NO PARAMS, DO NOTHING 62CB ...#DEF 20?=0 62X2 ...#DEF 21?=#00075777 [ALL PERMITTED CATEGORIES 63BL ...#DEF 22?=#21200000 [READY,BREAKIN,FORCETYP 63W= ...#STR %A,NONE 64*W ...#SKI 64TG ...( 65*6 ...[%A = NONE 65SQ ...#STR %B 66#B ...( 66S2 ... SETRPERR [ERROR IF ANY O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRESINC https://www.george3.co.uk/george/macro/presinc?rev=1705492539&do=diff PRESINC (GIN Macro) Defined in: DUMP-MACROS Used in: SCHEDMTX867 B#XJ ...[ B#XX ...[ B*CH ...[??? PRESINC SECT FILE FGN 66 DOC B*X7 ...[ BBBR ...#MAC PRESINC BBLK ...#UNS FTS2 BBWC ...( BC69 ... LDN %C 0 [%C USED AS FDINCS COUNTER BCB3 ... LDX 2 FX2 [SET X2 BCTM ... LDX 1 BOLC [X1 -> OFLC BD*? ... LDX 1 A1(1) [X1 => COUNT OF ENTRIES BDSX ... BZE 1 M2PR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRINTMAC https://www.george3.co.uk/george/macro/printmac?rev=1705492539&do=diff PRINTMAC (GIN Macro) Defined in: MACINTLUDES Used in: BYHL [??? PRINTMAC SECT DIAG FGN 9 DOC B^3= #MAC PRINTMAC [M.C.D. MANN AND J.T. WIFFEN B^GW [ C22G [ C2G6 [ ************** C2^Q [ * PRINTMAC * C3FB [ ************** C3^2 [ C4DL [ C4Y= [ PRINTMAC - PRINT THE SOURCE OF A MACRO AS KNOWN TO GIN. C5CW [ %A MACRO NAME C5XG [ %B LISTING LEVEL (OPTIONAL) C6C6 [ C6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRINTSEG https://www.george3.co.uk/george/macro/printseg?rev=1705492539&do=diff PRINTSEG (GIN Macro) Defined in: MACINTLUDES Used in: 3TJ= [??? PRINTSEG SECT DIAG FGN 9 DOC 3W3W #MAC PRINTSEG [M.C.D. MANN AND J.T. WIFFEN 3WHG [ 3X36 [ 3XGQ [ ************** 3Y2B [ * PRINTSEG * 3YG2 [ ************** 3Y^L [ 3^F= [ 3^YW [ THE PARAMETERS OF THE MACRO PRINTSEG ARE - 42DG [ 42Y6 [ %A - THE SEGMENT NAME 43CQ [ 43XB [ %B - THE SEG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRLLDUMP https://www.george3.co.uk/george/macro/prlldump?rev=1705492539&do=diff PRLLDUMP (GIN Macro) Defined in: DUMP-MACROS Used in: 32QR ...[??? PRLLDUMP SECT FILE FGN 65 DOC 32SP ...#MAC PRLLDUMP 32T3 ...#STR %A 32T* ...#STR 32TM ...( 32T^ ...#MEN INCSTART 32W? ...#TRA K80INCSTART 32WK ... NULL 32WX ...#END 32X9 ...#EXI 32XH ...) 32XT ...#STR %A,OFF 32Y7 ...#STR 32YF ...( 32YR ...#MEN INCSTART 32^5 ...#TRA K80INCSTART 32^C ... BRN K81INCSTART 32^P ...#END 3323 ...#EXI 332* ...) 332M ...! PARAME… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGAREA https://www.george3.co.uk/george/macro/progarea?rev=1705492539&do=diff PROGAREA (GIN Macro) Defined in: MACROS GLJ Used in: D#XQ ...#MACRO PROGAREA D*44 ...#UNSET G4VOPA D*69 ...#STR %A D*8B ...! 1ST PARAMETER HAS BEEN IGNORED D*=H ...#UNSET G4VOPA D*#N ...#SKIP D*BT ...( D*F6 #MEND FIXED D*YQ #STRING %A DBDB ( DBY2 #TRANSFER APROGAREA DCCL %A*1024 DCX= ) DD9M ...#END DDJ4 ...) DDWG #MEN CONSTANT DFB6 #STRING %B DFT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGAXES https://www.george3.co.uk/george/macro/progaxes?rev=1705492539&do=diff PROGAXES (GIN Macro) Defined in: MACROS FIXD Used in: CORE867, COREALLF867, CORESHED861, GETWORD867, JAMSWAP865, PROSTART867, RUNPROG840, SCHEDOUT865, SWAP865 6MWW # 6NBG #MAC PROGAXES [ENTRY TO CRITICAL SEQUENCE 6NW6 LDBIT 15,0 6P*Q MOD ANDX 0 JCLASS,%A 6PTB BZE 0 MPROG 6Q*2 LDBIT 9,0 6QSL MOD ORS 0 JCLASS,%A 6R#= COOR3 AXESPROG 6RRW BRN %B 6S?G MPROG LDBIT 15… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGBRKIN https://www.george3.co.uk/george/macro/progbrkin?rev=1705492539&do=diff PROGBRKIN (GIN Macro) Defined in: MACRO COMPRO Used in: BEXTSJ84, CHINERR867, CLOSBAC867, CLOSDEL867, COMPCHAN84, CONTEND867, CONTINUE867, CONTRACT866, CONTXCOD60, DISEVENT65, DOMONOP867, EVENTS864, EXINONE867, FHLIST867, GETONA867, GIVE867, INMOP867, NEXTUNIT867, OLMTC85, OLMTE85, OLPODD865, PERION867, PROGISH850, READSPEC867, RENAMEX867, RUNPROG840, SCEX866, SCHDJOBA867, SCRATCH866, SOUP867, SPERION867, SQOPEN867, TPINS861 #JKY ...[??? PROGBRKI SECT CENT FGN 21 DOC #JTQ #MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGEND https://www.george3.co.uk/george/macro/progend?rev=1705492539&do=diff PROGEND (GIN Macro) Defined in: MACROS ICB Used in: EVENTS864, LOADFIN860, MONEVENT867, OPCAXCOD5, OPILLSA206 3TJ= #MAC PROGEND 3W3W ACROSS COMPROB,15 3WHG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGMOVE https://www.george3.co.uk/george/macro/progmove?rev=1705492539&do=diff PROGMOVE (GIN Macro) Defined in: MACROS JSR Used in: IPQUAKE83, TRIPB83 FW*R ...#MAC PROGMOVE [ONJ(:CENT) G3 VERSION FWBG ...[ FWC9 ... TRACE %E,PROGMV3 FWCY ...[ FWDM ... LDX 0 %E [LOAD NO. OF WORDS TO BE MOVED FWFB ... MOD ADX %B ADATUM,%A FWG5 ... MOD ADX %D ADATUM,%C [SO WE NOW HAVE REAL ADDR FWGS ... SBN 0 513 FWHH ... BNG 0 MOV513 [J. IF LESS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROGRING https://www.george3.co.uk/george/macro/progring?rev=1705492539&do=diff PROGRING (GIN Macro) Defined in: MACROS NI Used in: CONIPB8, EVENTS864 2L2L # 2LG= # LOCKOUT OR UNLOCK THE PROGRAM RING 2L^W # 2MFG #MAC PROGRING 2M^6 #STR LOCKOFF,%A 2NDQ '162 0 0 2NYB #STR LOCKON,%A 2PD2 '163 0 0 2PXL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPAE https://www.george3.co.uk/george/macro/propae?rev=1705492539&do=diff PROPAE (GIN Macro) Defined in: MACROS SAR Used in: ASSOC867 49?= #MAC PROPAE 49QW LDX 2 FX2 4==G LDX 1 %B 4=Q6 SLL 1 1 4?9Q BPZ 1 PROPAE1 4?PB LDX 1 %A 4#92 STO 1 ACOMMUNE1(2) 4#NL LDX 1 %B 4*8= STO 1 ACOMMUNE2(2) 4*MW LDX 1 %C 4B7G STO 1 ACOMMUNE3(2) 4BM6 DOWN SYSPROP,3 4C6Q BRN %D 4CLB PROPAE1 4D62 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPAGANDA https://www.george3.co.uk/george/macro/propaganda?rev=1705492539&do=diff PROPAGANDA (GIN Macro) Defined in: MACS IPB Used in: LISTMOP867 #^4B #MAC PROPAGANDA *23L #MEN IPBMOPB *2H= #TRA K60IPBMOPB *32W NULL *3GG #END *4FQ #STR %A%B *4^B ( *5F2 #MEN LISTMOP *5YL #STR %A *6D= ( *6XW #TRA K60LISTMOP+1 *7CG 12H%A *7X6 ) *8BQ #STR %B *8WB ( *9B2 #TRA K60LISTMOP+4 *9TL 12H%B *=*= ) *=SW #END *?#G ) *#?Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPASSOCS https://www.george3.co.uk/george/macro/propassocs?rev=1705492539&do=diff PROPASSOCS (GIN Macro) Defined in: MACROS SAR Used in: IDFENQS867 4D9X ...[??? PROPASSO SECT COMM FGN 12 DOC 4G4G #MAC PROPASSOCS 4GJ6 [ 4H3Q [ THIS MACRO HUNTS THE CURRENT ACTIVITY FOR AN APERI/ASSOCS BLOCK 4HHB [ AND THEN USES THE PROPERTY NUMBER IN THE BLOCK TO EXTRACT FROM 4J32 [ :SYSTEM.PROPERTY THE PROPERTY NAMES AND PUT THEM IN THE APPROPRIATE 4JGL [ WORDS IN THE BLOCK.MACRO ASSUMES A1>ASSOCSLEN. 4K2= [ 4K3^ ...#UNS HWATIDY 4K5N ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPCAE https://www.george3.co.uk/george/macro/propcae?rev=1705492539&do=diff PROPCAE (GIN Macro) Defined in: MACROS SAR Used in: ASSOC867 5FS6 #MAC PROPCAE 5G?Q LDX 2 FX2 5GRB LDX 1 %B 5H?2 SLL 1 1 5HQL BPZ 1 PROPCAE1 5J== LDX 1 %A 5JPW STO 1 ACOMMUNE1(2) 5K9G LDX 1 %B 5KP6 STO 1 ACOMMUNE2(2) 5L8Q LDX 1 %C 5LNB STO 1 ACOMMUNE3(2) 5M82 DOWN SYSPROP,4 5MML BRN %D 5N7= PROPCAE1 5NLW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPCANC https://www.george3.co.uk/george/macro/propcanc?rev=1705492539&do=diff PROPCANC (GIN Macro) Defined in: MACS JIB Used in: PROPERTY867 #285 ...[??? PROPCANC SECT COMM FGN 25 DOC #2#2 # #2RL # #5*L ...#MAC PROPCANC #5BK ... SMO FX2 #5CJ ... STO %B ACOMMUNE2 #5DH ... DOWN IDFCANC,1 #5FG ... BRN %A [BREAK-IN #5M# ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPCODE https://www.george3.co.uk/george/macro/propcode?rev=1705492539&do=diff PROPCODE (GIN Macro) Defined in: MACS SPC Used in: GROPE867, PERFLOGS866 H5*L #MAC PROPCODE H5T= #STR %A H6#W LDX %B %A H6SG #STR %A H7#6 #SKI H7RQ LDX %B CPPTR(2) H8?B '171 %B 8 H8R2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPERTY https://www.george3.co.uk/george/macro/property?rev=1705492539&do=diff PROPERTY (GIN Macro) Defined in: MACROS LEF Used in: ATTRIBUT867, CHTAB, COMPS SAR9, DRUM852, GETFREE867, GETON867, INKS, IPCOPENB83, LISTAST867, MESSAB, MESSAC, MESSAG, MESSAH, MESSBB, MESSBD, MESSBF, MESSBH, MESSBI, MESSBJ, MESSCA, MESSCF, MESSCG, MESSCH, MESSCJ, MESSDA, MESSDB, MESSDJ, MESSE, MESSF, OLMTA85, ONLINEA867, PROPERTY867, TRANSPOT65, WA864, WHATRVS867, WHATRVSA867, WLA867, WLAA867, WLB867 FG52 ...[??? PROPERTY SECT DEVT FGN 2 DOC FGJL #MAC PROPERTY FH4= [ FH… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPNAME https://www.george3.co.uk/george/macro/propname?rev=1705492539&do=diff PROPNAME (GIN Macro) Defined in: MACROS SAR Used in: WHATPERA867 5P6G [ 5PL6 [ 5Q5Q #MAC PROPNAME 5QKB # 5R52 [ THIS MACRO GIVES THE PROPERTY NAME OF A PROPERTY NUMBER: 5RJL [ THE PROPERTY NUMBER IS FOUND IN %A. 5S4= [ THE PROPERTY NAME IS LEFT IN ACOMMUNE1-ACOMMUNE3. 5SHW [ B0/B1 SET IN ACOMMUNE4 IF PROPERTY IS EXCL/PERM 5T3G [ :SYSTEM.PROPERTY IS FOUND OPEN AND LEFT OPEN 5TH6 # 5W2Q BRN M1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPNO https://www.george3.co.uk/george/macro/propno?rev=1705492539&do=diff PROPNO (GIN Macro) Defined in: MACS JIB Used in: LISTNIP865, SPEAK8 #5NS ...[??? PROPNO SECT COMM FGN 25 DOC #5PB # #692 # FIND THE PROPERTY NUMBER OF A GIVEN PROPERTY NAME #6NL # #78= #MAC PROPNO #78W ...#UNS HWATIDY #79G ...( #7=6 ... LDN 0 %B #7=Q ... SMO FX2 #7?B ... STO 0 ACOMMUNE1 #7#2 ... DOWN WHATPROP,5 #7#3 ...#UNS ANIP #7#4 ...( #7#5 ...#STR %D #7#6 ...( #7#7 ...#ACC %D #7#8 ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPTEST https://www.george3.co.uk/george/macro/proptest?rev=1705492539&do=diff PROPTEST (GIN Macro) Defined in: OPEN-MACROS Used in: BMSJRNL866, MAKEFILE863 #C=4 ...[??? PROPTEST SECT FILE FGN 20 DOC #CFW #MAC PROPTEST #C^G DOWN LEXIFIND,3 #DF6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPUNAC https://www.george3.co.uk/george/macro/propunac?rev=1705492539&do=diff PROPUNAC (GIN Macro) Defined in: MACROS SIB Used in: WLAA867, WLB867 2BHQ ...#MAC PROPUNAC 2BHR ...[ 2BHS ...[ MACRO 'PROPUNAC' FINDS THE FIRST UNACCESSED PARAMETER COMMENCING 2BHW ...[ WITH A SPECIFIED STRING. IF NONE GIVEN,TRIES FOR 2BHY ...[ 'PROPERTY', OR IF THERE ISN'T ONE, THE FIRST COMMENCING 'PR', 2BJ2 ...[ 2BJ4 ...[ %A - LABEL TO GOTO IF PARAMETER IS ABSENT 2BJ6 ...[ %B - LABEL TO GOTO IF PARAMETER IS NULL 2BJ8 ...[ %C - CHAR CT OF KEYSTRING (OPTI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPUSE https://www.george3.co.uk/george/macro/propuse?rev=1705492539&do=diff PROPUSE (GIN Macro) Defined in: MACROS LEF Used in: PROPERTY867 FQW= ...[??? PROPUSE SECT DEVT FGN 2 DOC FRTG #MAC PROPUSE FS*6 [ THIS MACRO CHECKS WHETHER THERE IS AN ENTRY IN :SYSTEM.OUTPUT FSSQ [ WHICH REQUIRES THE PROPERTY WHOSE NUMBER IS SUPPLIED AS %A, FT#B [ %B IS A LABEL TO JUMP TO IF AN ENTRY IS FOUND. FTS2 #ACC %A FW?L LDX 0 %A FWR= SMO FX2 FX=W #ACC %A FXQG STO 0 ACOMMUNE1 FY=6 #ACC %A FYPQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPUSER https://www.george3.co.uk/george/macro/propuser?rev=1705492539&do=diff PROPUSER (GIN Macro) Defined in: MACROS RM59B Used in: LIST867, MAKEFILE863, PREPREAD867, TRAPCHEC867, TRAPPARA3 35LL ...[??? PROPUSER SECT FILE FGN 6 DOC 375G #MAC PROPUSER 379C ...[ CHECKS WHETHER A USER, WHOSE NAME IS IN CPREFIX IN THE CURRENT 37*# ...[ ACTIVITY BLOCK, IS A PROPER USER. IF NOT, THE PROPER USER NAME 37F9 ...[ IS LEFT IN ACOMMUNE1-3 37K6 DOWN LEXIFIND,2 384Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PROPWELL https://www.george3.co.uk/george/macro/propwell?rev=1705492539&do=diff PROPWELL (GIN Macro) Defined in: MACROS WELL Used in: LISTSEAR867 3NXS ...[??? PROPWELL SECT CENT FGN 72 DOC 3P7L [ 3PM= #MAC PROPWELL 3Q6W SMO %B 3QLG LDN 6 0 3R66 OPENSYS %A,JOBLIST,READ 3RKQ TESTREP2 OK,MPW2 3S5B GEOERR 1,JOBLIST? 3SK2 MPW2 STEP 3T4L MPW3 STEP 3TJ= BZE 3 MPW7 3W3W SMO FRH+JLPROPNO(3) 3WHG LDN 0 0 3X36 TXU 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PRQUERY https://www.george3.co.uk/george/macro/prquery?rev=1705492539&do=diff PRQUERY (GIN Macro) Defined in: BMAP MACROS Used in: BMQUEST866, BMQUESTB866 73KW ...[??? PRQUERY SECT FILE FGN 36 DOC 745G ...[ 74K6 ...[ THIS MACRO REQUESTS A PM IF A SYSTEM FILE 754Q ...[ IS CONFIRMED AS BEING CORRUPT AT E.M.S. 75JB ...[ 7642 ...#MAC PRQUERY 76HL ...#MEN BMAPONE 773= ...#TRA K60BMAPONE 77GW ... NULL 782G ...#END 785L ...#MEN BMINDEX 788Q ...#TRA K60BMINDEX 78?W ... NULL 78C2 ...#END 78G6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PSTAC https://www.george3.co.uk/george/macro/pstac?rev=1705492539&do=diff PSTAC (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, BMINDEX866, BMXEND7, CLOSEDIR867, CLOSEND867, CLOSEONE867, CLOSTIDY860, COMMFILE82, COMPRESS864, DELETE864, FBUFF860, INCRCUBS860, INCRCUBX860, INDEX85, INSERT6, INSERTFR6, INSERTHR6, INSERTWO6, LOCATE84, MTCHECK860, MTCODE864, MTOBJ864, MTSTART864, OFFREL867, OPENWAIT867, ORELEMPT70, ORELEND860, PERUSFIL84, READFAIL866, READFALE866, READFILE84, REWRITE864, STEP864 96Q# ...[??? PSTAC SECT FILE FGN 20 DOC 9726 #MAC PSTAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PTREP https://www.george3.co.uk/george/macro/ptrep?rev=1705492539&do=diff PTREP (GIN Macro) Defined in: REPLY-MACROS Used in: OLMTA85 6DS# ...[??? PTREP SECT FILE FGN 2 DOC 6F46 #MAC PTREP 6FHQ SMO FX2 6G3B STO %A ACOMMUNE2 6GH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PTREP2 https://www.george3.co.uk/george/macro/ptrep2?rev=1705492539&do=diff PTREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: GETDIR860, GETDIRX860, USERDIR842, USERONE867, USEROPEN867, USERSTRM867 6GQS ...[??? PTREP2 SECT FILE FGN 2 DOC 6H2L #MAC PTREP2 6HG= STO %A ACOMMUNE2(2) 6H^W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PTSCAN https://www.george3.co.uk/george/macro/ptscan?rev=1705492539&do=diff PTSCAN (GIN Macro) Defined in: MACROS JSRG4 Used in: #B32 #MAC PTSCAN [J.S.RAYNER.G4 ONLY #BGL MPTSCAN1 #C2= BZE %D %F #CFW #STR P,%B #C^G #SKI #DF6 ( #DYQ LDCT 1 #600 #FDB MOD ANDX 1 ASEGTAB,%E #FY2 LDCH 0 BLENCH(1) #GCL ) #GX= LDX 1 %C #HBW SLC 1 8 #HWG #STR P,%B #JB6 #SKI #JTQ ( #K*B ANDX 0 1 #KT2 BNZ 0 MPTSCA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PTYPE https://www.george3.co.uk/george/macro/ptype?rev=1705492539&do=diff PTYPE (GIN Macro) Defined in: MACRO COMPRO Used in: LDSTART850, PARAM865, PARAMA865, PARAMB865, SETPARAM867, SETPB867, SETPE867, SETPRAMA867, SETPRAMB867, WHATPER867 6834 ...[??? PTYPE SECT CENT FGN 21 DOC 68=W #MAC PTYPE 68QG LDX 2 FX2 69=6 LDN 0 %A [BLOCK TYPE 69PQ ADN 0 %B [BLOCK SUBTYPE 6=9B STO 0 ACOMMUNE2(2) 6=P2 LDX 0 %C [ADDRESS OF BLOCK 6?8L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUCST https://www.george3.co.uk/george/macro/pucst?rev=1705492539&do=diff PUCST (GIN Macro) Defined in: MACROS JSRG4 Used in: TPINS861 JLMQ #MAC PUCST [JSRAYNER G4 ONLY JM7B #STR %B JMM2 LDX 0 %B JN6L LDX 1 %A JNL= LDX 2 FX2 JP5W #STR %B JPKG STO 0 ACOMMUNE2(2) JQ56 #STR %B JQJQ #SKIP JR4B STOZ ACOMMUNE2(2) JRJ2 STO 1 ACOMMUNE1(2) JS3L #SKI CAMK7>4-4 JSH= ( JT2W LDN 0 #10 JTGG ANDX 0 AFLAG(1) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUDDL https://www.george3.co.uk/george/macro/puddl?rev=1705492539&do=diff PUDDL (GIN Macro) Defined in: MACROS NI Used in: LOADERII867 25X2 # 26BL # MISCELLANEOUS NEW INTERFACE MACROS-MOSTLY THEY USE SPECIAL X'CODES 26W= # 27*W # 27TG # PULL DOWN DEVICE LISTS 28*6 # 28SQ #MAC PUDDL 29#B '160 0 0 29S2 LDX %A CORES 2=?L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PULLINK https://www.george3.co.uk/george/macro/pullink?rev=1705492539&do=diff PULLINK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BSQ867 K3B2 ...[??? PULLINK SECT CENT FGN 32 DOC K3TL ...# K4*= ...# MACRO TO RESTORE LINK SAVED BY PUSHLINK K4SW ...# K5#G ...#MAC PULLINK K5S6 ... LDX 2 FX2 K6?Q ... LDX 0 ACOMMUNE9(2) K6RB ... STO 0 ALINK1(2) K7?2 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUSHLINK https://www.george3.co.uk/george/macro/pushlink?rev=1705492539&do=diff PUSHLINK (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BSQ867 JWFQ ...[??? PUSHLINK SECT CENT FGN 32 DOC JW^B ...# JXF2 ...# MACRO TO PUSH DOWN LINK AND SET FIXED CORE LINK JXYL ...# JYD= ...#MAC PUSHLINK JYXW ... LDX 2 FX2 J^CG ... LDX 0 ALINK1(2) J^X6 ... STO 0 ACOMMUNE9(2) K2BQ ... ACCSTO %A,ALINK1(2) K2WB ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUTCONS https://www.george3.co.uk/george/macro/putcons?rev=1705492539&do=diff PUTCONS (GIN Macro) Defined in: MACS JIB Used in: PROPERTY867 #P2J ...[??? PUTCONS SECT COMM FGN 25 DOC #P=B # #SXG ...#MAC PUTCONS #S^D ... SMO FX2 #T3B ... STO %B ACOMMUNE2 #T5# ... DOWN IDFASAT,20 #T7= ... BRN %A [BRK-IN #T98 ... BRN %C #T?6 ... BRN %D #T*4 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUTPERENT https://www.george3.co.uk/george/macro/putperent?rev=1705492539&do=diff PUTPERENT (GIN Macro) Defined in: MACS SPC Used in: ANTIC867, DRUM852, GETONA867, IPCOPENA83, IPCOPENB83, LISTFREE867, OLMTA85, OLMTC85, ONLINCL864, ONLINEA867, ONLINEB867, ONLINEC867, SQOPEN867 H?96 #MAC PUTPERENT H?NQ #STR %A,0 H#8B LDX 0 %A H#N2 SMO FX2 H*7L STO 0 ACOMMUNE7 H*M= #STR %B,6 HB6W LDX 6 %B HBLG DOWN PUTPER,1 HC66 LDX 6 ACOMMUNE7(2) HCKQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUTREP https://www.george3.co.uk/george/macro/putrep?rev=1705492539&do=diff PUTREP (GIN Macro) Defined in: REPLY-MACROS Used in: BMSJRNL866, BUDGONE83, BUDGTWO84, CHINTEG867, FLAW866, GET6, GETON867, GETONA867, LEXIFIND5, LIBCOM867, LIBREQ866, LIBREQC867, LIBSEC867, MODE866, NEWDIR867, OLMTA85, OPENREL865, REDONMT867, RENAMDIR, RENAMEMT867, TRANSFER70, USERDIR842, WRITEFIP867 4PLN ...[??? PUTREP SECT FILE FGN 2 DOC 4PWG #MAC PUTREP 4QB6 SMO FX2 4QTQ STO %A ACOMMUNE9 4R*B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PUTREP2 https://www.george3.co.uk/george/macro/putrep2?rev=1705492539&do=diff PUTREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: ANTIC867, BEXTSJ84, BMSJRNL866, BUDGTWO84, CHEKPRIV867, COMPOST867, DICTJOB82, DTREST860, GETDIR860, HOWBIG867, LEXIFIND5, LIBINSEC864, LIBTSN867, LISTNEXT867, LISTOPEN867, LISTPROC867, MODE866, MTCHECK860, NETOFLNE867, OPENTWO867, PERFCHAP866, REPERR867, RETRIEVE864, SCHEDENX860, TAPEWAIT65, USERDIR842, USERLIB867, USERONE867, USEROPEN867, USERSTRM867 4N7S ...[??? PUTREP2 SECT FILE FGN 2 DOC 4NCL #MAC PUTREP2 4NX= STO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) PWTABLE https://www.george3.co.uk/george/macro/pwtable?rev=1705492539&do=diff PWTABLE (GIN Macro) Defined in: MES INTLUDES Used in: 22FL #MAC PWTABLE 22^= #STR %A 23DW ( 23YG #MEN INITJOB 24D6 #TRA K21INITJOB 24XQ 3H%A,3H%B,3H%C,3H%D,3H%E,3H%F,3H%G,3H%H 25CB #END 25X2 ) 26BL #DEF Z = 1? 26W= #LIS 0%I 27*W #ORD 27TG #INT 28*6 ZB 28SQ #GAP K21INITJOB+8 29#B SLINK 0 29S2 PFA +DINITJOB 2=?L SPS 4H 2=R= #DEF SW = #20202020 2?=W T1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QKTABSET https://www.george3.co.uk/george/macro/qktabset?rev=1705492539&do=diff QKTABSET (GIN Macro) Defined in: CLOSE-MACROS Used in: BMSTREAM853, ERASEA867, LISTRING864 9F2D ...[??? QKTABSET SECT FILE FGN 11 DOC 9F== # 9GX3 ...#MAC QKTABSET 9GX5 ...[ 9GX7 ...[ TH QKTABSET AND QKTABULATE MACROS PRIVIDE AN EFFICIENT TAB SYSTEM 9GX9 ...[ FOR THE SIMPLE CASE WHEN ALL THAT IS NEEDED IS TO SAVE THE POSN 9GX? ...[ OF A FILE. THE FORMAT IS 9GX* ...[ PARAM A - A POINTER TO THE FCA OF THE FILE 9GXC ...[ PARAM B - A WORD IN WHICH FREADWORD CA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QKTABULATE https://www.george3.co.uk/george/macro/qktabulate?rev=1705492539&do=diff QKTABULATE (GIN Macro) Defined in: CLOSE-MACROS Used in: ERASEA867, LISTRING864 9H2L ...[??? QKTABULA SECT FILE FGN 11 DOC 9H2^ ...#MAC QKTABULATE 9H3L ... LDX 0 %B 9H4? ... MOD STO 0 FREADWORD,%A 9H4Y ... LDX 0 %C 9H5K ... MOD STO 0 FREADBLOCK,%A 9H6= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QLOGIC https://www.george3.co.uk/george/macro/qlogic?rev=1705492539&do=diff QLOGIC (GIN Macro) Defined in: MACROS FIXD Used in: PERCON867 5J^N ...[??? QLOGIC SECT CENT FGN 11 DOC 5K9G # 5KP6 [ THIS MACRO SETS UP A TRUTH TABLE 5L8Q #MAC QLOGIC [%A IS OFFSET (LOWEST P IS P<OFFSET>);%B IS HIGHEST P 5LNB #DEF 20?=0 5M82 #DEF 19?+0=#25252525 [IE 0101010101010101 5MML #DEF 19?+1=#14631463 [IE 0011001100110011 5N7= #DEF 19?+2=#03607417 [IE 0000111100001111 5NLW #DEF 19?+3=#00177400 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QLOGIC1 https://www.george3.co.uk/george/macro/qlogic1?rev=1705492539&do=diff QLOGIC1 (GIN Macro) Defined in: MACROS FIXD Used in: 5T?# ...[??? QLOGIC1 SECT CENT FGN 11 DOC 5TH6 #MAC QLOGIC1 5W2Q #DEF 19?+4=20?&1<1*30? [ALTERNATES WITH EACH CALL 0,1,0,1,0,1,0,1,0 5WGB #DEF 19?+5=20?&2<1*30? [ 0,0,1,1,0,0,1,1,0 5X22 #DEF 19?+6=20?&4<1*30? [ 0,0,0,0,1,1,1,1,0 5XFL #DEF 19?+7=20?&8<1*30? [ 0,0,0,0,0,0,0,0,1 5X^= #DEF 21?=%A*30?+19? 5YDW #DE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QLOGIC2 https://www.george3.co.uk/george/macro/qlogic2?rev=1705492539&do=diff QLOGIC2 (GIN Macro) Defined in: MACROS FIXD Used in: 68GN ...[??? QLOGIC2 SECT CENT FGN 11 DOC 68QG #MAC QLOGIC2 69=6 #STR %A 69PQ ( 6=9B #TRA 0?-1 6=P2 #DEF 21?=34?+0?+0] 6?8L +%A^21? [IE'OR'IN %A TO CURRENT WORD 6?N= QLOGIC2 %B,%C,%D,%E,%F,%G,%H 6#7W ) 6#MG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QSTEPC https://www.george3.co.uk/george/macro/qstepc?rev=1705492539&do=diff QSTEPC (GIN Macro) Defined in: ACCESSMACROS Used in: BACKMAP864, BMAPDIR865, BMAPONE867, BMCNTRL866, BMINDEX866, BSPRUNE867, RMTLF864 74SY ...[??? QSTEPC SECT FILE FGN 19 DOC 754Q #MAC QSTEPC 75JB [ J.TO %B IF WE HAVE TO COORDINATE TO DO A STEP ON FILE @ DEPTH %A 7642 #STR %A 76HL ( 773= LDCT 3 %A 77GW CALL 1 (ASTEP13) 782G ) 78G6 #STR %A 78^Q #SKI 79FB CALL 1 (ASTEP11) 79^2 LDX 1 FX1 7=DL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QTABENT https://www.george3.co.uk/george/macro/qtabent?rev=1705492539&do=diff QTABENT (GIN Macro) Defined in: MACROS FIXD Used in: PERCON867 5#N4 ...[??? QTABENT SECT CENT FGN 11 DOC 5#XW # 5*CG # 5*X6 [ THESE MACROS ARE USED BY PERCON (QTABENT,QLOGIC) OR AFTER A CALL OF 5BBQ [ PERCON (LEGALLEV) 5BWB [ 5CB2 #MAC QTABENT [SETS UP A QUALIFIER TABLE ENTRY FOR PERCON 5CTL +0 5D*= #STR %G 5DSW #FID 2 11 %G [OPTIONAL SUPPLEMENTARY ANALYSIS LABE 5F#G #FID 20 23 %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QTASK https://www.george3.co.uk/george/macro/qtask?rev=1705492539&do=diff QTASK (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCGEO8, IPCPASS8, IPQUAKE83, IPQUAKER865, TRIPB83 ?SDG ...[??? QTASK SECT COMM FGN 19 DOC ?SY6 ...[ RINGS TASK BLOCK TO IPSTACK AND WAKES IPC ACTIVITY ?Y*G #MAC QTASK ?YT6 SMO FX2 ?^#Q STO %C ACOMMUNE8 ?^SB LDX 2 FX2 #2#2 SMO %A #2RL LDX 0 A1+1 #3?= SBN 0 2 #3QW BZE 0 MQTASK2 #4=G SBN 0 2 #4Q6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QTASKW https://www.george3.co.uk/george/macro/qtaskw?rev=1705492539&do=diff QTASKW (GIN Macro) Defined in: MACROSIPC Used in: IPCPASS8 #M44 ...[??? QTASKW SECT COMM FGN 19 DOC #M?W #MAC QTASKW #MRG HUNT2B 2,IPCA,INTERN,FX2 #N?6 LDX 0 ATYPE(2) #NQQ ANDN 0 #777 #P=B SBN 0 ATIMWT #PQ2 BNZ 0 MQTASKW1 #Q9L UNQUEUE #QP= FPUT #R8W HUNT2B 2,IPCA,INTERN,FX2 #RNG MQTASKW1 #S86 HUNT2OPT 1,IPCD,ATASK,2 #SMQ BPZ 1 MQTASKW2 #T7B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QUALCON https://www.george3.co.uk/george/macro/qualcon?rev=1705492539&do=diff QUALCON (GIN Macro) Defined in: MACROS RJDG Used in: TRANSPOT65 32YN ...[??? QUALCON SECT CENT FGN 7 DOC 338G [ 33N6 [ MACRO FOR CONVERTING QUALIFIERS 347Q [ 34MB #MAC QUALCON 3572 LDX 0 %A 35LL SMO FX2 366= STO 0 ACOMMUNE7 36KW LDX 0 %B 375G SMO FX2 37K6 STO 0 ACOMMUNE8 384Q DOWN PERCON,2 38JB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QUERYPOOL https://www.george3.co.uk/george/macro/querypool?rev=1705492539&do=diff QUERYPOOL (GIN Macro) Defined in: DFMACROS Used in: 4QW9 ...[??? QUERYPOOL SECT FILE FGN 4 DOC 4QWN ...#MAC QUERYPOOL 4QX7 ...#STR %A 4QXL ...( 4QY5 ...#STR %A,OFF 4QYJ ...#STR 4Q^3 ...( 4Q^G ...#MEND LIBQUERY 4Q^^ ...#TRA K40LIBQUERY 4R2D ... BCC K41LIBQUERY 4R2X ...#END 4R3B ...#MEND RENAMDIR 4R3T ...#TRA K40RENAMDIR 4R4# ... BRN K41RENAMDIR 4R4R ...#END 4R5= ...) 4R5P ...#STR %A,ON 4R68 ...#STR 4R6M ...( 4R76 ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QUICKUNL https://www.george3.co.uk/george/macro/quickunl?rev=1705492539&do=diff QUICKUNL (GIN Macro) Defined in: MACROS RME10 Used in: DTSTART867 22FL ...[??? QUICKUNL SECT FILE FGN 4 DOC 24D6 # 24XQ #MAC QUICKUNL 25CB DOWN CLOSEMT,3 25X2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QUITLT https://www.george3.co.uk/george/macro/quitlt?rev=1705492539&do=diff QUITLT (GIN Macro) Defined in: MACRO COMPRO Used in: LOGOUT867 JD#L ...[???? QUITLT JDS= ...[ QUITLT - MACRO TO BE USED ONLY BY LOGOUT JF?W ...[ TO ALLOW LOGOUT IN BREAKIN CONTEXT JFRG ...#MAC QUITLT JG?6 ... SMO FX2 JGQQ ... LDX 0 CONTEXT JH=B ... SLL 0 9 JHQ2 ... BPZ 0 M1QUITLT JJ9L ... DOWN QUIT,2 JJP= ...M1QUITLT JK8W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) QUOTIME https://www.george3.co.uk/george/macro/quotime?rev=1705492539&do=diff QUOTIME (GIN Macro) Defined in: MACROS GLJ Used in: D66Q #MACRO QUOTIME D6LB #SKIP %A D762 #SKIP D7KL ! ZERO QUOTIME INVALID D85= #SKIP %A D8JW ( D94G #MEND CONSTANT D9J6 #TRANSFER AQUOTIME D=3Q %A&#37777777 D=HB #END D?32 ) D?GL #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) R https://www.george3.co.uk/george/macro/r?rev=1705492539&do=diff R (GIN Macro) Defined in: MACROS EWDAS Used in: EDOBJ864, FFFNORM7, IPCONA864, IPCONE865, IPQUAKER865, MESSAH, PMACT867, PMCHAINS864 M5?B # M5R2 [??? R M6=L # * M6Q= #MAC R M79W # M7PG #STR %A M896 #SKI %A<512-512>0&%A M8NQ ( M98B #STR %A M9N2 ( M=7L +%A M=M= R %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V,%W,%X M?6W ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RBC https://www.george3.co.uk/george/macro/rbc?rev=1705492539&do=diff RBC (GIN Macro) Defined in: MACROS SJ Used in: =GKY ...[ =GR6 ...[ =GYB ...[??? RBC SECT FILE FGN 24 DOC =HXL #MAC RBC =JC= [ SIMILAR TO RBS BUT UNSETS THE BIT =JWW #STR %A =KBG ( =KW6 #MEN %A =L*Q #DEF 22?=D%A =LTB ) =M*2 #TRA +%B+(%C/BITMULT&#7777) =MSL #DEF 20?=22?&#177+34?+0? [ADDR OF WORD IN SEG BIFF =N#= #DEF 21?=#40000000@L-(%C&#37) =NRW +20?]^21?$21? =P?G #STR %D [SKIP UNLESS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RBS https://www.george3.co.uk/george/macro/rbs?rev=1705492539&do=diff RBS (GIN Macro) Defined in: MACROS SJ Used in: =7W8 ...[ =83B ...[ =88L ...[??? RBS SECT FILE FGN 24 DOC =9MG #MAC RBS ==76 [ SETS BIT(S) IN A GEORGE SEGMENT AT RESTORE TIME ==LQ [ %A IS THE SEGMENT CONTAINING THE BIT =?6B [ %B IS A POINTER REL TO WHICH THE BIT IS ADDRESSED =?L2 [ %C ETC ARE BIT IDENTIFIERS =#5L #STR %A =#K= ( =*4W #MEN %A [NOT IF %A NULL =*JG #DEF 22?=D%A =B46 ) =BHQ #TRA +%B+(%C/BITMULT&#77… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RDLCHECK https://www.george3.co.uk/george/macro/rdlcheck?rev=1705492539&do=diff RDLCHECK (GIN Macro) Defined in: MACS PCT Used in: COMPRO867 74K6 #MAC RDLCHECK 754Q LDX 2 FX2 75JB SAWCEJ MRDLOC,MRDLCC 7642 DOWN INPCT,1 76HL BRN MRDLFIN 773= MRDLCC 77GW DOWN READBULK,1 782G BRN MRDLFIN 78G6 MRDLOC 78^Q DOWN READLINE,1 79FB MRDLFIN 79^2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READ https://www.george3.co.uk/george/macro/read?rev=1705492539&do=diff READ (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDONA867, ARCHIVE867, ASSIGN860, ATTACHC867, BACKMASS860, BEXTRA83, BEXTSJ84, BMAPTWO860, BMFIXIT864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BSTS867, CAFSPERI867, CHINTEG867, CLOSFREZ867, COMPRO867, COMPROB867, CREALEX864, DEWELL867, DIRENT867, DTSUBSS867, DTWRONG867, EDITOR867, EDITORA865, EDITPT867, EDOBJ864, ERASEA867, FHOBJDIR860, FINDOC867, FINDRUM866, HLSEMS864, INCFIN864, INCMON865, INCOBS867, INMOP867, INPUTJDF82, IPALL864, IPBPM84,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READAGAIN https://www.george3.co.uk/george/macro/readagain?rev=1705492539&do=diff READAGAIN (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ARCHIVE867, ARCHIVNW83, BACKMAP864, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMJLCONV860, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BSPRUNE867, CLOSEMT867, COMPRESS864, CONSERNO6, COPYFILA867, CREALEX864, DEAD867, DSCNCT867, DTQUEST860, DTSUBSS867, DUMP860, EDITPT867, EDWRITE867, ERASEA867, GETDIR860, GETDIRX860, INCCHECK860, INCEND865, INCEOT865, INCMON865, INCOBS867, INCRV850, INCSTART865, INCWRIT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READAUTO https://www.george3.co.uk/george/macro/readauto?rev=1705492539&do=diff READAUTO (GIN Macro) Defined in: MACROS Used in: INCMON865 ?#54 ...[??? READAUTO SECT FILE FGN 9 DOC ?##W #MAC READAUTO ?#SG #SKI BSOKAY ?*#6 ( ?*RQ #STR %A ?B?B ( ?BR2 #DEF M1READAUTO=%A$FLAW ?C=L #DEF M2READAUTO=%A&BSETBUSE-BSETBUSE<M1READAUTO ?CQ= #DEF M3READAUTO=%A&BOBJBUSE-BOBJBUSE<M2READAUTO ?D9W #DEF M4READAUTO=%A$BOBJ$FLAW<M3READAUTO ?DPG #DEF M5READAUTO=%A$BOBJ$BSET$FLAW<M4READAUTO ?DSL ...#UNSET ERRR ?DXQ ...#DEF M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READB https://www.george3.co.uk/george/macro/readb?rev=1705492539&do=diff READB (GIN Macro) Defined in: ACCESSMACROS Used in: COPYA867, FHOBJBL860, INCMON865, MOPPM84, PERUSFIL84, RESTLIMB864 9P#4 ...[??? READB SECT FILE FGN 19 DOC 9PHW #MAC READB 9Q3G #STR %A 9QH6 ( 9R2Q LDCT 0 %A 9RGB SMO FX2 9S22 STO 0 ACOMMUNE7 9SFL DOWN PERUSFIL,16 9S^= ) 9TDW #STR %A 9TYG #SKI 9WD6 DOWN PERUSFIL,67 9WXQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READBACK https://www.george3.co.uk/george/macro/readback?rev=1705492539&do=diff READBACK (GIN Macro) Defined in: ACCESSMACROS Used in: BMOUTPUT867, DTSUBS867, EDITPT867, INCDTA865, INCEND865, INCSTART865, WORKFILE860 9HDJ ...[??? READBACK SECT FILE FGN 19 DOC 9HNB #MAC READBACK 9J82 #STR %A 9JML #SKI 9K7= DOWN PERUSFIL,83 9KLW #STR %A 9L6G ( 9LL6 LDCT 0 %A 9M5Q SMO FX2 9MKB STO 0 ACOMMUNE7 9N52 DOWN PERUSFIL,82 9NJL ) 9P4= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READDICT https://www.george3.co.uk/george/macro/readdict?rev=1705492539&do=diff READDICT (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, ALLOW84, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPTWO860, BMJLIST864, BMOUTPUT867, BQUERY84, BUDGET84, BUDGTWO84, CHEKPRIV867, DICTJOB82, ERASEA867, FHOBJIND860, FREEZE864, JDWRITE867, LIST867, LOCATE84, NEWDIR867, NEWPASSW867, PREPREAD867, PRIVLEG84, SETPR867 =TXY ...[??? READDICT SECT FILE FGN 19 DOC =W7Q #MAC READDICT =WMB #STR %A =X72 LDX 0 %A =XLL #STR %A =Y6= #SKI =YKW LDN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READDICU https://www.george3.co.uk/george/macro/readdicu?rev=1705492539&do=diff READDICU (GIN Macro) Defined in: ACCESSMACROS Used in: BEXTSJ84, LOCATE84 ?*4# ...[??? READDICU SECT FILE FGN 19 DOC ?*#6 #MAC READDICU ?*RQ #STR %A ?B?B #SKI ?BR2 LDN 0 0 ?C=L #STR %A ?CQ= LDX 0 %A ?D9W SMO FX2 ?DPG STO 0 ACOMMUNE9 ?F96 #ACC %B ?FNQ ( ?G8B LDX 0 %B ?GN2 SMO FX2 ?H7L STO 0 ACOMMUNE7 ?HM= ) ?J6W #ACC %B ?JLG #STR ?K66 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READED https://www.george3.co.uk/george/macro/readed?rev=1705492539&do=diff READED (GIN Macro) Defined in: MACROS RMD10 Used in: IDFPROP867, IDFSEG867, LOADX60, OPERA864, RAND864, SETIDF867 #^RS ...[??? READED SECT FILE FGN 16 DOC *23L # *2H= # THESE MACROS READ & WRITE UP TO ONE BUCKET OF EDS-TYPE FILES OF *32W # BUCKS1,2&4. THE BUCK PARAMETER (%B) IS NOT REPLACED. IF BUCK8 IS *3GG # USED AN ERROR LINE IS FLAGGED AT COMPILATION TIME. THE AUTHOR IS *426 # AWARE THAT THE TENSE USED IS NOT COMMONLY FOUND IN TEXT BOOKS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READHUNT https://www.george3.co.uk/george/macro/readhunt?rev=1705492539&do=diff READHUNT (GIN Macro) Defined in: MACROS HL Used in: RESTBLOK850, UNSAVE867 294J ...[??? READHUNT SECT CENT FGN 5 DOC 29#B # 29S2 # READHUNT MACRO 2=?L # READS A RECORD,FINDS THE READ BLOCK AND BRANCHES IF END OF 2=R= # FILE 2?=W #MAC READHUNT 2?QG STEP %B 2#=6 BZE 3 %A 2#PQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READIR https://www.george3.co.uk/george/macro/readir?rev=1705492539&do=diff READIR (GIN Macro) Defined in: MACROS HFD8 Used in: 574B ...[??? READIR SECT FILE FGN 22 DOC 592W #MAC READIR 59=N ...[ MEND MACRO ALLOWS NAMED USER(S) TO READ ANY DIRECTORY 59GG #STR %A%B%C%D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X, 5=26 ( 5=FQ #STR %A, 5=^B ( 5?F2 #STR :,%A 5?YL ( 5#D= #STR MANAGER,%A 5#XW ( 5#^S ...#UNS FTS2 5*3Q ...#DEF 20?=K53USEREXCP-K55USEREXCP-48 5*5N ...#UNS FTS2 5*7L ...#SKI 5*9J ...#DEF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READLEX https://www.george3.co.uk/george/macro/readlex?rev=1705492539&do=diff READLEX (GIN Macro) Defined in: MACROS RM59B Used in: CONCEPT85, NEWDIR867, TRAPPARA3, USELEX5 7=ND ...[??? READLEX SECT FILE FGN 6 DOC 7=Y= #MAC READLEX 7?CW DOWN USELEX,1 7?XG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READSAVE https://www.george3.co.uk/george/macro/readsave?rev=1705492539&do=diff READSAVE (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTRACT866, EXINTO867, EXINTWO866, SCEXEND867 *2H= # *32W [??? READSAVE *3GG # ******** *426 #MAC READSAVE *4FQ # *4^B STO 3 EWK+3(3) *5F2 LDX 0 %A *5YL CALL 1 MREADSTX2 *6D= BRN %B *6XW READSTX *7CG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READST https://www.george3.co.uk/george/macro/readst?rev=1705492539&do=diff READST (GIN Macro) Defined in: MACROS EWDAS Used in: BRADSPLT867, CHINTEG867, CLOSDEL867, CONTRACT866, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FINDFS867, FLAWMAP866, SCEX866, WRITEFIP867 #T7B # #TM2 [??? READST #W6L # ****** #WL= #MAC READST #X5W # #XKG STOZ EWK+3(3) #Y56 LDX 0 %A #YJQ CALL 1 MREADSTX2 #^4B BRN %B #^J2 R… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READSTX https://www.george3.co.uk/george/macro/readstx?rev=1705492539&do=diff READSTX (GIN Macro) Defined in: MACROS EWDAS Used in: *7X6 [??? READSTX *8BQ # ******* *8WB #MAC READSTX *9B2 # *9TL #OPT MREADSTX1=0 *=*= #SKI MREADSTX1-1 *=SW ( *?#G #FRE MREADSTX1 *?S6 #OPT MREADSTX1=1 *#?Q BRN MREADSTX3 *#RB MREADSTX4 **?2 #DEF MREADSTX2=MREADSTX4 **QL SBX 1 FX1 *B== STO 1 ETLINK(3) *BPW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READY https://www.george3.co.uk/george/macro/ready?rev=1705492539&do=diff READY (GIN Macro) Defined in: MACS MISW Used in: ADDJOB867, BACKMAP864, COMPRO867, EDIT867, EDITOR867, EDITORA865, INMOP867, INPUTMOP82, IPBSTARB867, IPBSTART867, LISTFIND867, LISTMOP867, LISTSEAR867, LOADERGO867, MESSBA, MESSBI, SAVE864, SAVEJOB865, SCEDITOR84, SETPC867, SETPRAMA867, WTSTAT867 ?KKQ #MAC READY [C.E.WILKINSON ?L5B #STR COMR,%B [INCLUDE UNLESS INSIDE COMREADY MACRO ?LK2 ( ?M4L MHUNTW 1,AMXOR,CILCB ?M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READYOFF https://www.george3.co.uk/george/macro/readyoff?rev=1705492539&do=diff READYOFF (GIN Macro) Defined in: MACRO COMPRO Used in: CIOUT8, IPBMOP867, MOPOUT85 FM94 ...[??? READYOFF SECT CENT FGN 21 DOC FMDW #MAC READYOFF [ B.L. VICKERY FMYG NGN 0 #401 FND6 #STR %A FNXQ SMO %A FPCB #STR %A FPX2 #SKI FQBL SMO FX2 FQW= ANDS 0 EXT+11 FR*W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) READYON https://www.george3.co.uk/george/macro/readyon?rev=1705492539&do=diff READYON (GIN Macro) Defined in: MACRO COMPRO Used in: CIMOP867, CIOUT8, IPBMOP867, IPBMOPB867, MOPOUT85, MULTIPLX864 FDTY ...[??? READYON SECT CENT FGN 21 DOC FF5Q # FFKB [ MACROS FOR SWITCHING B15 OF EXT+11 ON OR OFF AND ALSO FG52 [ FOR BRANCHING IF B15 IS SET FGJL # FH4= #MAC READYON [ B.L. VICKERY FHHW LDN 0 #400 FJ3G #STR %A FJH6 SMO %A FK2Q #STR %A FKGB #SKI … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REDUCELL https://www.george3.co.uk/george/macro/reducell?rev=1705492539&do=diff REDUCELL (GIN Macro) Defined in: COREMACROS Used in: CHARGESC867 F?G4 ...[??? REDUCELL SECT CENT FGN 32 DOC F?PW # F#9G # THIS MACRO PERIODICALLY MONITORS THE DENSITY OF LONGLOCK BLOCKS IN THE F#P6 # LONGLOCK AREA, AND TAKES STEPS TO INCREASE IT IF IT FALLS TOO LOW. F*8Q # PRIVATE TO CHARGESC CHAPTER F*NB # FB82 #MAC REDUCELL [ REDUCELL FBML SBS %A BLLCLOCK FC7= LDX 0 BLLCLOCK FCLW BPZ 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REFORM https://www.george3.co.uk/george/macro/reform?rev=1705492539&do=diff REFORM (GIN Macro) Defined in: DUMP-MACROS Used in: BSUNJAM867 #33D ...[??? REFORM SECT FILE FGN 65 DOC #3?= # #3NK ...#MAC REFORM #45Y ... SEGENTRY K93BSUNJAM #4H? ... BRN M3REFORM #4YL ... LDX 6 FORMULA [SPECIAL PATH #5*^ ... SBN 6 2500 [REDUCE F BY 2500 #5R# ... BPZ 6 M1REFORM #68M ... LDN 6 0 [ZERO IZE IFF NEGATIVE #6L2 ...M1REFORM BRN M2REFORM #73* ... SEGEN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REFORMUL https://www.george3.co.uk/george/macro/reformul?rev=1705492539&do=diff REFORMUL (GIN Macro) Defined in: DUMP-MACROS Used in: BSUNJAM867 #=JQ ...[??? REFORMUL SECT FILE FGN 65 DOC #=RD ...#MAC REFORMUL #?8R ...# #?L6 ... LDX 5 FORMULA ##3F ... BNZ 5 M5REFORMUL ##DS ... LDN 5 1 [SET = 1 IF WAS ZERO ##W7 ... STO 5 FORMULA #*?G ...M5REFORMUL #*NT ... LDX 5 GMTNOW [CURRENT GMY #B68 ...#SKI IFS #BHH ... MASFCB 3 [FIND MASTER'S FCB #BYW ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REINDEX https://www.george3.co.uk/george/macro/reindex?rev=1705492539&do=diff REINDEX (GIN Macro) Defined in: INDEX-MACROS Used in: BMINDEX866, RESTOREG864 2NFD ...#MAC REINDEX 2NG6 ...#STR %A 2NGS ... LDN 0 %A 2NHG ...#STR %A 2NJ8 ...#SKI 2NJW ... LDN 0 INDEXDIR 2NKJ ... SMO FX2 2NL= ... STO 0 ACOMMUNE9 2NLY ... DOWN BMINDEX,4 2NML ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELOCKLONG https://www.george3.co.uk/george/macro/relocklong?rev=1705492539&do=diff RELOCKLONG (GIN Macro) Defined in: COREMACROS Used in: 2M^G ...[??? RELOCKLONG SECT FILE FGN 1 DOC 2M^W ...[ 2N2= ...[ MACRO TO MOVE & RELOCK A LONGLOCK BLOCK 2N2L ...[ 2N32 ...#MAC RELOCKLONG 2N3B ...#SKI %A-3 2N3Q ... LDX 3 %A 2N46 ... LDX 0 AFLAG(3) 2N4G ... ANDN 0 #402 2N4W ... BZE 0 MRELOCKLONG 2N5= ... GETCORE ALOGLEN(3),1,1 2N5L ... FINDCORE 0 2N62 ... LDX 2 %A 2N6B ... LDX 3 0 2N6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELOFP https://www.george3.co.uk/george/macro/relofp?rev=1705492539&do=diff RELOFP (GIN Macro) Defined in: MACROS2JSR Used in: CONIPB8, CONMXC8, DRSTART6, EDSTART860, HLSREAD867, IPCPERI83, MTSTART864, VIPBPERI864 3^MX ...[ 3^P4 ...[??? RELOFP SECT CENT FGN 2 DOC 3^YW # THIS MACRO RELEASES A PERIPHERAL FROM AN OBJ PROG.USED FROM OFA 42DG #MAC RELOFP 42Y6 ACCSTO %A,ACOMMUNE7,FX2 43CQ DOWN RELPER,2 43XB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELPERENT https://www.george3.co.uk/george/macro/relperent?rev=1705492539&do=diff RELPERENT (GIN Macro) Defined in: MACS SPC Used in: ACCESS867, CLOSBAC867, CLOSDEL867, GETON867, NETOFLNE867, OLMTB867, ONLINEA867, OPCA867, PUTPER85, RELCOM HGHG #MAC RELPERENT HH36 #STR %A,0 HHGQ LDX 0 %A HJ2B #STR %B,1 HJG2 LDX 1 %B HJ^L LDX 2 FX2 HKF= STO 0 ACOMMUNE7(2) HKYW #STR %B HLDG STO 1 ACOMMUNE9(2) HLY6 #STR %B HMCQ #SKI HMXB STOZ ACOMMUNE9(2) HNC2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELPERI https://www.george3.co.uk/george/macro/relperi?rev=1705492539&do=diff RELPERI (GIN Macro) Defined in: COREMACROS Used in: RELPER867 MS52 ...[??? RELPERI SECT CENT FGN 53 DOC MSJL ...#MAC RELPERI MT4= ...[ USED IN KEEPCHAP SYSTEM WHEN A PERIPHERAL IS RELEASED MTHW ... BRN MRELPERI MW3G ... SMO FX2 MWH6 ... STO %A ACOMMUNE1 MX2Q ... DOWN KEEPCHAP,2 MXGB ...MRELPERI MY22 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELST https://www.george3.co.uk/george/macro/relst?rev=1705492539&do=diff RELST (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, BRADSPLT867, CHINERR867, CHINTEG867, CLOSBAC867, CLOSDEL867, CONTEND867, CONTRACT866, EXINONE867, EXINTO867, EXOPEN867, FINDFS867, FLAWMAP866, FSERR867, NEXTUNIT867, READSPEC867, RENAMEX867, REQCART866, SCEX866, SQOPEN867, WRITEFIP867 5D*= # 5DSW [??? RELST 5F#G # ***** 5FS6 #MAC RELST 5G?Q # 5GRB LDX 0 %A 5H?2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RELSTX https://www.george3.co.uk/george/macro/relstx?rev=1705492539&do=diff RELSTX (GIN Macro) Defined in: MACROS EWDAS Used in: FLAWMAP866, PERION867, SPERION867 5K9G # 5KP6 [??? RELSTX 5L8Q # ****** 5LNB #MAC RELSTX 5M82 # 5MML LDX 0 %A 5N7= LDX 2 FX2 5NLW STO 0 ACOMMUNE9(2) 5P6G MFINDSU 1,ACOMMUNE9(2) 5PL6 LADDP HUNIT(1),2 5Q5Q SMO BSUNIT2(2) 5QKB LDN 0 0 5R52 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REM https://www.george3.co.uk/george/macro/rem?rev=1705492539&do=diff REM (GIN Macro) Defined in: MACROS JSR Used in: CPOBJ6, IPBLISTB867, IPBMOP867, LPOBJ6, LPTWO7 DYBW ...# REM OBTAINS THE NUMBER OF WORDS OR CHARS LEFT IN THE AREA DYD4 ...# DEFINED BY THE LAST LOOPW,D,CH MACRO DYF= ...#MAC REM [ACC DYGD ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REMOVE https://www.george3.co.uk/george/macro/remove?rev=1705492539&do=diff REMOVE (GIN Macro) Defined in: MACROS JSR Used in: DTSTART867, IPBCCA867, SCHEDMTX867 F#Q? ...[ TO MOVE (OR MVCH) UP TO 1024 WORDS (OR CHARS) F#Q# ...#MAC REMOVE F#Q* ...#SKI %A<%B$%A F#QB ...( F#QC ...[ REVERSE ACCS IF A>B F#QD ... REMOVE %B,%A,%C,%D,%F,%E,%G F#QF ...#EXI F#QG ...) F#QH ...#STR MVCH,%D F#QJ ...#SKI F#QK ...( F#QL ... TXL %C B513 F#QM ... BCS MREMOVE1 [J IF <513 TO MOVE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RENGAGE https://www.george3.co.uk/george/macro/rengage?rev=1705492539&do=diff RENGAGE (GIN Macro) Defined in: MACS PCT Used in: CHTAB, INKS, PCTLISTA867, RMTLF864 7*BB #MAC RENGAGE 7*W2 DOWN RENGAGE,%A 7B*L BRN %B 7BT= BRN %C 7C#W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REOPEN https://www.george3.co.uk/george/macro/reopen?rev=1705492539&do=diff REOPEN (GIN Macro) Defined in: MACS IPB Used in: IPBINB867, ORELMAIN867 *FML #MAC REOPEN *G7= #MEN IPBINB *GLW #TRA K50IPBINB *H6G #STR OFF,%A *HL6 #SKI *J5Q #03600002 [%A=OFF, EXCLUDE CALL TO REOPEN S/R *JKB #STR OFF,%A *K52 #03600001 [%A NOT=OFF,INCLUDE CALL TO REOPEN *KJL #END *L4= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPALLER https://www.george3.co.uk/george/macro/repaller?rev=1705492539&do=diff REPALLER (GIN Macro) Defined in: REPLY-MACROS Used in: ARCHIVE867, ARCHIVNW83, DIRENT867, EDIT867, EDITMFO867, ENWELL867, FREEZE864, GETON867, HOWBIG867, LISTSTAR867, LOGCOM864, NETOFLNE867, NEWDIR867, RENAME864, REPERR867, SETPF867, SETPR867, TRAPCHEC867, TRAPGO864, TRAPLIST864, WHATGENS867 6XYN ...[??? REPALLER SECT FILE FGN 2 DOC 6Y8G #MAC REPALLER 6YN6 DOWN REPERR,5 6^7Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPEAT https://www.george3.co.uk/george/macro/repeat?rev=1705492539&do=diff REPEAT (GIN Macro) Defined in: IFMACS Used in: BMCNTRL866, CONSET864, DTSUBS867, FINISH867, FORMLOOP865, HLSREAD867, IDFCONF867, IPBLISTA867, IPBLISTD867, IPBMOPC867, LIBREQ866, LIBREQC867, LISTOPEN867, LISTRING864, LOAD60, MOVCART867, MULTIPLX864, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, PROFLAG83, SCEDITAR84, SCEDITOR84, SHOWCOMM864, WA864, WHATPROP865, WHATRVS867, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLG862, WLOUT865 7NKQ [ 7P5B [… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPERR https://www.george3.co.uk/george/macro/reperr?rev=1705492539&do=diff REPERR (GIN Macro) Defined in: REPLY-MACROS Used in: ASSIGN860, CANCRVX864, CHTAB, COPYA867, CREATE867, ENWELL867, INKS, LDSTART850, LISTFREE867, LISTPARS867, MACRALAS864, NEWOWN865, OLMTA85, PERFPASS864, PREPREAD867, PRINT70, RENAMAG864, RENAMDIR, RENAME864, REPERR867, RETRIEVE864, SAVE864, SCEDIT84, TRAPLIST864 6S3N ...[??? REPERR SECT FILE FGN 2 DOC 6S?G #MAC REPERR 6SR6 TESTREP OK,%A 6T=Q DOWN REPERR,1 6TQB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPERR2 https://www.george3.co.uk/george/macro/reperr2?rev=1705492539&do=diff REPERR2 (GIN Macro) Defined in: REPLY-MACROS Used in: COPYA867, COPYB867, ERASE867, HOWBIG867, INRESTAR84, LISTDIR867, MAKEVCC867, RENAME864, REPORT865, SECUREX85 6W28 ...[??? REPERR2 SECT FILE FGN 2 DOC 6W=2 #MAC REPERR2 6WPL TESTREP2 OK,%A 6X9= DOWN REPERR,1 6XNW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPETE https://www.george3.co.uk/george/macro/repete?rev=1705492539&do=diff REPETE (GIN Macro) Defined in: PMACS Used in: NPDG [??? REPETE SECT DIAG FGN 104 DOC NPXD #MAC REPETE [M.C.D. MANN NQBB [ NQT# [ NR#= [ ************ NRR8 [ * REPETE * NS=6 [ ************ NSP4 [ NT82 [ NTLY #STRING %A [SKIP IF NO MORE IDENTIFIERS NW5W ( NWJS #STRING %B NX3Q #SKI %B<JCONO$JCONO [SKIP IF PRINT STYLE INDICATOR NXGN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPLACE https://www.george3.co.uk/george/macro/replace?rev=1705492539&do=diff REPLACE (GIN Macro) Defined in: ACCESSMACROS Used in: ALLOW84, ATTRIBUT867, BEXTRA83, BEXTSJ84, BMAPTWO860, BMFIXIT864, BMJLCONV860, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEMS83, BMXEND7, BUDGET84, BUDGTWO84, CLOSEALT864, CREALEX864, ERASEA867, FHOBJ860, INCCHECK860, INCOBS867, JDWRITE867, ORELEMPT70, SYSPROP867, WLE862 32YN ...[??? REPLACE SECT FILE FGN 19 DOC 338G #MAC REPLACE 33N6 #STR %A 347Q ( 34MB LDCT 0 %A 3572 SMO FX2 35LL STO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPLACER https://www.george3.co.uk/george/macro/replacer?rev=1705492539&do=diff REPLACER (GIN Macro) Defined in: MACROS DTP Used in: REPLAC #4^G ...[??? REPLACER SECT DIAG FGN 570 DOC #59Q #MAC REPLACER [M. DRUKKER #5PB [ #692 [ #6NL [ ************** #78= [ * REPLACER * #7MW [ ************** #87G [ #8M6 [ #96Q #SKI GCOMP [INCLUDE FOR INITIAL COMPILATION ONLY #9LB #ALT %A=0?+37? #=62 #SKI GCOMP-1 [INCLUDE DURING A RESTORE #=KL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPMAC https://www.george3.co.uk/george/macro/repmac?rev=1705492539&do=diff REPMAC (GIN Macro) Defined in: MACROS DTP Used in: #4=Q [??? REPMAC SECT DIAG FGN 555 DOC #4?2 #MAC REPMAC [M.C.D. MANN #4?= [ #4?G [ #4?Q [ ************ #4#2 [ * REPMAC * #4#= [ ************ #4#G [ #4#Q [ #4*2 #UNS AMACDEVSYS [MACRO HANDLING ENHANCEMENT #4*= ( #4*D #STR :,%A [IF USER-NAME NOT SPECIFIED: #4*L ( #4*Q LOS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPMACL https://www.george3.co.uk/george/macro/repmacl?rev=1705492539&do=diff REPMACL (GIN Macro) Defined in: MACROS DTP Used in: #4F= [??? REPMACL SECT DIAG FGN 555 DOC #4FG #MAC REPMACL [M.C.D. MANN #4FQ [ #4G2 [ #4G= [ ************* #4GG [ * REPMACL * #4GQ [ ************* #4H2 [ #4H= [ #4HG #UNS AMACDEVSYS [MACRO HANDLING ENHANCEMENT #4HQ ( #4J2 #SKI ADTP<1$1 #4J= ( #4JG ! NOT ALLOWED IN THIS CONTEXT [REPMACL NOT ALLOWED … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPMON https://www.george3.co.uk/george/macro/repmon?rev=1705492539&do=diff REPMON (GIN Macro) Defined in: MACROS FIXD Used in: CLOSBAC867, CONTXCOD60, DOMONOP867, DRSTART6, EDSTART860, EXINONE867, EXTEND866, MTSTART864, OLMTE85, OPCA867, RENAMEX867 4=^Y ...[??? REPMON SECT CENT FGN 11 DOC 4?9Q # 4?PB # 4#92 #MAC REPMON [GENERATES A MONITOR EVENT 4#NL [%A=1 IF PLUGGED IN;OTHERWISE 0 OR 4*8= [ NULL 4*MW … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REPORTNEST https://www.george3.co.uk/george/macro/reportnest?rev=1705492539&do=diff REPORTNEST (GIN Macro) Defined in: MACRO COMPRO Used in: KKD6 ...[???? REPORTNEST KKXQ ...[ REPORTNEST - RESTORE TIME MACRO TO SWITCH ON OR OFF KLCB ...[ A FACILITY TO NEST THE SET OF CATEGORIES OUTPUT TO KLX2 ...[ THE MOP TERMINAL KMBL ...#MAC REPORTNEST KMW= ...#STR %A,ON KN*W ...#STR KNTG ...( KP*6 ...#MEN ALASB KPSQ ...#TRA K70ALASB KQ#B ... NULL KQS2 ...#END KQX6 ...#MEN BLOGNAL KR2= ...#TRA K70BLOGNAL KR5B ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REQRVMAX https://www.george3.co.uk/george/macro/reqrvmax?rev=1705492539&do=diff REQRVMAX (GIN Macro) Defined in: DUMP-MACROS Used in: B?=C ...[??? REQRVMAX SECT FILE FGN 65 DOC B?G9 ...[ B?^T ...[ *********************************** B#FF ...[ B#FS ...[ B#G7 ...[ THIS MACRO SETS THE MAXIMUM NO. OF TSNS OUTPUT IN THE MESSAGE "PLE B#GG ...[ B#GT ...#MAC REQRVMAX B#H8 ...#STR %A B#HH ...( B#HW ...#UNS %A B#J9 ...( B#JJ ...#UNS %A>#37777777$#37777777 B#JX ...#SKI B#K= ...( B#KK ...#MEN DTSUBS B#KY ...#TRA K100DTSUBS B#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REQSTARS https://www.george3.co.uk/george/macro/reqstars?rev=1705492539&do=diff REQSTARS (GIN Macro) Defined in: MES INTLUDES Used in: CANTDO867, MES INTLUDES 3N8B # 3NN2 # 3P7L #MAC REQSTARS 3PM= #ORD 3Q6W #INT 3QLG #DEF Z = 1?-2&#40000000$#40000000 3R66 SLINK +0 3RKQ #STR OFF,%A 3S5B ( 3SK2 STARS 8H****00** 3T4L ...MPLEASE 8HPLEA00SE 3TJ= ) 3W3W #STR ON,%A 3WHG ( 3X36 ...MPLEASE 8H****00** 3XGQ STARS 8HPLEA00SE 3Y2B ) 3YG2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REQUE https://www.george3.co.uk/george/macro/reque?rev=1705492539&do=diff REQUE (GIN Macro) Defined in: MACROS Used in: BSQ867, BSTS867 229S ...[??? REQUE SECT FILE FGN 9 DOC 22FL # 22^= ...# FRANK BLUNDELL 23DW # 24XQ #MAC REQUE 25CB #STR %A,3 25X2 LDX 3 %A 26BL #STR %B,2 26W= LDX 2 %B 27*W CALL 0 (BSTS7) 27TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RERING https://www.george3.co.uk/george/macro/rering?rev=1705492539&do=diff RERING (GIN Macro) Defined in: COREMACROS Used in: CHANFILE8, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEND867, CLOSEONE867, IDFENQS867, IDFPER867, IDFSCON867, IPBSCAN867, IPQUAKE83, LISTPROC867, PCTCON8, WFMOVE867, WORKFILE860 CWJJ ...[??? RERING SECT CENT FGN 32 DOC CWSB # CX#2 # RERINGS AN ELEMENT CXRL # CY?= #MAC RERING CYQW CHAIN %A,%B [DEFINED AS CHAIN C^=G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESET https://www.george3.co.uk/george/macro/reset?rev=1705492539&do=diff RESET (GIN Macro) Defined in: MACINTLUDES Used in: ALAS822, BSUNJAM867, CANTDO867, CHNUMCON867, CHTAB, COMPSPM, GET6, INCOBS867, INKS, IPBMOPB867, IPBSCAN867, IPBSTARB867, IPBSTART867, IPCSTART864, LOADERMT867, MESSBB, MONFIL865, MOVCART867, READBULK867, RENGAGE851, SYSPROP867 26BL #MAC RESET [M.C.D. MANN AND J.T. WIFFEN 26W= [ 27*W [ 27TG [ *********** 28*6 [ * RESET * 28SQ [ *********** 29#B [ 29S2 [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESETAP https://www.george3.co.uk/george/macro/resetap?rev=1705492539&do=diff RESETAP (GIN Macro) Defined in: ICTMACS Used in: 3DBB [??? RESETAP SECT CENT FGN DOC 3DW2 #MAC RESETAP 3DY9 ...#UNS ICTON 3F2D ...#SKI 3F4M ...( 3F6W ...! USED WHEN ICT NOT COMPILED 3F95 ...#EXI 3F?# ...) 3F*L #SKI %C>3-3 3FT= ( 3G#W !ACT PRI TOO BIG 3GSG #EXI 3H#6 ) 3HRQ #SKI %A-#77 3J?B #SKI 3JR2 ( 3K=L !BLANKET NOT ALLOWED 3KQ= #EXI 3L9W ) 3LPG #STR %B 3M96 #SKI 3MNQ ( 3N8B ...#MEN CAS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESETIPC https://www.george3.co.uk/george/macro/resetipc?rev=1705492539&do=diff RESETIPC (GIN Macro) Defined in: MACROSIPC Used in: CLOSEIPB864, IPCONE865, IPCSTART864 #Y#Y ...[??? RESETIPC SECT COMM FGN 19 DOC #YJQ #MAC RESETIPC #^4B #STR %A #^J2 '153 0 %A *23L #STR %A *2H= #SKI *32W '153 0 CPPTR(2) *3GG LDX 0 9 *426 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESOFF https://www.george3.co.uk/george/macro/resoff?rev=1705492539&do=diff RESOFF (GIN Macro) Defined in: MACROS FIXD Used in: 38#J ...[??? RESOFF SECT CENT FGN 11 DOC 38JB [ 3942 #MAC RESOFF 39HL RBC FIXED,,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T- 3=3= ,%U,%V 3=GW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESON https://www.george3.co.uk/george/macro/reson?rev=1705492539&do=diff RESON (GIN Macro) Defined in: MACROS FIXD Used in: 35WD ...[??? RESON SECT CENT FGN 11 DOC 366= [ 36KW #MAC RESON 375G RBS FIXED,,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T- 37K6 ,%U,%V 384Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESQUERY https://www.george3.co.uk/george/macro/resquery?rev=1705492539&do=diff RESQUERY (GIN Macro) Defined in: MACROSBRBS Used in: ALLOCATE867, COPYFILE867, DTREST860, OPENREL865, ORELEMPT70, RESTLIMB864, RESTOREG864 9B4N ...[??? RESQUERY SECT FILE FGN 14 DOC 9B#G #MAC RESQUERY 9BS6 LDX 0 %A 9C?Q LDX 1 BSAB 9CRB LDN 2 BMISC 9D?2 MRESQUERY 9DQL LDX 2 FPTR(2) 9F== TXU 2 CXMI 9FPW BCC %B 9G9G TXU 1 ATYPE(2) 9GP6 TXU 0 BACK1(2) 9H8Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTACTF https://www.george3.co.uk/george/macro/restactf?rev=1705492539&do=diff RESTACTF (GIN Macro) Defined in: MACROS RM57 Used in: UNSAVE867 33XY ...[??? RESTACTF SECT FILE FGN 6 DOC 347Q #MAC RESTACTF 34MB # RESTORES FILES TO A JOB BEING UNSAVED BY THE HLS 3572 DOWN SAVEFILE,2 35LL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTART https://www.george3.co.uk/george/macro/restart?rev=1705492539&do=diff RESTART (GIN Macro) Defined in: MACS SPC Used in: ABANDONA867, ACTPRI867, ALASB867, BACKMAP864, CANTDO867, COMPCHAN84, INLOOP84, INRESTAR84, IPCOND864, LISTINIT867, LISTINTC865, LOAD60, MESSAG, MESSAI, MESSF, MONFIL865, MONITOR36, MONJRNAL850, MOPOUT85, OLMTE85, PERION867, READBULK867, READLINE8, RESTART84, WSJOBS867, WSPERIS867 HRSB #MAC RESTART [C.E.WILKINSON :PERFORMS RESTARTS ON SLOW PERIPHERALS HS#2 LDX 2 FX2 [SET X2 HSRL LDX 0 CPRW1(2)… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTBLOK https://www.george3.co.uk/george/macro/restblok?rev=1705492539&do=diff RESTBLOK (GIN Macro) Defined in: MACROS HL Used in: CHTAB, INKS 3Q#4 ...[??? RESTBLOK SECT CENT FGN 5 DOC 3QLG # 3R66 # RESTBLOK MACRO 3RKQ # 3S5B #MAC RESTBLOK 3SK2 DOWN RESTBLOK,1 3T4L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTCHN https://www.george3.co.uk/george/macro/restchn?rev=1705492539&do=diff RESTCHN (GIN Macro) Defined in: MACROS HL Used in: UNSAVE867 3Y=8 ...[??? RESTCHN SECT CENT FGN 5 DOC 3YG2 # 3Y^L # RESTCHN MACRO 3^F= # RESTORES BLOCKS UNTIL NON BLOCK RECORD OR END OF FILE 3^YW # REACHED 42DG # 42Y6 #MAC RESTCHN 43CQ DOWN RESTBLOK,3 43XB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTERBIT https://www.george3.co.uk/george/macro/resterbit?rev=1705492539&do=diff RESTERBIT (GIN Macro) Defined in: MACRO COMPRO Used in: #MHN ...[??? RESTERBI SECT CENT FGN 21 DOC #MRG # #N?6 [ ERROR BIT IS SET IF ALREADY SET OR IF SAVED ERROR BIT IS SET #NQQ #MAC RESTERBIT [ RESTERBIT #P=B LDX 2 FX2 #PQ2 LDX 0 EXT+8(2) #Q9L SLL 0 1 #QP= ORS 0 EXT+8(2) #R8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTFILE https://www.george3.co.uk/george/macro/restfile?rev=1705492539&do=diff RESTFILE (GIN Macro) Defined in: DUMP-MACROS Used in: OPENREL865 3W?N ...[??? RESTFILE SECT FILE FGN 65 DOC 3WHG # THIS MACRO RESTORES A FILE FROM A MAG. TAPE TO ONLINE FILESTORE. 3X36 # IT IS USED ONLY BY OPENREL 3XGQ # NOT ONLY DOES IT COORDINATE BUT IT CLOSES THE DIRECTORY AND SETS 3Y2B # THE ACTIVITY WAITING IN STYLE #24 3YG2 # ON ENTRY IT EXPECTS THE DIRECTORY TO BE OPEN AND TO BE POSITIONED 3Y^L # BEFORE THE COPIES RECORD 3^F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTOREN https://www.george3.co.uk/george/macro/restoren?rev=1705492539&do=diff RESTOREN (GIN Macro) Defined in: RING-MACROS Used in: OPENEND865, RESTLIMB864, RESTOREG864 CFBN ...[??? RESTOREN SECT FILE FGN 20 DOC CFLG [ CG66 #MAC RESTOREN CGKQ SETMODE 0,%A CH5B SMO FX2 CHK2 STO 0 ACOMMUNE1 CJ4L ... DOWN OPENEND,5 CJJ= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTPARA https://www.george3.co.uk/george/macro/restpara?rev=1705492539&do=diff RESTPARA (GIN Macro) Defined in: MACROS WELL Used in: 5QSC ...[ 5QT8 ...[??? RESTPARA SECT CENT FGN 72 DOC 5R52 ...[ 5RJL ...[ 5S4= ...#MAC RESTPARA 5SHW ...#STR !,%A 5T3G ...( 5TH6 ...#STR %A%C%E%G 5W2Q ...( 5W7Y ...#DEF 22?=0 5W*7 ... RESTPARA !ENWELL,%A,%C,%E,%G 5WGB ...#MEN ENWELL 5X22 ...#TRA K90ENWELL 5XFL ...#STR %A 5X^= ... +23? 5YDW ...#TRA K90ENWELL+2 5YYG ...#STR %C 5^D6 ... +24? 5^XQ ...#TRA K90ENWELL+… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RESTRBLOK https://www.george3.co.uk/george/macro/restrblok?rev=1705492539&do=diff RESTRBLOK (GIN Macro) Defined in: MACROS HL Used in: UNSAVE867 3T#D ...[??? RESTRBLO SECT CENT FGN 5 DOC 3TJ= # 3W3W # RESTRBLOK MACRO 3WHG # 3X36 #MAC RESTRBLOK 3XGQ DOWN RESTBLOK,2 3Y2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RETAINAH https://www.george3.co.uk/george/macro/retainah?rev=1705492539&do=diff RETAINAH (GIN Macro) Defined in: MACS CONC Used in: 5656 #MAC RETAINAH 56JQ #STR ON,%A 574B #SKI 57J2 ( 583L #ALT AHRETAIN=1 58H= #ALT AHRETREL=1 592W ) 59GG #STR OFF,%A 5=26 #SKI 5=FQ ( 5=^B #ALT AHRETAIN=0 5?F2 #ALT AHRETREL=0 5?YL ) 5#D= #MEN IDFCLEAN 5#XW #TRA K91IDFCLEAN 5*CG LDN 0 AHRETAIN 5*X6 #END 5BBQ #MEN SETIDF 5BWB #TRA K91SETIDF 5CB2 LDN 0 AHRETAIN 5C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RETAINRV https://www.george3.co.uk/george/macro/retainrv?rev=1705492539&do=diff RETAINRV (GIN Macro) Defined in: DUMP-MACROS Used in: 229S ...[??? RETAINRV SECT FILE FGN 65 DOC 22FL # BELONGS TO BRIAN MATTHEWS & GRAHAM HA 2KH2 #MAC RETAINRV 2L2L #STR %A [SKIP FOR DEFAULT 2LG= ( 2L^W ...#SKI %A<4096$4096 [SKIP IF OUTSIDE RANGE 0-4095 2MFG ( 2M^6 #MEND CLOSEFUL 2NDQ #TRA K99CLOSEFUL 2NYB SBN 0 %A 2PD2 #END 2PXL #MEND BSPRUNE 2QC=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RETURNA https://www.george3.co.uk/george/macro/returna?rev=1705492539&do=diff RETURNA (GIN Macro) Defined in: MACROS RME10 Used in: BSUNJAM867, CHTAB, INCOBS867, INKS 2^FS ...[??? RETURNA SECT FILE FGN 4 DOC 2^PL [THIS MACRO RETURNS A TAPE TO THE POOL WHEN THE DIRECTORY IS CLOSED. THE 329= [DIRECTIRY ENTRY FOR THE TAPE IS ERASED AND :SYSTEM.SERIAL IS UPDATED. 32NW [%A = THE ADRESS OF A WORD CONTAINING THE TSN OF THE TAPE TO BE RETURNED 338G #MAC RETURNA 33N6 LDX 0 %A 347Q SMO FX2 34MB STO 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RETURNB https://www.george3.co.uk/george/macro/returnb?rev=1705492539&do=diff RETURNB (GIN Macro) Defined in: MACROS RME10 Used in: ERASEA867, RENAMDIR 35WD ...[??? RETURNB SECT FILE FGN 4 DOC 366= #MAC RETURNB 36KW DOWN RETURN,2 375G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REWIND https://www.george3.co.uk/george/macro/rewind?rev=1705492539&do=diff REWIND (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, ARCHIVE867, ARCHIVNW83, BACKMAP864, BACKROOM865, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMSAVJOB864, CHEKPRIV867, COMPRESS864, DEAD867, DICTJOB82, DTSCAN860, DTSUBS867, DTSUBSA867, DTSUBSS867, DUMP860, EDITPT867, ERASEA867, FHOBJIND860, GETDIRX860, GETFREE867, GETFREEB864, GOTO867, IDFPROP867, INCCHECK860, INCMON865, INCOBS867, INCPTRES864, INCTAPES867, INCVFCHK850, INCWAIT860, INCWRITE865, INITJOB867, INLOOP84, IPBLIST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) REWRITE https://www.george3.co.uk/george/macro/rewrite?rev=1705492539&do=diff REWRITE (GIN Macro) Defined in: ACCESSMACROS Used in: ALLOCATE867, ANTIC867, ARCHIVE867, ARCHIVNW83, BACKMASS860, BMFIXIT864, BMJLIST864, BMOUTPUT867, BSPRUNE867, CANCRVX864, CHTAB, CLOSEAB863, CLOSEMT867, CLOSFREZ867, COMPOST867, COPYFILA867, DEAD867, DICTJOB82, DSCNCT867, DTREST860, DTSUBSS867, DTWRONG867, ERASE867, ERASEA867, FHOBJDIR860, FHOBJIND860, FILESECU83, FREEZE864, INCEND865, INCEOT865, INCOBS867, INCWRITE865, INKS, JOBLIST867, JSASCAN867, JWELLONE867, LIBLOAD867, LIBMANY867, LIBQ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RG https://www.george3.co.uk/george/macro/rg?rev=1705492539&do=diff RG (GIN Macro) Defined in: MACROS WELL Used in: ATTACHC867, DRUM852, REGEN865, RESTLIMB864, TWINSET866 4=G# ...[??? RG SECT CENT FGN 72 DOC 4=Q6 [ 4?9Q [ 4?PB ...[ 4#92 ...[ # # # # # # # # # # # # # # # # # # # # # # # # # 4#NL ...[ 4*8= ...[ 4*MW ...[ NEW MACROS FOR MK 8.30 JOBWELL 4B7G ...[ 4BM6 ...[ 4C6Q ...#MAC RG 4CLB ...#STR LIVE,%A 4D62 ...( 4DKL ...#STR WELL,%A 4F5= ...( 4FJW ...! PARAMS TO RG NOT VALID 4G4G ...#EXI 4GJ6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RIGHT https://www.george3.co.uk/george/macro/right?rev=1705492539&do=diff RIGHT (GIN Macro) Defined in: MACROS PERI Used in: CHTAB, GETBAX865, GETFREE867, INKS, LISTINIT867, LISTINTC865, PMLP866, PMWHATA866, RIGHT867, SETPRAMA867, WHATPERA867 J3LB #MAC RIGHT J462 #STR %A J4KL '150 0 %A J55= #STR %A J5JW #SKI J64G '150 0 CPPTR(2) J6J6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RING2CHK https://www.george3.co.uk/george/macro/ring2chk?rev=1705492539&do=diff RING2CHK (GIN Macro) Defined in: COREMACROS Used in: ATTACHB866, IDFPER867, IPBINB867, IPBSCAN867, MOPCOM867, ONLINCL864 F4CT ...[??? RING2CHK TO REPLACE RINGTWO F4D8 ...#MAC RING2CHK F4DH ... LDN 0 %A F4DW ... BXE 0 BPTR+%A,M1RING2CHK F4F9 ... LDX 0 BPTR+%A F4FJ ... BNZ 0 M3RING2CHK F4FX ...M1RING2CHK F4G= ... LDN 0 %B F4GK ... BXE 0 BPTR+%B,M2RING2CHK F4GY ... LDX 0 BPTR+%B F4H? ... BZE 0 M2RING2CHK F4HL ...M3RING2CHK … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGACT https://www.george3.co.uk/george/macro/ringact?rev=1705492539&do=diff RINGACT (GIN Macro) Defined in: COREMACROS Used in: ASSIGN860, CIMOP867, GETNO865, INCDTA865, IPCOND864, IPCONE865, IPCSTART864, REQCART866, SCHEDJOB867 F4M# ...[??? RINGACT SECT CENT FGN 32 DOC F4X6 # F5BQ # THIS MACRO CHAINS THE ACTIVITY BLOCK SPECIFIED IN %A IN FRONT F5WB # OF THE ACTIVITY BLOCK SPECIFIED IN %B. THE ACTIVITY RING IS UPDATED F6B2 # F6TL #MAC RINGACT F7*= STO %A GEN5 F7SW STO %B GEN6 F8#G MOD LDN 1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGFILE https://www.george3.co.uk/george/macro/ringfile?rev=1705492539&do=diff RINGFILE (GIN Macro) Defined in: RING-MACROS Used in: BMINDEX866, CHANFILE8, OPENEND865, ORELEND860 #Y#Y ...[??? RINGFILE SECT FILE FGN 20 DOC #YJQ #MAC RINGFILE #^4B [ THIS MACRO PUTS THE FILE ELEMENT POINTED TO IN %A INTO THE FILE RING #^J2 [ OF THE CURRENT ACTIVITY AT THE TOP LEVEL AND UPDATES FGENERAL1 *23L #SKI %B *2H= MOD LDX 0 FILERING,%B *32W #SKI %B *3GG #SKI *426 ( *4FQ SMO FX2 *4^B LDX 0 FILERING … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGMEL https://www.george3.co.uk/george/macro/ringmel?rev=1705492539&do=diff RINGMEL (GIN Macro) Defined in: ICTMACS Used in: 555W [??? RINGMEL SECT CENT FGN DOC 55KG #MAC RINGMEL 5656 LDX 0 GMELRTAB+2 56JQ STO 0 GMEL 574B LDX 0 GMELRTAB+4 57J2 STO 0 BPROG+1 583L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGPUC https://www.george3.co.uk/george/macro/ringpuc?rev=1705492539&do=diff RINGPUC (GIN Macro) Defined in: RCTPMACS Used in: TPINS861 3*DL # THIS MACRO ENRINGS THE PUC/PCA AND DERINGS 3*Y= # THE TP/PCA ONTO/FROM THE JOB RING 3BCW #MAC RINGPUC 3BXG FINDPUC %A,1 3CC6 LDN 1 JOBRING(1) 3CWQ MOD LDN 2 JOBRING,%A 3DBB ENRING 1,2 3DW2 MOD LDN 1 JOBRING,%A 3F*L DERING 1 3FT= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGPURG https://www.george3.co.uk/george/macro/ringpurg?rev=1705492539&do=diff RINGPURG (GIN Macro) Defined in: COREMACROS Used in: IDFPER867 B9*D ...[??? RINGPURG SECT CENT FGN 32 DOC B9K= # CLEAR OUT REDUNDANT RINGS BY CLEARING LOWER FIELD OF ARINGNO B=4W #MAC RINGPURG B=JG LDN 0 0 B?46 MOD DLA 0 ARINGNO,%A B?HQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGTP https://www.george3.co.uk/george/macro/ringtp?rev=1705492539&do=diff RINGTP (GIN Macro) Defined in: RCTPMACS Used in: CHARGESC867, COMPRO867, DOMONOP867, EVENTFN, OPILLS70, PERFAIL866, PLUGIN867 38JB # THIS MACRO ENRINGS THE TP/PCA AND DERINGS 3942 # THE PUC/PCA ONTO/FROM THE JOB RING 39HL #MAC RINGTP 3=3= FINDTP %A,1 3=GW LDN 1 JOBRING(1) 3?2G MOD LDN 2 JOBRING,%A 3?G6 ENRING 1,2 3?^Q MOD LDN 1 JOBRING,%A 3#FB DERING 1 3#^2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RINGTWO https://www.george3.co.uk/george/macro/ringtwo?rev=1705492539&do=diff RINGTWO (GIN Macro) Defined in: COREMACROS Used in: ATTACHC867, CIMOP867, CONMXA85, CONMXB8, GETNO865, IPBCCD867, IPCGEO8, ONLINCL864, PCTBEGIN863, SCAN865, SENTINEL8, TWINSET866, TWINSETB866, TWINSETD866 DX?D ...[??? RINGTWO SECT CENT FGN 32 DOC DXH= # DY2W # THIS MACRO RINGS TOGETHER TWO NULL ELEMENTS DYGG # D^26 #MAC RINGTWO D^FQ LDN 0 %A D^^B STO 0 FPTR+%B F2F2 STO 0 BPTR+%B F2YL LDN 0 %B F3D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RJWTBFR https://www.george3.co.uk/george/macro/rjwtbfr?rev=1705492539&do=diff RJWTBFR (GIN Macro) Defined in: MACS PW Used in: LISTNEXT867 8CRY [??? RJWTBFR SECT COMM FGN 9 DOC 8D3Q # 8DHB # BRANCH TO %A IF REMOTE DEVICE OWNED BY CURRENT ACTIVITY IS 8F32 # WAITING TO BE WRONGED OR MOPPED OFF (OR PCT INOPERABLE) 8FGL # 8G2= #MAC RJWTBFR 8GFW SAWCE PCT,MRJWTBFR1 8G^G MHUNTW 2,AMXOR,ADCB 8HF6 LDX 0 IWAIT(2) 8HYQ LDX 2 FX2 8JDB ANDN 0 #1400 8JY2 BNZ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RMDIS https://www.george3.co.uk/george/macro/rmdis?rev=1705492539&do=diff RMDIS (GIN Macro) Defined in: MACS PCT Used in: ENGAGE867 7H9W #MAC RMDIS 7HPG SAWCEJ MLOC,MIPB 7J96 HUNT7020 1,FX2 7JNQ LDCT 0 4 7K8B ORS 0 EWAIT(1) 7KN2 BRN MLOC 7L7L MIPB MHUNTW 1,AMXOR,ADCB 7LM= LDN 0 #1000 7M6W ORS 0 IWAIT(1) 7MLG MLOC LDX 1 FX1 7N66 LDX 2 FX2 7NKQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RMTLFUNAV https://www.george3.co.uk/george/macro/rmtlfunav?rev=1705492539&do=diff RMTLFUNAV (GIN Macro) Defined in: MACS JIB Used in: #TC3 ...[ ??? RMTLFUNAV #TC4 ...[RESTORE TIME MACRO FOR LISTFILES TO REMOTE 7900 DEVICES #TC5 ...[IF ON GETPER LOOKS IF UNAVAILABLE SET IN ADEVS #TC6 ...[IF SO, NOTAV REPLY GIVEN AND WARNING MESSAGE THAT #TC7 ...[DEVICE DISENGAGED SENT TO CLUSTER CONSOLE #TC8 ...[DEFAULT IS OFF TO JUMP AROUND THIS CODE #TC9 ...[ #TC= ...#MAC RMTLFUNAV #TC? ...#STR %A,ON #TC# ...#SKIP #TC* ...( #TCB ...#MEND IDFPER #TCC .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RNORM https://www.george3.co.uk/george/macro/rnorm?rev=1705492539&do=diff RNORM (GIN Macro) Defined in: MACROS SJ Used in: BY6K ...[ BY98 ...[ BY?S ...[??? RNORM SECT FILE FGN 24 DOC BYHL #MAC RNORM [F,A B^3= #DEF 20?=23-(%A&#37) [NO OF BITS TO SHIFT RIGHT B^GW #EXI 20? [EXIT IF NO SHIFT C22G #STR %B C2G6 ( C2^Q SRL %B 20? C3FB #EXI C3^2 ) C4DL SRL 0 20? C4Y= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RNXNOCHECK https://www.george3.co.uk/george/macro/rnxnocheck?rev=1705492539&do=diff RNXNOCHECK (GIN Macro) Defined in: MACROS EWDAS Used in: SXS6 # SY?Q [??? RNXNOCHECK SYRB # ********** S^?2 [ MACRO TO ALLOW AN EXOFILE TO BE RENAMED TO AN EXISTING NAME S^QL # T2== #MAC RNXNOCHECK T2PW # T39G #MEN RENAMEX T3P6 #TRA K81RENAMEX T48Q BRN K82RENAMEX T4NB #END T582 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ROLPA https://www.george3.co.uk/george/macro/rolpa?rev=1705492539&do=diff ROLPA (GIN Macro) Defined in: MACROS BSONL Used in: ACCESS867, ANTIC867, ASSIGN860, DRUM852, IPCOPENA83, IPCOPENB83, NETOFLNE867, OLMTA85, OLMTB867, OLMTE85, ONLINCL864, ONLINEC867, SQOPEN867 22FL ...[??? ROLPA SECT FILE FGN 4 DOC 23YG [ 24D6 #MAC ROLPA 24FH ...#UNS FDRMT 24GY ...( 24J* ...#STR %A 24KQ ... LDX 2 FX2 24M7 ...#STR %A 24NJ ...#SKI 24P^ ... FPCACA 2,FX2 24RB ...) 24SR ...#UNS FDRMT 24W8 ...#SKI 24XQ FPCACA 2,FX2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RR71 https://www.george3.co.uk/george/macro/rr71?rev=1705492539&do=diff RR71 (GIN Macro) Defined in: MACROS RME10 Used in: 6K45 ...[??? RR71 SECT FILE FGN 4 DOC 6K4N ...#MAC RR71 6K5? ...#MEN TAPEWAIT 6K5W ...#TRA AMRR71 6K6F ... BRN ANRR71 6K74 ...#END 6K7M ...#STR %A,R 6K8= ...#SKI 6K8T ...( 6K9D ...#MEN REDONMT 6K=3 ...#TRA APRR71 6K=L ... +3 6K?9 ...#END 6K?S ...) 6K#C ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RTTEST https://www.george3.co.uk/george/macro/rttest?rev=1705492539&do=diff RTTEST (GIN Macro) Defined in: MACROS ICB Used in: ACCESS867, CDCIPB864, CORE867, IPCOPENA83, IPCOPENB83, ONLINCL864, ONLINEB867, ONLINEC867, REALTIME867 3?=# ...[??? RTTEST SECT CENT FGN 2 DOC 3?G6 #MAC RTTEST 3?^Q ...[ MACRO TO BRANCH TO %A IF RE ON COMMAND HAS BEEN ISSUED 3#FB #STR %B 3#^2 #SKI 3*DL ( 3*Y= #STR %C%D%E 3BCW FCJOB 1,FX2,%C,%D,%E 3BXG #STR %C%D%E 3CC6 #SKI 3CWQ FCJOB 1,FX2,PCA,CPA,OLPA 3DBB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RUNJSA https://www.george3.co.uk/george/macro/runjsa?rev=1705492539&do=diff RUNJSA (GIN Macro) Defined in: MACROS WELL Used in: EMSENTER867, ENWELL867, FINISHB867, INSTPARA867, JWUPDATE867, REGEN865, SCHDJOBA867 2R6N ...[??? RUNJSA SECT CENT FGN 72 DOC 2RBG [ 2RW6 [ 2S*Q [ 2STB #MAC RUNJSA 2T*2 BS ,JSAREQ [ JSAREQUIRED 2TDX ... FSHCODE AORB 2TJS ... MBC ,JSVIRTMOP,JSVIRTBACK,JSVIRTMOPB,JSVIRTBACKB 2TNP ... FSHSKIP 2TSL MBC ,JSVIRTMOP,JSVIRTBACK [ CLEAR V… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RUNPROG https://www.george3.co.uk/george/macro/runprog?rev=1705492539&do=diff RUNPROG (GIN Macro) Defined in: LLSMACROS Used in: ANTIC867, BCAST867, BEXTSJ84, CAFSPERI867, CHINERR867, CHTAB, CIMOP867, CLOSBAC867, CLOSDEL867, COMPCHAN84, CONTEND867, CONTINUE867, CONTRACT866, DISEVENT65, DOMONOP867, EVENTS864, EXINONE867, EXINTO867, FHOBJIND860, GETONA867, GIVE867, INKS, INMOP867, IPCOPENA83, LOADFIN860, MEXTSJ70, NEXTUNIT867, OLMTB867, OLMTC85, OLMTD65, OLMTE85, OLPODD865, OPCA867, OPCAXCOD5, OPILLS70, PERFAIL866, PERION867, PROGISH850, PROSTART867, READSPEC867, RELPER8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RV https://www.george3.co.uk/george/macro/rv?rev=1705492539&do=diff RV (GIN Macro) Defined in: DUMP-MACROS Used in: CHINERR867, COMPOST867, FORMLOOP865, INCRV850, LISTMOP867, LISTOPEN867, MTSTART864, SQOPEN867, TWINSET866 7WP4 ...[??? RV SECT FILE FGN 65 DOC 7XY6 #MAC RV 7YCQ DOWN RETRIEVE,2 7YXB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RVDIR https://www.george3.co.uk/george/macro/rvdir?rev=1705492539&do=diff RVDIR (GIN Macro) Defined in: DUMP-MACROS Used in: LISTFREE867 7^78 ...[??? RVDIR SECT FILE FGN 65 DOC 7^C2 #MAC RVDIR 7^WL DOWN RETRIEVE,3 82B= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RVHOOK https://www.george3.co.uk/george/macro/rvhook?rev=1705492539&do=diff RVHOOK (GIN Macro) Defined in: MACROS IH Used in: CLEAN867, COMPRO867, CONTINUE867 2^=2 # 2^PL #MAC RVHOOK 329= MODD LDX 0 EXT+9,%B,FX2 32NW SLL 0 11 338G BPZ 0 MRVHOOK1 [J IF NOT HOOK-STARTED 33N6 FJOCA 1,FX2 347Q SPRIVOFF JSSTART,1 [UNSET SYSTEM STARTED STATUS 34MB MRVHOOK1 3572 NGN 0 8 35LL SLC 0 12 [ #77707777 366= MODD ANDS 0… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) RVMULTRD https://www.george3.co.uk/george/macro/rvmultrd?rev=1705492539&do=diff RVMULTRD (GIN Macro) Defined in: DUMP-MACROS Used in: DS37 ...[??? RVMULTRD SECT FILE FGN 71 DOC DSGR ...[ DT2C ...[ DTG3 ...[ THIS MACRO PERSUADES SEGMENT DTSCAN TO DT^M ...[ PERFORM MULTIPLE READS RATHER THAN DWF? ...[ SKIP TO TAPE MARKS AT ALL TIMES (NOT DWYX ...[ JUST WHILST DUMPING). DXDH ...#MAC RVMULTRD DXY7 ...#MEND DTSCAN DYCR ...#TRA K98DTSCAN DYXC ... LDX 2 FX2 D^C3 ...#END D^WM ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) S1901RJE https://www.george3.co.uk/george/macro/s1901rje?rev=1705492539&do=diff S1901RJE (GIN Macro) Defined in: MACS IPB Used in: *RD6 #MAC S1901RJE [R.WEYAND *RXQ #MEN IPBLISTB *SCB #TRA K30IPBLISTB *SX2 NULL *TBL #END *TW= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAMECOMP https://www.george3.co.uk/george/macro/samecomp?rev=1705492539&do=diff SAMECOMP (GIN Macro) Defined in: MACROS DTP Used in: J=F6 ...[??? SAMECOMP SECT DIAG FGN 576 J=YQ ...#MAC SAMECOMP J?DB ...[ J?Y2 ...[ J#CL ...[ ******************* J#X= ...[ * SAMECOMP * J*BW ...[ ******************* J*WG ...[ JBB6 ...[ JBTQ ...#ALT 1?=31? JC*B ...#LIS 0 JCT2 ...#UNI JD#L ...#SKI 72? JDS= ...( JF?W ...#LIS 4 JFRG ... MUNS BEFORE JG?6 ...) JGQQ ... MENDIT %A,%B,%C,%D JH=B ...#DEF 1?=31? JHQ2 ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SARAH https://www.george3.co.uk/george/macro/sarah?rev=1705492539&do=diff SARAH (GIN Macro) Defined in: MACROS RJDG Used in: USERTYPE83 46*G ...[??? SARAH SECT CENT FGN 7 DOC 4*8= [THIS MACRO SETS UP THE SWITCHES FOR THE GET EXPRESSION ROUTINE 4*MW [ 4B7G #MAC SARAH 4BM6 +0 [STORE ZERO 4C6Q #FID 0 5 %A-%E [SET FIRST SWITCH 4CLB #FID 6 11 %B-%E [SET SECOND SWITCH 4D62 #FID 12 17 %C-%E [SET THIRD SWITCH 4DKL #FID 18 23 %D-%E … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVEACTF https://www.george3.co.uk/george/macro/saveactf?rev=1705492539&do=diff SAVEACTF (GIN Macro) Defined in: MACROS RM57 Used in: SAVEJOB865 2^^D ...[??? SAVEACTF SECT FILE FGN 6 DOC 329= #MAC SAVEACTF 32NW # SAVES THE FILES OF A JOB BEING SAVED BY THE HLS 338G DOWN SAVEFILE,1 33N6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVEBLOK https://www.george3.co.uk/george/macro/saveblok?rev=1705492539&do=diff SAVEBLOK (GIN Macro) Defined in: MACROS RJH Used in: CHTAB, INKS, SAVEJOB865 2R6N ...[??? SAVEBLOK SECT CENT FGN 71 DOC 2RBG # THIS MACRO SAVES A BLOCK IN THE FILE OPEN AT TOP LEVEL(SAVING FILE 2RW6 # IF %A=0,BLOCK SPECIFIED BY %B IS SAVED 2S*Q # =1,BLOCK FOLLOWING THAT SPECIFIED BY %B IS SAVED 2STB # IF %B=1,JOB BLOCK INDICATED 2T*2 # =2,CPAT INDICATED 2TSL #MAC SAVEBLOK 2W#= LDX 0 %C 2WRW SMO FX2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVECHN https://www.george3.co.uk/george/macro/savechn?rev=1705492539&do=diff SAVECHN (GIN Macro) Defined in: MACROS RJH Used in: SAVEJOB865 2YGJ ...[??? SAVECHN SECT CENT FGN 71 DOC 2YQB # 2^=2 # 2^PL # THIS MACRO SAVES THE ACTIVITY CHAIN FROM THE SPEC LOCKED ACT BLOCK 329= # TO THE NEXT ACT BLOCK. IF THE NEXT ACT BLOCK IS AOLPT WITH SAME 32NW # JOB NO,THIS AOLPT IS LOCKED AND ITS ADDRESS PASSED IN EXEC3. 338G # OTHERWISE THE REPLY IS ZERO. INITIALLY HOWEVER THE MACRO GEOERR'S 33N6 # IF SUCH AN AOLPT OC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVERBIT https://www.george3.co.uk/george/macro/saverbit?rev=1705492539&do=diff SAVERBIT (GIN Macro) Defined in: MACRO COMPRO Used in: COMPROA867 #RDN ...[??? SAVERBIT SECT CENT FGN 21 DOC #RNG [ SAVERBIT SAVES ERROR BIT (B0 OF EXT+8) IN A SAVE AREA #S86 [ (B1 OF EXT+8) BEFORE INTERNALLY ISSUING ANOTHER #SMQ [ COMMAND #T7B [ A PRIVATE MACRO FOR COMPRO #TM2 #MAC SAVERBIT #W6L LDX 0 EXT+8(2) #WL= SRL 0 1 #X5W STO 0 EXT+8(2) #XKG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVEST https://www.george3.co.uk/george/macro/savest?rev=1705492539&do=diff SAVEST (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, CONTRACT866, EXINTWO866, SCEXEND867 *SCB # *SX2 [??? SAVEST *TBL # ****** *TW= #MAC SAVEST *W*W # *WTG #OPT MSAVEST1=0 *X*6 #OPT MSAVEST2=0 *XSQ #STR C,%A *Y#B #SKI *YS2 CALL 0 MSAVEST3 *^?L #STR W,%A *^R= #SKI B2=W CALL 0 MSAVEST4 B2QG LDX 0 %B B3=6 #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAVETHAW https://www.george3.co.uk/george/macro/savethaw?rev=1705492539&do=diff SAVETHAW (GIN Macro) Defined in: OPEN-MACROS Used in: SAVEFILE860 2X3N ...[??? SAVETHAW SECT FILE FGN 20 DOC 2X?G [ 2XR6 #MAC SAVETHAW 2Y=Q #STR %B,0 2YQB ( 2^=2 SETMODE 0,REOPEN,ERASING 2^PL ORX 0 %B 329= ) 32NW #STR %B,0 338G #SKI 33N6 ADDMODE 0,REOPEN,ERASING 347Q OPEND %A,0 34MB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAWCE https://www.george3.co.uk/george/macro/sawce?rev=1705492539&do=diff SAWCE (GIN Macro) Defined in: MACS PW Used in: FREEPER867, GETFREEB864, IDFENQS867, PARSORT867, PREPREAD867, REDON867, SPEAK8 8S=B #MAC SAWCE [P.WARNER 8SQ2 #STR %A,CENTRAL 8T9L ( 8TP= #STR %A,IPB 8W8W LDCT 0 #100 [PCT 8WNG #STR %A,PCT 8X86 LDCT 0 #200 [IPB 8XMQ SMO FX2 8Y7B ANDX 0 JSOURCE2 8YM2 BNZ 0 %B 8^6L ) 8^L= #STR %A,CENTR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAWCEJ https://www.george3.co.uk/george/macro/sawcej?rev=1705492539&do=diff SAWCEJ (GIN Macro) Defined in: MACS PW Used in: GETFREEB864, LISTNEXT867, LISTOPEN867, OUTPER867 9F2D [??? SAWCEJ SECT COMM FGN 9 DOC 9FPW # 9G9G # 9GP6 #MAC SAWCEJ [P.WARNER 9H8Q SMO FX2 9HNB LDX 0 JSOURCE2 9HPR #UNS ANIP 9HR8 ( 9HSK #STR %D 9HW2 SAWCEJX 0,%A,%B,%C,%D 9HXC #STR %D 9HYS #SKI 9J29 SAWCEJX 0,%A,%B,%C 9J3L ) 9J53 #UNS ANIP 9J6D #SK… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAWCEJX https://www.george3.co.uk/george/macro/sawcejx?rev=1705492539&do=diff SAWCEJX (GIN Macro) Defined in: MACS PW Used in: ACCESS867, DUMMYB867, HOLDCOM867, LINECTRL864, LISTPROC867, MAKEVCC867, MOPCOM867, OUTPER867, REDON867, REPERT867, RIGHT867, SPOOL83, SWITCH867, TERM867, WHATPER867 9JXD [??? SAWCEJX SECT COMM FGN 9 DOC 9K7= # 9KLW # 9L6G #MAC SAWCEJX 9LL6 #STR %A,0 9M5Q LDX 0 %A 9M7# #UNS ANIP 9M8W ( 9M=D #STR %E 9M#2 ( 9M*J BZE 0 %B 9MC6 BPZ 0 %E 9MDN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SAWCEN https://www.george3.co.uk/george/macro/sawcen?rev=1705492539&do=diff SAWCEN (GIN Macro) Defined in: MACS PW Used in: ATTRIBUT867, COMPROA867, GETFREE867, GETFREEB864, MONFILEA864 9TDW #MAC SAWCEN [P.WARNER 9TYG #STR %A,CENTRAL 9WD6 ( 9WXQ #STR %A,IPB 9XCB LDCT 0 #100 [PCT 9XX2 #STR %A,PCT 9YBL LDCT 0 #200 [IPB 9YW= SMO FX2 9^*W ANDX 0 JSOURCE2 9^TG BZE 0 %B =2*6 ) =2SQ #STR %A,CENTRAL =3#B #SKI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SBADN https://www.george3.co.uk/george/macro/sbadn?rev=1705492539&do=diff SBADN (GIN Macro) Defined in: MACROS FIXD Used in: LOGACC863 3C7# ...[??? SBADN SECT CENT FGN 11 DOC 3CC6 # 3CWQ #MAC SBADN 3DBB #DEF MSBADN1=%B 3DW2 #SKI MSBADN1&#40000000 [INCLUDE IF MSBADN1<0 3F*L ADN %A -MSBADN1 3FT= #SKI MSBADN1&#40000000<1$1 [INCLUDE IF MSBADN1>0 OR =0 3G#W SBN %A MSBADN1 3GSG #FRE MSBADN1 3H#6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCANINIT https://www.george3.co.uk/george/macro/scaninit?rev=1705492539&do=diff SCANINIT (GIN Macro) Defined in: MACROS JSRG4 Used in: QUOTA850 DGT2 #MAC SCANINIT DH#L LDCT 1 #600 [EXTRACT LENGTH OF SEG TABLE DHS= ANDX 1 %B DJ?W LDCH 1 BTABLENS(1) DJRG ADN 1 1 DK?6 SLL 1 6 [RANGE OF PAGE NOS COVERED BY SEG TAB DKQQ SBX 1 %C DL=B BNG 1 %A [JUMP IF AREA COMPLETELY OUT OF RANGE DLQ2 SBX 1 %D DM9L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCANMORE https://www.george3.co.uk/george/macro/scanmore?rev=1705492539&do=diff SCANMORE (GIN Macro) Defined in: PMACS Used in: Y3B4 [??? SCANMORE SECT DIAG FGN 104 DOC Y3S6 #MAC SCANMORE [M.C.D. MANN Y4=8 [ Y4N= [ Y56# [ ************** Y5JB [ * SCANMORE * Y62D [ ************** Y6DG [ Y6WJ [ Y7#L [ RESTORE TIME MACRO TO CHANGE Y7QN [ GSCAN BUFFER SIZE Y88Q [ PARAMETERS:- %A -NEW GSCAN SIZE Y8LS [ Y94W #STR %A Y9GY ( Y9YG #SKI %A>4095$4095 Y=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCANPT https://www.george3.co.uk/george/macro/scanpt?rev=1705492539&do=diff SCANPT (GIN Macro) Defined in: MACROS JSRG4 Used in: LOADX60, QUOTA850, SAVEDA70 F2F2 #MAC SCANPT [J.S.RAYNER.G4 ONLY. F2YL MSCANPT1 F3D= BZE %G %B [EXIT AT END OF AREA F3XW #SKIP %A&1 F4CG ( F4X6 LDCT 1 #600 [CHECK LENGTH OF SEG TABLE F5BQ ANDX 1 %E F5WB LDCH 0 BLENCH(1) F6B2 ) F6TL LDX 1 %F F7*= SRL 1 6 [S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCBB https://www.george3.co.uk/george/macro/scbb?rev=1705492539&do=diff SCBB (GIN Macro) Defined in: MACROS LLS Used in: CONIPB8, IPCPERI83, VIPBPERI864 745G ...[??? SCBB SECT CENT FGN 3 DOC CRWL # CSB= # CT*G # CTT6 # THIS MACRO SETS THE CHANNEL BUSY BIT IN THE APPROPRIATE OLPA CW#Q # CWSB #MAC SCBB CX#2 #SKI IPCV2 CXRL ( CY?= LDBIT 2,0 CYQW #STR %A C^=G MOD ORS 0 BFSTATE,%A C^Q6 #STR %A D29Q #SKI D2PB ( D392 SMO FX2 D3NL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCFCHAP https://www.george3.co.uk/george/macro/scfchap?rev=1705492539&do=diff SCFCHAP (GIN Macro) Defined in: SCFMACROS Used in: 0000 [??? SCFCHAP SECT FILE FGN 15 DOC 3J?B #MAC SCFCHAP 3JR2 [ 3K=L [ PRINT DATA LINE(S) 3KQ= [ 3L9W #OPT Z%A=0 3LPG #SKI Z%A 3M96 #SKI 3MNQ ( 3MTY ...#UNS K%A 3N36 ...( 3N8B #FRE Z%A 3NN2 #DEF Z%A=1 3P7L #TRA K98BRADDATA 3PM= #DEF 19?+0=3? 3Q6W #ORD 3QLG #INT 3R66 XINF 12H%A 3RKQ 8H 3S5B 4HSIZE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCFDESC https://www.george3.co.uk/george/macro/scfdesc?rev=1705492539&do=diff SCFDESC (GIN Macro) Defined in: SCFMACROS Used in: 0000 [??? SCFDESC SECT FILE FGN 15 DOC 2?QG #MAC SCFDESC 2#=6 [ DEFINE THE SCF 2#PQ [ %A = NAME 2*9B [ %B = TYPE (6,9,13,25) 2*P2 [ %C = CSN OF DISC IF GIVEN 2B8L #FRL 2BN= #DEF 19?+2=1? 2C7W #LIS 0 2CMG #DEF 19?+1=0 2D76 #DEF 19?+3=33? 2DBY ...#ALT K98BRADDATA=K96BRADDATA 2DLQ #MEN BRADSPLT 2F6B #STR %A 2FL2 ( 2G5L #TRA K98BRADSPLT 2GK= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCFEND https://www.george3.co.uk/george/macro/scfend?rev=1705492539&do=diff SCFEND (GIN Macro) Defined in: SCFMACROS Used in: 0000 [??? SCFEND SECT FILE FGN 15 DOC 4PWG #MAC SCFEND 4QB6 [ 4QTQ [ TERMINATE SCF INFO 4R*B [ 4RT2 #TRA K98BRADDATA 4S#L +0 4SS= #END 4T?W #SKI 33?-(19?+3]) 4TRG ( 4W?6 #LIS 19?+2] 4WQQ ! ERRORS-SCF SYSTEM NOT SETUP! 4X=B #EXI 4XQ2 ) 4Y9L #SKI 33?-(19?+3]) 4YP= #SKI 4^8W ( 4^NG #MEN BRADSPLT 5286 #TRA K95BRADSPLT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCFISSUE https://www.george3.co.uk/george/macro/scfissue?rev=1705492539&do=diff SCFISSUE (GIN Macro) Defined in: SCFMACROS Used in: 0000 [??? SCFISSUE SECT FILE FGN 15 DOC 3#^2 #MAC SCFISSUE 3*DL [ 3*Y= [ STANDARD ICL ISSUE OF CHPTERS TO BE PLACED ON THE SCF 3BCW [ 3BXG ... SCFCHAP CHANFILE,APPEND,ANALYSE,PERFCHAP,SUICIDE 3CC6 ... SCFCHAP DEMAND,VERBCLAS,PARAM,CLOSEONE,ANALYSEA 3CWQ ... SCFCHAP MONFILE,ORELMAIN,CLOSEDIR,CLOSEND,ORELHALF 3F*L SCFCHAP OPENTWO,PERUSFIL,ORELEND,SETMON,LOCATE,OPENREL,OPENF… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCHEDULE https://www.george3.co.uk/george/macro/schedule?rev=1705492539&do=diff SCHEDULE (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867, CHTAB, HLSEVENT867, INKS 229S ...[??? SCHEDULE SECT CENT FGN 6 DOC 2*9B # NEW LLS MACROS OWNED BY RUTH PORTER 2*P2 # 2B8L [ 1. PUT BLANKET TO SLEEP 2BN= [ 2. START THE CORE UNJAMMER,IF NECESSARY 2C7W [ 3. START THE CORE SCHEDULER IF FONINTP HAS PASSED,BUT NOT IF 2CMG [ THE CORE UNJAMMER HAS BEEN STARTED 2D76 [ 4. ENTER MILL SCHEDULE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCONS https://www.george3.co.uk/george/macro/scons?rev=1705492539&do=diff SCONS (GIN Macro) Defined in: MACS PW Used in: CONSROOT867, IPBSCANB867 =G8Y [??? SCONS SECT COMM FGN 9 DOC =GDQ # =GYB # =HD2 #MAC SCONS [P.WARNER =HXL STOZ %B =JC= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SCURFUB https://www.george3.co.uk/george/macro/scurfub?rev=1705492539&do=diff SCURFUB (GIN Macro) Defined in: ACCESSMACROS Used in: LEXIFIND5, USELEX5 B3^J ...[??? SCURFUB SECT FILE FGN 19 DOC B49B # THIS MACRO SETS %A POINTING TO THE CURRENT USAGE BLOCK OF THE B4P2 # FILE OPEN AT DEPTH [%B] & JUMPS TO %C IF THE BLOCK'S NOT THERE B58L #MAC SCURFUB B5N= #STR %B B67W SFSTACK %B,1,2 B6MG #STR %B B776 #SKI B7LQ ( B86B TOPFCA 1 B8L2 PSTAC 2,1 B95L ) B9K= LDX 0 FREADB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SDADDWAIT https://www.george3.co.uk/george/macro/sdaddwait?rev=1705492539&do=diff SDADDWAIT (GIN Macro) Defined in: MACS IPB Used in: *W*W [??? SDADDWAI SECT COMM FGN 50 DOC *WTG [ *X*6 [ SPECIFIES AMOUNT TO BE ADDED TO MOPWAITTIME FOR SCEDIT JOBS *XSQ [ *Y#B #MAC SDADDWAIT *YS2 #MEN IPBMOP *^?L #TRA K53IPBMOP *^R= +60*%A+3/FONINTP B2=W #END B2QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SDSEARCH https://www.george3.co.uk/george/macro/sdsearch?rev=1705492539&do=diff SDSEARCH (GIN Macro) Defined in: MACROS RME10 Used in: CLOSEMT867, CONSERNO6, DEAD867, LIBINSEC864, LIBSEC867, MODE866, NEWOWN865, NEWPW867, RENAMDIR, RENAMEMT867, SETPC867, UNLOADMT867, XENON 7*L8 ...[??? SDSEARCH SECT FILE FGN 4 DOC 7*W2 # MACRO TO FIND AN ENTRY IN :SYSTEM.DOCUMENT 7B*L #MAC SDSEARCH 7BT= MAC1 STEP %D 7C#W #STR %A 7CSG #STR 7D#6 ( 7DRQ BNZ 3 MAC5 7F?B GEOERR 1,NOSYSDOC 7FR2 MAC5 7G=L ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SECHECK https://www.george3.co.uk/george/macro/secheck?rev=1705492539&do=diff SECHECK (GIN Macro) Defined in: MACROS RJH Used in: ATTACHC867, CONNECT867, INITJOB867, LIST867, PREPREAD867 65JY ...[??? SECHECK SECT CENT FGN 71 DOC 65SQ # THIS MACRO CHECKS THE SECURITY STATUS OF THE USER WHOSE 66#B # DICTIONARY ENTRY IS IN THE FILE/ADICTENT BLOCK SPECIFIED. 66S2 # IF THE SECURITY IS LOW OR NORMAL,CONTROL IS PASSED TO A 67?L # SPECIFIED POINT.IF HIGH,THE INSTRUCTION AFTER THE MACRO 67R= # … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SECUREX https://www.george3.co.uk/george/macro/securex?rev=1705492539&do=diff SECUREX (GIN Macro) Defined in: MACROS EWDAS Used in: CHTAB, INKS, SECUREX85, USERONE867 2S*Q # 2STB [??? SECUREX 2T*2 # ******* 2TSL #MAC SECUREX 2W#= # 2WRW #MEN FIXED 2X?G #TRA EDSQ 2XR6 #STR %A 2Y=Q #SKI 2YQB +1 2^=2 #STR %A 2^PL ( 329= #STR %A,FULL 32NW #SKI 338G ( 33N6 #40000001 347Q #DEF M1SECUREX=1 34MB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEG https://www.george3.co.uk/george/macro/seg?rev=1705492539&do=diff SEG (GIN Macro) Defined in: MACROSAJE Used in: ACCESS867, ADDICT865, ADDJOB867, ADJCHECK85, ADJUNCTS85, ALASB867, ALLOCATE867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ASTONIF867, ATTACHC867, ATTRIBUT867, BACKMAP864, BACKMASS860, BACKROOM865, BCAST867, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTATS850, BMSTREAM853, BMXEMS83, BRADDATA867, BRADEMUL867, BRADS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEGENTRY https://www.george3.co.uk/george/macro/segentry?rev=1705492539&do=diff SEGENTRY (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDON867, ABANDONA867, ACCESS867, ACTPRI867, ADDICT865, ADDJOB867, ADJCHECK85, ADJUNCTS85, ALAS822, ALASB867, ALLOCATE867, ALLOW84, ALTINST60, ANALYSE865, ANALYSEA3, ANSCOM865, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSIGN860, ASSOC867, ASTONIF867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, ATTRIBUT867, BACKMAP864, BACKMARK850, BACKMASS860, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPONE867, BMAPTAPE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEGINDEX https://www.george3.co.uk/george/macro/segindex?rev=1705492539&do=diff SEGINDEX (GIN Macro) Defined in: MACINTLUDES Used in: D4MW #MAC SEGINDEX [M.C.D. MANN AND J.T. WIFFEN D57G [ D5M6 [ D66Q [ ************** D6LB [ * SEGINDEX * D762 [ ************** D7KL [ D85= [ D8JW [ SEGINDEX D94G [ D9J6 [ WILL PRODUCE AN INDEX OF SEGMENTS IN ALPHABETICAL ORDER WITH THEIR D=3Q [ PAGE NUMBERS IN THE LISTING, PROVIDED THAT D=HB [ 1 35?+0] IS AT LEAST 6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEGMES https://www.george3.co.uk/george/macro/segmes?rev=1705492539&do=diff SEGMES (GIN Macro) Defined in: MACROSAJE Used in: 5#XW ...[??? SEGMES SECT DIAG FGN 18 5*CG ...[ 5*X6 ...[ MACRO SEGMES 5BBQ ...[ 5BWB ...[ 5CB2 ...[ THIS MACRO SETS BITS IN GMESBITS 5CTL ...[ IF MES ITEMS ARE INCLUDED 5D*= ...[ 5DSW ...#MAC SEGMES 5F#G ...#DEF 21? = 0 5FS6 ...#STR G3,%A 5G?Q ...#STR 5GRB ...#DEF 21? = 1 5H?2 ...#STR G5,%A 5HQL ...#STR 5J== ...#DEF 21? = 1 5JPW ...#STR G4,%A 5K9G ...#STR 5KP6 ...#DEF 21? = 1 5L… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEGNAMES https://www.george3.co.uk/george/macro/segnames?rev=1705492539&do=diff SEGNAMES (GIN Macro) Defined in: MACINTLUDES Used in: H^8= [??? SEGNAMES SECT DIAG FGN 9 DOC H^MW #MAC SEGNAMES [M.C.D. MANN AND J.T. WIFFEN J27G [ J2M6 [ J36Q [ ************** J3LB [ * SEGNAMES * J462 [ ************** J4KL [ J55= [ J5JW [ WILL OUTPUT TO PRINTER AND/OR TAPE PUNCH A LIST OF SEGMENTS WITH J64G [ THE CORRESPONDING VALUES OF KSEGMENT. J6J6 [ PRINTER FORMAT DISPLACED… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SEMAPHORE https://www.george3.co.uk/george/macro/semaphore?rev=1705492539&do=diff SEMAPHORE (GIN Macro) Defined in: COMPMACMOON Used in: COMPS ACTBLK, COMPS SAR9, COMPS WELL, COMPSDUMP, FILECOMPS 2LQ4 ...[??? SEMAPHOR SECT FILE FGN 9 DOC 2MFG #MAC SEMAPHORE [S,I1,I2,A CHAR 2M^6 #DEF %A=%B 2NDQ #DEF %A1=%C 2NYB #STR %E 2PD2 ( 2PXL #DEF %A2=#400:0+%D [LONGSET B0 %A2 SET 2QC= #EXI 2QWW ) 2RBG #DEF %A2=%D 2RW6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SENDPARS https://www.george3.co.uk/george/macro/sendpars?rev=1705492539&do=diff SENDPARS (GIN Macro) Defined in: MACROS MSYS Used in: PROCONTX867 ?3RD ...[??? SENDPARS SECT CENT FGN 56 DOC ?43= # ?43Q ...# ?44= ...# ?44Q ...# HERE FOLLOWS SENDPARS **** SENDPARS ?45= ...# IT IS USED TO CONVEY PARAMETERS FROM ?45Q ...# ONE ACTIVITY TO ANOTHER ?46= ...# ?46Q ...#MAC SENDPARS ?47= ... UNSETBIT 2,CLONG1(%A) ?47Q ... LDX 2 ACTRING(%B) ?48= ... SBN 2 ACTRING ?48Q ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETALLOC https://www.george3.co.uk/george/macro/setalloc?rev=1705492539&do=diff SETALLOC (GIN Macro) Defined in: MACROS PERI Used in: BRADSPLT867, CAFSCTRL866, DEAD867, DRUM852, DUMMYB867, ENGAGE867, FINDFS867, FREEPER867, GETFREE867, IPBSTARB867, IPBSTART867, LABEL866, LIBINSEC864, LIBMANY867, LIBREQC867, LIBSEC867, LISTDEV866, LISTEXCP865, MODE866, MOPCOM867, MOPCOMB865, NEWOWN865, NEWPW867, ONLINEB867, ONLINEC867, REDON867, RETURNIT867, RIGHT867, SCAN865, SETUP867, SETUPA867, TAPERING867, UNLOAD7, UNLOADMT867, XENON J=F6 #MAC SETALLOC J=YQ LDN 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETBGROP https://www.george3.co.uk/george/macro/setbgrop?rev=1705492539&do=diff SETBGROP (GIN Macro) Defined in: MACROS PERI Used in: GROPE867, SWITCH867 JCT2 #MAC SETBGROP JD#L LDN 0 32 JDS= MODD ORS 0 JPSTATE,%A,CPPTR(2) JF?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETBIT https://www.george3.co.uk/george/macro/setbit?rev=1705492539&do=diff SETBIT (GIN Macro) Defined in: MACROS JSR Used in: BMINDEX866, CHARGESC867, CLOSEAB863, CORESHED861, DTSTART867, DTSUBSA867, DTSUBSS867, EVENTS864, GETWORD867, INCEND865, INCPTRES864, INCSTART865, INCTAPES867, INCVFCHK850, INSTPARA867, LOADERR70, MTOBJ864, MTSTART864, PLUGIN867, PMFS85, PREPREAD867, PRINT70, REWRITE864, USERONE867, USEROPEN867, USERSTRM867 8S^S ...[??? SETBIT SECT CENT FGN 9 DOC 8T9L # 8TP= # THIS MACRO SETS BIT %A OF WORD %B 8W8W # 8WNG #MAC S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETCMXSK https://www.george3.co.uk/george/macro/setcmxsk?rev=1705492539&do=diff SETCMXSK (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECTA867, DSCNCT867, LOGOUT867 L^BB ...[???? SETCMXSK L^W2 ...[ MACRO TO SET CMXMSK IN EACH CPB/CALAS FOR AN M2*L ...[ ACTIVITY TO AMXMSK M2T= ...[ ONLY TO BE USED BY CONNECT & DSCNCT WHEN JOB TYPE CHANGES M3#W ...[ FROM BACK TO MOP OR MOP TO BACK. FOR JOBS CHANGING M3SG ...[ TO BACK AMXMSK MUST ALREADY HAVE BEEN SET TO ZERO M4#6 ...[ AND FO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETCODE https://www.george3.co.uk/george/macro/setcode?rev=1705492539&do=diff SETCODE (GIN Macro) Defined in: MACROS PERI Used in: ENGAGE867 JHQ2 #MAC SETCODE JJ9L #STR %A JJP= SMO %A JK8W #STR %A JKNG #SKI JL86 SMO CPPTR(2) JLMQ LDX 1 JADDP JM7B #STR READER,%B JMM2 ( JN6L #STR %C JNL= #SKI JP5W ( JPKG LDCT 0 #200 JQ56 ERS 0 APCODET(1) JQJQ ) JR4B #STR %C,1900 JRJ2 ( JS3L LDCT 0 #200 JSH= STO 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETCOMER https://www.george3.co.uk/george/macro/setcomer?rev=1705492539&do=diff SETCOMER (GIN Macro) Defined in: MACROS MACB Used in: EDITER867, MACDEF8 835N ...[??? SETCOMER SECT CENT FGN 2 DOC 83*G #MAC SETCOMER [SETCOMER - INDICATE TO THE COMMAND 83T6 LDCT 0 #400 [PROCESSOR THAT AN ERROR HAS OCCURED. 84#Q ORS 0 EXT+8(2) [BIT 0 OF EXT+8 INDICATES THIS. 84SB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETDRM https://www.george3.co.uk/george/macro/setdrm?rev=1705492539&do=diff SETDRM (GIN Macro) Defined in: MACROS PERI Used in: ONLINEC867, OPCA867 K#7= #MAC SETDRM K#LW LDN 0 4 K*6G MODD ORS 0 JK52E,%A,CPPTR(2) K*L6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETELOG https://www.george3.co.uk/george/macro/setelog?rev=1705492539&do=diff SETELOG (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, IPBLOG866, RELPER867, UNLOADMT867 KFH6 #MAC SETELOG KG2Q LDX 0 %B KGGB ADN 0 12 KH22 SETUPCORE 0,2,ADATA,ELOUT KHFL STOZ A1(2) KH^= LDN 0 A1(2) KJDW LDN 1 A1+1(2) KJYG SMO %B KKD6 MOVE 0 11 KKXQ LDX 0 %B KLCB ADN 0 11 KLX2 STO 0 ELDMECT(2) KMBL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETENTRY https://www.george3.co.uk/george/macro/setentry?rev=1705492539&do=diff SETENTRY (GIN Macro) Defined in: MACROS LEF Used in: BMSTREAM853, LISTEND867, LISTEXCP865, LISTFREE867, LISTINIT867, LISTINTC865, LISTNEXT867, LISTPARS867, LISTPREP865, LISTPROC867, LISTSEAR867, LISTTPCP867 G2Y4 ...[??? SETENTRY SECT DEVT FGN 2 DOC G37W #MAC SETENTRY G3MG [ THIS MACRO SETS UP %C ENTRIES TO SEGMENT %A G476 [ EACH COMPILES AS A BRANCH TO %BN : 0<N<C+1 G4LQ #SKI %C G56B SEGENTRY K1%A,%B1 G5L2 #SKI %C>1-1 G65L SEGENTRY K2%A,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETERR https://www.george3.co.uk/george/macro/seterr?rev=1705492539&do=diff SETERR (GIN Macro) Defined in: MACRO COMPRO Used in: INLOOP84, INPCT84, INRESTAR84, READBULK867 8QHN ...[??? SETERR SECT CENT FGN 21 DOC 8QRG #MAC SETERR 8R?6 LDX 0 GSIGN 8RQQ SMO FX2 8S=B ORS 0 EXT+8 8SQ2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETHKPCA https://www.george3.co.uk/george/macro/sethkpca?rev=1705492539&do=diff SETHKPCA (GIN Macro) Defined in: MACROS IH Used in: DOMONOP867 48#2 # 48RL #MAC SETHKPCA 49?= FCAPCA 2 49QW LDN 0 4 4==G SLC 0 12 [ #00040000 4=Q6 ORS 0 EXT+9(2) 4?9Q LDX 2 FX2 4?PB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETHOLD https://www.george3.co.uk/george/macro/sethold?rev=1705492539&do=diff SETHOLD (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, HOLDCOM867, SWITCH867 KWP2 #MAC SETHOLD KX8L LDN 0 8 KXN= MODD ORS 0 JK52E,%A,CPPTR(2) KY7W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETHOOK https://www.george3.co.uk/george/macro/sethook?rev=1705492539&do=diff SETHOOK (GIN Macro) Defined in: MACROS IH Used in: COMHOOK867, DOMONOP867 2CMG # 2D76 #MAC SETHOOK 2DLQ LDN 0 4 2F6B SLC 0 12 2FL2 MODD ORS 0 EXT+9,%A,FX2 2G5L MODD LDX 0 EXT+9,%A,FX2 2GK= SLL 0 11 2H4W BPZ 0 MSETHOOK1 [ J IF NOT HOOK-STARTED 2HJG FJOCA 1,FX2 2J46 SPRIVON JSSTART,1 2JHQ LDX 1 FX1 2K3B MSETHOOK1 2KH2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETHSTAR https://www.george3.co.uk/george/macro/sethstar?rev=1705492539&do=diff SETHSTAR (GIN Macro) Defined in: MACROS IH Used in: COMHOOK867 3?^Q # 3#FB #MAC SETHSTAR 3#^2 LDN 0 1 3*DL SLC 0 12 3*Y= MODD ORS 0 EXT+9,%A,FX2 3BCW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETIDENT https://www.george3.co.uk/george/macro/setident?rev=1705492539&do=diff SETIDENT (GIN Macro) Defined in: MACS JIB Used in: ATTACHB866, ATTACHC867, CDCIPB864, DETACH867, IPBCCA867, IPBCCD867, IPBCONS867, ONLINCL864 #W89 ...[ REINITIALISE IDENT WHICH HAS BEEN USED BY CONCEPTUAL ROUTINES #W8X ...#MAC SETIDENT #W9K ...#STR %B #W=? ...#SKI #W=^ ...( #W?M ...#STR %A #W#* ...( #W*3 ... LDX 0 A1+IDADIN(%A) #W*P ... LDX 1 A1+IDNUM(%A) #WBC ...) #WC5 ...#STR %A #WCR ...#SKI #WDF ...( #WF7 ... LDX 0 A1+IDADIN(2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETILLMS https://www.george3.co.uk/george/macro/setillms?rev=1705492539&do=diff SETILLMS (GIN Macro) Defined in: MACROS PERI Used in: GROPE867 L44W #MAC SETILLMS L4JG LDN 0 1024 L546 MODD ORS 0 JPSTATE,%A,CPPTR(2) L5HQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETJOBLMT https://www.george3.co.uk/george/macro/setjoblmt?rev=1705492539&do=diff SETJOBLMT (GIN Macro) Defined in: MACROS PERI Used in: ADDJOB867 L9DQ #MAC SETJOBLMT L9YB LDN 0 8 L=D2 MODD ORS 0 JPSTATE,%A,CPPTR(2) L=XL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETJWELL https://www.george3.co.uk/george/macro/setjwell?rev=1705492539&do=diff SETJWELL (GIN Macro) Defined in: MACROS WELL Used in: BMJLIST864 2CCN ...[??? SETJWELL SECT CENT FGN 72 DOC 2CMG [ 2D76 [ 2DLQ [ SETUP JWELL BLOCK 2F6B [ 2FL2 [ 2G5L #MAC SETJWELL [ USED BY BMJLIST 2G*D ... FSHSKIP 2GK= SETNCORE 2*JWENTRY+1,3,JWELL 2GMT ... FSHCODE AORB 2GQD ...( 2GT3 ... BRN M2SETJWELL 2GXL ...M1SETJWELL 2H29 ...) 2H4W LDN 4 A1(3) 2HJG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETMODE https://www.george3.co.uk/george/macro/setmode?rev=1705492539&do=diff SETMODE (GIN Macro) Defined in: OPEN-MACROS Used in: ADJCHECK85, ASSIGN860, BACKMASS860, CLOSEONE867, COMPOST867, COPYA867, COPYB867, COPYFILE867, CREATE867, DEWELL867, DICTWELL867, DROBJ864, EDIT867, EDSTART860, ERASEA867, IDFPROP867, INSTPARA867, LIBREQ866, LISTDIR867, LISTPARS867, LISTPROC867, OPENFILE867, OPENTWO867, OPENWORK866, ORELEND860, PERFPASS864, REGEN865, REPERR867, SAVE864, SETJD867, SYSPROP867, TRAPPARA3, USERDIR842, USERONE867, USEROPEN867, USERSTRM867, USERTYPE83 6W^D ...[… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETMODEQ https://www.george3.co.uk/george/macro/setmodeq?rev=1705492539&do=diff SETMODEQ (GIN Macro) Defined in: MACROS PERI Used in: MODE866, MODEA65, RIGHT867, TAPEWAIT65 LBSL #MAC SETMODEQ LC#= LDCT 0 #770 LCRW MODD ANDX 0 JK52E,%A,CPPTR(2) LD?G MODD ERS 0 JK52E,%A,CPPTR(2) LDR6 LDN 0 #300 LF=Q MODD ANDX 0 JK52B,%A,CPPTR(2) LFQB MODD ERS 0 JK52B,%A,CPPTR(2) LG=2 LDX 0 %B LGPL SLL 0 18 LH9= MODD ORS 0 JK52E,%A,CPPTR(2) LHNW SRL 0 16 LJ8G A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETMTONL https://www.george3.co.uk/george/macro/setmtonl?rev=1705492539&do=diff SETMTONL (GIN Macro) Defined in: MACROS RME10 Used in: CONTXCOD60 6^CJ ...[??? SETMTONL SECT FILE FGN 4 DOC 6^MB #MAC SETMTONL 7272 MTPTR %A,%C 72LL DFJUMPN %C,REW,M0SET 736= STEPBAC1 ,FX2 73KW CAPCA 745G M1SET DFJUMPN %C,REW,M2SET 74K6 LGEOG %C,1 754Q LONGSET AREWT,M3SET,1 75JB LONGSTOP %D 7642 BRN M1SET 76HL M3SET GEOERR 1,WTSTYLE 773= M2SET RUNPROG 77GW M0… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETNCORE https://www.george3.co.uk/george/macro/setncore?rev=1705492539&do=diff SETNCORE (GIN Macro) Defined in: COREMACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ADJUNCTS85, ALLOCATE867, ANTIC867, APPEND864, ARCHIVE867, ARCHIVNW83, ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, BACKMAP864, BACKMARK850, BACKMASS860, BACKROOM865, BEXTRA83, BEXTSJ84, BLOGNAL865, BMAPDIR865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMPRCHEK860, BMQUEST866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEMS83, BMXEND7, BRADDATA867, BRADEMUL867, BRADS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETPARAM https://www.george3.co.uk/george/macro/setparam?rev=1705492539&do=diff SETPARAM (GIN Macro) Defined in: MACROS HL Used in: ALAS822, CHTAB, INKS 4*D4 ...[??? SETPARAM SECT CENT FGN 5 DOC 4*MW # 4B7G # SETPARAM MACRO.USED BY THE COMMAND PROCESSOR WHEN DEALING WITH 4BM6 # SETPARAM EXPRESSIONS 4C6Q # 4CLB #MAC SETPARAM 4D62 DOWN SETPARAM,2 4DKL BRN %A 4F5= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETPLEN https://www.george3.co.uk/george/macro/setplen?rev=1705492539&do=diff SETPLEN (GIN Macro) Defined in: MACRO COMPRO Used in: K9P6 ...[???? SETPLEN K=8Q ...[ SETPLEN - RESTORE TIME MACRO TO SWITCH OFF OR ON THE K=NB ...[ FACILITY TO SPECIFY LENGTH(ENCL STRING) AS THE 2ND K?82 ...[ PARAMETER TO A SETPARAM COMMAND K?ML ...#MAC SETPLEN K#7= ...#STR OFF,%A K#LW ...#STR K*6G ...( K*L6 ...#MEN SETPARAM KB5Q ...#TRA K90SETPARAM KBKB ... BRN K91SETPARAM KC52 ...#END KCJL ...#EXI KD4= ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETPROP https://www.george3.co.uk/george/macro/setprop?rev=1705492539&do=diff SETPROP (GIN Macro) Defined in: MACROS PERI Used in: LISTOPEN867 LP4Q #MAC SETPROP LPJB DOWN GETFREE,3 LQ42 BRN %A LQHL BRN %B LR3= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETRCTP https://www.george3.co.uk/george/macro/setrctp?rev=1705492539&do=diff SETRCTP (GIN Macro) Defined in: RCTPMACS Used in: TPINS861 3KQ= # THIS MACRO SETS CURRENT JOB TO THAT OF RCTP TYPE 3L9W # AND INCREMENTS COUNT OF EXTANT RCTP JOBS. 3LPG #MAC SETRCTP 3M96 LDN 0 1 3MNQ ADS 0 CTRCTP 3N8B FJOPCA 1,%A 3NN2 LDCT 0 #200 3P7L ORS 0 JMISC(1) 3PM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETREP https://www.george3.co.uk/george/macro/setrep?rev=1705492539&do=diff SETREP (GIN Macro) Defined in: REPLY-MACROS Used in: ADJCHECK85, ADJUNCTS85, ALAS822, ANALYSE865, ANALYSEA3, ANTIC867, APPEND864, BCAST867, BEXTSJ84, BMINDEX866, BMXEND7, BUDGONE83, CAFSPERI867, CHEKPRIV867, CHNUMCON867, COMMFILE82, DECODE860, DIRENT867, DTREST860, EDIT867, ERASEA867, EXOPEN867, FFFNORM7, FHLIST867, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, FINDRUM866, FORMLOOP865, GET6, GETFREE867, GETFREEB864, GETWORD867, IDFSCON867, INCRCUBS860, INDEX85, INSERT6, INSERTBL6, INSERTFR6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETREP2 https://www.george3.co.uk/george/macro/setrep2?rev=1705492539&do=diff SETREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: BMINDEX866, BMSJRNL866, BUDGONE83, CHEKPRIV867, COMPOST867, DICTJOB82, DTREST860, ERASEA867, FFFNORM7, GETDIR860, GETDIRX860, GETFREE867, GETFREEB864, IDFOFF867, INCRCUBS860, INCRCUBX860, LISTOPEN867, LOCATE84, LPTWO7, MAKEFILE863, MTCHECK860, MTCODE864, NEWDIR867, OPENREL865, OPENWAIT867, OPENWORK866, ORELHALF82, ORELMAIN867, RAND864, RENAME864, SCHEDENX860, SCHEDMTA860, TPOBJ867, TRANSFOR1, TRAPGO864, TRAPLIST864, USELEX5, USERDIR842, US… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETRPERR https://www.george3.co.uk/george/macro/setrperr?rev=1705492539&do=diff SETRPERR (GIN Macro) Defined in: MACROS GEM Used in: 5RJL ...[ 5S4= ...[??? SETRPERR SECT CENT 5SHW ...[THIS MACRO REPORTS ERRORS IN PRESETRP 5T3G ...[ 5TH6 ...#MAC SETRPERR 5W2Q ...#CON PRESETRP - PARAMETER ERROR 5WGB ...! PRESETRP - PARAMETER ERROR 5X22 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETRPMEN https://www.george3.co.uk/george/macro/setrpmen?rev=1705492539&do=diff SETRPMEN (GIN Macro) Defined in: MACROS GEM Used in: 5=^B ...[ 5?F2 ...[??? SETRPMEN SECT CENT 5?YL ...[MENDS CALCULATED MASK INTO SEGMENTS 5#D= ...[ 5#XW ...#MAC SETRPMEN 5*CG ...#MEN BLOGNAL 5*X6 ...#TRA K25BLOGNAL 5BBQ ... +AMXMSKPR 5BWB ...#END 5CB2 ...#MEN CIMOP 5CTL ...#TRA K25CIMOP 5D*= ... +AMXMSKPR 5DSW ...#END 5F#G ...#MEN CONNECTA 5FS6 ...#TRA K25CONNECTA 5G?Q ... +AMXMSKPR 5GRB ...#END 5H?2 ...#MEN DSCNCT 5HQL ...#TRA K25D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETRPMSK https://www.george3.co.uk/george/macro/setrpmsk?rev=1705492539&do=diff SETRPMSK (GIN Macro) Defined in: MACROS GEM Used in: 52MQ ...[ 537B ...[ 53M2 ...[??? PRESETRP SECT CENT 546L ...[RESTORE-TIME MACRO TO SET INITIAL REPORTING LEVEL 54L= ...[THERE ARE THREE SUPPLEMENTARY MACROS WHICH ARE USED 555W ...[BY PRESETRP; THESE ARE SETRPMSK, SETRPMEN AND SETRPERR 55KG ...[ 5656 ...[??? SETRPMSK SECT CENT 56JQ ...[SETS UP A REPORTING MASK 574B ...[ 57J2 ...#MAC SETRPMSK 583L ...#STR %A 58H= ...( 592W ...#DEF 20?=20?^(1@L(23-CB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETRTP https://www.george3.co.uk/george/macro/setrtp?rev=1705492539&do=diff SETRTP (GIN Macro) Defined in: MACROS LLS Used in: REALTIME867 3HRQ #MAC SETRTP 3J?B #STR %A,1 3JR2 LDX 1 %A 3K=L FLIPS JCLASS(1),,14 3KQ= FPCAJO 1 3L9W ADX 1 %B 3LPG LDX 0 GSIGN 3M96 SMO %B 3MNQ ORS 0 ACR1(1) 3N8B LDX 1 FX1 3NN2 LDX 2 FX2 3P7L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETSWOVER https://www.george3.co.uk/george/macro/setswover?rev=1705492539&do=diff SETSWOVER (GIN Macro) Defined in: MACROS PERI Used in: GROPE867 LWY= #MAC SETSWOVER LXCW LDN 0 2048 LXXG MODD ORS 0 JPSTATE,%A,CPPTR(2) LYC6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETUPCORE https://www.george3.co.uk/george/macro/setupcore?rev=1705492539&do=diff SETUPCORE (GIN Macro) Defined in: COREMACROS Used in: ALAS822, ALLOW84, ASSOC867, ATTRIBUT867, BACKROOM865, BCAST867, BEXTSJ84, BLOGNAL865, BMINDEX866, BSBLFAIL867, BSUJSTAT867, BSUNJAM867, BUDGET84, CDCIPB864, CDUM866, CHINTEG867, CIMOP867, CLOSEAB863, CLOSEFUL867, COMPOST867, CONIPB8, CONMXA85, CONSROOT867, CONTRACT866, COPYB867, CORE867, CPOBJ6, CREATE867, CROBJ6, DELCOM5, DELCON867, DEWELL867, DISPCOM867, DOIHEMS867, DROBJ864, DTQUEST860, DTREST860, DTSUBS867, DTSUBSS867, DUMP860, EDITER8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETUPFCA https://www.george3.co.uk/george/macro/setupfca?rev=1705492539&do=diff SETUPFCA (GIN Macro) Defined in: RING-MACROS Used in: CLOSEONE867, ORELEND860 GNX8 ...[??? SETUPFCA SECT FILE FGN 20 DOC GP72 [ GPLL #MAC SETUPFCA GQ6= JBC M1SETUPFCA,%B,BFLEN GQKW BS %B,BFLENW GR5G TRACEIF K6OPEN,99,299,FLOC1(%B),WT ALST GRK6 COOR3 ISTACWT [AND WAIT GS4Q BRN %C GSJB M1SETUPFCA GT42 BS %B,BFLEN GTHL LDX %A FPTR(%B) GW3= ALTL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETUPMODE https://www.george3.co.uk/george/macro/setupmode?rev=1705492539&do=diff SETUPMODE (GIN Macro) Defined in: OPEN-MACROS Used in: COMPCHAN84, COPYA867, COPYB867, ENWELL867, GETONA867, HOWBIG867, LIBINSEC864, LIBREQ866, LIBREQC867, LIBSEC867, MACRALAS864, OLMTA85, OLMTC85, PREPREAD867, USERSTRM867 76RD ...[??? SETUPMOD SECT FILE FGN 20 DOC 773= # 77GW #MAC SETUPMODE 782G #DEF M1SETMODE=A%C^A%D^A%E^A%F^A%G^A%H^A%I^A%J 78G6 #DEF M2SET=E%C^E%D^E%E^E%F^E%G^E%H^E%I^E%J 7?XG #STR %A 7#C6 #SKI 7#WQ ( 7*BB #SKI M1SETMODE 7… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETUPTAB https://www.george3.co.uk/george/macro/setuptab?rev=1705492539&do=diff SETUPTAB (GIN Macro) Defined in: CLOSE-MACROS Used in: DEAD867, DIRENT867, ERASE867, FHOBJDIR860, GETDIR860, GETDIRX860, INCCHECK860, LIBLOAD867, RENAMDIR, RENAMEMT867, RETURN867, TRAPGO864, USERDIR842, WLD864 9H6J ...[??? SETUPTAB SECT FILE FGN 11 DOC 9H6X ...# 9JML #MAC SETUPTAB 9K7= SETNCORE 2,1,FILE,FTAB 9KLW STOZ FTREAD(1) 9L6G STOZ FTAPP(1) 9LL6 LDX 1 FX1 9M5Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETWTBSW https://www.george3.co.uk/george/macro/setwtbsw?rev=1705492539&do=diff SETWTBSW (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867 M4#6 #MAC SETWTBSW M4RQ LDN 0 64 M5?B MODD ORS 0 JPSTATE,%A,CPPTR(2) M5R2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETWTBWR https://www.george3.co.uk/george/macro/setwtbwr?rev=1705492539&do=diff SETWTBWR (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867, ENGAGE867, FREEPER867, LISTDEV866, LISTINTC865, RIGHT867 M9N2 #MAC SETWTBWR M=7L LDN 0 128 M=M= MODD ORS 0 JPSTATE,%A,CPPTR(2) M?6W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SETXCORE https://www.george3.co.uk/george/macro/setxcore?rev=1705492539&do=diff SETXCORE (GIN Macro) Defined in: COREMACROS Used in: IPBSTARB867, IPBSTART867, MOPCOMB865, MOPSTART865, MULTCOMM867, ONLINCL864, SETPR867 DG5J ...[??? SETXCORE SECT CENT FGN 32 DOC DG*B # DGT2 # VERSION OF SETNCORE WITH BOTH %A AND %F X PARAMETERS DH#L # DHS= #MAC SETXCORE DJ?W GETCOREX %A,1,%E,%F,%G DJRG FINDCORE %B DK?6 NAME %B,%C,%D DKQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFC https://www.george3.co.uk/george/macro/sfc?rev=1705492539&do=diff SFC (GIN Macro) Defined in: MACROS SFC Used in: 2H4W #MAC SFC 2HJG #STR %A,ON 2J46 #SKI 2JHQ ( 2JW7 ... CASRDSPLIT 64,64 2K8J ... SFC 128,256,512,576,768,960,1024 2KH2 #EXI 2L2L ) 2LG= #STR %A,OFF 2L^W #SKI 2MFG ( 2M^6 [MENDS TO SWITCH OFF 2NDQ PMMEND FREE,0 2NFP ... PMMEND FTEM,0 2NGN ...#SKI ISFCON [ONLY DO THIS IF CODE INCLUDED 2NJL ...( 2NJS ...#MEN COREALLF 2NK2 ...#TRA K50COR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFCA https://www.george3.co.uk/george/macro/sfca?rev=1705492539&do=diff SFCA (GIN Macro) Defined in: RING-MACROS Used in: CLOSEALT864, CLOSEFUL867, CLOSEND867, CREALEX864, INCMON865, INCRCUBS860, INCRCUBX860, LISTRING864 CQMJ ...[??? SFCA SECT FILE FGN 20 DOC CQXB #MAC SFCA CRC2 #OPT M2SFCA=%B<4$4<1 CRWL #STR %C CSB= #OPT M3SFCA=%C<4$4<1<%C CSTW #OPT M3SFCA=0 CT*G #OPT M4SFCA=M2SFCA$1&M3SFCA CTT6 #OPT M5SFCA=M2SFCA^M3SFCA$1 CW#Q #STR %A,0 CWSB ( CX#2 #STR %A CXRL LDX 0 %A CY?= )… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFCAB https://www.george3.co.uk/george/macro/sfcab?rev=1705492539&do=diff SFCAB (GIN Macro) Defined in: RING-MACROS Used in: CLOSEAB863, CLOSEALT864, CLOSEFUL867, CLOSFREZ867, INDEX85 CJS4 ...[??? SFCAB SECT FILE FGN 20 DOC CK3W [ CKHG #MAC SFCAB CL36 SFCA %A,%B,%C CLGQ #MOD %C CM2B #SKI CMG2 LDX %C BPTR(%C) CM^L #MOD %C CNF= ( CNYW SMO %C CPDG LDX %C BPTR CPY6 ) CQCQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFCB https://www.george3.co.uk/george/macro/sfcb?rev=1705492539&do=diff SFCB (GIN Macro) Defined in: RING-MACROS Used in: BLOGNAL865, BMAPDIR865, COMPOST867, COPYA867, COPYB867, CREALEX864, DTREST860, LOGANAL864, READFAIL866, SETPC867 #G7S ...[??? SFCB SECT FILE FGN 20 DOC #GCL #MAC SFCB #GX= XSFCB %A,%B #HBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFMAP https://www.george3.co.uk/george/macro/sfmap?rev=1705492539&do=diff SFMAP (GIN Macro) Defined in: CLOSE-MACROS Used in: APPEND864, DELETE864, FILEMAP, REWRITE864 #DNY ...[??? SFMAP SECT FILE FGN 11 DOC #DYQ #MAC SFMAP #FDB # GIVES X0->MAP BLOCK X1=BIT NO X2=WORD NO. #FY2 #STR %A,2 #GCL ( #GX= #STR %B,1 #HBW ( #HWG #STR %A,1 #JB6 #SKI #JTQ ( #K*B #STR %B,2 #KT2 #SKI #L#L ( #LS= SRC 12 24 #M?W ) #MRG #STR %B,2 #N?6 ( #NQQ LDX 2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFSTACK https://www.george3.co.uk/george/macro/sfstack?rev=1705492539&do=diff SFSTACK (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, CHANFILE8, CLOSEDIR867, CLOSTIDY860, COMMFILE82, COPYA867, DELETE864, FHOBJIND860, INCRCUBS860, INCRCUBX860, INDEX85, INSERT6, INSERTBL6, INSERTFR6, INSERTHR6, INSERTWO6, LOCATE84, PERUSFIL84, READFILE84, REWRITE864 6K8Y ...[??? SFSTACK SECT FILE FGN 20 DOC 6KDQ #MAC SFSTACK 6KYB # THIS MACRO SEARCHES DOWN THE FILERING FOR THE RING ELEMENT OF 6LD2 # THE FILE OPEN AT DEPTH[%A].A POINTER TO THIS ELEME… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SFUB https://www.george3.co.uk/george/macro/sfub?rev=1705492539&do=diff SFUB (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, CLOSTIDY860, COMMFILE82, COMPRESS864, DELETE864, HLSREAD867, INSERTWO6, PERUSFIL84, READFILE84, REWRITE864, STEP864 6=YS ...[??? SFUB SECT FILE FGN 20 DOC 6?8L #MAC SFUB 6?N= # SEARCHES FROM THB FSTACK BLOCK AT %A FOR TIE USAGE BLOCB WHOSE 6#7W # BLOCK NUMBER IS IN %B,SETTING THE PTR IN %C IF FOUND& BRNING 6#MG # TO %D IF NOT FOUND . X1 &X0 OVERWRITTEN 6*76 # 6*LQ #STR %A,1 6B6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SGEXHOOK https://www.george3.co.uk/george/macro/sgexhook?rev=1705492539&do=diff SGEXHOOK (GIN Macro) Defined in: MACROS IH Used in: ?D9W ...# ?DPG ...[ SGEXHOOK - MACRO TO ALLOW SETGLOBAL OUTSIDE A HOOK ?F96 ...#MAC SGEXHOOK ?FNQ ...#STR %A,ON ?G8B ...#STR ?GN2 ...( ?H7L ...#MEN GLOBALS ?HM= ...#TRA K80GLOBALS ?J6W ... BRN K81GLOBALS ?JLG ...#END ?K66 ...#MEN WAIT ?KKQ ...#TRA K80WAIT ?L5B ... BRN K81WAIT ?LK2 ...#END ?M4L ...#EXI ?MJ= ...) ?N3W ...#STR OFF,%A ?NHG ...#STR ?P36 ...( ?PGQ ...#MEN GLO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHAREOFF https://www.george3.co.uk/george/macro/shareoff?rev=1705492539&do=diff SHAREOFF (GIN Macro) Defined in: MACROS EWDAS Used in: SHARE866 ^?DW #MAC SHAREOFF ^?YG # ^#D6 #STR %A ^#XQ LDX 0 %A [IF %A PRESENT ^*CB #STR %A ^*X2 #SKI ^BBL LDX 0 CPPTR(2) [IF %A ABSENT ^BW= '171 0 4 ^C*W BNG 0 %B [^ IF REJECTED ^CTG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHAREON https://www.george3.co.uk/george/macro/shareon?rev=1705492539&do=diff SHAREON (GIN Macro) Defined in: MACROS EWDAS Used in: SHARE866 ^282 #MAC SHAREON ^2ML # ^37= #STR %A ^3LW LDX 0 %A [IF %A PRESENT ^46G #STR %A ^4L6 #SKI ^55Q LDX 0 CPPTR(2) [IF %A ABSENT ^5KB '171 0 3 ^652 BNG 0 %B [^ IF REJECTED ^6JL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHCLOALL https://www.george3.co.uk/george/macro/shcloall?rev=1705492539&do=diff SHCLOALL (GIN Macro) Defined in: MACROS EWDAS Used in: Y9?6 #MAC SHCLOALL Y9QQ # Y==B LDX 0 GSIGN Y=Q2 '171 0 11 Y?9L BNG 0 %A Y?P= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHCLOSE https://www.george3.co.uk/george/macro/shclose?rev=1705492539&do=diff SHCLOSE (GIN Macro) Defined in: MACROS EWDAS Used in: YDKG #MAC SHCLOSE YF56 # YFJQ #STR %A YG4B LDX 0 %A [IF %A PRESENT YGJ2 #STR %B YH3L LDX 1 %B [IF %B PRESENT YHH= '171 0 11 YJ2W BNG 0 %C [^ IF FAILED YJGG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHEETSIZE https://www.george3.co.uk/george/macro/sheetsize?rev=1705492539&do=diff SHEETSIZE (GIN Macro) Defined in: MACROSBRBS Used in: 22FL ...[??? SHEETSIZ SECT FILE FGN 14 DOC 22^= #MAC SHEETSIZE 23DW #MEND CONSTANT 23YG #SKI %A>31-31 24D6 ( 24XQ !! SHEETSIZE MUST BE 32K OR LESS 25CB #TRA BSSS 25X2 +31*1024 26BL ) 26W= #SKI %A<32-32 27*W ( 27TG #TRA BSSS 28*6 +%A*1024 28SQ ) 29#B #END 29S2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHLSQ https://www.george3.co.uk/george/macro/shlsq?rev=1705492539&do=diff SHLSQ (GIN Macro) Defined in: MACROS RJH Used in: ABANDON867, CONNECT867, COOR865, ENWELL867, EXPRESS864, HLSEVENT867, HLSREAD867, JWELLONE867, SAVEJOB865, SCHEDJOB867, SCHEDULE867, UNSAVE867, WSJOBSA867, WSPERIS867 22FL # 22PD ...[??? SHLSQ SECT CENT FGN 71 DOC 22^= # THIS SUBFILE BELONGS TO RICHARD GRIMWADE 23DW # 23YG # THESE MACROS ARE USED BY THE SAVEJOB ROUTINE 24D6 # 24XQ # THIS MACRO SEARCHES THE HLS QUEUE FOR A HLS QUEUE BLOCK WITH A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHOPEN https://www.george3.co.uk/george/macro/shopen?rev=1705492539&do=diff SHOPEN (GIN Macro) Defined in: MACROS EWDAS Used in: LOADERDA867, LOADERFS867 YPBQ #MAC SHOPEN YPWB # YQB2 #STR %A YQTL LDX 0 %A [IF %A PRESENT YR*= #STR %B YRSW LDX 1 %B [IF %B PRESENT YS#G '171 0 10 YSS6 BNG 0 %C [^ IF FAILED YT?Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHORTEN https://www.george3.co.uk/george/macro/shorten?rev=1705492539&do=diff SHORTEN (GIN Macro) Defined in: MACROS RJDG Used in: ALAS822, CHANFILE8, GLOBALS867, INDEX85, JWUPDATE867, ORELEMPT70, WLOUT865 2JRJ ...[??? SHORTEN SECT CENT FGN 7 DOC 2K3B # [SHORTEN A CORE BLOCK QUICKLY BY A FEW WORDS 2KH2 #MAC SHORTEN 2L2L LDN 0 %B 2LG= BXL 0 ALOGLEN(%A),M1SHORTEN 2L^W BXE 0 ALOGLEN(%A),M1SHORTEN 2MFG GEOERR BRIEFPM,SHORTEN 2M^6 M1SHORTEN 2NDQ STO 0 ALOGLEN(%A) 2NYB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHORTFALL https://www.george3.co.uk/george/macro/shortfall?rev=1705492539&do=diff SHORTFALL (GIN Macro) Defined in: COREMACROS Used in: CORESHED861, LLSMESS867 KYGQ ...#MAC SHORTFALL K^2B ...[ K^G2 ...[ MACRO TO CALCULATE SHORTFALL WHEN A PROGRAM FAILS TO GET IN K^^L ...[ %A - ACC. IN WHICH TO STORE RESULT.IF ABSENT,X0 IS USED L2F= ...[ ASSUMES ACOMMUNE3 OF FX2 CONTAINS REQUEST SIZE L2P4 ...[ GEN0 WILL BE OVERWRITTEN L2YW ...[ L3DG ...#STR %A L3Y6 ...#SKI L4CQ ... SHORTFALL 0 L4XB ...#STR %A L5C2 ...( L5FK ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SHUFFLE https://www.george3.co.uk/george/macro/shuffle?rev=1705492539&do=diff SHUFFLE (GIN Macro) Defined in: MACROS VB Used in: COMMFILE82, MONFILEA864 =#*D ...[??? SHUFFLE SECT CENT FGN 7 DOC =#K= #MAC SHUFFLE =*4W #STR %A =*JG ( =B46 #STR %A,F =BHQ BRN Z%A =C3B SHUFFLE %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M =CH2 ) =D2L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SINM551 https://www.george3.co.uk/george/macro/sinm551?rev=1705492539&do=diff SINM551 (GIN Macro) Defined in: MACROS RM57 Used in: ADDJOB867, ATTACHC867, CONNECT867, DEWELL867, INITJOB867, NEWDIR867, NEWPASSW867, PREPREAD867 22DG ...[??? SINM551 SECT FILE FGN 6 DOC 22DJ ...#MAC SINM551 22DL ...[ MACRO TO PREVENT M551 AND SECURITY INTERFACE CLASH 22DN ...#SKI G3UGSI 22DQ ...( 22DS ...#UNS G551 22DW ...( 22DY ...! M551 AND SEC INTERFACE CLASH 22F2 ...#ALT G551=0 22F4 ...#ALT G3UGSI=0 22F6 ...! G551 AND G3UGSI ZEROISED 22F8 ...) 22F… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SINMAC1 https://www.george3.co.uk/george/macro/sinmac1?rev=1705492539&do=diff SINMAC1 (GIN Macro) Defined in: MACROS RM57 Used in: ADDJOB867, NEWDIR867, NEWPASSW867 222D ...[??? SINMAC1 SECT FILE FGN 6 DOC 222W ...#MAC SINMAC1 223# ...[ SECURITY INTERFACE MACRO 223Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SINMAC2 https://www.george3.co.uk/george/macro/sinmac2?rev=1705492539&do=diff SINMAC2 (GIN Macro) Defined in: MACROS RM57 Used in: ATTACHC867, CONNECT867, INITJOB867, PREPREAD867 2248 ...[ 224L ...[??? SINMAC2 SECT FILE FGN 6 DOC 2254 ...#MAC SINMAC2 225G ...[ SECURITY INTERFACE MACRO 225H ...[ MACRO EXPANDS FOR G3 USER GROUP SECURITY 225J ...[ INTERFACE ENHANCEMENT 225K ...#SKI G3UGSI 225L ...( 225M ... MHUNTW 3,FILE,ADICTENT 225N ... LDX 2 FX2 225P ... LDCT 0 #600 225Q ... ANDX 0 CONTEXT(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SINMAC3 https://www.george3.co.uk/george/macro/sinmac3?rev=1705492539&do=diff SINMAC3 (GIN Macro) Defined in: MACROS RM57 Used in: LISTFILE867, ONLINEA867 226F ...[ 226S ...[??? SINMAC3 SECT FILE FGN 6 DOC 227= ...#MAC SINMAC3 227N ...[ SECURITY INTERFACE MACRO 2286 ...#STR LF,%A 228J ...#SKI 2292 ...#EXIT 229D ...#STR OL,%A 229W ...#SKI 22=# ...#EXIT 22=Q ...! ILLEGAL PARAMETER 22?8 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SINMAC4 https://www.george3.co.uk/george/macro/sinmac4?rev=1705492539&do=diff SINMAC4 (GIN Macro) Defined in: MACROS RM57 Used in: DEWELL867 22?L ...[ 22#4 ...[??? SINMAC4 SECT FILE FGN 6 DOC 22#G ...#MAC SINMAC4 22#Y ...[ SECURITY INTERFACE MACRO 22*3 ...#SKI G3UGSI 22*6 ...#SKI 22*9 ...( 22*B ...#STR MOP,%A 22*S ...#SKI 22B= ...#EXIT 22BN ...#STR BACK,%A 22C6 ...#SKI 22CJ ...#EXIT 22D2 ...! ILLEGAL PARAMETER 22D9 ...) 22DD ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SIPCM https://www.george3.co.uk/george/macro/sipcm?rev=1705492539&do=diff SIPCM (GIN Macro) Defined in: MACROSIPC Used in: IPCON864, IPCONA864, IPCONB8, IPCONC8, IPCOND864, IPCONE865, IPCONG8, IPCSTART864, IPQUAKER865 *49Y ...[??? SIPCM SECT COMM FGN 19 DOC *4FQ #MAC SIPCM *4^B LDN 0 IPCMR%A *5F2 #STR %B *5YL ( *6D= SMO %B *6XW ORS 0 IPCMKR *7CG ) *7X6 #STR %B *8BQ #SKI *8WB ORS 0 IPCMKR(2) *9B2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SISSMP https://www.george3.co.uk/george/macro/sissmp?rev=1705492539&do=diff SISSMP (GIN Macro) Defined in: LLSMACROS Used in: 964C ...#MAC SISSMP 964D ...[ 964F ...[ RESTORE TIME MACRO TO DEFINE THE MILL PRIORITY FOR THE MEMBERS 964G ...[ OF SYSTEM ISSUED & SYSTEM STARTED JOBS 964H ...[ %A,%B,%C,%D ARE MILL PRIORITIES FOR MEMBERS 0 - 3 RESP AND CAN 964J ...[ BETWEEN 1 & 63.DEFAULT IS 62 964K ...[ 964L ...#SKI KTAB>ISISSMP-ISISSMP 964M ...#MEN CONSTANT 964N ...#SKI KTAB>ISISSMP-ISISSMP 964P ...#SKI 964Q ...#MEN CHTABLE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SIX https://www.george3.co.uk/george/macro/six?rev=1705492539&do=diff SIX (GIN Macro) Defined in: MISCMACS Used in: ADJCHECK85, BACKROOM865, CONTINUE867, ENGAGE867, INPRIN, JDWRITE867, LISTNEXT867, NNORM83, OPENFILE867, OPENTWO867, PMACT867, PMCHAINS864, PMDUMP85, PMINPRIN, SPUNLOAD867, TRAPCHEC867, TRAPGO864, WHATPERA867, WHENEVER867, XATTACH861 4BM6 [??? SIX SECT DIAG FGN 4 DOC 4C6Q #MAC SIX [M.C.D. MANN 4CLB [ 4D62 [ 4DKL [ ********* 4F5= [ * SIX * 4FJW [ ********* 4G4G [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SJANAMON https://www.george3.co.uk/george/macro/sjanamon?rev=1705492539&do=diff SJANAMON (GIN Macro) Defined in: MACROS BJE Used in: SJMESS867 4C6Q # 4CLB # ANAMONST FOR SJMESS 4D62 # 4DKL #MAC SJANAMON 4F5= DOWN REPORT,11 4FJW BRN %A 4G4G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SJCHAIN https://www.george3.co.uk/george/macro/sjchain?rev=1705492539&do=diff SJCHAIN (GIN Macro) Defined in: MACROS VB Used in: MEXTSJ70, MONFILEA864, MONJRNAL850, SJMESS867 2N8Y ...[??? SJCHAIN SECT CENT FGN 7 DOC 2NDQ # 2NYB # 2PD2 #MAC SJCHAIN 2PXL LDX 2 %A 2QC= LDN 0 #41 2QWW STO 0 JRECHEAD2(2) 2QXG ... FSHCODE AORB 2QY6 ...( 2QYQ ... LDCT 1 2 2Q^B ... FSHCODE A,MFSHAFORCE 2R22 ...( 2R2L ... NOTALIEN MFSHAHOME,FX2 2R3= ... ORS 1 JCATS(2) 2R3W ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SJCHAINY https://www.george3.co.uk/george/macro/sjchainy?rev=1705492539&do=diff SJCHAINY (GIN Macro) Defined in: MACROS VB Used in: MONFILEA864, MONJRNAL850, SJLOOP864 3DPQ ...[??? SJCHAINY SECT CENT FGN 7 DOC 3DPW ...# 3DQ6 ...# 3DQB ...#MAC SJCHAINY 3DQC ... FSHCODE B,MFSHBNOLINK 3DQD ...( 3DQF ... CHAIN %A,FX2 3DQG ... MOD LDX 1 JWAITER,%A 3DQH ... LDN 0 FSHNOID 3DQJ ... BNZ 1 MSJNOAUT 3DQK ... ADN 0 FSHZAUT+FSHZSUP 3DQL ...MSJNOAUT 3DQM ... LDN 2 GMON+JRNAL 3DQN ... SL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SJFILENO https://www.george3.co.uk/george/macro/sjfileno?rev=1705492539&do=diff SJFILENO (GIN Macro) Defined in: MACROS SJ Used in: F**Y ...[ F*H6 ...[ F*NB ...[??? SJFILENO SECT FILE FGN 24 DOC FC7= #MAC SJFILENO FCLW SMO BSJACT FD6G LDX %A CJGEN FDL6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SJSIZE https://www.george3.co.uk/george/macro/sjsize?rev=1705492539&do=diff SJSIZE (GIN Macro) Defined in: MACROS SJ Used in: 4?WJ ...[ 4#3Q ...[ 4#92 ...[??? SJSIZE SECT FILE FGN 24 DOC 4#NL #MAC SJSIZE [MEND TIME MACRO TO SET NO OF BLOCK IN SJFILE 4*8= [ AND MINIMUM GRAB SIZE WHEN MANDATORY REQUEST MADE 4*MW [ %A = SIZE OF FILE 4B7G [ %B = MIN SIZE OF FILE 4BM6 [ %B MUST LIE IN THE RANGE JOURNAL - FNEARLY 4C6Q [ %A MUST LIE IN THE RANGE FILESIZE - %B 4CLB #DEF 20?=JOURMIN 4D62 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SKIP https://www.george3.co.uk/george/macro/skip?rev=1705492539&do=diff SKIP (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDONA867, BACKMASS860, BMAPDIR865, BMAPTWO860, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMXEND7, COMPROB867, CONNECT867, CONNECTA867, CREALEX864, DEWELL867, DICTWELL867, DSCNCT867, EDITPT867, EMSENTER867, FHOBJDIR860, GETDIRX860, GETONA867, INCFIN864, JOBLIST867, LIBLOAD867, LISTEND867, LISTFIND867, LISTFNDA865, LISTSEAR867, LLSMESS867, LOGOUT867, NETOFLNE867, OLMTA85, OLMTC85, PMACT867, PMDR864, PRIVLEG84, REDONMT867, REGEN865, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SKIPTRACE https://www.george3.co.uk/george/macro/skiptrace?rev=1705492539&do=diff SKIPTRACE (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, PERUSFIL84, READFILE84, REWRITE864, STEP864 22FL ...[??? SKIPTRAC SECT FILE FGN 20 DOC 3#FB #MAC SKIPTRACE 3#^2 # A MINOR UARIATION ON TRACE-FOR STEP ONLY 3*DL #SKI K6ACCESS>%A-%A 3*Y= TRACE %B,%C 3BCW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SLEEP https://www.george3.co.uk/george/macro/sleep?rev=1705492539&do=diff SLEEP (GIN Macro) Defined in: MACS PCT Used in: BSUNJAM867, CONSOLE867, INPCT84, IPBCCA867, IPBCONS867, IPBMOP867, MTDUMP860, PCTLISTA867, PCTLISTB867, READOPLN867, RMTLF864, RMTLFEND864 88PB #MAC SLEEP 8992 #STR %A,CONSOLE 89NL ( 8=8= #STR %A,LF 8=MW ( 8?7G #STR %A,LP 8?M6 ( 8#6Q #STR %A,TP 8#LB ( 8*62 LDCT 0 #020 8*KL ANDX 0 EWAIT(3) 8B5= BZE 0 MNODC4 8BJW ERS 0 EWAIT(3) 8C4G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SLEEP2 https://www.george3.co.uk/george/macro/sleep2?rev=1705492539&do=diff SLEEP2 (GIN Macro) Defined in: MACS PCT Used in: RMTLF864, RMTLFEND864 7TG2 #MAC SLEEP2 7T^L LDCT 0 #43 7WF= ANDX 0 EWAIT(3) 7WYW BZE 0 MNOT 7XDG RENGAGE 2,%A,%B 7XY6 BRN SLEEPFIN 7YCQ MNOT LDX 0 GSIGN 7YXB ORS 0 EWAIT(3) 7^C2 COOR1 7^WL SLEEPFIN 82B= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SMODE https://www.george3.co.uk/george/macro/smode?rev=1705492539&do=diff SMODE (GIN Macro) Defined in: OPEN-MACROS Used in: INPRIN, LOADERMT867, MODE866, MODEA65, PMINPRIN 6F?Y ...[??? SMODE SECT FILE FGN 20 DOC 6FHQ # 6G3B #MAC SMODE 6GH2 #SKI M1SETMODE 6H2L ( 6HG= #SKI M1SETMODE<#10000-#10000 6H^W LDN %A M1SETMODE 6JFG #SKI M1SETMODE&#77777 6J^6 #SKI 6KDQ ( 6KYB #DEF M3SETMODE=M1SETMODE&#40000000<#400 6LD2 LDCT %A M1SETMODE&#37700000/#77777^M3SETMODE 6LXL #FREE M3SETMODE 6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SMOPWAIT https://www.george3.co.uk/george/macro/smopwait?rev=1705492539&do=diff SMOPWAIT (GIN Macro) Defined in: MACS MISW Used in: MOPOUT85 ?WWL #MAC SMOPWAIT ?XB= BRN MZ2 ?XTW MZ1 LDCT 0 #400 ?Y*G ORS 0 GWAIT(1) [SET 'CPA' SLEEPING MARKER ?YT6 COOR1 [WAIT TO BE WOKEN UP ?^#Q MZ2 MHUNTW 1,AMXOR,ALCB [[FIND THE LINE CONTROL BLOCK. ?^SB LDX 0 GLASTM(1) #2#2 BNZ 0 MZ1 [BRANCH IF BUFFER NOT VET FREE #2RL LDX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SMUSEST https://www.george3.co.uk/george/macro/smusest?rev=1705492539&do=diff SMUSEST (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSBAC867, CLOSDEL867, CONTRACT866, PERION867, READSPEC867, RENAMEX867, SPERION867, SQOPEN867 4JGL # 4K2= [??? SMUSEST 4KFW # ******* 4K^G #MAC SMUSEST 4LF6 # 4LYQ LDX 0 %A 4MDB SMO FX2 4MY2 STO 0 ACOMMUNE9 4NCL DOWN REQCART,5 4NX= BRN %B 4PBW BRN %C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SNUIB https://www.george3.co.uk/george/macro/snuib?rev=1705492539&do=diff SNUIB (GIN Macro) Defined in: MACS MISW Used in: ADDJOB867, INPUTMOP82 #692 #MAC SNUIB [SWITCH THE MOP NO-USER-INPUT BIT. #6NL LDN 0 1 #78= LDX 2 FX2 #7MW ANDX 0 CONTEXT(2) #87G BNZ 0 MSNUIBEND [J. UNLESS NO-USER CONTEXT. #8M6 LDCH 0 JSOURCE1(2) [GET TYPE. #96Q ANDN 0 #70 #9LB BZE 0 MSNUIBEND [J. IF <8 : TYPE 7 = INOPERABLE LINE #=6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPACECT https://www.george3.co.uk/george/macro/spacect?rev=1705492539&do=diff SPACECT (GIN Macro) Defined in: OLPMACROS Used in: BMXEMS83, CPOBJ6, INLOOP84, LISTDIR867, LISTDIRF867, LPOBJ6, LPTWO7, TPOBJ867 22FL [ 22^= [ TONY HAMILTON 23DW [ 23YG [ MACROS AS FOLLOWS 24D6 [ 24XQ [ SPACECT 25CB [ ORELP 25X2 [ CHECKSTATE 26BL [ FDRMON 26W= [ FDRMOFF 27*W [ FDRMTEST 27TG [ FDRMCHECK 28*6 [ FDRMAUTO 28SQ [ FDRMAUTX 2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPACEND https://www.george3.co.uk/george/macro/spacend?rev=1705492539&do=diff SPACEND (GIN Macro) Defined in: MACROS MSYS Used in: *68D ...[??? SPACEND SECT CENT FGN 56 DOC *6D= # SPACEFILL LAST PART : SPACEND *6XW #MAC SPACEND *7CG #SKI %B *7X6 ( *8BQ #DEF 0?=%A [PTR TO LAST PART *8WB #DEF 21?=4*%B *9B2 +0?+34?+0]+21? *9TL #DEF 0?=0?-1 *=*= ...#DEF 0?=0?+34?+0]&#777-21?+11/4+0? *=SW #REP %B *?#G 4H *?S6 ) *#?Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARABEG https://www.george3.co.uk/george/macro/sparabeg?rev=1705492539&do=diff SPARABEG (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, ANSCOM865, ATTACHA8, ATTACHC867, ATTRIBUT867, BCAST867, CONCEPT85, CONNECT867, DETACH867, EXPRESS864, HARDWARA8, INITJOB867, LISTPARS867, MODE866, MODEA65, NORMALUS864, ONLINEA867, ONLINEB867, ONLINEC867, PREPREAD867, PROPERTY867, REGEN865, SCHEDULE867, SETJD867, WA864, WHATRVS867, WHTSTAT867, WLAA867, WLB867, WORKFILE860, WSPARAM867 3RTJ ...[??? SPARABEG SECT CENT FGN 21 DOC 3S5B # 3SK2 #MAC SPARABE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARABEX https://www.george3.co.uk/george/macro/sparabex?rev=1705492539&do=diff SPARABEX (GIN Macro) Defined in: MACRO COMPRO Used in: ASSOC867, LISTPARS867, NORMALUS864 44LS ...[??? SPARABEX SECT CENT FGN 21 DOC 44WL # 45B= #MAC SPARABEX 45TW LDX 2 FX2 46*G STOREX %A,EXT+3 46T6 STOREG %B,%C,EXT+4 47#Q STOREX %D,EXT+2 47SB STOREN %E,EXT 48#2 DOWN PARAM,14 48RL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARANOT https://www.george3.co.uk/george/macro/sparanot?rev=1705492539&do=diff SPARANOT (GIN Macro) Defined in: MACRO COMPRO Used in: ATTACHA8, ATTRIBUT867, CANTDO867, CONCEPT85, DELCOM5, DETACH867, FAIL5, FINISH867, GETON867, HALT5, IFEXPAN867, IPCOPENB83, LDSTART850, LIST867, LISTPARS867, NETOFLNE867, NORMALUS864, NORMERR860, OLMTA85, ONLINEA867, ONLINEB867, ONLINEC867, PRINT70, PROPERTY867, PROSTART867, REALTIME867, REDON867, SETPE867, SJMESS867, SOUP867, UNLOAD7, WHATRVS867, WLB867, WLC867 3*8S ...[??? SPARANOT SECT CENT FGN 21 DOC 3*DL # 3*Y= #MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARANOX https://www.george3.co.uk/george/macro/sparanox?rev=1705492539&do=diff SPARANOX (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, BCAST867, DEAD867, DECODE860, ENWELL867, ENWELLB867, EXPRESS864, INITJOB867, JDWRITE867, JWELLTWO867, LISTFILE867, LISTPARS867, LISTRING864, MODE866, MODEA65, NEWA867, NEWOWN865, NEWPW867, PAGES867, PARAMB865, PARIDF8, PARSORT867, PROGISH850, REDON867, RENAME864, REPERT867, REPORT865, RIGHT867, SCHEDULE867, SETJD867, SETPE867, SPEAK8, SPUNLOAD867, TAPERING867, TERM867, WHATRVS867, WLA867, WLAA867 3J3J ...[??? SPARANOX SECT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARANXT https://www.george3.co.uk/george/macro/sparanxt?rev=1705492539&do=diff SPARANXT (GIN Macro) Defined in: MACRO COMPRO Used in: CREATE867, GLOBALS867, GOTO867, HARDIDF867, HARDWARA8, JOBDATAB867, SETJD867, SETPARAM867, SETPC867, SETPE867, SETPF867, SETPG867, SETPN867, SETPRAMA867, SPEAK8, WAIT867 4#YD ...[??? SPARANXT SECT CENT FGN 21 DOC 4*8= # 4*MW #MAC SPARANXT 4B7G LDX 2 FX2 4BM6 STOREN %A,EXT+4 4C6Q STOREX %B,EXT+2 4CLB STOREX %C,EXT+3 4D62 DOWN ANALYSE,3 4DKL #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARAPAS https://www.george3.co.uk/george/macro/sparapas?rev=1705492539&do=diff SPARAPAS (GIN Macro) Defined in: MACRO COMPRO Used in: ALLOCATE867, ARCHIVE867, ARCHIVNW83, ASSIGN860, ATTACHA8, ATTRIBUT867, BCAST867, CANCOM863, CANCRVX864, CONNECT867, DIRENT867, DISPCOM867, DOC867, DOXCODE867, DUMP860, EXPRESS864, FREEZE864, GOTO867, HARDWARA8, IFEXPAN867, INCOM864, INSTPARA867, IPBJOURN867, LIBCOM867, LISTDIR867, LISTFILE867, LISTPARS867, LISTSTAR867, LOGCOM864, MACRALAS864, MOPCOM867, NAMEPRIV, NEWPASSW867, NORMALUS864, OPERATOR867, PERFPASS864, PREPREAD867, PROGISH850,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARNXTX https://www.george3.co.uk/george/macro/sparnxtx?rev=1705492539&do=diff SPARNXTX (GIN Macro) Defined in: MACRO COMPRO Used in: 4JQD ...[??? SPARNXTX SECT CENT FGN 21 DOC 4K2= # 4KFW #MAC SPARNXTX 4K^G LDX 2 FX2 4LF6 STOREX %A,EXT+4 4LYQ STOREX %B,EXT+2 4MDB STOREX %C,EXT+3 4MY2 DOWN ANALYSE,3 4NCL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPARUNAC https://www.george3.co.uk/george/macro/sparunac?rev=1705492539&do=diff SPARUNAC (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDONA867, ANSCOM865, BCAST867, CONNECT867, INITJOB867, JWELLTWO867, MAKEVCC867, REDON867 655# ...[??? SPARUNAC SECT CENT FGN 21 DOC 65*6 # 65SQ #MAC SPARUNAC 66#B LDX 2 FX2 66S2 STOREN %A,EXT+2 67?L DOWN PARAM,19 67R= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPCMSALT https://www.george3.co.uk/george/macro/spcmsalt?rev=1705492539&do=diff SPCMSALT (GIN Macro) Defined in: MACROS IH Used in: ?52G # ?5G6 ...[ SPCMSALT - MACRO TO ALTER ACTION OF SP 'CMS' SO THAT ?5^Q ...[ IT IS THE SAME IN AND OUTSIDE A HOOK ?6FB ...#MAC SPCMSALT ?6^2 ...#STR %A,ON ?7DL ...#STR ?7Y= ...( ?8CW ...#MEN SETPG ?8XG ...#TRA K80SETPG ?9C6 ... BRN K81SETPG ?9WQ ...#END ?=BB ...#EXI ?=W2 ...) ??*L ...#STR OFF,%A ??T= ...#STR ?##W ...( ?#SG ...#MEN SETPG ?*#6 ...#TRA K80SETPG ?*RQ ... SMO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPLCLPROPS https://www.george3.co.uk/george/macro/splclprops?rev=1705492539&do=diff SPLCLPROPS (GIN Macro) Defined in: MACROS SAR Used in: IPBLISTA867 69Q= ...[??? SPLCLPROPS SECT COMM FGN 12 DOC 69Q* ...[ 69QB ...[CONVERTS LIST OF PROPERTY NOS. IN APERI/APROPNOS TO LIST OF PROPERTY 69QC ...[NAMES AND PUTS THEM IN AN AMXOR/IOUT BLOCK AFTER 69QD ...[THE HEADING "PROPERTIES REQUIRED" . THIS MACRO IS INTENDED FOR 69QF ...[USE WITH CLEAN COPY SPOOLING TERMINALS. 69QG ...#MAC SPLCLPROPS 69QH ...[ 69QJ ...[ 69QK ... DOWN WHATPROP,8 69QL ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPLPROPS https://www.george3.co.uk/george/macro/splprops?rev=1705492539&do=diff SPLPROPS (GIN Macro) Defined in: MACROS SAR Used in: IPBLISTA867, PCTLISTA867 69XJ ...[ 69^G ...[CONVERTS LIST OF PROPERTY NOS. IN GOUT'GPROPNOS TO LIST OF PROPERTY 6=3D ...[NAMES AND OUTPUTS THESE TO CLUSTER CONSOLE AFTER THE HEADING 6=5B ...['PROPERTIES REQUIRED' . THIS MACRO IS INTENDED FOR USE WITH SPOOLING 6=7# ...[ TERMINALS. 6=9= ...#MAC SPLPROPS 6=?8 ...[ 6=*6 ...[ 6=*D ...#UNS HWATIDY 6=*Q ... DOWN WHATPROP,7 6=B4 ...#UNS HWATIDY 6=BB ...#S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPRIVJUMP https://www.george3.co.uk/george/macro/sprivjump?rev=1705492539&do=diff SPRIVJUMP (GIN Macro) Defined in: MACROS MACB Used in: COMHOOK867, ERASE867, EXPRESS864, FINISH867, INCRCUBX860, LISTFILE867, LOADPROG865, ONLINEC867, SAVEJOB865, SCHEDJOB867, SCHEDULE867, USEREXCP860 6?Y4 ...[??? SPRIVJUM SECT CENT FGN 2 DOC 6#7W # 6#MG # THIS MACRO JUMPS IF JOB HAS THE SPECIFIED PRIVILEGE 6*76 # %A IS THE PRIV,%B IS PTR TO JOB BLOCK 6*LQ # %C IS LABEL 6B6B # 6BL2 #MAC SPRIVJUMP 6C5L LDN 0 %A 6CK= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPRIVOFF https://www.george3.co.uk/george/macro/sprivoff?rev=1705492539&do=diff SPRIVOFF (GIN Macro) Defined in: MACROS MACB Used in: 664J ...[??? SPRIVOFF SECT CENT FGN 2 DOC 66#B # 66S2 #MAC SPRIVOFF [MACRO TO TURN OFF THE SPECIFIED PROGRAM 67?L NGN 0 1 [PRIVILEGE (%A) IN THE JOB BLOCK POINTED 67R= ERN 0 %A [PRIVILEGE (%A) IN THE JOB BLOCK POINTED 68=W ANDS 0 JPRIV(%B) [TO BY %B 68QG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPRIVON https://www.george3.co.uk/george/macro/sprivon?rev=1705492539&do=diff SPRIVON (GIN Macro) Defined in: MACROS MACB Used in: BLOGNAL865, DOMONOP867, LOGANAL864, SETJOBQ867 627J ...[??? SPRIVON SECT CENT FGN 2 DOC 62CB # 62X2 # PROGRAM PRIVILEGE MACROS 63BL # THESE MACROS ACCESS THE JPRIV WORD IN THE JOB BLOCK 63W= # (AND ASSUME NO MORE THAN 12 PROGRAM PRIVILEGES CAN EXIST) 64*W #MAC SPRIVON [MACRO TO TURN ON THE SPECIFIED PROGRAM 64TG LDN 0 %A [PRIVILEGE (%A) IN THE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SPRIVTEST https://www.george3.co.uk/george/macro/sprivtest?rev=1705492539&do=diff SPRIVTEST (GIN Macro) Defined in: MACROS MACB Used in: FINISH867, INMOP867, LISTFILE867, REALTIME867, TRAPCHEC867 692# ...[??? SPRIVTES SECT CENT FGN 2 DOC 69=6 # 69PQ #MAC SPRIVTEST [MACRO TO TEST THE PROGRAM PRIVILEGE 6=9B LDN 0 %A [SPECIFIED BY %A IN THE JOB BLOCK TO 6=P2 ANDX 0 JPRIV(%B) [WHICH %B POINTS.IF THE PROGRAM IS 6?8L BZE 0 %C [NOT HELD,CONTROL PASSES TO %C 6?N= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SQOSS https://www.george3.co.uk/george/macro/sqoss?rev=1705492539&do=diff SQOSS (GIN Macro) Defined in: CHCHCOORMAC2 Used in: COOR865, COREALL865 45B= ...[??? SQOSS SECT CENT FGN 32 DOC 48#2 #MAC SQOSS [ PROCESS CORE OR DRUM LINK. 48RL LDX 2 FX2 49?= SQOSS2 49QW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SQOSS2 https://www.george3.co.uk/george/macro/sqoss2?rev=1705492539&do=diff SQOSS2 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BSQ867, CHCH865, COOR865 4=2N ...[??? SQOSS2 SECT CENT FGN 32 DOC 4=Q6 #MAC SQOSS2 4?9Q SBX 0 FX1 4?PB DSA 0 ALINK1(2) 4#92 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SQUMP https://www.george3.co.uk/george/macro/sqump?rev=1705492539&do=diff SQUMP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHCH865, COOR865 4D*S ...[??? SQUMP SECT CENT FGN 32 DOC 4F5= #MAC SQUMP 4FJW LDX 2 FX2 [SET X2 4G4G SQUMP2 [DUMP ACCUMULATORS 4GJ6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SQUMP2 https://www.george3.co.uk/george/macro/sqump2?rev=1705492539&do=diff SQUMP2 (GIN Macro) Defined in: CHCHCOORMAC2 Used in: COOR865, COREALL865 4#DS ...[??? SQUMP2 SECT CENT FGN 32 DOC 4*8= #MAC SQUMP2 4*MW STO 3 ACC3(2) 4B7G STO 4 ACC4(2) [DUMP ACCUMULATORS TO ACTIVITY BLOCK 4BM6 STO 5 ACC5(2) [POINTED TO BY X2 4C6Q STO 6 ACC6(2) 4CLB STO 7 ACC7(2) 4D62 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SREP https://www.george3.co.uk/george/macro/srep?rev=1705492539&do=diff SREP (GIN Macro) Defined in: REPLY-MACROS Used in: APPEND864, IPBSCANB867, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865 5FJ# ...[??? SREP SECT FILE FGN 2 DOC 5FS6 #MAC SREP 5G?Q LDN 0 ANQ%A 5GRB SMO FX2 5H?2 ORS 0 ACOMMUNE2 5HQL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SREP2 https://www.george3.co.uk/george/macro/srep2?rev=1705492539&do=diff SREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: USERSTRM867 5J2D ...[??? SREP2 SECT FILE FGN 2 DOC 5J== #MAC SREP2 5JPW LDN 0 ANQ%A 5K9G ORS 0 ACOMMUNE2(2) 5KP6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SREPC https://www.george3.co.uk/george/macro/srepc?rev=1705492539&do=diff SREPC (GIN Macro) Defined in: REPLY-MACROS Used in: OWNERCHE84 58?D ...[??? SREPC SECT FILE FGN 2 DOC 58H= #MAC SREPC 592W #SKI ANQ%A 59GG ( 5=26 LDN 0 ANQ%A 5=FQ SMO FX2 5=^B STO 0 ACOMMUNE2 5?F2 ) 5?YL #SKI ANQ%A<1$1 5#D= ANQOK 5#XW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SREPC2 https://www.george3.co.uk/george/macro/srepc2?rev=1705492539&do=diff SREPC2 (GIN Macro) Defined in: REPLY-MACROS Used in: USERSTRM867 5*7N ...[??? SREPC2 SECT FILE FGN 2 DOC 5*CG #MAC SREPC2 5*X6 #SKI ANQ%A 5BBQ ( 5BWB LDN 0 ANQ%A 5CB2 STO 0 ACOMMUNE2(2) 5CTL ) 5D*= #SKI ANQ%A<1$1 5DSW ANQOK2 5F#G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SSCOR https://www.george3.co.uk/george/macro/sscor?rev=1705492539&do=diff SSCOR (GIN Macro) Defined in: MACROS RME10 Used in: CLOSEMT867, LIBREQCA867, LIBSEC867, NEWA867, NEWOWN865, RENAMAG864, RENAMDIR, RETURNIT867 9P#4 ...[??? SSCOR SECT FILE FGN 4 DOC 9PHW # MACRO TO DECREASE THE COUNT OF REQUESTERS 9Q3G # %B USED IN CASE OF FUTURE ENHANCEMENTS 9QH6 #MAC SSCOR 9R2Q LDX 0 5+%A 9RGB ANDN 0 #7777 9S22 BNZ 0 M0SSC 9SFL GEOERR 1,SERCOR 9S^= M0SSC SBN 0 1 9TDW DSA 0 5+%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SSEARCH https://www.george3.co.uk/george/macro/ssearch?rev=1705492539&do=diff SSEARCH (GIN Macro) Defined in: MACROS RME10 Used in: CLOSEMT867, DEAD867, DIRENT867, DUMP860, FHOBJIND860, INCOBS867, LABEL866, LIBINSEC864, LIBLOAD867, LIBMANY867, LIBQUERY, LIBREQC867, LIBREQCA867, LIBSEC867, LIBTSN867, NEWA867, NEWOWN865, NEWPW867, RENAMAG864, RENAMDIR, RENAMEMT867, RESTEND850, RETURN867, RETURNA867, RETURNIT867, SCHEDMTA860, SETPF867, SETPR867, TAPERING867, TAPEWAIT65, XENON 8C## ...[??? SSEARCH SECT FILE FGN 4 DOC 8CJ6 # MACRO TO FIND AN ENTRY IN :SYSTEM.SERI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SSTRAP https://www.george3.co.uk/george/macro/sstrap?rev=1705492539&do=diff SSTRAP (GIN Macro) Defined in: MACROS RM57 Used in: 29QY ...[??? SSTRAP SECT FILE FGN 14 DOC 29Q^ ...#MAC SSTRAP 29R2 ...#STR %A,ON 29R3 ...#SKI 29R4 ...( 29R5 ...#MEN TRAPCHEC 29R6 ...#TRA K90TRAPCHEC 29R7 ... BRN K91TRAPCHEC 29R8 ...#END 29R9 ...#EXI 29R= ...) 29R? ...#STR %A,OFF 29R# ...#SKI 29R* ...( 29RB ...#MEN TRAPCHEC 29RC ...#TRA K90TRAPCHEC 29RD ... NULL 29RF ...#END 29RG ...#EXI 29RH ...) 29RJ ...#STR %A,SS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STAPE https://www.george3.co.uk/george/macro/stape?rev=1705492539&do=diff STAPE (GIN Macro) Defined in: MACROS RME10 Used in: =DQ4 ...[??? STAPE SECT FILE FGN 4 DOC =D^W #MAC STAPE =FFG #STR %A =F^6 ( =GDQ #STR %A,TRACK7 =GYB ( =HD2 #STR %A,TRACK9 =HXL ( =JC= #STR %A,PE =JWW ( =KBG #STR %A,NRZI =KHN ...( =KNW ...#STR %A,GCR =KW6 ! INCORRECT STANDARD SPECIFIED =L*Q ) =LTB ) =M*2 ) =MSL ) =MXQ ...) =N2W ...#STR %A,TRACK7 =N62 ...#STR =N96 ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STARTACT https://www.george3.co.uk/george/macro/startact?rev=1705492539&do=diff STARTACT (GIN Macro) Defined in: MACROS LEF Used in: BMSJRNL866, BSUNJAM867, CARTCONT867, DTQUEST860, DTREST860, DTSCAN860, DTSTART867, DTSUBSA867, DTWRONG867, INCTAPES867, IPBLOG866, LIBLOAD867, LISTEND867, LISTFREE867, LISTNEXT867, LISTNIP865, LISTOPEN867, LISTPROC867, LISTSEAR867, PERFLOGS866, RELPER867, SCHEDENX860, UNLOADMT867, WLC867, WLE862 GDKJ ...[??? STARTACT SECT DEVT FGN 2 DOC GDTB #MAC STARTACT GF2J ...#STR %A,RET GF7Q ...( GF*2 #STR %B GFSL ( GG#=… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STARTSTRAT https://www.george3.co.uk/george/macro/startstrat?rev=1705492539&do=diff STARTSTRAT (GIN Macro) Defined in: COREMACROS Used in: CORESHED861, STRATEGY865 GYTY ...# GYT^ ...[ THIS MACRO IMPLEMENTS A STRATEGY GIVEN BY'STRATEGY' MACRO GYW2 ...#MAC STARTSTRAT GYW3 ...# GYW4 ... DOWN COREALLF,2 GYW5 ... BRN MSTA1 GYW6 ... BRN %A [NO CORE GYW7 ... BRN %B [OBDURATE LOCKED BLOCK GYW8 ... BRN %C [ABORT GYW9 ...MSTA1 GYW= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STDP https://www.george3.co.uk/george/macro/stdp?rev=1705492539&do=diff STDP (GIN Macro) Defined in: MACROS SFC Used in: 22FL #MAC STDP 22^= #STR %A 23DW ( 23YG #STR %A,ON 24D6 ( 24XQ #STR %A,OFF 25CB ( 25X2 ! PARAMETER MUST BE ON OR OFF 26BL #EXI 26W= ) 27*W #MEN COOR 27TG #TRA INOSTDPCOOR 28*6 ... BRN INOSTDP1 28SQ #END 29#B #EXI 29S2 ) 2=?L ) 2=R= #MEN COOR 2?=W #TRA INOSTDPCOOR 2?QG ... MBI 2,JBBEING,JBSI 2#=6 #END 2#P… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEMPQ https://www.george3.co.uk/george/macro/stempq?rev=1705492539&do=diff STEMPQ (GIN Macro) Defined in: MACROS RJH Used in: COOR865, SCHEDJOB867 2=#7 ...[??? STEMPQ SECT CENT FGN 71 DOC 2=#P ...# 2=*S ...#MAC STEMPQ 2=BX ... LDN %B BHTEMP 2=D2 ...MTEMPQ 2=F5 ...%D 2=G8 ... LDX %B FPTR(%B) 2=H? ... BXE %B CXHT,%C 2=JB ... LDX 0 ATYPE(%B) 2=KF ... SRL 0 12 2=LJ ... SBN 0 ADATA+ASUP 2=MM ... BZE 0 MTEMPQ 2=NQ ... BXU %A HLSJONO(%B),MTEMPQ 2=PT ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEP https://www.george3.co.uk/george/macro/step?rev=1705492539&do=diff STEP (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDONA867, ADDICT865, APPEND864, ARCHIVE867, ARCHIVNW83, ATTRIBUT867, BACKMASS860, BACKROOM865, BEXTRA83, BMAPDIR865, BMAPTWO860, BMFIXIT864, BMINDEX866, BMJLCONV860, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEMS83, BMXEND7, BSPRUNE867, BSUNJAM867, BUDGONE83, BUDGTWO84, CHEKPRIV867, CLOSEAB863, CLOSEALT864, COMPRESS864, CONMXA85, CONSROOT867, COPYB867, CPOBJ6, CREALEX864, CROBJ6, DEAD867, DEADA867, DICTJOB82, DICTWE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPAGAIN https://www.george3.co.uk/george/macro/stepagain?rev=1705492539&do=diff STEPAGAIN (GIN Macro) Defined in: ACCESSMACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ATTRIBUT867, BACKMAP864, BACKMARK850, BACKROOM865, BEXTRA83, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMFIXIT864, BMINDEX866, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMSAVJOB864, BMSTREAM853, BMXEMS83, BMXEND7, BSPRUNE867, CLOSEFUL867, CLOSTIDY860, COMPRESS864, COPYB867, CROBJ6, DEAD867, DEADA867, DICTWELL867, DIRENT867, DOIHEMS867, DOXCODE867, DUMP860, EDITPT867, ENWELL867, ERASEA867, FHDIRTWO86… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPARAM https://www.george3.co.uk/george/macro/steparam?rev=1705492539&do=diff STEPARAM (GIN Macro) Defined in: MACROS VB Used in: 44LS ...[??? STEPARAM SECT CENT FGN 7 DOC 44WL # 45B= #MAC STEPARAM 45TW LDXC %B 0(%A) 46*G BCC M1STEPARAM 46T6 SLL %B 1 47#Q BPZ %B M2STEPARAM 47SB BDX %A M4STEPARAM 48#2 M2STEPARAM 48RL SRL %B 7 49?= ANDN %B 4095 49QW BUX %B M3STEPARAM 4==G M1STEPARAM 4=Q6 ADN %B 7 4?9Q SRL %B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPASET https://www.george3.co.uk/george/macro/stepaset?rev=1705492539&do=diff STEPASET (GIN Macro) Defined in: MACROS VB Used in: WHATPROP865 3DT# ...[??? STEPASET SECT CENT FGN 7 DOC 3DW2 [STEPASET - A1+1=0 ON 1ST ENTRY 3F*L #MAC STEPASET 3FT= LDX 3 %A 3G#W ADX 3 A1+1(3) 3GSG TXU 3 %A 3H#6 BCS M1STEPA 3HRQ ADN 3 A1+2 3J?B BRN M4STEPA 3JR2 M2STEPA 3K=L STEPARAM 3,0 3KQ= M4STEPA 3L9W LDXC 0 0(3) 3LPG BCC M1STE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPBAC https://www.george3.co.uk/george/macro/stepbac?rev=1705492539&do=diff STEPBAC (GIN Macro) Defined in: MACROS JSR Used in: OPCA867, OPILLS70, STEPBACK1 9**= ...[??? STEPBAC SECT CENT FGN 9 DOC CWSB # THIS MACRO STEPS BACK THE ONR OF A PROG MEMBER.%A-ADDRESS OF X0 CXRL # MARK 4 ONWARDS VERSION OF STEPBAC CY?= #MAC STEPBAC CYQW LDX 0 %A C^=G STO 0 JWSP1 C^Q6 MOD LDX 0 9,%A D29Q SLC 0 3 D2PB ANDN 0 1 D392 ADN 0 1 D3NL SMO JWSP1 D48= SBS 0 8 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPBAC1 https://www.george3.co.uk/george/macro/stepbac1?rev=1705492539&do=diff STEPBAC1 (GIN Macro) Defined in: MACROS JSR Used in: CONTXCOD60, DISEVENT65, OLMTD65, OLMTE85, OLPODD865, UNPLUG867 D4XN ...[??? STEPBAC1 SECT CENT FGN 9 DOC D57G # THIS MACRO IS A MORE CONVENIENT FORM OF STEPBAC D5M6 #MAC STEPBAC1 [JSRAYNER.STEPBACK ONR D66Q MACCS %A,%B D6LB STEPBAC 0 D762 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPBACK https://www.george3.co.uk/george/macro/stepback?rev=1705492539&do=diff STEPBACK (GIN Macro) Defined in: MACROS JSR Used in: CHINERR867, CHTAB, CLOSBAC867, CLOSDEL867, COMPCHAN84, CONTRACT866, DOMONOP867, EXINONE867, FHLIST867, FHOBJIND860, GETONA867, GIVE867, INKS, INMOP867, NEXTUNIT867, OLMTC85, OLMTE85, OLPODD865, PERION867, PROGISH850, READSPEC867, RENAMEX867, SCEX866, SCRATCH866, SOUP867, SPERION867, SQOPEN867, TPINS861 D7*S ...[??? STEPBACK SECT CENT FGN 9 DOC D7KL # THIS MACRO STEPS BACK WORD 8 OF AN OBJ PROG.FROM THE CPA D85= #MAC STE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPFBLOCK https://www.george3.co.uk/george/macro/stepfblock?rev=1705492539&do=diff STEPFBLOCK (GIN Macro) Defined in: ACCESSMACROS Used in: LEXIFIND5, USELEX5 *KSD ...[??? STEPFBLO SECT FILE FGN 19 DOC *L4= # THIS MACRO IS TO UPDATE THE BLOCK POINTER FOR THE FILE OPEN AT *LHW # DEPTH %A (ZERO IF ABSENT).IF THIS IS NEGAT VE,SETS POINTING TO 2ND *M3G # BLOCK *MH6 # %BCOPTIONAL>IS A LABEL TO JUMP TO ON READING FF END OF BL CLIST. *N2Q #MAC STEPFBLOCK *NGB #STR %A *P22 SFSTACK %A,1 *PFL #STR %A *P^= #SKI *Q… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPREWRITE https://www.george3.co.uk/george/macro/steprewrite?rev=1705492539&do=diff STEPREWRITE (GIN Macro) Defined in: ACCESSMACROS Used in: ADDICT865, BACKMARK850, BACKMASS860, BACKROOM865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMQUEST866, BMSAVJOB864, BMSJRNL866, BMSTREAM853, BMXEND7, BSPRUNE867, CLOSEFUL867, CLOSTIDY860, DICTWELL867, DOIHEMS867, DOXCODE867, DTQUEST860, INCSTART865, INCWRITE865, INSTPARA867, JOBLIST867, JWELLONE867, REGEN865, RESTEND850, SETUPARA867 8P4S ...[??? STEPREWR SECT FILE FGN 19 DOC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STEPWRITE https://www.george3.co.uk/george/macro/stepwrite?rev=1705492539&do=diff STEPWRITE (GIN Macro) Defined in: ACCESSMACROS Used in: BMAPTWO860, BMSJRNL866, CLOSEALT864, DEAD867, DICTWELL867, FHOBJBL860, INCCHECK860, INCEND865, INCRV850, INCTAPES867, LISTEND867, LISTFIND867, LISTPROC867, NEWA867, REGEN865, RENAMAG864, RENAMDIR, SYSPROP867, TAPERING867, WLE862, WLF862 8^BD ...[??? STEPWRIT SECT FILE FGN 19 DOC 8^L= #MAC STEPWRITE 925W #STR %A 92KG #SKI 9356 TOPFCA 2 93JQ #STR %A 944B ( 94J2 ... LOADNUM 3,%A 953L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STF https://www.george3.co.uk/george/macro/stf?rev=1705492539&do=diff STF (GIN Macro) Defined in: MACROS SJ Used in: BMINDEX866, BMSTREAM853, CLOSEALT864, CLOSEND867, CLOSFREZ867, CREATE867, DTSUBS867, DTSUBSS867, LINECTRL864, OPER864, OPERA864, RESTMERG864, RETRIEVE864, SCHEDENX860, SCHEDMTA860 DGC^ ...[ DGGJ ...[ DGK8 ...[??? STF SECT FILE FGN 24 DOC DGT2 #MAC STF [P,F,A A NOT = 0 DH#L STFUN %A,%B,%C,A!"#£&Q DHS= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STFUN https://www.george3.co.uk/george/macro/stfun?rev=1705492539&do=diff STFUN (GIN Macro) Defined in: MACROS SJ Used in: CWW^ ...[ CW^J ...[ CX48 ...[??? STFUN SECT FILE FGN 24 DOC CX#2 #MAC STFUN [P,F,A A NOT = 0 CXRL #STR %C CY?= #SKI %C<1$1 CYQW ! %C NOT SPECIFIED OR ZERO C^=G #SKI %B&#37-23<1$1 C^Q6 ( D29Q [ RIGHT HAND BIT = 23 D2PB #DEF 20?=%B@L-19+1 D392 #SKI 20?-9<1$1 D3NL ( D48= OP %A,%… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STILLSLOW https://www.george3.co.uk/george/macro/stillslow?rev=1705492539&do=diff STILLSLOW (GIN Macro) Defined in: RING-MACROS Used in: CLOSTIDY860 62CL ...[??? STILLSLOW SECT FILE FGN 20 DOC 62CW ...# AS XTESTLOWEST BUT EQUAL SLOWEST TREATED AS SLOWEST 62D6 ...#MAC STILLSLOW 62DB ... LDEX 3 ARINGNO(%C) 62DL ... SBN 3 1 62DW ... BZE 3 %B 62F6 ... ADN 3 1 62FB ... LDX 0 3 62FL ...M4STILLSLOW 62FW ... ADN %C FELLEN 62G6 ... BCT 0 M4STILLSLOW 62GB ...M2STILLSLOW 62GL ... SBN %C … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOPACT https://www.george3.co.uk/george/macro/stopact?rev=1705492539&do=diff STOPACT (GIN Macro) Defined in: MACROS LEF Used in: LISTPROC867, PERFLOGS866, SJLOOP864 HC*Y ...[??? STOPACT SECT DEVT FGN 2 DOC HCKQ #MAC STOPACT HD5B #SKI G%AACT HDK2 #SKI HF4L ( HFJ= FLIPS FLAGACT,B%AACT HG3W SUICIDE HGHG ) HH36 #SKI G%AACT HHGQ ( HJ2B LDX 0 FX2 HJG2 STO 0 B%AACT HJ^L #STR %B HKF= ( HKRM ... LDX 1 FX1 HL64 ... LINKSET FX2,%B(1) HLDG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOPHANGER https://www.george3.co.uk/george/macro/stophanger?rev=1705492539&do=diff STOPHANGER (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCONA864, IPQUAKE83 *9KS ...[??? STOPHANG SECT COMM FGN 19 DOC *9TL # *=*= #MAC STOPHANGER *=SW LDX 0 %A *?#G LDX 2 FX2 *?S6 STO 0 ACOMMUNE1(2) *#?Q LDX 1 FX2 *#RB MSTHR FINDACTFB 1,1,IPCA,HANGER,,FPTR **?2 LDX 0 HLINKIPC(1) **QL TXU 0 ACOMMUNE1(2) *B== BCS MSTHR *BPW LDN 0 #2000 *C9G … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOPIT https://www.george3.co.uk/george/macro/stopit?rev=1705492539&do=diff STOPIT (GIN Macro) Defined in: LLSMACROS Used in: BCAST867, CHARGESC867, CORESHED861, PROCONTX867, SCHEDOUT865 55KL ...[??? STOPIT SECT CENT 55KQ ...# 55KW ...# MACRO FOR STOPPING PROGRAM 55L2 ...# 55L6 ...#MAC STOPIT 55L= ... ISNSTOP %A,MSTOPIT1 55LB ... '162 0 ASTOP(%A) 55LG ...MSTOPIT1 55LL ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOREG https://www.george3.co.uk/george/macro/storeg?rev=1705492539&do=diff STOREG (GIN Macro) Defined in: MACRO COMPRO Used in: 2HS# ...[??? STOREG SECT CENT FGN 21 DOC 2J46 # 2JHQ #MAC STOREG 2K3B LDX 0 %A 2KH2 STO 0 %C(2) 2L2L #STR %B 2LG= LDX 0 %B 2L^W #STR %B 2MFG #SKI 2M^6 LDX 0 1+%A 2NDQ STO 0 %C+1(2) 2NYB #STR %B 2PD2 LDX 0 1+%B 2PXL #STR %B 2QC= #SKI 2QWW LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOREN https://www.george3.co.uk/george/macro/storen?rev=1705492539&do=diff STOREN (GIN Macro) Defined in: MACRO COMPRO Used in: JOBDATA867, JOBDATAB867 2?34 ...[??? STOREN SECT CENT FGN 21 DOC 2?=W [ 2?QG #MAC STOREN 2#=6 #STR %A 2#PQ LDN 0 %A 2*9B #STR %A 2*P2 #SKI 2B8L NGN 0 1 2BN= STO 0 %B(2) 2C7W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STOREX https://www.george3.co.uk/george/macro/storex?rev=1705492539&do=diff STOREX (GIN Macro) Defined in: MACRO COMPRO Used in: JOBDATA867, JOBDATAB867 2CCN ...[??? STOREX SECT CENT FGN 21 DOC 2CMG # 2D76 #MAC STOREX 2DLQ #STR %A 2F6B LDX 0 %A 2FL2 #STR %A 2G5L #SKI 2GK= NGN 0 1 2H4W STO 0 %B(2) 2HJG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STRATEGY https://www.george3.co.uk/george/macro/strategy?rev=1705492539&do=diff STRATEGY (GIN Macro) Defined in: COREMACROS Used in: CHTAB, CORESHED861, INKS FNMY ...[??? STRATEGY SECT CENT FGN 32 DOC FPX2 [ THIS MACRO GETS A PROGRAM PLACEMENT STRATEGY FQBL #MAC STRATEGY FQHS ...#SKI G3 FQP2 ...( FQW= LDX 2 FX2 FQYT ...#UNS ISTDP FR3D ...( FR63 ... LDX 0 COBJUNUSE [STORE TOTAL FREE PROGRAM CORE FOR FR8L ... STO 0 ACOMMUNE9(2) [ CORESHED TO STORE FOR UNJAMMER FR?9 ...) FR*W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STRINGS https://www.george3.co.uk/george/macro/strings?rev=1705492539&do=diff STRINGS (GIN Macro) Defined in: COMPMACMOON Used in: COMPSDUMP, SJOPEN863 2DBY ...[??? STRINGS SECT FILE FGN 9 DOC 2F6B # STRINGS 2FL2 # GENERATES DEFINES FOR ITS LIST OF PARAMETERS SUCH THAT 2G5L [ %B=%A, %C=%B+1, ETC 2GK= #MAC STRINGS 2H4W #STR %B 2HJG ( 2J46 #DEF %B=%A 2JHQ STRINGS %B+1,%C,%D,%E,%F,%G,%H,%I, - 2K3B %J,%K,%L,%M,%N,%O,%P,%Q,%R, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STRUCTURE https://www.george3.co.uk/george/macro/structure?rev=1705492539&do=diff STRUCTURE (GIN Macro) Defined in: IFMACS Used in: MESSDC **QL [ *B== [ *BPW [??? STRUCTURE SECT DEVT FGN 1 DOC *C9G [ *CP6 #MAC STRUCTURE *D8Q [ ========= *DNB [ *F82 [ *FML [ %A - 1 OR 0 (1 => CONDITIONAL, 0 => ITERATION) *G7= [ %B - 'ON' OR 'OFF' OR 'CHECK' *GLW [ *H6G [ IF 'ON', INCREASES DEPTH OF 'NESTREASON' AND SETS B23 TO %A *HL6 [ IF 'OFF', CHECKS B23 = %A AND DECREASES DEPTH OF 'NESTR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STUBASE https://www.george3.co.uk/george/macro/stubase?rev=1705492539&do=diff STUBASE (GIN Macro) Defined in: MACROS EWDAS Used in: KARTCONT867, SETDISC866 T^2L # T^G= [??? STUBASE T^^W # ******* W2FG #MAC STUBASE W2^6 # W3DQ LDN %C 0 W3YB LDX 0 BSUNIT1(%A) W4D2 ANDN 0 #77 W4XL SBN 0 AFDS W5C= BNZ 0 MSTUBASE1 W5WW LDX %C FDSTART W6BG MSTUBASE1 W6W6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) STUBASEX https://www.george3.co.uk/george/macro/stubasex?rev=1705492539&do=diff STUBASEX (GIN Macro) Defined in: MACROS EWDAS Used in: LOADERDA867, LOADERFS867 W7*Q # W7TB [??? STUBASEX W8*2 # ******** W8SL #MAC STUBASEX W9#= # W9RW LDN %B 0 W=?G LDX 0 %C W=R6 SBN 0 AFDS W?=Q BNZ 0 MSTUBASEX W?QB LDN %B 0 W#=2 MSTUBASEX W#PL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBCUBS https://www.george3.co.uk/george/macro/subcubs?rev=1705492539&do=diff SUBCUBS (GIN Macro) Defined in: LOBS-MACROS Used in: CLOSEDIR867, CLOSEND867, CLOSTIDY860, COMMFILE82, COPYA867, DELETE864, EDSTART860, MTCODE864, MTSTART864, OPENWORK866, WORKFILE860 5LDJ ...[??? SUBCUBS SECT FILE FGN 5 DOC 5LNB [ 5M82 #MAC SUBCUBS 5MCS ...# START OF CODE FOR %D NULL 5MML #STR DEPTH,%D 5N7= ( 5NLW #STR FILE,%B 5P6G LDX 1 %B 5PL6 #STR NOTOPEN,%A 5Q5Q ... JBC M1SUBCUBS,%A,BACUBS [J IF PUBLIC 5QKB #STR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBJOB https://www.george3.co.uk/george/macro/subjob?rev=1705492539&do=diff SUBJOB (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECT867, CONNECTA867, DSCNCT867, INITJOB867, LOGOUT867, SCHEDJOB867 9*5D ...[??? SUBJOB SECT CENT FGN 21 DOC 9**= #MAC SUBJOB 9*SW DOWN ADDJOB,2 9B#G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBJOBJ https://www.george3.co.uk/george/macro/subjobj?rev=1705492539&do=diff SUBJOBJ (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECT867, CONNECTA867, INITJOB867, LOGOUT867, SCHEDJOB867 9BJ# ...[??? SUBJOBJ SECT CENT FGN 21 DOC 9BS6 #MAC SUBJOBJ 9C?Q DOWN ADDJOB,7 9CRB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBNUM https://www.george3.co.uk/george/macro/subnum?rev=1705492539&do=diff SUBNUM (GIN Macro) Defined in: CLOSE-MACROS Used in: ?W78 ...[??? SUBNUM SECT FILE FGN 11 DOC ?WC2 #MAC SUBNUM ?WWL #DEF M1SUBNUM=%B ?XB= #DEF M2SUBNUM=-M1SUBNUM ?XTW #DEF M3SUBNUM=M1SUBNUM>M2SUBNUM ?Y*G #SKI M1SUBNUM$M3SUBNUM ?YT6 SBN %A M1SUBNUM ?^#Q #SKI M2SUBNUM$M3SUBNUM ?^SB ADN %A M2SUBNUM #2#2 #FRE M1SUBNUM #2RL #FRE M2SUBNUM #3?= #FRE M3SUBNUM #3QW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBREC https://www.george3.co.uk/george/macro/subrec?rev=1705492539&do=diff SUBREC (GIN Macro) Defined in: MACRO COMPRO Used in: EDITET7, INMOP867 ?FDY ...[??? SUBREC SECT CENT FGN 21 DOC ?FNQ [ THIS MACRO SUBTRACTS 1 FROM THE COUNT OF RECORDS READ ?G8B #MAC SUBREC ?GN2 LDN %B #100 ?H7L SBS %B CPBFSD(%A) ?HM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBRELT https://www.george3.co.uk/george/macro/subrelt?rev=1705492539&do=diff SUBRELT (GIN Macro) Defined in: COREMACROS Used in: CDCIPB864, CLOSEALT864, CLOSEND867, IPBCCA867, IPBCCD867, IPQUAKER865 B?RJ ...[??? SUBRELT SECT CENT FGN 32 DOC B#3B # B#H2 # DELETE A RING FROM THE BLOCK,FIRST DERINGING IT,IT THEN MOVES UP ANY B*2L # SUBSEQUENT RING ELEMENTS UPDATING THEIR POINTERS. THE BLOCK IS SHORTEN B*G= # B*^W #MAC SUBRELT BBFG #STR %A,2 BB^6 LDX 2 %A [ADDRESS OF RING ELEMENT BCDQ ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUBSTITUTE https://www.george3.co.uk/george/macro/substitute?rev=1705492539&do=diff SUBSTITUTE (GIN Macro) Defined in: ACCESSMACROS Used in: BMXEND7, CLOSEALT864, CLOSTIDY860 8H9# ...[??? SUBSTITU SECT FILE FGN 19 DOC 8HF6 #MAC SUBSTITUTE 8HYQ #STR %A 8JDB ( 8JY2 LDCT 0 %A 8KCL SMO FX2 8KX= STO 0 ACOMMUNE7 8LBW DOWN REWRITE,7 8LWG ) 8MB6 #STR %A 8MTQ #SKI 8N*B DOWN REWRITE,77 8NT2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUICIDE https://www.george3.co.uk/george/macro/suicide?rev=1705492539&do=diff SUICIDE (GIN Macro) Defined in: MACROS CBK Used in: ABANDON867, ABANDONA867, ADDICT865, ATTACHB866, BACKMARK850, BACKROOM865, BMAPTWO860, BMCNTRL866, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BMXEMS83, CARTCONT867, CDCIPB864, CHTAB, CIMOP867, CLOSEALT864, CLOSEMT867, CLOSEND867, CLOSEONE867, COMPROA867, COMPS RM50, COPYFILE867, DEADA867, DTSTART867, EMSENTER867, ENGAGE867, ERASE867, EVENTS864, GROPE867, IDFLINE867, INCEOT865, INITJOB867, INKS, IPBCCA867, IPBCCD867, IPBCONS867, IPBINB867, IPBJOURN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUNDUMP https://www.george3.co.uk/george/macro/sundump?rev=1705492539&do=diff SUNDUMP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHCH865, COOR865 4GRY ...[??? SUNDUMP SECT CENT FGN 32 DOC 4HHB #MAC SUNDUMP [ UNDUMP X3 TO X7. 4J32 LDX 3 ACC3(2) 4JGL LDX 4 ACC4(2) 4K2= LDX 5 ACC5(2) 4KFW LDX 6 ACC6(2) 4K^G LDX 7 ACC7(2) 4LF6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUPNLIN https://www.george3.co.uk/george/macro/supnlin?rev=1705492539&do=diff SUPNLIN (GIN Macro) Defined in: MACS MISW Used in: INMOP867 #HWG #MAC SUPNLIN #JB6 SMO FX2 #JTQ LDX 2 ACTRING #K*B LDX 1 FX1 #KT2 SBN 2 ACTRING #L#L MRET LDX 2 BPTR(2) #LS= BXE 2 FX2,MZUZ #M?W LDX 0 ATYPE(2) #MRG BXE 0 MLCB(1),MLCB1 #N?6 BXU 0 MDCB(1),MRET #NQQ LDX 0 MSPINBIT(1) #P=B ORS 0 IWAIT(2) #PQ2 BRN MDCB1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUPNLOUT https://www.george3.co.uk/george/macro/supnlout?rev=1705492539&do=diff SUPNLOUT (GIN Macro) Defined in: MACS MISW Used in: INMOP867 #^J2 #MAC SUPNLOUT *23L LDX 2 FX2 *2H= LDX 1 FX1 *32W LDX 0 AMXMSK(2) *3GG ANDN 0 #12 *426 BZE 0 MZUZ *4FQ LDX 2 ACTRING(2) *4^B SBN 2 ACTRING *5F2 MRET LDX 2 BPTR(2) *5YL BXE 2 FX2,MZUZ *6D= LDX 0 ATYPE(2) *6XW BXE 0 MLCB(1),MLCB1 *7CG BXU 0 MDCB(1),MRET *7X… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUSEST https://www.george3.co.uk/george/macro/susest?rev=1705492539&do=diff SUSEST (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSBAC867, CLOSDEL867, CONTRACT866, RENAMEX867, SQOPEN867 4C6Q # 4CLB [??? SUSEST 4D62 # ****** 4DKL #MAC SUSEST 4F5= # 4FJW LDX 0 %A 4G4G SMO FX2 4GJ6 STO 0 ACOMMUNE9 4H3Q DOWN REQCART,4 4HHB BRN %B 4J32 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUSESTX https://www.george3.co.uk/george/macro/susestx?rev=1705492539&do=diff SUSESTX (GIN Macro) Defined in: MACROS EWDAS Used in: FLAWMAP866, PERION867, READSPEC867, SPERION867 592W # 5=26 [??? SUSESTX 5=FQ # ******* 5=^B #MAC SUSESTX 5?F2 # 5?YL FINDSU 1,%A,%B 5#D= LDCT 0 #200 5#XW ANDX 0 ASMARK(1) 5*CG BNZ 0 %B 5*X6 LADDP HUNIT(1),2 5BBQ LDN 0 1 5BWB ADS 0 BSUNIT2(2) 5… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SUSPEND https://www.george3.co.uk/george/macro/suspend?rev=1705492539&do=diff SUSPEND (GIN Macro) Defined in: CHCHCOORMAC2 Used in: INTWIN866, TWINSETA866, TWINSETB866, TWINSETD866 N9X= ...[??? SUSPEND SECT CENT FGN 32 DOC N=BW ...# MACROS USING FAMOUS GBN METHOD OF SETTING CHAINADD -VE FOR N=WG ...# INTERLOCKS WHEN SUSPENDING AND DESUSPENDING N?B6 ...#MAC SUSPEND N?TQ ... LDX 0 GSIGN N#*B ... ADN 0 1 N#T2 ... SMO FX2 N*#L ... STO 0 CHAINADD N*S= ... COOR1 NB?W ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAP https://www.george3.co.uk/george/macro/swap?rev=1705492539&do=diff SWAP (GIN Macro) Defined in: MACROS FIXD Used in: BSQ867, CHTAB, COMPRO867, COREALLF867, CORESHED861, INKS, MESSA, MESSDC, PMBRKCHS84, PMCRABS860, SCHEDOUT865, SWAP865, WTSTAT867 7P*8 ...[??? SWAP SECT CENT FGN 11 DOC 7PK2 # 7Q4L [ THIS MACRO INTERFACES BETWEEN STARTSTRAT (COREALLF) AND SWAP 7QJ= #MAC SWAP 7R3W ACROSS SWAP,1 7RHG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPDIFF https://www.george3.co.uk/george/macro/swapdiff?rev=1705492539&do=diff SWAPDIFF (GIN Macro) Defined in: LLSMACROS Used in: 963G ...#MAC SWAPDIFF 963H ...[ 963J ...[ RESRORE TIME MACRO TO SPECIFY MINIMUM DIFFERENCE IN CORE PRIORITY 963K ...[ CAUSING A PROGRAM TO BE SWAPPED OUT IMMEDIATELY 963L ...[ %A - NUMBER BETWEEN 1 & 63.DEFAULT IS 10 963M ...[ 963N ...#SKI KTAB>ISWAPDIFF-ISWAPDIFF 963P ...#MEN CONSTANT 963Q ...#SKI KTAB>ISWAPDIFF-ISWAPDIFF 963R ...#SKI 963S ...#MEN CHTABLE 963T ...#TRA ISWAPDIFF 963W .… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPMASH https://www.george3.co.uk/george/macro/swapmash?rev=1705492539&do=diff SWAPMASH (GIN Macro) Defined in: MISCMACS Used in: 4XQ2 [??? SWAPMASH SECT DIAG FGN 4 DOC 4Y9L #MAC SWAPMASH [M.C.D. MANN 4YP= [ 4^8W [ 4^NG [ ************** 5286 [ * SWAPMASH * 52MQ [ ************** 537B [ 53M2 [ 546L FSDESC 54L= #STR EDS30,%A 555W #SKI 55KG FSFILE 3,6,DASTORE30 5656 #STR EDS30,%A 56JQ FSFILE 3,6,DASTORE 574B FSFILE 4,9,SW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPOUT https://www.george3.co.uk/george/macro/swapout?rev=1705492539&do=diff SWAPOUT (GIN Macro) Defined in: MACROS GLJ Used in: BEXTSJ84, CORE867, GETWORD867, GIVE867, PROSTART867, REALTIME867, SAVEDA70 5*X6 #MAC SWAPOUT 5BBQ DOWN SWAP,3 5BWB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPPR https://www.george3.co.uk/george/macro/swappr?rev=1705492539&do=diff SWAPPR (GIN Macro) Defined in: BMAP MACROS Used in: BMPRCHEK860 8P#L ...[??? SWAPPR SECT FILE FGN 36 DOC 8PS= ...[ 8Q?W ...[ THIS MACRO SPECIFIES DIRECTORIES TO BE RESTORED 8QRG ...[ IN PLACE OF FORBIDDEN ONES 8R?6 ...[ 8RQQ ...#MAC SWAPPR 8S=B ...#STR %A 8SQ2 ...( 8T9L ...#STR %B 8TP= ...( 8W8W ...#STR %B,*PSEU 8WNG ...( 8X86 ...#SKI AFORBIDEND-AFORBPTR>7-7 8XMQ ...#SKI 8Y7B ...( 8YM2 ...#CON SWAPPR USED TOO OFTEN 8^6L ...#EXI 8^L= ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPSPACE https://www.george3.co.uk/george/macro/swapspace?rev=1705492539&do=diff SWAPSPACE (GIN Macro) Defined in: MACROS GLJ Used in: DN8W #MACRO SWAPSPACE DNNG #STRING %A DP86 ( DPMQ #MEND SETLIST DQ7B #TRANSFER K99SETLIST DQM2 %A DR6L #END DRL= ) DS5W #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPTRAN https://www.george3.co.uk/george/macro/swaptran?rev=1705492539&do=diff SWAPTRAN (GIN Macro) Defined in: MACROS Used in: SWAP865 3?=# ...[??? SWAPTRAN SECT FILE FGN 9 DOC 3?G6 #MAC SWAPTRAN 3?^Q CALL 0 (BSTS4) 3#FB LDCT 0 2 3#^2 LDX 4 %A 3*39 ...#UNSET ERRR 3*5D ...( 3*7M ... BNZ 4 M1SWAPTRAN 3*9W ... ORN 0 FAIL 3*#5 ...M1SWAPTRAN 3*B# ...) 3*DL SLL 4 17 3*Y= ADN 4 BOBJ+ASWAP 3BCW ORX 4 GSIGN 3BXG ORX 4 0 3CC6 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWAPWAIT https://www.george3.co.uk/george/macro/swapwait?rev=1705492539&do=diff SWAPWAIT (GIN Macro) Defined in: MACROS Used in: SWAP865 2BY4 ...[??? SWAPWAIT SECT FILE FGN 9 DOC 2C7W # 2CMG #MAC SWAPWAIT 2D76 LDX 0 ATRAN(3) 2DLQ ANDN 0 BOBJ+BPAGE+ASWAP 2F6B BZE 0 %A [J NOT OP 2FL2 LDCT 0 1 [FPUT PCA BIT 2G5L ORS 0 ATRAN(3) 2GK= #SKI G3 2H4W COOR1 2HJG #SKI G4 2J46 COOR3 #123 2JHQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWIN https://www.george3.co.uk/george/macro/swin?rev=1705492539&do=diff SWIN (GIN Macro) Defined in: MACROS PERI Used in: PERFCHAP866, PMLP866, PMWHATA866, RUNPROG840, SWITCH867 MC3W #MAC SWIN MCHG #STR %A MD36 LDX 0 %A MDGQ #STR %A MF2B #SKI MFG2 LDX 0 CPPTR(2) MF^L '171 0 1 MGF= BNG 0 %C MGYW #STR PM,%D MHDG ( MHY6 MODD LDX 1 JK52C,%A,CPPTR(2) MJCQ SRL 1 15 MJXB HLSINFORM %B,SWITCH,,1 MKC2 LDX 1 FX1 MKWL ) MLB= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWINLIN https://www.george3.co.uk/george/macro/swinlin?rev=1705492539&do=diff SWINLIN (GIN Macro) Defined in: MACROS PERI Used in: SWITCH867 MQ?= #MAC SWINLIN MQQW #STR %A MR=G LDX 0 %A MRQ6 #STR %A MS9Q #SKI MSPB LDX 0 CPPTR(2) MT92 LDX 1 %B MTNL '171 0 5 MW8= LDX 1 FX1 MWMW BNG 0 %C MX7G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWITCHES https://www.george3.co.uk/george/macro/switches?rev=1705492539&do=diff SWITCHES (GIN Macro) Defined in: MACROS SJ Used in: SJOPEN863 2TG8 ...[ 2TMB ...[ 2TSL ...[??? SWITCHES SECT FILE FGN 24 DOC 2^PL #MAC SWITCHES 2^RT ...[ SWITCHES 2^W4 ...[THIS MACRO GENERATES A SWITCH LIST :- BRN LABEL 2^Y? ...[%A SWITCH BASE 322G ...[%B,%C ETC ARE THE IDENTIFIERS USED TO GENERATE A LABEL OF FORM %BL 324P ...[THE SWITCH IS OBEYED BY SMO ING ITS BASE 326Y ...[NB MACRO CORRUPTS 19?+0 329= #OPT MSWITCHES=0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWITRACE https://www.george3.co.uk/george/macro/switrace?rev=1705492539&do=diff SWITRACE (GIN Macro) Defined in: MACROS RME10 Used in: CLOSEMT867, GETON867, LABEL866, LIBCOM867, LIBLOAD867, LIBLOADB867, LIBREQC867, LIBSEC867, MODE866, MODEA65, OLMTC85, REDONMT867, TAPEWAIT65, UNLOAD7, UNLOADMT867 93#Y ...[??? SWITRACE SECT FILE FGN 4 DOC 93JQ #MAC SWITRACE 944B TRACE %A,%B 94J2 #SKI GSWITRAC 953L ( 95H= STO 1 GEN0 962W CALL 1 M6SWI 96GG #OPT M0SWITRAC=1 9726 #SKI M0SWITRAC 97FQ ( 97^B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWOUT https://www.george3.co.uk/george/macro/swout?rev=1705492539&do=diff SWOUT (GIN Macro) Defined in: MACROS PERI Used in: CARTCONT867, DUMMYB867, FREEPER867, GROPE867, IPBINB867, SWITCH867 N34G #MAC SWOUT N3J6 #STR %A N43Q LDX 0 %A N4HB #STR %A N532 #SKI N5GL LDX 0 CPPTR(2) N62= '171 0 2 N6FW BNG 0 %C N6^G MODD LDX 1 JK52C,%A,CPPTR(2) N7F6 SRL 1 3 N7YQ ORX 1 GSIGN N8DB SRL 1 12 N8Y2 HLSINFORM %B,SWITCH,,1 N9CL LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SWOUTLIN https://www.george3.co.uk/george/macro/swoutlin?rev=1705492539&do=diff SWOUTLIN (GIN Macro) Defined in: MACROS PERI Used in: DUMMYB867 N*S= #MAC SWOUTLIN NB?W #STR %A NBRG LDX 0 %A NC?6 #STR %A NCQQ #SKI ND=B LDX 0 CPPTR(2) NDQ2 LDX 1 %B NF9L '171 0 6 NFP= LDX 1 FX1 NG8W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SXFCB https://www.george3.co.uk/george/macro/sxfcb?rev=1705492539&do=diff SXFCB (GIN Macro) Defined in: RING-MACROS Used in: FILEMAP DT#Y ...[??? SXFCB SECT FILE FGN 20 DOC DTJQ #MAC SXFCB DW4B SFCA %A,%B,%B DWJ2 #SKI %B<4$4 DX3L LDX %B BPTR(%B) DXH= #SKI %B>3$3 DY2W ( DYGG SMO %B D^26 LDX %B BPTR D^FQ ) D^^B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SXTEST https://www.george3.co.uk/george/macro/sxtest?rev=1705492539&do=diff SXTEST (GIN Macro) Defined in: MACROS EWDAS Used in: CLOSDEL867, RENAMEX867 3BCW # 3CC6 [??? SXTEST 3CWQ # ****** 3DBB #MAC SXTEST 3DW2 # 3F*L LDX %A EDSQ 3FT= BZE %A %B 3G54 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SYNTHMON https://www.george3.co.uk/george/macro/synthmon?rev=1705492539&do=diff SYNTHMON (GIN Macro) Defined in: MACROS RJH Used in: INSTPARA867, IPALL864, SETPC867, SETPRAMB867, SETUPARA867 5Q*J ...[??? SYNTHMON SECT CENT FGN 71 DOC 5QKB # THIS MACRO ANALYSES THE MONITORING FILE MASK SET IN THE PARAMETER 5R52 # OF THE MACRO AND,USING OUTPARAM,OUTPUTS THE CORRESPONDING 5RJL # CHARACTER STRING.HOWEVER,IF ALL CATEGORIES ARE TO BE OUTPUT,THE 5S4= # CHARACTER STRING 'ALL' WILL BE OUTPUT;IF NO CATEGORIES ARE TO BE 5SHW # OUT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) SYSCOMTEST https://www.george3.co.uk/george/macro/syscomtest?rev=1705492539&do=diff SYSCOMTEST (GIN Macro) Defined in: MACS MISW Used in: *HL6 #MAC SYSCOMTEST *J5Q SMO FX2 *JKB LDX 0 CPLEV *K52 BNZ 0 MSYSNOT [J IF NOT CP LEV ZERO *KJL HUNTW %A,ADATA,COMPASS *L4= BPZ %A MSYSYES [J IF THERES A DATA BLOCK *LHW MSYSNOT [ELSE SEND ERROR MESSAGE *M3G COMERR JNOTALCM *MH6 MSYSYES *N2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) T https://www.george3.co.uk/george/macro/t?rev=1705492539&do=diff T (GIN Macro) Defined in: REPLY-MACROS Used in: ASSIGN860, COMPRO867, FAILTWIN866, FFFNORM7, INITJOB867, LOAD60, LOADERR70, LOADX60, MESSB, MESSBJ, MESSDJ, MESSI, PMACT867, PMCHAINS864, PMDUMPMT85, PMFILE860, READBULK867, STRATEGY865, TWINSETA866 3*ND ...[??? T SECT FILE FGN 2 DOC 3*Y= #MAC T 3BCW SUBNUM 0,ANS%C-ANS%A 3BXG BZE 0 %D 3CC6 #STR %E 3CWQ T %C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V 3DBB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TAB https://www.george3.co.uk/george/macro/tab?rev=1705492539&do=diff TAB (GIN Macro) Defined in: CLOSE-MACROS Used in: ALAS822, CANTDO867, CDUM866, CHINERR867, CLOSEDIR867, CLOSEND867, CLOSEONE867, FHOBJDIR860, GOTO867, INSTPARA867, KARTCONT867, LISTHEAD863, LISTIDF867, MOPCOMB865, PMACT867, PMCHAINS864, PMFILE860, REGEN865, REPERR867, REPORT865, RMTLF864, SETDISC866, TWINSET866, USEROPEN867, WHENEVER867 =DQ4 ...[??? TAB SECT FILE FGN 11 DOC =D^W #MAC TAB =FFG MHUNT 1,FILE,FTAB =F^6 LOADNUM 0,%B*2 =GDQ ADS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABDRIVE https://www.george3.co.uk/george/macro/tabdrive?rev=1705492539&do=diff TABDRIVE (GIN Macro) Defined in: MACROS SJ Used in: SJOPEN863 435# ...[ 43=G ...[ 43CQ ...[??? TABDRIVE SECT FILE FGN 24 DOC 46T6 #MAC TABDRIVE 46X* ...[TO DRIVE THROUGH A TABLE 46^J ...[%A MODIFIER CONTAING INDEX VALUE 473R ...[%B TABLE 4762 ...[%C NO OF BITS PER TABLE ENTRY 4789 ...[%D SWITCH LIST 47=D ...[%E TABDRIVE INVOKE IDENTIFIER 47#Q ADN %A %B 47SB SMO FX1 48#2 LDX 7 0(%A) 48RL #DEF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABEND https://www.george3.co.uk/george/macro/tabend?rev=1705492539&do=diff TABEND (GIN Macro) Defined in: MACROS SJ Used in: LOADERI867, PMENDITS867, REPERR867 3Y7J ...[ 3Y#Q ...[ 3YG2 ...[??? TABEND SECT FILE FGN 24 DOC 3^YW #MAC TABEND 4264 ...[TO RETURN CONTROL TO THE END OF TABDRIVE 42?= ...[%A = TABLEDRIVE IDENTIFIER. 42DG BRN MTABDRIVE0%A 42Y6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABLSET https://www.george3.co.uk/george/macro/tablset?rev=1705492539&do=diff TABLSET (GIN Macro) Defined in: MACROS SJ Used in: SJOPEN863 3D3Y ...[ 3D96 ...[ 3DBB ...[??? TABLSET SECT FILE FGN 24 DOC 3JR2 #MAC TABLSET 3JSP ...[ TABLSET 3JWD ...[SETS UP A TABLE ENTRY 3JY7 ...[%A VALUE TO BE STORED IN NEXT POSN IN TABLE 3J^W ...[%B,%C NEXT VALUES 3K3K ...[MNOBITS NO OF BITS ALLOCATED TO TABLE ENTRY IE NOBITS INVOKED 3K5# ...[ENTRIES ARE STORED IN TABLE STARTING AT BIT0 - BIT(-1+MNOBITS) 3K73 ...[FURTHER ENTRIES … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABRESET https://www.george3.co.uk/george/macro/tabreset?rev=1705492539&do=diff TABRESET (GIN Macro) Defined in: CLOSE-MACROS Used in: DIRENT867, FHOBJDIR860, TRAPGO864, USEROPEN867 =PH# ...[??? TABRESET SECT FILE FGN 11 DOC =PR6 #MAC TABRESET =Q=Q MHUNT 1,FILE,FTAB =QQB ADX 1 FTREAD(1) =R=2 LDX 2 FX2 =RPL TOPFCA2 2 =S9= LDX 0 FREADBLOCK(2) =SNW STO 0 A1+2(1) =T8G LDX 0 FREADWORD(2) =TN6 LDX 2 FX2 =W7Q STO 0 A1+3(1) =WMB LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABRET https://www.george3.co.uk/george/macro/tabret?rev=1705492539&do=diff TABRET (GIN Macro) Defined in: MACROS SJ Used in: SJOPEN863 3T9S ...[ 3TC2 ...[ 3TJ= ...[??? TABRET SECT FILE FGN 24 DOC 3X36 #MAC TABRET 3X8# ...[TO RETURN CONTROL TO TABDRIVE 3X*G ...[%A = TABLEDRIVE IDENTIFIER. 3XGQ BRN MTABDRIVE%A 3Y2B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABREWIND https://www.george3.co.uk/george/macro/tabrewind?rev=1705492539&do=diff TABREWIND (GIN Macro) Defined in: CLOSE-MACROS Used in: FHOBJDIR860 =M58 ...[??? TABREWIN SECT FILE FGN 11 DOC =M*2 #MAC TABREWIND =MSL MHUNT 1,FILE,FTAB =N#= STOZ FTREAD(1) =NRW LDX 1 FX1 =P?G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABRN https://www.george3.co.uk/george/macro/tabrn?rev=1705492539&do=diff TABRN (GIN Macro) Defined in: IPMACROS Used in: SETUPARA867 4#YD ...[??? TABRN SECT CENT FGN 12 DOC 4*8= [ 4*MW [ MACRO TABRN 4B7G [ 4BM6 #MAC TABRN [TO SET UP SPEC IP TABLE IN SETUPARA 4BP* ...#UNS %A 4BRJ ...#SKI 4BTR ... +%A [GIVES REL ADDR IN EXTENSION TABLE 4BY2 ...#UNS %A 4C29 ...( 4C4D ...#SKI %A&#40000000<1$1 4C6Q +%A - INSTPARAM [GIVES REL FI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABSET https://www.george3.co.uk/george/macro/tabset?rev=1705492539&do=diff TABSET (GIN Macro) Defined in: CLOSE-MACROS Used in: DEAD867, DIRENT867, ERASE867, FHOBJDIR860, GETDIR860, GETDIRX860, INCCHECK860, LIBLOAD867, RENAMDIR, RENAMEMT867, RETURN867, TRAPGO864, USERDIR842, USEROPEN867 9M*J ...[??? TABSET SECT FILE FGN 11 DOC 9MKB #MAC TABSET 9N52 LDX 2 FX2 9NJL MHUNT 1,FILE,FTAB 9P4= STO 1 ACOMMUNE1(2) 9PHW LDX 1 ALOGLEN(1) 9Q3G ADN 1 2 9QH6 STO 1 ACOMMUNE2(2) 9R2Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABULATE https://www.george3.co.uk/george/macro/tabulate?rev=1705492539&do=diff TABULATE (GIN Macro) Defined in: CLOSE-MACROS Used in: DEAD867, DIRENT867, ERASE867, FHOBJDIR860, GETDIR860, GETDIRX860, INCCHECK860, LIBLOAD867, RENAMDIR, RENAMEMT867, RETURN867, TRAPGO864, USERLIB867, USEROPEN867 9^64 ...[??? TABULATE SECT FILE FGN 11 DOC 9^*W #MAC TABULATE 9^TG REWIND =2*6 MHUNT 1,FILE,FTAB =2SQ #STR %B =3#B ( =3S2 LOADNUM 0,%B*2 =4?L ADS 0 FTREAD(1) =4R= ) =5=W ADX 1 FTREAD(1) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABULATX https://www.george3.co.uk/george/macro/tabulatx?rev=1705492539&do=diff TABULATX (GIN Macro) Defined in: CLOSE-MACROS Used in: =9CN ...[??? TABULATX SECT FILE FGN 11 DOC =9MG #MAC TABULATX ==76 REWIND ==LQ MHUNT 1,FILE,FTAB =?6B SLL %B 1 =?L2 ADS %B FTREAD(1) =#5L SRL %B 1 =#K= ADX 1 FTREAD(1) =*4W LDX 0 A1+2(1) =*JG TOPFCA2 2 =B46 STO 0 FREADBLOCK(2) =BHQ LDX 0 A1+3(1) =C3B STO 0 FREADWORD(2) =CH2 LDX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABUNSET https://www.george3.co.uk/george/macro/tabunset?rev=1705492539&do=diff TABUNSET (GIN Macro) Defined in: CLOSE-MACROS Used in: USEROPEN867 =XBS ...[??? TABUNSET SECT FILE FGN 11 DOC =XLL #MAC TABUNSET =Y6= MHUNT 1,FILE,FTAB =YKW LDN 0 2 =^5G SBS 0 ALOGLEN(1) =^K6 SBS 0 FTAPP(1) ?24Q LDX 2 FTAPP(1) ?2JB SBX 2 FTREAD(1) ?342 BZE 2 M1TABUNSET ?3HL ADX 1 FTREAD(1) ?43= ADN 1 A1+2 ?4GW ADX 0 1 ?52G MOVE 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TABX https://www.george3.co.uk/george/macro/tabx?rev=1705492539&do=diff TABX (GIN Macro) Defined in: CLOSE-MACROS Used in: =HMS ...[??? TABX SECT FILE FGN 11 DOC =HXL #MAC TABX =JC= MHUNT 1,FILE,FTAB =JWW SLL %B 1 =KBG ADS %B FTREAD(1) =KW6 SRL %B 1 =L*Q LDX 1 FX1 =LTB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TANAMONST https://www.george3.co.uk/george/macro/tanamonst?rev=1705492539&do=diff TANAMONST (GIN Macro) Defined in: MACROS RJH Used in: INSTPARA867, TRACE867 5HGS ...[??? TANAMONS SECT CENT FGN 71 DOC 5HQL # THIS MACRO ANALYSES AN 'ACTION ON MON FILE' STRING OF PARS. 5J== # ANSWER IN ACOMMUNE1 IF OK, OTHERWISE BRANCHES TO %A 5JPW #MAC TANAMONST 5K9G DOWN REPORT,5 5KP6 BRN %A 5L8Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TAPEOPEN https://www.george3.co.uk/george/macro/tapeopen?rev=1705492539&do=diff TAPEOPEN (GIN Macro) Defined in: MACROS RME10 Used in: DTSTART867, NEWOWN865, NEWPW867, RENAMDIR, SCHEDMTA860, SCHEDMTX867 3R*Y ...[??? TAPEOPEN SECT FILE FGN 4 DOC 3RKQ #MAC TAPEOPEN 3S5B #STR %B,0 3SK2 LDX 0 %B 3T4L LDX 2 FX2 3TJ= STO 0 ACOMMUNE3(2) 3W3W #STR %C 3WHG ( 3X36 #STR %C,READ 3XGQ ( 3Y2B #STR %C,WRITE 3YG2 ! %C SHOULD BE 'READ', '… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TAPEWRONG https://www.george3.co.uk/george/macro/tapewrong?rev=1705492539&do=diff TAPEWRONG (GIN Macro) Defined in: MACROS RME10 Used in: DTSTART867, DTSUBSS867, INCOBS867 54W4 ...[??? TAPEWRON SECT FILE FGN 4 DOC 555W # THIS MACRO MARKS A TAPE AS TAPEWRONGED. AN AONBS/GLIST BLOCK IS 55KG # SET UP AND A1=0 IF THE TAPE HAS BEEN SUCCESSFULLY DEALT WITH. 5656 #MAC TAPEWRONG 56JQ #STR %A,0 574B LDX 0 %A 57J2 SMO FX2 583L STO 0 ACOMMUNE1 58H= DOWN TAPERING,3 592W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TBS https://www.george3.co.uk/george/macro/tbs?rev=1705492539&do=diff TBS (GIN Macro) Defined in: MACROS JSR Used in: GETWORD867, LOADERR70, PRINT70 92T# ...[??? TBS SECT CENT FGN 9 DOC 9356 # 93JQ # THIS MACRO PICKS UP BIT %A OF WORD %B IN BIT %A OF ACC %C 944B # 94J2 #MAC TBS 953L LDBIT %A,%C 95H= ANDX %C %B 962W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TCLOSE https://www.george3.co.uk/george/macro/tclose?rev=1705492539&do=diff TCLOSE (GIN Macro) Defined in: MACROS EWDAS Used in: IDFPER867, MTOBJ864, TWINSETB866, TWINSETD866 RFCQ # RFXB [??? TCLOSE RGC2 # ****** RGWL #MAC TCLOSE RHB= # RHTW DOWN TWINSETB,12 RJ*G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TELECOM https://www.george3.co.uk/george/macro/telecom?rev=1705492539&do=diff TELECOM (GIN Macro) Defined in: MACS SPC Used in: IPBINC865 J92= #MAC TELECOM J9FW SETNCORE CPDATA+2-A1,3,ADATA,CREADL J9^G LDN 0 8 J=F6 STO 0 A1(3) J=YQ LDN 0 CPDATA(3) J?DB LDN 7 MTELCO(1) J?Y2 MOVE 7 2 [MOVE IN COMMAND J#CL STOZ JSOURCE2(2) J#X= LDCT 0 #770 J*BW STO 0 JSOURCE1(2) [MARK OPS CONSOLE ORIGIN J*WG LDCT 0 #400 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TELEST https://www.george3.co.uk/george/macro/telest?rev=1705492539&do=diff TELEST (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCPERI83 *GFM ...[??? TELEST SECT COMM FGN 19 DOC *GS4 ...[ TEST WHETHER THE LINK IS ESTABLISHED *H6G #MAC TELEST *HL6 #STRING %B *J5Q LDX 2 %B *JKB #STRING %B *K52 #SKIP *KJL LDX 2 FX2 *L4= SMO AWORK1(2) *LHW LDX 1 ARINGEL(2) *M3G LDX 0 ASTATUS2(1) *MH6 SLL 0 1 *N2Q BNG 0 M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TEMPACT https://www.george3.co.uk/george/macro/tempact?rev=1705492539&do=diff TEMPACT (GIN Macro) Defined in: MACROS LEF Used in: 2YF? ...[??? TEMPACT SECT DEVT FGN 2 DOC 2YFL ...#MAC TEMPACT 2YG# ...#OPT G%AACT=0 2YH2 ...#SKI 1-G%AACT 2YHN ...( 2YJB ...#STR %A,SJ 2YK4 ...#OPT BSJACT=0 2YKQ ...#STR %A,RET [FLAG BITS 2YLD ...#OPT BRETACT=1 2YM6 ...#STR %A,OUT 2YMS ...#OPT BOUTACT=2 2YNG ...) 2YP8 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TEMPDIRA https://www.george3.co.uk/george/macro/tempdira?rev=1705492539&do=diff TEMPDIRA (GIN Macro) Defined in: MACROS RM59B Used in: LIBREQC867 3D6J ...[??? TEMPDIRA SECT FILE FGN 6 DOC 3DBB #MAC TEMPDIRA 3DW2 FJOCA 1,FX2 3F*L LDCT 0 #002 3FT= ANDX 0 JMISC(1) 3G#W BNZ 0 M1TEMPDIRA 3GSG DOWN NEWDIR,5 3H#6 BRN %A 3HRQ BRN %B 3J?B M1TEMPDIRA 3JR2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TEMPQ https://www.george3.co.uk/george/macro/tempq?rev=1705492539&do=diff TEMPQ (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECTA867, EXPRESS864, HLSEVENT867, NORMALUS864 B6X# ...[??? TEMPQ SECT CENT FGN 21 DOC B776 [ THE FOLLOWING MACRO IS TO SET UP AN ENTRY IN TEMP. HLSQ FOR B7LQ [ A PARTICULAR JOB B86B #MAC TEMPQ B8L2 SETNCORE AHLS,2,ADATA,JUNSWAP B95L STOZ A1(2) B9K= LDN 0 A1(2) B=4W LDN 1 A1+1(2) B=JG MOVE 0 AHLS-1 B?46 STO %B HLSJONO(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TERMIOFF https://www.george3.co.uk/george/macro/termioff?rev=1705492539&do=diff TERMIOFF (GIN Macro) Defined in: MACS IPB Used in: B3=6 [??? TERMIOFF SECT COMM FGN 43 DOC B3PQ #MAC TERMIOFF [R.WEYAND B49B [THIS MACRO SENDS ESC&J CODE TO TURN OFF THE PRINTER MOTOR OF MOP B4P2 [CONSOLES VIA 7900S AT CLOSE DOWN TIME. IF ESC CODES ARE NOT RECOGNISED B58L [BY THE TERMINAL(E.G. 7071),THE CHAR J WILL BE PRINTED AFTER THE 3 NLS. B5N= #MEN IPBMOPB B67W #TRA K52IPBMOPB B6MG NULL B776 #END B7LQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TERMON https://www.george3.co.uk/george/macro/termon?rev=1705492539&do=diff TERMON (GIN Macro) Defined in: MACROS CBK Used in: LISTNEXT867, LISTOPEN867, TERM867 2BDD ...[??? TERMON SECT CENT FGN 2 DOC 2BN= # THIS MACRO COMBINES THE TWO PRECEDING ONES, AND IS USED ONLY WHEN 2C7W # THERE IS NO CHANCE OF TIME CAUSING THE MESSAGE TO CHANGE. PARAMETE 2CMG # INCLUDE THE DESTINATION OF OUTPUT OF THE MESSAGE, THE ADDRESS OF T 2D76 # MESSAGE IN THE MFS, AN INITIAL DELAY IF REQUIRED, A SUBSEQUENT TIM 2DLQ # INTERVAL, A WAITING STYLE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TERROR https://www.george3.co.uk/george/macro/terror?rev=1705492539&do=diff TERROR (GIN Macro) Defined in: MACRO COMPRO Used in: ABANDON867, ATTACHB866, ATTACHC867, ENWELL867, LISTPROP867, MACRALAS864, PAGES867, REPORT865, RIGHT867, TERM867 8L74 ...[??? TERROR SECT CENT FGN 21 DOC 8LBW #MAC TERROR 8LWG SMO FX2 8MB6 LDX 0 EXT+8 8MTQ BNG 0 %A 8N*B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TEST https://www.george3.co.uk/george/macro/test?rev=1705492539&do=diff TEST (GIN Macro) Defined in: MACROS FIXD Used in: BCAST867, CANTDO867, CHARGESC867, COREALLF867, CORESHED861, DOC867, DUMP860, EDITAR867, ENWELL867, HLSEVENT867, IDFCLEAN867, INCOM864, IPBCCD867, JAMSWAP865, LIBINSEC864, LLSMESS867, LOADEREM867, MAKEDIR84, MESSDA, PCTDIS8, PCTINOP8, PMCRABS860, PMDUMP85, PROPERTY867, SCHEDIN867, SIMULPTR60, TPOBJ867, UNJAMMER866 2PMS ...[??? TEST SECT CENT FGN 11 DOC 2PXL [ 2QC= #MAC TEST 2QWW JMBAC MJBAC,,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTAXES https://www.george3.co.uk/george/macro/testaxes?rev=1705492539&do=diff TESTAXES (GIN Macro) Defined in: MACROS FIXD Used in: COREALLF867, CORESHED861, PROCONTX867 79LT ...# 79MY ...#MAC TESTAXES [CHECKS IF PROGAXES WILL WAIT 79P3 ... LDBIT 15,0 79Q6 ... MOD ANDX 0 JCLASS,%A 79R9 ... BNZ 0 %B 79S# ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTBRKIN https://www.george3.co.uk/george/macro/testbrkin?rev=1705492539&do=diff TESTBRKIN (GIN Macro) Defined in: MACROS BJE Used in: COMPROB867, DEMAND860, EDITET7, EDITOR867, EDITORA865, EDITPT867, HOWBIG867, INMOP867, LISTDIR867, LISTRING864, LOADPROG865, ONLINCL864, PERFPASS864, PRINT70, SCEDITAR84, SCEDITOR84, TRAPLIST864, WA864, WHATRVSA867, WHTSTAT867, WLC867, WLD864 428N ...[??? TESTBRKI SECT CENT FGN 3 DOC 42DG # 42Y6 # MACRO FOR TESTING WHETHER BREAKIN HAS OCCURRED 43CQ # 43XB #MAC TESTBRKIN 44C2 CALL 0 (FCHECKBIN) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTCODE https://www.george3.co.uk/george/macro/testcode?rev=1705492539&do=diff TESTCODE (GIN Macro) Defined in: MACS SPC Used in: ENGAGE867, LISTINTC865, TIDYREAD850 JGQQ #MAC TESTCODE JH=B #STR %A JHQ2 SMO %A JJ9L #STR %A JJP= #SKI JK8W SMO CPPTR(2) JKNG LDX 1 JADDP JL86 #STR READER,%B JLMQ LDX 0 APCODET(1) JM7B #STR READER,%B JMM2 #SKI JN6L LDX 0 APCODE(1) JNL= LDX 1 FX1 JP5W BZE 0 %C JPKG BRN %D JQ56 #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTCOR https://www.george3.co.uk/george/macro/testcor?rev=1705492539&do=diff TESTCOR (GIN Macro) Defined in: MACROS FIXD Used in: BCAST867, CORE867, DOMONOP867, FREEBUFF860 3HHY ...[??? TESTCOR SECT CENT FGN 11 DOC 3HRQ # 3J?B # 3JR2 #MAC TESTCOR [TESTS FOR EXISTENCE OF A CORE IMAGE 3K=L [%A IS POINTER TO THE JOB BLOCK 3KQ= SMO %A [%B IS LABEL TO BRANCH TO IF A CORE 3L9W LDCH 0 JMISC [IMAGE EXISTS. 3LPG BNZ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTERR https://www.george3.co.uk/george/macro/testerr?rev=1705492539&do=diff TESTERR (GIN Macro) Defined in: REPLY-MACROS Used in: ALLOW84, BQUERY84, BUDGET84, ERASE867, GET6, GETON867, GETONA867, JDWRITE867, MACRALAS864, NETOFLNE867, SETPB867 3DL8 ...[??? TESTERR SECT FILE FGN 2 DOC 3DW2 #MAC TESTERR 3F*L # USED WHEN A REPLY FROM A ROUTINE IS SEEN TO INDICATE A STANDARD ERROR 3FT= SMO FX2 3G#W LDX 0 ACOMMUNE9 3GSG SBN 0 ANS%A 3H#6 BNZ 0 M1TESTERR 3HRQ ERROR ER%A 3J?B SETRE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTERRX https://www.george3.co.uk/george/macro/testerrx?rev=1705492539&do=diff TESTERRX (GIN Macro) Defined in: REPLY-MACROS Used in: 3PX4 ...[??? TESTERRX SECT FILE FGN 2 DOC 3Q6W #MAC TESTERRX [LIKE TESTERR BUT REP IN X%A 3QLG LDX 0 %A 3R66 SBN 0 ANS%B 3RKQ BNZ 0 M1TESTERRX 3S5B ERROR ER%B 3SK2 BRN %C 3T4L M1TESTERRX 3TJ= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTGETW https://www.george3.co.uk/george/macro/testgetw?rev=1705492539&do=diff TESTGETW (GIN Macro) Defined in: MACROS GLJ Used in: PRINT70 3G54 ...[??? TESTGETW SECT CENT FGN 18 DOC 3G#W # 3GSG # 3H#6 # THIS MACRO BRANCHES TO %A IF NO GETWORD HAS BEEN OBEYED IN THIS 3HRQ # CPA SINCE THE LAST WORDFIN OR LOAD 3J?B # 3JR2 # 3K=L #MAC TESTGETW 3KQ= #SKI K6GETWORD 3L9W ( 3LPG LDX 2 FX2 3M96 LDCH 0 ATYPE(2) 3MNQ SBN 0 CPAT/64 3N8B BZE 0 MTESTGETW1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTHKL https://www.george3.co.uk/george/macro/testhkl?rev=1705492539&do=diff TESTHKL (GIN Macro) Defined in: MACROS IH Used in: SETPG867 22FL # THIS FILE CONTAINS MACROS REQUIRED TO IMPLEMENT INSTALLATION HOOKS 22^= # 23DW # 23YG # 24D6 #MAC TESTHKL 24XQ MOD LDX 0 CPBPROGLEV,%B 25CB SLL 0 9 25X2 BNG 0 %A 26BL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTHKLN https://www.george3.co.uk/george/macro/testhkln?rev=1705492539&do=diff TESTHKLN (GIN Macro) Defined in: MACROS IH Used in: 26W= # 27*W #MAC TESTHKLN 27TG MOD LDX 0 CPBPROGLEV,%B 28*6 SLL 0 9 28SQ BPZ 0 %A 29#B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTHKN https://www.george3.co.uk/george/macro/testhkn?rev=1705492539&do=diff TESTHKN (GIN Macro) Defined in: MACROS IH Used in: CHEKPRIV867, COMPRO867, DIRENT867, DISPCOM867, DOMONOP867, EDITOR867, GOTO867, INITJOB867, JOBDATA867, MONEVENT867, MONFILE867, SETPC867, SETPF867, SETPR867, TRACE867 2#PQ # 2*9B #MAC TESTHKN 2*P2 MODD LDX 0 EXT+9,%B,FX2 2B8L SLL 0 9 2BN= BPZ 0 %A 2C7W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTHOOK https://www.george3.co.uk/george/macro/testhook?rev=1705492539&do=diff TESTHOOK (GIN Macro) Defined in: MACROS IH Used in: ALLOCATE867, CHEKPRIV867, CLEAN867, COMHOOK867, DIRENT867, ENWELL867, GLOBALS867, INITJOB867, PREPREAD867, SETPG867, SJMESS867, TRAPCHEC867, VCLASTWO867, VERBCLAS867, WAIT867 29S2 # 2=?L #MAC TESTHOOK 2=R= MODD LDX 0 EXT+9,%B,FX2 2?=W SLL 0 9 2?QG BNG 0 %A 2#=6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTINBRK https://www.george3.co.uk/george/macro/testinbrk?rev=1705492539&do=diff TESTINBRK (GIN Macro) Defined in: MACRO COMPRO Used in: COMPRO867, ERASEA867, INCWAIT860 ?HX4 ...[??? TESTINBR SECT CENT FGN 21 DOC ?J6W [ THIS MACRO TESTS FOR THE SUPPRESSION OF BREAK-IN AND ?JLG [ JUMPS TO THE LABEL %A IF THE INHIBIT BRK-IN BIT IS SET ?K66 #MAC TESTINBRK ?KKQ LDCT 0 #040 ?L5B SMO FX2 ?LK2 ANDX 0 JOBEVENTS ?M4L BNZ 0 %A ?MJ= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTINOP https://www.george3.co.uk/george/macro/testinop?rev=1705492539&do=diff TESTINOP (GIN Macro) Defined in: TESTINOP Used in: COMPROB867 229S ...[??? TESTINOP SECT COMM FGN 6 DOC 22FL #MAC TESTINOP 22^= HUNTW %A,AMXOR,ADCB 23DW BNG %A MTLCB 23YG ... LDX 0 A1+BPTR(%A) 24D6 BZE 0 %B 24XQ BRN MZEND 25CB MTLCB HUNTW %A,AMXOR,ALCB 25X2 BNG %A MZEND 26BL ... LDXC 0 GFAIL(%A) 26W= BCC %B 27*W MZEND 27TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTLINK https://www.george3.co.uk/george/macro/testlink?rev=1705492539&do=diff TESTLINK (GIN Macro) Defined in: MACROS EWDAS Used in: CARTCONT867 R?4L # R?J= [??? TESTLINK R#3W # ******** R#HG #MAC TESTLINK R*36 # R*GQ LDX 0 ETWINMK RB2B ANDN 0 IPBDOWN+GEODOWN RBG2 BZE 0 M1TESTLINK RB^L ANDN 0 IPBDOWN RCF= BNZ 0 %A RCYW BRN %B RDDG M1TESTLINK RDY6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTLOAD https://www.george3.co.uk/george/macro/testload?rev=1705492539&do=diff TESTLOAD (GIN Macro) Defined in: MACROS GLJ Used in: CORE867, GETWORD867, PROSTART867, QUOTA850, SAVE864, SETPRAMA867 4NMD ...[??? TESTLOAD SECT CENT FGN 18 DOC 4NX= # 4PBW #MAC TESTLOAD 4PWG TBS 14,JMISC(%A),0 4QB6 BZE 0 %B 4QTQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTLOOK https://www.george3.co.uk/george/macro/testlook?rev=1705492539&do=diff TESTLOOK (GIN Macro) Defined in: RING-MACROS Used in: PERUSFIL84, READFILE84 4PLN ...[??? TESTLOOK SECT FILE FGN 20 DOC 4PWG #MAC TESTLOOK 4QB6 # AS ABOVE -J.IF SOMEONE GONE FOR LAST BLOCK 4QTQ LDEX 3 ARINGNO(%C) 4R*B SBN 3 1 4RT2 BZE 3 M3TESTLOOK 4S#L ADN 3 1 4SS= LDX 0 3 4T?W M4TESTLOOK 4TRG ADN %C FELLEN 4W?6 BCT 0 M4TESTLOOK 4WQQ M2TESTLOOK 4X=B SBN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTMAINMODE https://www.george3.co.uk/george/macro/testmainmode?rev=1705492539&do=diff TESTMAINMODE (GIN Macro) Defined in: OPEN-MACROS Used in: ASSIGN860 4PLN ...[??? TESTMAIN SECT FILE FGN 20 DOC 4PWG [ 4QB6 #MAC TESTMAINMODE 4QTQ LDX 0 %A 4R*B #STR READING,%D 4RT2 #SKI 4S#L ( 4SS= ANDN 0 #7000 4T?W SBN 0 #3000 4TRG #STR NOT,%C 4W?6 BNG 0 %B 4WQQ #STR NOT,%C 4X=B #SKI 4XQ2 BPZ 0 %B 4Y9L #EXI 4YP= ) 4^8W #STR UNCLEAN,%D 4^NG #SKI 5286 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTMODE https://www.george3.co.uk/george/macro/testmode?rev=1705492539&do=diff TESTMODE (GIN Macro) Defined in: MACROS HFD8 Used in: ASSIGN860, COMPOST867, LIBREQ866, LIBSEC867, MAKEFILE863, OPENFILE867, OPENREL865, OPENTWO867, OPENWAIT867, ORELEMPT70, ORELEND860, ORELHALF82, ORELMAIN867, USERDIR842, USEREXCP860, USERLIB867, USERONE867, USEROPEN867, USERSTRM867 22FL ...[??? TESTMODE SECT FILE FGN 22 DOC 2C7W #MAC TESTMODE 2CCN ...[ TESTS FOR GIVEN MODES 2CMG [ ANY CHANGE TO THIS MACRO SHOULD BE MADE ONLY IN CONSULTATION WITH 2D76 [ THE OWENR O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTMON https://www.george3.co.uk/george/macro/testmon?rev=1705492539&do=diff TESTMON (GIN Macro) Defined in: MACROS FIXD Used in: CHTAB, CLOSBAC867, COMPS JSR, CONTXCOD60, DRSTART6, EDSTART860, EXINONE867, EXTEND866, INKS, MTSTART864, OLMTE85, OPCA867, RENAMEX867, TESTMON 3MYJ ...[??? TESTMON SECT CENT FGN 11 DOC 3N8B # 3NN2 #MAC TESTMON [BRANCH TO %D IF MONITORING OF TYPE 3P7L [ DEFINED BY CONTENTS OF %B IS REQUD 3PM= [ ON PERIPHERAL DEFINED BY %C … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTMOVE https://www.george3.co.uk/george/macro/testmove?rev=1705492539&do=diff TESTMOVE (GIN Macro) Defined in: COREMACROS Used in: ALAS822, ANALYSEA3, ATTACHA8, BEXTRA83, BEXTSJ84, BMINDEX866, BUDGONE83, BUDGTWO84, CHINERR867, CHINTEG867, COMPRO867, CONTRACT866, DELCOM5, DICTJOB82, DOC867, EDIT867, EDITAR867, EDITER867, EDITET7, EDITEX7, EDITMFO867, EDITOR867, EDITORA865, EDITPT867, EDWRITE867, FAIL5, FFFNORM7, FINDOC867, FINDRUM866, HALT5, HARDWARA8, HLSEMS864, IPBIN867, IPBLISTB867, IPBLISTE867, IPBSCAN867, LEXIFIND5, LISTDIR867, LISTFILE867, LISTLOOP867, LISTMOP867,… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTMULT https://www.george3.co.uk/george/macro/testmult?rev=1705492539&do=diff TESTMULT (GIN Macro) Defined in: MACROS HFD8 Used in: EDIT867, INLOOP84, INPCT84, INPUTJDF82, INPUTMOP82, INRESTAR84, LPTWO7, PRINT70, READBULK867, SETPRAMA867, TIDYREAD850, USEROPEN867 4?FJ ...[??? TESTMULT SECT FILE FGN 22 DOC 4?PB #MAC TESTMULT 4#92 LDX 2 FX2 4#NL JBS %A,FILERING(2),BAMULT 4*8= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTNAME https://www.george3.co.uk/george/macro/testname?rev=1705492539&do=diff TESTNAME (GIN Macro) Defined in: MACROS RM59B Used in: CONCEPT85, INCWRITE865, LEXIFIND5, LISTEND867, LISTPROC867, LOGCOM864 3NN2 ...[??? TESTNAME SECT FILE FGN 6 DOC 3QLG #MAC TESTNAME 3QPL ...[ THIS TESTS TWO NAMES AND SETS X7 ZERO IF THEY ARE 3QSQ ...[ NOT ALIKE %A=LENGTH OF NAME %B, %C CONTAIN THE 3QXW ...[ STARTING ADDRESSES OF THE TWO NAMES 3R32 ...[ IT USES X7 AND X0 3R66 NGN 0 %A [S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTNAMX https://www.george3.co.uk/george/macro/testnamx?rev=1705492539&do=diff TESTNAMX (GIN Macro) Defined in: MACROS RM59B Used in: ADDICT865, ALLOCATE867, ARCHIVE867, ARCHIVNW83, ATTRIBUT867, BACKMAP864, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMPRCHEK860, BMQUEST866, BMSJRNL866, BMSTREAM853, COPYA867, CREALEX864, DEWELL867, DUMP860, ERASEA867, FHOBJIND860, GETFREE867, INCCHECK860, INCOM864, INCPTRES864, INCTAPES867, INCWRITE865, LISTEND867, LISTFIND867, LISTFNDA865, LISTPROC867, NORMALUS864, OPENFILE867, OPENREL865, OPENTWO867, OPENWAIT867, ORELMAIN867, PROPERTY867, RE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTNCM https://www.george3.co.uk/george/macro/testncm?rev=1705492539&do=diff TESTNCM (GIN Macro) Defined in: MACROS IH Used in: MONFILE867 =#K= # =*4W #MAC TESTNCM =*JG MHUNT 2,GMON,ATEMP =B46 LDX 0 A1+1(2) =BHQ LDX 2 FX2 =C3B ANDN 0 #1060 =CH2 BZE 0 %A =D2L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTNERR https://www.george3.co.uk/george/macro/testnerr?rev=1705492539&do=diff TESTNERR (GIN Macro) Defined in: REPLY-MACROS Used in: 3L24 ...[??? TESTNERR SECT FILE FGN 2 DOC 3L9W #MAC TESTNERR [LIKE TESTERR BUT BRANCH IF NOT 3LPG SMO FX2 3M96 LDX 0 ACOMMUNE9 3MNQ SBN 0 ANS%A 3N8B BNZ 0 %B 3NN2 ERROR ER%A 3P7L SETREP2 %A 3PM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTOPEN https://www.george3.co.uk/george/macro/testopen?rev=1705492539&do=diff TESTOPEN (GIN Macro) Defined in: OPEN-MACROS Used in: LISTFREE867, OPENEND865 =#T4 ...[??? TESTOPEN SECT FILE FGN 20 DOC =*4W #MAC TESTOPEN =*JG ... DOWN OPENEND,3 =B46 BRN %A =BHQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTOUT https://www.george3.co.uk/george/macro/testout?rev=1705492539&do=diff TESTOUT (GIN Macro) Defined in: MACS MISW Used in: MONITOR36, PROCONTX867 *RD6 #MAC TESTOUT [D.PLATTEN *RXQ LDCH 0 JSOURCE1(3) *SCB SBN 0 10 *SX2 BZE 0 MPX [J IF UPX *TBL SBN 0 1 *TW= BZE 0 MPX [OR MPX *W*W SBN 0 13 *WTG BZE 0 MIPB *X*6 SBN 0 36 *XSQ BNZ 0 MFIN [J IF NOT CI CHANNEL *Y#B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTPAIR https://www.george3.co.uk/george/macro/testpair?rev=1705492539&do=diff TESTPAIR (GIN Macro) Defined in: MACROS SHFS Used in: ADJUNCTS85, DECODE860, NORMALUS864, PCTBEGIN863 9JML # 9K7= [??? TESTPAIR SECT FILE FGN 1 DOC 9KLW #MAC TESTPAIR 9L6G #STR %B 9LL6 JBS %A,%B,FSHNOTJOBNO 9M5Q #STR %B 9MKB #SKI 9N52 JBS %A,FX2,FSHNOTJOBNO 9NJL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTPRIV https://www.george3.co.uk/george/macro/testpriv?rev=1705492539&do=diff TESTPRIV (GIN Macro) Defined in: MACROS MACB Used in: BEXTRA83, BMJLSLAV864, BQUERY84, CHEKPRIV867, INITJOB867, PRIVLEG84 56SJ ...[??? TESTPRIV SECT CENT FGN 2 DOC 574B # 57J2 #MAC TESTPRIV [SETS X0 =0 IF PRIVILEGE NOT HELD; 583L LDN 0 1 [OTHERWISE X0 IS NOT ZERO 58H= SMO %A [%A CONTAINS PRIVILEGE TYPE 592W SRC 0 1 [%B IS A MODIFIER POINTING TO THE 59GG ANDX 0 CPRIV(%B)… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTPROG https://www.george3.co.uk/george/macro/testprog?rev=1705492539&do=diff TESTPROG (GIN Macro) Defined in: LLSMACROS Used in: CONIPB8 7X76 ...[??? TESTPROG SECT CENT FGN 6 DOC 7XDG [ 7XY6 [ MACRO TO INFORM LLS THAT A PERI BUSY FOR > 1MIN IS NOW INACTIVE 7YCQ [ 7YXB [ 7^C2 #MAC TESTPROG 7^WL BSON BSTRAT,MTP1 82B= ... KICKASWI 87Q6 MTP1 889Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTPROP https://www.george3.co.uk/george/macro/testprop?rev=1705492539&do=diff TESTPROP (GIN Macro) Defined in: MACROSIPC Used in: B32# ...[??? TESTPROP SECT COMM FGN 19 DOC B3=6 #MAC TESTPROP B3PQ LDX 2 FX2 B49B LDX 2 FX2 B4P2 LDX 0 EVENT4(2) B58L BPZ 0 MX B5N= LDX 1 EVENT3(2) B67W SRL 1 6 B6MG BZE 1 MX B776 BBUS 15,1,M1 B7LQ ERN 1 #740 B86B BZE 1 MX B8L2 M1 BBS 16,1,MX B95L HUNT2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTPUC https://www.george3.co.uk/george/macro/testpuc?rev=1705492539&do=diff TESTPUC (GIN Macro) Defined in: RCTPMACS Used in: EVENTFN, OPCA867, OPILLS70, PERFAIL866, SWAP865 2*9B # THIS MACRO TESTS WHETHER THE CURRENT ACTIVITY 2*P2 # IS THAT OF A P.U.C. 2B8L #MAC TESTPUC 2BN= #STR %A 2C7W MOD LDX 0 ATYPE,%A 2CMG #STR %A 2D76 #STR 2DLQ ( 2F6B SMO FX2 2FL2 LDX 0 ATYPE 2G5L ) 2GK= SRL 0 6 2H4W ANDN 0 #7700 2HJG SBN 0 APUC*64 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTRACE https://www.george3.co.uk/george/macro/testrace?rev=1705492539&do=diff TESTRACE (GIN Macro) Defined in: MACROS RJH Used in: DISPCOM867, EDITORA865, LISTDIR867, LISTPARS867, LOGOUT867, ONLINEC867, PRINT70, TRAPGO864, TRAPLIST864, WHATJBS867, WLA867, WSPARAM867 6HG= ...[??? TESTRACE SECT CENT FGN 71 DOC 7=DL # THIS MACRO TESTS A SPECIFIED MASK OF CATEGORY BITS AGAINST THE 7=Y= # OUTPUT-TO-THE-MONITORING-FILE MASK IN THE CPB AND IF ANY OF THE 7?CW # SPECIFIED CATEGORIES ARE MISSING BRANCHES TO THE GIVEN LABEL. 7?XG #MAC TESTRAC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTRCTP https://www.george3.co.uk/george/macro/testrctp?rev=1705492539&do=diff TESTRCTP (GIN Macro) Defined in: RCTPMACS Used in: COMPRO867, DOMONOP867, PUTPER85, QUOTA850, RELPER867, REQESLIP861, SWAP865 3G#W # THIS MACRO TESTS WHETHER THE CURRENT JOB 3GSG # IS OF RCTP TYPE. 3H#6 #MAC TESTRCTP 3HRQ LDCT 0 #200 3J?B MOD ANDX 0 JMISC,%A 3JR2 BNZ 0 %B 3K=L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTREAM https://www.george3.co.uk/george/macro/testream?rev=1705492539&do=diff TESTREAM (GIN Macro) Defined in: MACROS HFD8 Used in: PRINT70 42DG ...[??? TESTREAM SECT FILE FGN 22 DOC 4==G #MAC TESTREAM 4=Q6 TESTMULT %A 4?9Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTREP https://www.george3.co.uk/george/macro/testrep?rev=1705492539&do=diff TESTREP (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDON867, ACCESS867, ADJUNCTS85, ALLOCATE867, ALLOW84, ALTINST60, ANTIC867, ARCHIVE867, ARCHIVNW83, ASSOC867, ATTACHA8, ATTACHC867, ATTRIBUT867, BEXTRA83, BEXTSJ84, BLOGNAL865, BQUERY84, BRADSPLT867, BUDGET84, CHINTEG867, CLOSBAC867, CLOSDEL867, COMHOOK867, COMPRESS864, CONCEPT85, CONTEND867, CONTRACT866, COPYB867, CORE867, CREATE867, DEAD867, DEADA867, DECODE860, DETACH867, DEWELL867, DIRENT867, DOC867, DTREST860, DTSTART867, DUMP860, E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTREP2 https://www.george3.co.uk/george/macro/testrep2?rev=1705492539&do=diff TESTREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDONA867, ADJUNCTS85, ALLOW84, ALTINST60, APPEND864, ARCHIVE867, ASSIGN860, ASSOC867, ATTACHA8, BACKMASS860, BCAST867, BEXTSJ84, BMAPTWO860, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BQUERY84, BSPRUNE867, BUDGET84, BUDGTWO84, CAFSPERI867, CANCOM863, CANCRVX864, CHINTEG867, CHNUMCON867, CMEMILL866, COMPCHAN84, COMPOST867, CONCEPT85, COPYA867, COPYB867, CPOBJ6, CREALEX864, CROBJ6, DECODE860, DETACH867, DEWELL867, DICTJOB82, DIREN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTREPNOT https://www.george3.co.uk/george/macro/testrepnot?rev=1705492539&do=diff TESTREPNOT (GIN Macro) Defined in: REPLY-MACROS Used in: ALTINST60, ANTIC867, BEXTRA83, BEXTSJ84, BRADSPLT867, BSPRUNE867, CHINERR867, CHINTEG867, CHNUMCON867, CLOSBAC867, CLOSDEL867, CONCEPT85, CONTEND867, CONTRACT866, DETACH867, DTREST860, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FINDFS867, FLAWMAP866, GETON867, GETONA867, IDFPROP867, IDFSEG867, IFEXPAN867, IPCONA864, IPCOPENB83, LIBLOAD867, LISTPROC867, LOGCOM864, MONITOR36, MONRESUM850, NETOFLNE867, OLMTC85, ONLINEA867, ONLINEB867, O… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTREPX https://www.george3.co.uk/george/macro/testrepx?rev=1705492539&do=diff TESTREPX (GIN Macro) Defined in: REPLY-MACROS Used in: LISTSTAR867, PERION867, REPERR867, SJLOOP864 4X2J ...[??? TESTREPX SECT FILE FGN 2 DOC 4X=B #MAC TESTREPX [TEST REPLY IN XA 4XQ2 LDX 0 %A 4Y9L #SKI ANS%B 4YP= SBN 0 ANS%B 4^8W BZE 0 %C 4^NG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTRPN2 https://www.george3.co.uk/george/macro/testrpn2?rev=1705492539&do=diff TESTRPN2 (GIN Macro) Defined in: REPLY-MACROS Used in: ABANDON867, ABANDONA867, ADDICT865, ALAS822, ANSCOM865, APPEND864, ASSIGN860, ASTONIF867, BACKMAP864, BACKMARK850, BACKMASS860, BMAPTWO860, BMCNTRL866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSJRNL866, BSUJSTAT867, BUDGTWO84, CAFSPERI867, CHEKPRIV867, CLOSEONE867, COMPCHAN84, COMPRESS864, CONNECT867, CONSET864, COPYA867, COPYB867, COPYFILE867, CREALEX864, CREATE867, DICTWELL867, DOIHEMS867, DOXCODE867, DTREST860, DTSCAN860, EDIT867, EDITM… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTRT https://www.george3.co.uk/george/macro/testrt?rev=1705492539&do=diff TESTRT (GIN Macro) Defined in: MACROS ICB Used in: GIVE867, PROSTART867, QUOTA850, REALTIME867, REQESLIP861, SWAP865, TPINS861 2D76 ...[??? TESTRT SECT CENT FGN 2 DOC 2KH2 #MAC TESTRT 2L2L # 2LG= ...[ MACRO TO TEST WHETHER THE PROGRAM BELONGING TO THE 2L^W ...[ CURRENT JOB HAS HAD A 'REALTIME ON' COMMAND EFFECTED 2MFG ...[ %A IS A BRANCH IF REALTIME IS IN EFFECT 2M^6 # 2NDQ #STR %B 2NYB #SKI 2PD2 (… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTRTQ https://www.george3.co.uk/george/macro/testrtq?rev=1705492539&do=diff TESTRTQ (GIN Macro) Defined in: MACROS ICB Used in: PROSTART867, REALTIME867 2YGJ ...[??? TESTRTQ SECT CENT FGN 2 DOC 2YQB #MAC TESTRTQ 2^=2 # 2^PL ...[ MACRO TO TEST IF THE PROGRAM ASSOCIATED WITH THE CURRENT JOB 329= ...[ HAS HAD A 'REALTIME ON' COMMAND ISSUED BUT NOT YET EFFECTED 32NW # 338G #STR %B 33N6 #SKI 347Q ( 34MB #STR %C%D%E 3572 FCJOB 1,FX2,%C,%D,%E 35LL #STR %C%D%E 366= #SKI 36KW FCJOB… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTSLOWEST https://www.george3.co.uk/george/macro/testslowest?rev=1705492539&do=diff TESTSLOWEST (GIN Macro) Defined in: RING-MACROS Used in: COMMFILE82, READFILE84 55*N ...[??? TESTSLOW SECT FILE FGN 20 DOC 55KG #MAC TESTSLOWEST 5656 # JUMPS TO %B,IF ALL OTHER READERS IN FSTACK BLOCK POINTED TO BY %C 56JQ # READ MORE BLOCKS OF THE FILE THAN THE READER WITH ELEMENT AT %A. 574B LDEX 3 ARINGNO(%C) [CT FOR LOOP 57J2 SBN 3 1 583L BZE 3 %B [J IF ONLY 1 ELEMENT IN FSTACK BLOCK. 58H= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTTP https://www.george3.co.uk/george/macro/testtp?rev=1705492539&do=diff TESTTP (GIN Macro) Defined in: RCTPMACS Used in: CHARGESC867, COMPRO867, CORE867, COREALLJ865, DOMONOP867, GIVE867, GIVEA867, PROSTART867, SWAP865, TPINS861 25CB # THIS MACRO TESTS WHETHER THE CURRENT ACTIVITY 25X2 # IS THAT OF A TRUSTED PROGRAM. 26BL #MAC TESTTP 26W= #STR %A 27*W MOD LDX 0 ATYPE,%A 27TG #STR %A 28*6 #STR 28SQ ( 29#B SMO FX2 29S2 LDX 0 ATYPE 2=?L ) 2=R= SRL 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTTRAP https://www.george3.co.uk/george/macro/testtrap?rev=1705492539&do=diff TESTTRAP (GIN Macro) Defined in: MACROS RM57 Used in: ATTACHC867, CAFSPERI867, ERASE867, ONLINEB867 29RX ...[??? TESTTRAP SECT FILE FGN 6 DOC 29S2 #MAC TESTTRAP 2=?L SETREP OK 2=R= SMO FX2 2?=W LDX 0 EXEC1 2?QG ANDN 0 C%A+C%B+C%C+C%D [PICK UP MODES 2#=6 SBN 0 C%A+C%B+C%C+C%D 2#PQ BZE 0 NTESTREP [J IF OKAY 2*9B SETREP NOTRAP 2*P2 NTESTREP 2B8L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTUNPR https://www.george3.co.uk/george/macro/testunpr?rev=1705492539&do=diff TESTUNPR (GIN Macro) Defined in: MACROS SHFS Used in: DEADA867, MORNING867, MOVCART867, RETURNA867 9DQL [??? TESTUNPR SECT FILE FGN 1 DOC 9F== #MAC TESTUNPR 9FPW #STR %B 9G9G JBC %A,%B,FSHNOTJOBNO 9GP6 #STR %B 9H8Q #SKI 9HNB JBC %A,FX2,FSHNOTJOBNO 9J82 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTUSEJ https://www.george3.co.uk/george/macro/testusej?rev=1705492539&do=diff TESTUSEJ (GIN Macro) Defined in: RING-MACROS Used in: PERUSFIL84, READFILE84, STEP864 3W?N ...[??? TESTUSEJ SECT FILE FGN 20 DOC 3WHG #MAC TESTUSEJ 3X36 # JUMPS TO %B,IF ANYONE ELSE IS USING THE BLOCK IN FREADBLOCK OF 3XGQ # THE ELEMENT AT %A,IN THE FSTACK BLOCK AT %C. X0 & X3 ARE OVERWRITT 3Y2B # AND %C MAY BE IN A DUBIOUS STATE IF ONE HAS JUMPED TO UB 3YG2 LDEX 3 ARINGNO(%C) [CT FOR LOOP 3Y^L SBN 3 1 3^F= BZE … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTUSER https://www.george3.co.uk/george/macro/testuser?rev=1705492539&do=diff TESTUSER (GIN Macro) Defined in: MACROS RM59B Used in: GETDIR860, OPENFILE867, OPENTWO867, TRAPCHEC867, USERDIR842, USEREXCP860, WSJOBS867 4*XN ...[??? TESTUSER SECT FILE FGN 6 DOC 4B7G #MAC TESTUSER [TESTS IF WORD"%A CONTAINS" :" 4BM6 #ACC %A 4C6Q ( 4CLB LDX 0 %A 4D62 BXE 0 HCOLUSER,%B 4DKL ) 4F5= #ACC %A 4FJW #SKI 4G4G BXE %A HCOLUSER,%B 4GJ6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TESTWAIT https://www.george3.co.uk/george/macro/testwait?rev=1705492539&do=diff TESTWAIT (GIN Macro) Defined in: RING-MACROS Used in: PERUSFIL84, READFILE84 4*XN ...[??? TESTWAIT SECT FILE FGN 20 DOC 4B7G #MAC TESTWAIT 4BM6 # VERY MUCH AS ABOVE,JUMPS IF ANYONE ELSE IS WAITING FOR BLOCK 4C6Q LDEX 3 ARINGNO(%C) 4CLB SBN 3 1 4D62 BZE 3 M3TESTWAIT 4DKL ADN 3 1 4F5= LDX 0 3 4FJW M4TESTWAIT 4G4G ADN %C FELLEN 4GJ6 BCT 0 M4TESTWAIT 4H3Q M2TESTWAIT … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TFCBCHECK https://www.george3.co.uk/george/macro/tfcbcheck?rev=1705492539&do=diff TFCBCHECK (GIN Macro) Defined in: RING-MACROS Used in: OPENREL865, OPENWAIT867, RESTLIMB864 =2JY ...[??? TFCBCHEC SECT FILE FGN 20 DOC =2SQ #MAC TFCBCHECK =3#B [THIS MACRO DOES THE SAME AS TOPFCB AND CHECKS THAT THE POINTER GIVEN IN =3S2 [%A IS TO A FILE/FCB =4?L TOPFCB %A =4R= LDX 0 ATYPE(%A) =5=W SBX 0 FILEPLUSFCB =5QG BZE 0 M1TFCBCHECK =6=6 GEOERR 1,FCB MISS =6PQ M1TFCBCHECK =79B #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TGU https://www.george3.co.uk/george/macro/tgu?rev=1705492539&do=diff TGU (GIN Macro) Defined in: MACROS RM57 Used in: 22FB ...[ 22FL ...[??? TGU SECT FILE FGN 6 DOC 29#T ...#MAC TGU 29*# ...[ RESTORE TIME MACRO TO GIVE TRAPS TO A SPECIFIED USER WHENEVER 29*R ...[ A FILE IS CREATED AT RUN TIME. 29B= ...#SKI AUSERTRAP-ATRAPEND 29BP ...#SKI 29C8 ...( 29CM ...#CON TGU USED TOO OFTEN 29D6 ...#EXI 29DK ...) 29F4 ...#ALT CERASET=CERASE 29FH ...#ALT CERASE=#20 29G2 ...#MEN MAKEFILE 29GF ...#TRA AUSERTRAP 29GY ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TGUPARAM https://www.george3.co.uk/george/macro/tguparam?rev=1705492539&do=diff TGUPARAM (GIN Macro) Defined in: MACROS RM57 Used in: 29M8 ...[??? TGUPARAM SECT FILE FGN 6 DOC 29M9 ...#MAC TGUPARAM 29M= ...#UNS C%A 29M? ...#DEF 22?=22?^C%A 29M# ...#UNS C%A 29M* ...#SKI 29MB ...( 29MC ...! %A IS NOT A VALID TRAP MODE 29MD ...#DEF 21?=1 29MF ...) 29MG ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) THAW https://www.george3.co.uk/george/macro/thaw?rev=1705492539&do=diff THAW (GIN Macro) Defined in: OPEN-MACROS Used in: ENWELLB867, LISTEND867, OPENEND865, WLD864, WLF862 8KMD ...[??? THAW SECT FILE FGN 20 DOC 8KX= [ 8LBW #MAC THAW 8LWG #STR SAVE,%B 8MB6 #SKI 8MTQ DOWN OPENEND,4 8N*B #STR SAVE,%B 8NT2 DOWN OPENEND,2 8P#L BRN %A 8PS= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) THAWSAVE https://www.george3.co.uk/george/macro/thawsave?rev=1705492539&do=diff THAWSAVE (GIN Macro) Defined in: OPEN-MACROS Used in: BMSAVJOB864, OPENEND865, UNSAVE867 34X8 ...[??? THAWSAVE SECT FILE FGN 20 DOC 3572 #MAC THAWSAVE 35LL SETMODE 0,READ,REOPEN,ERASING 366= OPEND %A,0 36KW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) THAWWF https://www.george3.co.uk/george/macro/thawwf?rev=1705492539&do=diff THAWWF (GIN Macro) Defined in: WORK-MACROS Used in: LISTEND867, OPENWORK866, WLD864, WLF862 636S ...[??? THAWWF SECT FILE FGN 4 DOC 63BL #MAC THAWWF 63W= DOWN OPENWORK,4 64*W BRN %A 64TG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) THEN https://www.george3.co.uk/george/macro/then?rev=1705492539&do=diff THEN (GIN Macro) Defined in: IFMACS Used in: ARCHIVE867, ASTONIF867, CONSET864, EDITPT867, EDWRITE867, FORMLOOP865, GETFREE867, GETFREEB864, GETWORD867, HOWBIG867, IDFASAT867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTDIRF867, LISTFILE867, LISTIDF867, LISTINIT867, LISTLOOP867, LISTNEXT867, LISTOPEN867, LISTPARS867, LISTRING864, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, PERCON867, PERFCHAP866, PERFPASS864, RAECOMMS867, SHOWCOMM864, TPOBJ867, TROBJ867, WA864, WHATGENS867, WHATPROP8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TICKLE https://www.george3.co.uk/george/macro/tickle?rev=1705492539&do=diff TICKLE (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867, CIOUT8, CONMXB8, CONMXC8, ENGAGE867, GETNO865, IPCON864, IPCONA864, IPCONC8, IPCOND864, IPCONF865, IPQUAKE83, IPQUAKER865, KARTCONT867, PROFLAG83, TRIPB83, VIPBPERI864 3YXJ ...[??? TICKLE SECT CENT FGN 6 DOC 3Y^L # THIS MACRO TICKLES EITHER A SPECIFIC MEMBER 3^F= # OR ALL MEMBERS 3^YW #MAC TICKLE 42DG FINDJOBQ 2,%A,(GEOERR) [X2 -> JOB BLOCK 42Y6 STO 2 GE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TICKLER https://www.george3.co.uk/george/macro/tickler?rev=1705492539&do=diff TICKLER (GIN Macro) Defined in: LLSMACROS Used in: CONTINUE867 4KXQ ...[??? TICKLER SECT CENT FGN 6 DOC 4K^G #MAC TICKLER 4MDB ACCSTO %A,ACOMMUNE2,FX2 4MY2 #STR %B 4NCL ( 4PBW ACCSTO %B,ACOMMUNE1,FX2 4PWG DOWN EVENTS,1 4QB6 ) 4QTQ #STR %B 4R*B #SKI 4RT2 DOWN EVENTS,2 4S#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TICKLES https://www.george3.co.uk/george/macro/tickles?rev=1705492539&do=diff TICKLES (GIN Macro) Defined in: LLSMACROS Used in: CONIPB8, SIMULPTR60 4SPQ ...[??? TICKLES SECT CENT FGN 6 DOC 4SS= # 4T?W # THIS MACRO MAY ONLY BE USED WHEN THE PROGRAM IS STOPPED 4TRG # 4W?6 #MAC TICKLES 4WQQ LDX %B EVENT1(%A) 4X=B LDCT 0 #40 4XQ2 ANDX 0 ASU(%B) 4Y9L BNZ 0 MTICK [J IF SUSPENDED SMP 4YP= LDN 0 #200 4^8W ORS 0 ARM(%B) 4^NG MTICK LDX 0… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIDYFAIL https://www.george3.co.uk/george/macro/tidyfail?rev=1705492539&do=diff TIDYFAIL (GIN Macro) Defined in: MACROS Used in: BSBLFAIL867 BHKJ ...[??? TIDYFAIL SECT FILE FGN 9 DOC BHTB #MAC TIDYFAIL BJ*2 LDX 0 %A BJSL SMO FX2 BK#= STO 0 ACOMMUNE1 BKRW LDX 0 %B BL?G SMO FX2 BLR6 STO 0 ACOMMUNE2 BM=Q LDX 0 %C BMQB SMO FX2 BN=2 STO 0 ACOMMUNE3 BNPL SMO FX2 BP9= #STR %D BPNW STO 0 ACOMMUNE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIDYOUT https://www.george3.co.uk/george/macro/tidyout?rev=1705492539&do=diff TIDYOUT (GIN Macro) Defined in: MACROS LEF Used in: HPTW ...[??? TIDYOUT SECT DEVT FGN 2 DOC HYNL #MAC TIDYOUT H^8= #OPT M1TIDYOUT=1 H^MW #STR %A J27G CALL %A M2TIDYOUT J2M6 #STR %A J36Q #SKI J3LB CALL 2 M2TIDYOUT J462 #SKI M1TIDYOUT J4KL ( J55= BRN M3TIDYOUT J5JW MTIDYOUT J64G HUNTW 1,GOUT,INFO J6J6 BNG 1 M4TIDYOUT J73Q FREECORE 1 J7HB BRN MTIDYOUT J8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIMECON https://www.george3.co.uk/george/macro/timecon?rev=1705492539&do=diff TIMECON (GIN Macro) Defined in: MACROS RJDG Used in: BMXEMS83, GIVEA867, IPBLISTA867, LISTDIRF867, LISTINIT867, LISTINTC865, LISTSTAR867, MONOLITH864, OPER864, PCTLISTA867, PERFCHAP866, QPRINT867, REALTIME867, SETJD867, SETPF867, SETPRAMA867, SETUPARA867 3K2S ...[??? TIMECON SECT CENT FGN 7 DOC 3K=L [MACRO FOR BINARY TO CHARACTER TIME CONVERSION 3KQ= #MAC TIMECON 3L9W #STR CLEANCT,%A 3LPG #SKI 3M96 ( 3MNQ LDN 1 FTIME 3N8B SMO FX2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIMECON2 https://www.george3.co.uk/george/macro/timecon2?rev=1705492539&do=diff TIMECON2 (GIN Macro) Defined in: MACROS RJDG Used in: MONFIL865 3GBT ...[??? TIMECON2 SECT CENT FGN DOC 3GC4 ...[MACRO TO PUT CURRENT TIME IN %A 3GC? ...#MAC TIMECON2 3GCG ... LDX 0 FTIME 3GCP ... ACCSTO 0,0,%A 3GCY ... STO 1 GEN1 3GD7 ... STO 2 GEN2 3GDB ... LDX 1 CLEANCT 3GDK ... SBX 1 CLEANCTL 3GDS ... CALL 2 MTEST 3GF3 ... +1000/K9 3GF= ... +59 3GFF ...MTEST DVS 0 0(2) 3GFN ... BX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIMESET https://www.george3.co.uk/george/macro/timeset?rev=1705492539&do=diff TIMESET (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867 7*SW ...[??? TIMESET SECT CENT FGN 6 DOC 7*W2 # %A RETURN LABEL FOR SEGENTRY 7B*L [ DROPS THRU IF MIDNIGHT 7BT= [ %B RETURN IF MINUTE UP 7C#W [ %C OTHER RETURN 7D#6 #MAC TIMESET 7DRQ LDX 0 CLEANCT 7F?B SBX 0 CLEANCTL 7FR2 SBN 0 60*1000/K9 7G=L BNG 0 %C [JUMP IF FTIME STILL VALID 7GQ= ACROSS DATECON,3 7H9W #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TINYMULT https://www.george3.co.uk/george/macro/tinymult?rev=1705492539&do=diff TINYMULT (GIN Macro) Defined in: MACROS HFD8 Used in: 4LF6 ...[??? TINYMULT SECT FILE FGN 22 DOC 4MDB #MAC TINYMULT 4MKJ ...[ MEND MACRO TO LIMIT MULTIFILES TO %A BLOCKS PER COMPONENT,WITH %B 4MQQ ...[ AS MAX NO OF COMPONENTS 4MRC ...#DEF 20?=1 4MS4 ...#UNS FSHB 4MSP ...#DEF 20?=0 4MTB ...#UNS FSHTEST 4MW3 ...#DEF 20?=1 4MWN ...#SKI 20? 4MX* ...( 4MY2 #SKI %A 4NCL ( 4NX= #MEN USERONE 4PBW #TRA K50USERONE 4PWG LDN … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TIPCREP https://www.george3.co.uk/george/macro/tipcrep?rev=1705492539&do=diff TIPCREP (GIN Macro) Defined in: MACROSIPC Used in: IPCON864, IPCONA864, IPCONB8, IPCONC8, IPCONE865, IPCONG8, IPCSTART864 B#?8 ...[??? TIPCREP SECT COMM FGN 19 DOC B#H2 #MAC TIPCREP B#LX ...[ %I IS THE NAME OF A SUBROUTINE TO BE CALLED B#QS ...[ ON X0 IN THE EVENT OF BEING WOKEN B#WP ...[ UP WITH A READ UP B*2L #STR %B B*G= ( B*^W LDX 0 CLEANCT BBFG #STR %A BB^6 ADN 0 5000/K9 BCDQ #STR %A BCYB #SKI BDD2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TMENDIT https://www.george3.co.uk/george/macro/tmendit?rev=1705492539&do=diff TMENDIT (GIN Macro) Defined in: MACROS DTP Used in: CBNQ [??? TMENDIT SECT DIAG FGN 552 DOC CC8B #MAC TMENDIT [M.C.D. MANN CCN2 [ CD7L [ CDM= [ ************* CF6W [ * TMENDIT * CFLG [ ************* CG66 [ CGKQ [ CH5B #DEF 31?=1? [REMEMBER THE LISTING LEVEL CHK2 #STR %A [FLAG AN ERROR IF FILE NAME OMITTED CJ4L #SKI CJJ= ( CK3W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPCA https://www.george3.co.uk/george/macro/topca?rev=1705492539&do=diff TOPCA (GIN Macro) Defined in: MACROS2JSR Used in: CAFSPERI867, CIMOP867, CPOBJ6, CROBJ6, DRSTART6, EDSTART860, FHLIST867, FHOBJ860, FHOBJBL860, HLSREAD867, IPCEN8, IPCOPENB83, IPCPERI83, LPOBJ6, LPTWO7, MTOBJ864, MTSTART864, NETOFLNE867, OLMTD65, OLMTE85, SCHDJOBA867, SIMULPTR60, TPOBJ867, TROBJ867, VIPBPERI864 2PD2 #MAC TOPCA [JSRAYNER 2PXL LDN 1 %A 2QC= LDX 2 FX2 2QWW SMO APETADDR(2) 2RBG LDN 2 ALINK1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPCA1 https://www.george3.co.uk/george/macro/topca1?rev=1705492539&do=diff TOPCA1 (GIN Macro) Defined in: MACROS2JSR Used in: ANTIC867, BEXTRA83, CAFSPERI867, CLOSBAC867, CONIPB8, CONMXA85, CONMXB8, CONMXC8, CPOBJ6, CROBJ6, DROBJ864, DRSTART6, DRUM852, EDSTART860, EXINONE867, EXTEND866, FHLIST867, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, LPOBJ6, LPTWO7, MTOBJ864, MTSTART864, OLPODD865, PERION867, READSPEC867, RELPER867, RENAMEX867, SCHDJOBA867, SIMULPTR60, SPERION867, TPOBJ867, TROBJ867 3FT= ...[??? TOPCA1 SECT CENT FGN 2 DOC 3G#W # THIS MACRO CHA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCA https://www.george3.co.uk/george/macro/topfca?rev=1705492539&do=diff TOPFCA (GIN Macro) Defined in: RING-MACROS Used in: BACKMAP864, BMAPDIR865, BMAPONE867, BMCNTRL866, BMINDEX866, CLOSEONE867, CLOSTIDY860, COPYA867, INCVFCHK850, LEXIFIND5, MTSTART864, OPENWORK866, ORELEMPT70, ORELEND860, ORELHALF82, ORELMAIN867, RESTOREG864, REWRITE864, USELEX5 9=M# ...[??? TOPFCA SECT FILE FGN 20 DOC 9=X6 #MAC TOPFCA 9?BQ [ THIS MACRO SEARCHES FOR THE RING ELEMENT OF THE TOP FILE OPEN TO THE 9?WB [ CURRENT ACTIVITY AND GIVES A POINTER TO IT IN %A 9#B2 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCA2 https://www.george3.co.uk/george/macro/topfca2?rev=1705492539&do=diff TOPFCA2 (GIN Macro) Defined in: RING-MACROS Used in: ASSIGN860, BACKMAP864, BMAPONE867, BMCNTRL866, BMINDEX866, BMXEND7, CLOSEALT864, CLOSFREZ867, CLOSTIDY860, COMPCHAN84, COMPRESS864, COPYA867, EDOBJ864, EDSTART860, ERASEA867, FHOBJ860, FHOBJDIR860, GETDIR860, INCMON865, INSERT6, MATALO860, MTCODE864, MTOBJ864, MTSTART864, OFFREL867, RESTLIMB864, STEP864, USELEX5, USEROPEN867 95?D ...[??? TOPFCA2 SECT FILE FGN 20 DOC 95H= #MAC TOPFCA2 [X2 ->[FX2] 962W … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCAB https://www.george3.co.uk/george/macro/topfcab?rev=1705492539&do=diff TOPFCAB (GIN Macro) Defined in: RING-MACROS Used in: CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEND867, CLOSEONE867, CLOSTIDY860 #HLN ...[??? TOPFCAB SECT FILE FGN 20 DOC #HWG #MAC TOPFCAB #JB6 SMO FX2 #JTQ LDX %A FILERING #K*B SMO FBACKPOINT(%A) #KT2 LDX %B BPTR(%A) #L#L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCAB2 https://www.george3.co.uk/george/macro/topfcab2?rev=1705492539&do=diff TOPFCAB2 (GIN Macro) Defined in: RING-MACROS Used in: CLOSTIDY860, ERASEA867, FHOBJBL860, MATALO860, MTCODE864, MTOBJ864, MTSTART864, REPERR867 #LJD ...[??? TOPFCAB2 SECT FILE FGN 20 DOC #LS= #MAC TOPFCAB2 #M?W LDX %A FILERING(2) #MRG SMO FBACKPOINT(%A) #N?6 LDX %B BPTR(%A) #NQQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCAV https://www.george3.co.uk/george/macro/topfcav?rev=1705492539&do=diff TOPFCAV (GIN Macro) Defined in: RING-MACROS Used in: READFAIL866 9F2D ...[??? TOPFCAV SECT FILE FGN 20 DOC 9F== #MAC TOPFCAV 9FPW # GIVES PTR TO FCA OF TOP FILE OPEN TO ACTIVITY POINTED TO BY 9G9G # %B 9GP6 MOD LDX %A FILERING,%B 9H8Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCB https://www.george3.co.uk/george/macro/topfcb?rev=1705492539&do=diff TOPFCB (GIN Macro) Defined in: RING-MACROS Used in: ARCHIVE867, ARCHIVNW83, ASSIGN860, BACKMASS860, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMSJRNL866, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEND867, COMPRESS864, COPYA867, COPYB867, COPYFILA867, COPYFILE867, CREALEX864, DTREST860, EDSTART860, ERASE867, ERASEA867, FHDIRTWO864, FHOBJDIR860, FHOBJIND860, GETON867, GETONA867, INCEOT865, INCMON865, INCSTART865, INCVFCHK850, INCWRITE865, INRESTAR84, LDSTART850, LEXIFIND5, LIBCOM867, LIS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCB2 https://www.george3.co.uk/george/macro/topfcb2?rev=1705492539&do=diff TOPFCB2 (GIN Macro) Defined in: RING-MACROS Used in: ASSIGN860, BACKMAP864, BACKMARK850, BACKMASS860, BACKROOM865, BEXTRA83, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLIST864, BMJLSLAV864, BMOUTPUT867, BMSAVJOB864, BMXEND7, CLOSEALT864, CLOSEONE867, CLOSFREZ867, COMPOST867, COMPRESS864, COPYB867, CREALEX864, DOIHEMS867, DOXCODE867, DROBJ864, DRSTART6, DTREST860, EDOBJ864, EDSTART860, ERASEA867, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, GETDI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TOPFCBV https://www.george3.co.uk/george/macro/topfcbv?rev=1705492539&do=diff TOPFCBV (GIN Macro) Defined in: RING-MACROS Used in: READFAIL866, SETPC867, WSPERIS867 9X7J ...[??? TOPFCBV SECT FILE FGN 20 DOC 9XCB #MAC TOPFCBV 9XX2 # GIVES PTR TO FCB OF TOP FILE OPEN TO ACTIVITY POINTED TO BY 9YBL # %B 9YW= MOD LDX %A FILERING,%B 9^*W PSTAC %A,%A 9^TG BFCBX %A,%A =2*6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TPLOCKSU https://www.george3.co.uk/george/macro/tplocksu?rev=1705492539&do=diff TPLOCKSU (GIN Macro) Defined in: MACROS EWDAS Used in: FLAW866 6GH2 # 6H2L ...[??? TPLOCKSU 6HG= # ******** 6H^W #MAC TPLOCKSU 6J9N ...# 6JFG PLOCKSU %A,£,%B,1 6J^6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACE https://www.george3.co.uk/george/macro/trace?rev=1705492539&do=diff TRACE (GIN Macro) Defined in: MISCMACS Used in: ACCESS867, ADJCHECK85, ADJUNCTS85, ALASB867, ALLOCATE867, ALLOW84, ANALYSE865, ANSCOM865, APPEND864, ASSIGN860, ASSOC867, ATTACHA8, ATTACHC867, BACKROOM865, BCAST867, BEXTRA83, BEXTSJ84, BMINDEX866, BMXEND7, BQUERY84, BRADDATA867, BRADEMUL867, BRADSPLT867, BSALFAIL, BSBLFAIL867, BSPRUNE867, BSQ867, BSTS867, BSUJSTAT867, BSUNJAM867, BUDGET84, BUDGONE83, BUDGTWO84, CANCOM863, CANTDO867, CAPCA50, CARTCONT867, CHARGESC867, CHEKPRIV867, CHNUMCON867, … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACEDP https://www.george3.co.uk/george/macro/tracedp?rev=1705492539&do=diff TRACEDP (GIN Macro) Defined in: LLSMACROS Used in: COREALL865, JAMSWAP865, SCHEDIN867, SCHEDOUT865, STRATEGY865, UNJAMMER866 96YK ...[??? TRACEDP SECT CENT FGN 6 DOC 96Y^ ...#MAC TRACEDP 9726 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACEIF https://www.george3.co.uk/george/macro/traceif?rev=1705492539&do=diff TRACEIF (GIN Macro) Defined in: MACROS HFD8 Used in: ADDICT865, BACKMASS860, BACKROOM865, BMAPDIR865, BMAPONE867, BMAPTAPE865, BMAPTWO860, BMCNTRL866, BMINDEX866, BMJLSLAV864, BMSAVJOB864, BMSJRNL866, BMSTREAM853, CASCODE, CHANFILE8, CLOSEAB863, CLOSEALT864, CLOSEDIR867, CLOSEFUL867, CLOSEMAS863, CLOSEND867, CLOSEONE867, CLOSTIDY860, COPYFILA867, COPYFILE867, FBUFF860, FILELOG, FILEMAP, FREEBUFF860, GETDIR860, GETDIRX860, INCMON865, INCRCUBS860, INCRCUBX860, INCVFCHK850, INCWRITE865, IPCON864… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACEVER https://www.george3.co.uk/george/macro/tracever?rev=1705492539&do=diff TRACEVER (GIN Macro) Defined in: MACROS HFD8 Used in: APPEND864, BMINDEX866, COMMFILE82, FORMLOOP865, GETFREE867, GETFREEB864, INCDTA865, INCTAPES867, INLOOP84, LISTEXCP865, LISTINIT867, LISTPREP865, NNORM83, PREPREAD867, READFILE84, RESTEND850, SCHEDIN867, SCHEDOUT865, TIDYREAD850 3HRQ ...[??? TRACEVER SECT FILE FGN 22 DOC 3JR2 #MAC TRACEVER 3K2S ...[ TRACEVER IS A VARIANT OF TRACE WHICH CANT BE DELAYED 3K=L GEO 7 %A 3KQ= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACEX https://www.george3.co.uk/george/macro/tracex?rev=1705492539&do=diff TRACEX (GIN Macro) Defined in: PMACS Used in: CLOSEIPB864, IPBINB867, IPBOUT867, IPBPM84 R5#G #MAC TRACEX [M.C.D. MANN R5RB [ R6== [ R6P6 [ ************ R782 [ * TRACEX * R7M= [ ************ R85L [ R8J2 [ R92B #SKI K6TRACE>11-11 R9DQ ( R9X6 STO 1 BATEMAN1 R=*G CALL 1 (JTRACEX) R=RW ) R?== #SKI K6TRACE<12-12 R?NL BRN M1 R#72 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRACMORE https://www.george3.co.uk/george/macro/tracmore?rev=1705492539&do=diff TRACMORE (GIN Macro) Defined in: PMACS Used in: XJ*W [??? TRACMORE SECT DIAG FGN 104 DOC XJQ6 #MAC TRACMORE [M.C.D. MANN XK6B [ XKGL [ XKWW [ ************** XL?6 [ * TRACMORE * XLMB [ ************** XM3L [ XMCW [ XMS6 [ RESTORE TIME MACRO TO CHANGE XN8B [ TRACE BUFFER SIZE XNJL [ PARAMETERS:- %A- NEW BUFFER SIZE(DEFAULT-UNCHANGED) XNYW [ XP*6 #STR %A XPPB ( XQ6Q #SKI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANCHK https://www.george3.co.uk/george/macro/tranchk?rev=1705492539&do=diff TRANCHK (GIN Macro) Defined in: MACROS SHFS Used in: MONFILEA864 5?F2 [??? TRANCHK SECT FILE FGN 1 DOC 5?YL #MAC TRANCHK 5#D= HUNT 1,FSH,FSHREQ 5#XW #STR %D 5*CG BNG 1 %D 5*X6 #DEF MTC%B=1 5BBQ LF 1,FSHCODENUM,0 5BWB #UNS MTCEQUAL 5CB2 ( 5CTL SBN 0 %A 5D*= LDX 1 FX1 5DSW BZE 0 %C 5F#G ) 5FS6 #UNS MTCGREATER 5G?Q ( 5GRB NGX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANCHKN https://www.george3.co.uk/george/macro/tranchkn?rev=1705492539&do=diff TRANCHKN (GIN Macro) Defined in: MACROS SHFS Used in: CANCRVX864, DTWRONG867, FHDIRTWO864, FREEZE864, INCRCUBX860, MACRALAS864, MONFILEA864, MULTIPLX864, NORMALUS864, REGEN865, RETRIEVE864 5P6G [??? TRANCHKN SECT FILE FGN 1 DOC 5PL6 #MAC TRANCHKN 5Q5Q HUNT 1,FSH,FSHREQ 5QKB #STR %D 5R52 BNG 1 %D 5RJL #DEF MTC%B=1 5S4= LF 1,FSHCODENUM,0 5SHW #UNS MTCEQUAL 5T3G ( 5TH6 SBN 0 %A 5W2Q … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANERR https://www.george3.co.uk/george/macro/tranerr?rev=1705492539&do=diff TRANERR (GIN Macro) Defined in: MACROS EWDAS Used in: ?4GW # ?52G [??? TRANERR ?5G6 # ******* ?5^Q #MAC TRANERR ?6FB # ?6^2 #OPT MTRANERR1=0 ?7DL #SKI MTRANERR1-1 ?7Y= ( ?8CW #FRE MTRANERR1 ?8XG #DEF MTRANERR1=1 ?9C6 MTRANERR2 ?9WQ #DEF MTRANERR=MTRANERR2 ?=BB GEOERR 1,TRANERR ?=W2 ) ??*L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSA https://www.george3.co.uk/george/macro/transa?rev=1705492539&do=diff TRANSA (GIN Macro) Defined in: MACROS SHFS Used in: 4=Q6 [??? TRANSA SECT FILE FGN 1 DOC 4?9Q #MAC TRANSA 4?PB FSHCODE A,MTRANSA1 4#92 ( 4#NL TRANSBEG %A^FSHZNEST,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K 4*8= MTRANSA1 4*MW ) 4B7G FSHCODE B,MTRANSA2 4BM6 ( 4C6Q TRANSBEG %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K 4CLB MTRANSA2 4D62 ) 4DKL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSACT https://www.george3.co.uk/george/macro/transact?rev=1705492539&do=diff TRANSACT (GIN Macro) Defined in: MACROS SHFS Used in: LISTFIND867, RETURNA867 95H= [??? TRANSACT SECT FILE FGN 1 DOC 962W #MAC TRANSACT 96GG LDX 2 FX2 9726 CALL 1 M1TRANSACT 97FQ LINK %A,%B 97^B M1TRANSACT 98F2 LDX 0 0(1) 98YL STO 0 ACOMMUNE3(2) 99D= LDN 4 0 99XW #STR %E 9=CG ( 9=X6 BS 2,FSHALIEN 9?BQ ORN 4 1 9?WB ) 9#B2 #STR %E 9#… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSB https://www.george3.co.uk/george/macro/transb?rev=1705492539&do=diff TRANSB (GIN Macro) Defined in: MACROS SHFS Used in: 4F5= [??? TRANSB SECT FILE FGN 1 DOC 4FJW #MAC TRANSB 4G4G FSHCODE B,MTRANSB1 4GJ6 ( 4H3Q TRANSBEG %A^FSHZNEST,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K 4HHB MTRANSB1 4J32 ) 4JGL FSHCODE A,MTRANSB2 4K2= ( 4KFW TRANSBEG %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K 4K^G MTRANSB2 4LF6 ) 4LYQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSBEG https://www.george3.co.uk/george/macro/transbeg?rev=1705492539&do=diff TRANSBEG (GIN Macro) Defined in: MACROS SHFS Used in: ANSCOM865, CANCRVX864, DTWRONG867, FHDIRTWO864, FREEZE864, GETBACK865, GETBAX865, HLSREAD867, INCOM864, INCRCUBX860, JDWRITE867, LISTINTC865, LOGANAL864, LOGCOM864, MACRALAS864, MOVCART867, MULTIPLX864, NEWOWN865, NORMALUS864, PERFCHAP866, READFALE866, REALTIME867, REGEN865, RENAME864, RETRIEVE864, RITEFAIL864, SAVE864, SAVEJOB865, TRANFAIL866, TRAPGO864, TRAPLIST864, WA864 22FL # 22^= # 23DW # 23YG # MACROS … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSBEX https://www.george3.co.uk/george/macro/transbex?rev=1705492539&do=diff TRANSBEX (GIN Macro) Defined in: MACROS SHFS Used in: MONFILEA864 3JR2 [??? TRANSBEX SECT FILE FGN 1 DOC 3K=L #MAC TRANSBEX 3KQ= #SKI %A 3L9W LDX 0 %A 3LPG ADX 0 %C 3M96 LDX 1 %B 3MNQ LDX 2 FX2 3N8B #SKI %D-ACOMMUNE1>7-7 3NN2 ! PARAMETER D IS OUT OF RANGE 3P7L #SKI %D-ACOMMUNE1>7-7 3PM= #SKI 3Q6W #DEF MTRANSBEX=%D-ACOMMUNE1 3QLG STO 0 %D(2) 3R66 STO 1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSBICHECK https://www.george3.co.uk/george/macro/transbicheck?rev=1705492539&do=diff TRANSBICHECK (GIN Macro) Defined in: MACROS SHFSB Used in: 47#Q [??? TRANSBICHECK SECT FILE FGN 1 DOC 47SB #MAC TRANSBICHECK 48#2 LDCH 0 ATYPE(2) 48RL SBN 0 CPAT/64 49?= BNZ 0 M1BICHECK 49QW JBCC M1BICHECK,2,EXBIAWAY 4==G TRACE 2,TBICHECK 4=Q6 DOWN PROCONTX,22 4?9Q M1BICHECK 4?PB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSDIE https://www.george3.co.uk/george/macro/transdie?rev=1705492539&do=diff TRANSDIE (GIN Macro) Defined in: MACROS SHFS Used in: MONFILEA864, MULTIPLX864, REALTIME867, WA864 =JWW ...[??? TRANSDIE SECT FILE FGN 1 DOC =KBG ...#MAC TRANSDIE =KW6 ... ACROSS FSHTRANF,1 =L*Q ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSEND https://www.george3.co.uk/george/macro/transend?rev=1705492539&do=diff TRANSEND (GIN Macro) Defined in: MACROS SHFS Used in: COOR865 ==LQ ...[??? TRANSEND SECT FILE FGN 1 DOC =?6B ...#MAC TRANSEND =?L2 ...#STR %A =#5L ... JBC %A,,FSHRUNNING =#K= ...#STR %A =*4W ...#STR =*JG ... JBC (GEOERR),,FSHRUNNING =B46 ... HUNTW 1,FSH,FSHREQX =BHQ ...#STR %A =C3B ... BNG 1 %A =CH2 ...#STR %A =D2L ...#STR =DG= ... BNG 1 (GEOERR) =D^W ... NAME 1,FSH,FSHREQ =FFG ... LDX 2 FSHINPTR … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSERR https://www.george3.co.uk/george/macro/transerr?rev=1705492539&do=diff TRANSERR (GIN Macro) Defined in: MACS MISW Used in: BYHL #MAC TRANSERR B^3= #SKI %A["IF NUMBER IS 0,THE OLD MESSAGE WILL NOT BE CHANGED" B^GW ( C22G #MEN PROFLAG C2G6 #TRA K50PROFLAG C2^Q #SKI %A<37-37 C3FB %A,%AH%B C3^2 #SKI %A>36-36 C4DL 36,36H%B C4Y= #END C5CW #MEN MULTIPLX C5XG #TRA K60MULTIPLX C6C6 #SKI %A<37-37 C6WQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSET https://www.george3.co.uk/george/macro/transet?rev=1705492539&do=diff TRANSET (GIN Macro) Defined in: MACROS SHFS Used in: =5=W ...[??? TRANSET SECT FILE FGN 1 DOC =5QG ...#MAC TRANSET =6=6 ... SMO FX2 =6PQ ... LDN 2 ACOMMUNE8 =79B ... CALL 1 MTRANSET1 =7P2 ... +%A^FSHZAUT^FSHZSUP =88L ... LINK %B,%C =8N= ...MTRANSET1 =97W ... MOVE 1 2 =9MG ... DOWN FSHTRANA,33 ==76 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFCB https://www.george3.co.uk/george/macro/transfcb?rev=1705492539&do=diff TRANSFCB (GIN Macro) Defined in: RING-MACROS Used in: BMINDEX866, CLOSEALT864, CLOSEND867, CREATE867, MAKEFILE863, ORELMAIN867, RESTLIMB864, WORKFILE860 J^X6 ...[??? TRANSFCB SECT FILE FGN 22 DOC K2BQ ...#MAC TRANSFCB K2WB ...[ K3B2 ...[ TRANSFER FCB FROM FFLE,ACT,HALFOR WORK CHAINS K3TL ...[ TO FILE,WORK OR HALF CHAINS K4*= ...[ K5#G ...#OPT MTFCBFILE=1 K5S6 ...#OPT MTFCBHALF=4 K6?Q ...#OPT MTFCBWORK=8 K6RB ...#OPT MTFCBACT=16 K7QL ...#DEF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFIN https://www.george3.co.uk/george/macro/transfin?rev=1705492539&do=diff TRANSFIN (GIN Macro) Defined in: MACROS SHFS Used in: ANSCOM865, CANCRVX864, COMPRESS864, DTWRONG867, FHDIRTWO864, FREEZE864, INCOBS867, INCOM864, INCRCUBX860, IPALL864, LISTFNDA865, LOGANAL864, LOGCOM864, MACRALAS864, MONFILEA864, MULTIPLX864, NEWOWN865, NORMALUS864, REALTIME867, REGEN865, RENAME864, RETRIEVE864, RITEFAIL864, SAVE864, SAVEJOB865, SJLOOP864, TRAPCHEC867, TRAPGO864, TRAPLIST864, TRAPWORK864, WA864 4MDB [??? TRANSFIN SECT FILE FGN 1 DOC 4MY2 #MAC TRANSFIN 4NCL … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFIX https://www.george3.co.uk/george/macro/transfix?rev=1705492539&do=diff TRANSFIX (GIN Macro) Defined in: MACROS DTP Used in: BSQ867, BSTS867, CASCODE, CHCH865, COOR865, COREALL865, EVENTFN #QP= [??? TRANSFIX SECT DIAG FGN 552 DOC #R8W #MAC TRANSFIX [M.C.D. MANN #RNG [ #S86 [ #SMQ [ ************** #T7B [ * TRANSFIX * #TM2 [ ************** #W6L [ #WL= [ #X5W %A O%B #XKG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFO1 https://www.george3.co.uk/george/macro/transfo1?rev=1705492539&do=diff TRANSFO1 (GIN Macro) Defined in: MACROS RMD10 Used in: TROBJ867 *N=J ...[??? TRANSFO1 SECT FILE FGN 16 DOC *P22 #MAC TRANSFO1 *PFL LDX 2 FX2 *P^= ANSOK2 *QDW LDX 0 %A *QYG ERX 0 %B *RD6 ANDN 0 #7775 *RXQ BZE 0 MTR *SCB LDN 1 #20 *SX2 ANDX 1 %B *TBL ERX 0 1 *TW= BZE 0 MTR *W*W STO %A ACOMMUNE1(2) *WTG STO %B ACOMMUNE2… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFORM https://www.george3.co.uk/george/macro/transform?rev=1705492539&do=diff TRANSFORM (GIN Macro) Defined in: MACROS RMD10 Used in: INRESTAR84 *HB# ...[??? TRANSFOR SECT FILE FGN 16 DOC *HL6 # *J5Q # MACROS TO CONVERT P/T RECORDS *JKB # *K52 #MAC TRANSFORM *KJL SMO FX2 *L4= STO %A ACOMMUNE1 *LHW SMO FX2 *M3G STO %B ACOMMUNE2 *MH6 DOWN TRANSFOR,1 *N2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFRE https://www.george3.co.uk/george/macro/transfre?rev=1705492539&do=diff TRANSFRE (GIN Macro) Defined in: MACROS SHFS Used in: =2SQ ...[??? TRANSFRE SECT FILE FGN 1 DOC =3#B ...#MAC TRANSFRE =3S2 ... MFREE FSH,FSHREQ =4?L ... MFREE FSH,FSHTERM =4R= ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSFRZ https://www.george3.co.uk/george/macro/transfrz?rev=1705492539&do=diff TRANSFRZ (GIN Macro) Defined in: MACROS SHFS Used in: 9YBL ...[??? TRANSFRZ SECT FILE FGN 1 DOC 9YW= ...#MAC TRANSFRZ 9^*W ...M1TRANSFRZ 9^TG ... POP M1TRANSFRZ,,FSHCHAIN =2*6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSIDC https://www.george3.co.uk/george/macro/transidc?rev=1705492539&do=diff TRANSIDC (GIN Macro) Defined in: MACROS SHFS Used in: 9P4= # 9PHW [??? TRANSIDC SECT FILE FGN 1 DOC 9Q3G #MAC TRANSIDC 9QH6 HUNTW 1,FSH,FSHREQ 9R2Q BNG 1 M1TRANSIDC 9RGB LF 1,FSHCODENUM,0 9S22 SBN 0 %A 9SFL BNZ 0 M1TRANSIDC 9S^= LDN 2 %B 9TDW STF 1,FSHCODENUM,2 9TYG TRACE FSHCODEID(1),TRANSIDC 9WD6 M1TRANSIDC 9WXQ LDX 1 FX1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRANSRET https://www.george3.co.uk/george/macro/transret?rev=1705492539&do=diff TRANSRET (GIN Macro) Defined in: MACROS SHFS Used in: IPALL864, PERFCHAP866, RITEFAIL864, SJLOOP864 66S2 [??? TRANSRET SECT FILE FGN 1 DOC 67?L #MAC TRANSRET 67R= LDX 2 FX2 68=W LDX 0 ATYPE(2) 68QG SRL 0 12 69=6 SBN 0 IPCA+FSHARED 69PQ BZE 0 MTRANSRET 6=9B GEOERR 1,WRONGACT 6=P2 MTRANSRET 6?8L ACROSS FSHTRANC,2 6?N= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRAPADD https://www.george3.co.uk/george/macro/trapadd?rev=1705492539&do=diff TRAPADD (GIN Macro) Defined in: MACROS RM57 Used in: CREATE867, EDIT867, MAKEFILE863, TRAPGO864, USEROPEN867 2PMS ...[??? TRAPADD SECT FILE FGN 6 DOC 2PXL #MAC TRAPADD 2QC= DOWN TRAPGO,7 2QWW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRAPOPEN https://www.george3.co.uk/george/macro/trapopen?rev=1705492539&do=diff TRAPOPEN (GIN Macro) Defined in: MACROS RM57 Used in: DIRENT867, LIBINSEC864, SETPF867 2BDD ...[??? TRAPOPEN SECT FILE FGN 6 DOC 2BN= #MAC TRAPOPEN 2C7W CHECKTRAP 2CMG TESTTRAP %A,%B,%C,%D 2D76 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRAST https://www.george3.co.uk/george/macro/trast?rev=1705492539&do=diff TRAST (GIN Macro) Defined in: MACROSIPC Used in: GETNO865, IPCPERI83 DH7C ...[??? TRAST SECT COMM FGN 19 DOC DHFS ...[ TO TEST WHETHER A TRANSFER HAS B&EN STORED DHS= #MAC TRAST DJ?W #STRING %B DJRG LDX 2 %B DK?6 #STRING %B DKQQ #SKIP DL=B LDX 2 FX2 DLQ2 SMO AWORK1(2) DM9L LDX 1 ARINGEL(2) DMP= SMO AWORK1(2) DN8W LDX 0 ASTATUS1(1) DNNG BPZ… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TREP https://www.george3.co.uk/george/macro/trep?rev=1705492539&do=diff TREP (GIN Macro) Defined in: REPLY-MACROS Used in: ASSIGN860, EDIT867, LISTFREE867, TPOBJ867, UNLOADMT867 5NWN ...[??? TREP SECT FILE FGN 2 DOC 5P6G #MAC TREP 5PL6 SMO FX2 5Q5Q LDX 0 ACOMMUNE2 5QKB #SKI ANQ%A 5R52 ( 5RJL ANDN 0 ANQ%A 5S4= BNZ 0 %B 5SHW ) 5T3G #SKI ANQ%A<1$1 5TH6 BZE 0 %B 5W2Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TREP2 https://www.george3.co.uk/george/macro/trep2?rev=1705492539&do=diff TREP2 (GIN Macro) Defined in: REPLY-MACROS Used in: COPYA867, COPYB867, ERASE867, FHOBJDIR860, LPOBJ6, RENAME864, USERDIR842 5W=J ...[??? TREP2 SECT FILE FGN 2 DOC 5WGB #MAC TREP2 5X22 LDX 0 ACOMMUNE2(2) 5XFL #SKI ANQ%A 5X^= ( 5YDW ANDN 0 ANQ%A 5YYG BNZ 0 %B 5^D6 ) 5^XQ #SKI ANQ%A<1$1 62CB BZE 0 %B 62X2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TREPN https://www.george3.co.uk/george/macro/trepn?rev=1705492539&do=diff TREPN (GIN Macro) Defined in: REPLY-MACROS Used in: CANCRVX864, RETRIEVE864 636S ...[??? TREPN SECT FILE FGN 2 DOC 63BL #MAC TREPN 63W= SMO FX2 64*W LDX 0 ACOMMUNE2 64TG #SKI ANQ%A 65*6 ( 65SQ ANDN 0 ANQ%A 66#B BZE 0 %B 66S2 ) 67?L #SKI ANQ%A<1$1 67R= BNZ 0 %B 68=W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TREPN2 https://www.george3.co.uk/george/macro/trepn2?rev=1705492539&do=diff TREPN2 (GIN Macro) Defined in: REPLY-MACROS Used in: ARCHIVE867, COPYA867, COPYB867, LISTPARS867, USERDIR842, USEROPEN867 68GN ...[??? TREPN2 SECT FILE FGN 2 DOC 68QG #MAC TREPN2 69=6 LDX 0 ACOMMUNE2(2) 69PQ #SKI ANQ%A 6=9B ( 6=P2 ANDN 0 ANQ%A 6?8L BZE 0 %B 6?N= ) 6#7W #SKI ANQ%A<1$1 6#MG BNZ 0 %B 6*76 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TREQST https://www.george3.co.uk/george/macro/treqst?rev=1705492539&do=diff TREQST (GIN Macro) Defined in: MACROSIPC Used in: IPCPERI83, TRIPB83 DWWC ...[??? TREQST SECT COMM FGN 19 DOC DX8S ...[ TO TEST WHETHER A REQUEST HAS BEEN STORED DXH= #MAC TREQST DY2W #STRING %B DYGG LDX 2 %B D^26 #STRING %B D^FQ #SKIP D^^B LDX 2 FX2 F2F2 SMO AWORK1(2) F2YL LDX 1 ARINGEL(2) F3D= SBX 1 AWORK1(2) F3XW LDX 0 ASTATUS2(1) F4CG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRF https://www.george3.co.uk/george/macro/trf?rev=1705492539&do=diff TRF (GIN Macro) Defined in: MACROS SJ Used in: ARCHIVE867, INCVFCHK850, LISTMOP867, MAKEFILE863, ORELMAIN867, WORKFILE860 D^J* ...[ D^LY ...[ D^PJ ...[??? TRF SECT FILE FGN 24 DOC D^^B #MAC TRF [P,F,P,F F2F2 #SKI (%D@L-19)-(%B@L-19)&#40000000 F2YL ! MOVING FIELD TO SMALLER FIELD F3D= #SKI %D@L-19-23 F3XW FC %C,%D F4CG LFUN %A,%B F4X6 #DEF 21?=%B&#37-(%D&#37) F5BQ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRIPB https://www.george3.co.uk/george/macro/tripb?rev=1705492539&do=diff TRIPB (GIN Macro) Defined in: MACROSIPC Used in: CHTAB, INKS, IPCPERI83 F8S6 #MAC TRIPB F9?Q #SKIP %B F9RB ( F=?2 LDX 0 %A F=QL STO 0 ACOMMUNE1(2) F?== LDX 0 %B F?PW STO 0 ACOMMUNE2(2) F#9G ) F#P6 #SKIP %B<1$1 F*8Q ( F*NB STO 0 ACOMMUNE2(2) FB82 LDX 0 %A FBML STO 0 ACOMMUNE1(2) FC7= ) FCLW DOWN TRIPB,1 FD6G… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRTYPE1 https://www.george3.co.uk/george/macro/trtype1?rev=1705492539&do=diff TRTYPE1 (GIN Macro) Defined in: OLPMACROS Used in: 8=XN ...[??? TRTYPE1 SECT FILE FGN 7 DOC 8?7G # 8?M6 # THE NEXT 2 MACROS ARE FOR SETTING UP TABLES IN ASSIGN 8#6Q # 8#8# ...#MAC TRTYPE1 8#9W #MEN TROBJ 8#?D #TRA K91TROBJ 8#*2 ... NULL 8#BJ #TRA K92TROBJ 8#D6 ... BZE 6 K92TROBJ+4 8#FN ... NULL 8#H= #END 8#JS #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRUEDORM https://www.george3.co.uk/george/macro/truedorm?rev=1705492539&do=diff TRUEDORM (GIN Macro) Defined in: LLSMACROS Used in: CHARGESC867, COMPROB867, COOR865 9632 ...#MAC TRUEDORM 9633 ...[ 9634 ...[ MACRO TO MAKE THE JOBS PROGRAM TRULY DORMANT 9635 ...[ %A - PTR TO JOB BLOCK(IF ABSENT,THE JOB BLOCK WILL BE FOUND) 9636 ...[ 9637 ...#STR %A 9638 ... LDX 2 %A 9639 ...#STR %A 963= ...#SKI 963? ... LDN 2 0 963# ... CALL 1 (ATRUED) 963* ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRUSTED https://www.george3.co.uk/george/macro/trusted?rev=1705492539&do=diff TRUSTED (GIN Macro) Defined in: MACROS JSR Used in: CHINTEG867, CLOSDEL867, IPCOPENA83, MESSAH, MESSBC, MESSBH, PERION867, SQOPEN867, TPINS861 G?P# ...[??? TRUSTED SECT CENT FGN 9 DOC G?^6 # THIS MACRO TESTS WHETHER A PROGRAM IS ALLOWED TO USE ANY OF THE G#DQ # TRUSTED FACILITIES AVAILABLE. G#YB # %A=POINTER TO PCA OF PROGRAM G*D2 # %B=LABEL TO JUMP TO IF THE FACILITY IS NOT AVAILABLE G*XL # %C=Q,%D=R,%E=S,%F=T-THESE ARE OPTIONAL AND SPECIFY … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRYCORE https://www.george3.co.uk/george/macro/trycore?rev=1705492539&do=diff TRYCORE (GIN Macro) Defined in: COREMACROS Used in: GETWORD867 JY?G ...#MAC TRYCORE JYR6 ...[ J^=Q ...[ MACRO TO SEE IF A VALID FPB EXISTS FOR THE CURRENT ACTS. PROG. J^QB ...[ %A - LABEL TO BRANCH TO IF FPB DOESN'T EXIST K2=2 ...[ %B - TO CONTAIN ON EXIST ADDR. OF AREA SPECIFIED IN %C K2PL ...[ %C - ADDR. WITHIN OBJ. PROG. OF REQUIRED AREA K39= ...[ K3NW ... LDX 0 JOBNO(2) [LOAD JOB NO. FOR COMPARISION K48G ... LDN 2 BOBJUNUS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TRYPAGE https://www.george3.co.uk/george/macro/trypage?rev=1705492539&do=diff TRYPAGE (GIN Macro) Defined in: MACROS GLJ Used in: FQBL ...#MAC TRYPAGE FQW= ...#STR %A,1 FR*W ... LDX 1 %A FRTG ...#STR %C,2 FS*6 ... LDN 2 %C FSSQ ...#STR %D FT#B ... ORX 2 GSIGN FTS2 ... CALL 0 (ATRYPAGE) FW?L ... BRN %B FWHD ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TSININC https://www.george3.co.uk/george/macro/tsininc?rev=1705492539&do=diff TSININC (GIN Macro) Defined in: DUMP-MACROS Used in: DEAD867, RENAMAG864, RETURN867 D^Y9 ...[??? TSININC SECT FILE FGN 73 DOC D^Y= ...[ D^^2 ...[ D^^R ...[ THIS MACRO CHECKS TO SEE IF A SPECIFIED F22J ...[ TSN IS IN INCINDEX F23* ...#MAC TSININC F246 ... LDX 2 FX2 F24X ...#STR %C F25N ...( F26F ... LDN 0 %C F27= ... STO 0 ACOMMUNE1(2) F283 ...) F28S ...#STR %C F29K ...#SKI F2=B ... STOZ ACOMMUNE1(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TSRPALL https://www.george3.co.uk/george/macro/tsrpall?rev=1705492539&do=diff TSRPALL (GIN Macro) Defined in: DUMP-MACROS Used in: C69Y ...[ C6=6 ...[??? TSRPALL SECT FILE FGN 68 DOC C6=# ...[ C6=G ...[ TWIN SYSTEMS RESTORE TIME MACRO TO SUPPRESS SUPPRESSION C6=N ...[ OF ALL BUT FIRST RETRIEVAL SYSTEM ERROR MESSAGE PERTAINING C6=W ...[ TO ALIEN FILESTORE FILES' RETRIEVES. C6?4 ...[ C6?= ...#MAC TSRPALL C6?D ...#MEN SCHEDMTA C6?L ...#TRA K98SCHEDMTA C6?S ... BRN K97SCHEDMTA C6#2 ...#END C6#8 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TSU https://www.george3.co.uk/george/macro/tsu?rev=1705492539&do=diff TSU (GIN Macro) Defined in: MACROS RM57 Used in: 29MH ...[??? TSU SECT FILE FGN 6 DOC 29ML ...#MAC TSU 29N5 ...[ RESTORE TIME MACRO TO CANCEL EFFECT OF TGU MACRO. 29NJ ...#ALT AUSERTRAP=ATRAPEND-(ANOTRAPS*4) 29P3 ...#MEN MAKEFILE 29PG ...#TRA K93MAKEFILE 29P^ ... BRN K94MAKEFILE 29QD ...#END 29QX ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWAIT https://www.george3.co.uk/george/macro/twait?rev=1705492539&do=diff TWAIT (GIN Macro) Defined in: MACROS EWDAS Used in: BSTS867, CHINERR867, CLOSBAC867, CLOSDEL867, CONTRACT866, DUMMYB867, EXINONE867, IPBMOP867, NEXTUNIT867, RENAMEX867, SCEX866, SQOPEN867 RJT6 # RK#Q [??? TWAIT RKSB # ***** RL#2 #MAC TWAIT RLRL # RM?= LDX 0 %A RMQW SMO FX2 RN=G STO 0 ACOMMUNE9 RNQ6 DOWN REQCART,12 RP9Q BR… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWDUMP https://www.george3.co.uk/george/macro/twdump?rev=1705492539&do=diff TWDUMP (GIN Macro) Defined in: MACROS RME10 Used in: DTSUBSA867 B86B ...[??? TWDUMP SECT FILE FGN 13 B8L2 ...#MAC TWDUMP B95L ...#UNS JDUMPTW B9K= ...( B=4W ...#STR %A B=JG ...( B?46 ...#STR %A,ON B?HQ ...#STR B#3B ...( B#H2 ...#MEND LIBCOM B*2L ...#TRA K40LIBCOM B*G= ... NULL B*^W ...#END BBFG ...) BB^6 ...#STR %A,OFF BCDQ ...#STR BCYB ...( BDD2 ...#MEND LIBCOM BDXL ...#TRA K40LIBCOM BFC= ... BRN K41LIBCOM BFWW ...#END BGBG… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWINCT https://www.george3.co.uk/george/macro/twinct?rev=1705492539&do=diff TWINCT (GIN Macro) Defined in: MACROS EWDAS Used in: TWINSETB866 QHLL # QJ6= [??? TWINCT QJKW # ****** QK5G #MAC TWINCT QKK6 # QL4Q LDX 0 ETWINCT QLJB ADN 0 1 QM42 STO 0 ETWINCT QMHL SBN 0 1 QN3= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWINNING https://www.george3.co.uk/george/macro/twinning?rev=1705492539&do=diff TWINNING (GIN Macro) Defined in: MACROS EWDAS Used in: MESSBA, MESSBG, MESSBH, MESSCG KR?L # KRR= # ********************************************************************** KS=W # * EXOFILE TWINNING SYSTEM MACROS KSQG # * KT=6 # * A)RESTORE TIME MACROS:- KTPQ # * TWINNING,DECOM,TWINTRCE,DEDICATE,UNDEDICATE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWINTRCE https://www.george3.co.uk/george/macro/twintrce?rev=1705492539&do=diff TWINTRCE (GIN Macro) Defined in: MACROS EWDAS Used in: LGPL # LHNW [??? TWINTRCE LJ8G # ******** LJN6 #MAC TWINTRCE LK7Q # LKMB #STR %A LL72 #SKI LLLL !! MUST HAVE ON OR OFF PARAMETER !! LM6= #STR %A LMKW ( LN5G TWSET %A,RELIEF,8 LNK6 TWSET %A,CDUM,4 LP4Q TWSET %A,TWINSETA,7 LPJB TWSET %A,TWINSETD,7 LQ42 TWSET %A… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWSET https://www.george3.co.uk/george/macro/twset?rev=1705492539&do=diff TWSET (GIN Macro) Defined in: MACROS EWDAS Used in: MFG2 # MF^L [??? TWSET MGF= # ***** MGYW #MAC TWSET MHDG # MHY6 #MEN %B MJCQ #TRA K%C%B MJXB #STR ON,%A MKC2 #SKI MKWL -1 MLB= #STR OFF,%A MLTW #SKI MM*G +0 MMT6 #END MN#Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) TWTRACE https://www.george3.co.uk/george/macro/twtrace?rev=1705492539&do=diff TWTRACE (GIN Macro) Defined in: MACROS EWDAS Used in: INTWIN866, RELIEF866, TWINSETA866, TWINSETD866 QNGW # QP2G [??? TWTRACE QPG6 # ******* QP^Q #MAC TWTRACE QQFB # QQ^2 STO 3 EX7 QRDL CALL 3 MTW1 QRY= LDX 3 EX7 QSCW #OPT MTW12=0 QSXG #SKI MTW12-1 QTC6 ( QTWQ BRN MTW2 QWBB MTW3 STO 0 EX4 QWW2 STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UDASTYPE https://www.george3.co.uk/george/macro/udastype?rev=1705492539&do=diff UDASTYPE (GIN Macro) Defined in: MACROS EWDAS Used in: SJJQ # SK4B [??? UDASTYPE SKJ2 # ******** SL3L #MAC UDASTYPE SLH= # SM2W #MEN CONSTANT SMGG #TRA FRED SN26 #STR DA,%A SNFQ #SKI SN^B #DEF MUDASTYPE=#4441 SPF2 #STR ED,%A SPYL #SKI SQD= #DEF MUDASTYPE=#4544 SQXW #STR FD,%A SRCG #SKI SRX6 #DEF MUDASTYPE=#4644 SSBQ #OPT MUDAS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UJFROZEN https://www.george3.co.uk/george/macro/ujfrozen?rev=1705492539&do=diff UJFROZEN (GIN Macro) Defined in: DUMP-MACROS Used in: BSPRUNE867 ?*HY ...[??? UJFROZEN SECT FILE FGN 65 DOC ?*RQ #MAC UJFROZEN ?B?B LDN 0 100 ?BR2 BXGE 0 FORMULA,%A [IF FORMULA IS LESS THAN 100 ?C=L [ THE FILE IS TO BE THROWN OFF LINE EVEN THOUGH IT IS FROZEN FOR ?CQ= [ LIST FILING OR HLS SAVED ?D9W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UJRV https://www.george3.co.uk/george/macro/ujrv?rev=1705492539&do=diff UJRV (GIN Macro) Defined in: DUMP-MACROS Used in: BSPRUNE867 ??5S ...[??? UJRV SECT FILE FGN 65 DOC ??*L #MAC UJRV ??T= LDN 0 500 ?##W BXGE 0 FORMULA,%A ?#SG [ IF FORMULA IS LESS THAN 500 , DO NOT RETAINRETRIEVES ?*#6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ULRVTAPES https://www.george3.co.uk/george/macro/ulrvtapes?rev=1705492539&do=diff ULRVTAPES (GIN Macro) Defined in: DUMP-MACROS Used in: #SNB ...[??? ULRVTAPE SECT FILE FGN 65 DOC #SP3 ...[ #SQ# ...[ THIS MACRO WILL COMPLETELY UNLOAD #SRK ...[ RETRIEVE TAPES RATHER THAN LEAVING #SSW ...[ THEM POSITIONED AT THE HEADER LABEL #SW7 ...[ #SXD ...#MAC ULRVTAPES #SYP ...#MEN DTSTART #T22 ...#TRA K98DTSTART #T3? ... QUICKUNL #T4J ...#END #T5T ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UMNEWFIX https://www.george3.co.uk/george/macro/umnewfix?rev=1705492539&do=diff UMNEWFIX (GIN Macro) Defined in: MACROS DTP Used in: 57J8 ...[??? UMNEWFIX SECT DIAG FGN 578 DOC 57JB ...# AMENDED FOR ISFC AND ICT CHANGES IN MK 865 57JJ ...#MAC UMNEWFIX [M. DRUKKER 57JT ...[ 57K6 ...[ 57KC ...[ ************** 57KN ...[ * UMNEWFIX * 57K^ ...[ ************** 57L= ...[ 57LH ...[ 57LS ...#SKI JUMRCCS<1$1 [OUTSIDE UMRCC/GANNET 57M5 ...( 57M8 ...#CON UMRCC SPECIAL NOT INCLUDED 57M? ...) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNBUSACT https://www.george3.co.uk/george/macro/unbusact?rev=1705492539&do=diff UNBUSACT (GIN Macro) Defined in: MACROS LEF Used in: LISTPROC867, WLC867 JCK8 ...[??? UNBUSACT SECT DEVT FGN 2 DOC JCT2 #MAC UNBUSACT JD#L #SKI G%AACT JDS= ( JF?W LDXC 0 B%AACT JFRG BCC %B JG?6 ) JGQQ #SKI 1<G%AACT$1 JH=B BBS B%AACT,FLAGACT,%B JHQ2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNCOMERR https://www.george3.co.uk/george/macro/uncomerr?rev=1705492539&do=diff UNCOMERR (GIN Macro) Defined in: MACROS RMD10 Used in: COMPCHAN84 =C?8 ...[??? UNCOMERR SECT FILE FGN 16 DOC =D2L #MAC UNCOMERR =DG= LDX 0 GSIGN =D^W SMO FX2 =FFG ERS 0 EXT+8 =F^6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNDEDICATE https://www.george3.co.uk/george/macro/undedicate?rev=1705492539&do=diff UNDEDICATE (GIN Macro) Defined in: MACROS EWDAS Used in: CDUM866 LYC6 # LYWQ [??? UNDEDICATE L^BB # ********** L^W2 #MAC UNDEDICATE M2*L # M2T= #MEN CDUM M3#W #TRA AUNRES M3SG R %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U,%V,%W M4#6 #END M4RQ #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNIFREE https://www.george3.co.uk/george/macro/unifree?rev=1705492539&do=diff UNIFREE (GIN Macro) Defined in: MACRO COMPRO Used in: ALLOW84, BQUERY84, BUDGET84, CANCRVX864, COPYA867, COPYB867, ERASE867, EXPRESS864, FREEZE864, NAMEPRIV, PARIDF8, PARSORT867, REPERT867, RETRIEVE864, RIGHT867, SETPARAM867, SETPC867, SETPE867, SETPF867, SETPN867, SETPR867, SETPRAMA867, SETPRAMB867, SJMESS867, SPUNLOAD867, TERM867, TRAPLIST864 ?3?S ...[??? UNIFREE SECT CENT FGN 21 DOC ?3HL [ THIS MACRO FREES ALL /CUNI BLOCKS UPTO FIRST /CALAS BLOCK ?43= #MAC UNIFREE ?… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNITOFF https://www.george3.co.uk/george/macro/unitoff?rev=1705492539&do=diff UNITOFF (GIN Macro) Defined in: MACS JIB Used in: ONLINEB867, RELPER867 #WQR ...[??? UNITOFF SECT COMM FGN 25 DOC #WRF ...[THIS MACRO RELEASES A MX/UX FROM BEING ONLINED #WT6 ...#MAC UNITOFF #WWT ... DOWN IDFOFF,2 #WYJ ... BRN %A #X2? ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNJAMWRITE https://www.george3.co.uk/george/macro/unjamwrite?rev=1705492539&do=diff UNJAMWRITE (GIN Macro) Defined in: MACROS Used in: #FDB ...[??? UNJAMWRI SECT FILE FGN 9 DOC *NGX ...# *NHD ...# *NH^ ...#MAC UNJAMWRITE *NJG ... LOCK 3 *NK3 ... LDX 1 BACK1(3) [LFN *NKJ ... STO 1 AWORK1(2) *NL5 ... FINDBSA 1 [GET PTR TO BSA IN X2 *NLL ... LDX 0 BSFAIL(2) *NM# ... ANDN 0 BKARTWT+CGINPROG [ARE FAILS OR CARTRIDGE COMMAND IN *NN2 ... BZE 0 MCB1 [PROGRES… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNLOAD https://www.george3.co.uk/george/macro/unload?rev=1705492539&do=diff UNLOAD (GIN Macro) Defined in: MACROS RME10 Used in: CHTAB, DEAD867, DEADA867, DTSCAN860, DUMMYB867, GET6, INKS, LABEL866, LIBLOAD867, LIBMANY867, LIBQUERY, LIBREQ866, LIBREQC867, LIBSEC867, MESSG, NEWA867, NEWOWN865, NEWPW867, REDON867, REDONMT867, RENAMAG864, RENAMDIR, RESTOREA866, RETURNIT867, RIGHT867, TAPERING867, UNLOAD7, XENON 38S8 ...[??? UNLOAD SECT FILE FGN 4 DOC 3942 #MAC UNLOAD 39HL #STR %A 3=3= ( 3=GW #STR %A,0 3?2G LDX 0 %A 3?G6 ) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNLOCK https://www.george3.co.uk/george/macro/unlock?rev=1705492539&do=diff UNLOCK (GIN Macro) Defined in: COREMACROS Used in: ADDICT865, ASSIGN860, BACKMAP864, BMAPTWO860, BMCNTRL866, BMSJRNL866, BRADDATA867, BRADEMUL867, BSBLFAIL867, BSTS867, CARTCONT867, COMPCHAN84, CONTXCOD60, COREALLJ865, DRUM852, EMSENG864, ERASE867, FINDRUM866, GETNO865, GETWORD867, GROPE867, INCEOT865, INCMON865, INCSTART865, INLOOP84, INRESTAR84, IPBCCB867, IPBERROR867, IPBIN867, IPBOUT867, IPBSTARB867, IPBSTART867, IPCONG8, IPCPERI83, LABEL866, LIBLOAD867, LIBLOADB867, LIBREQCA867, LISTDEV8… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNLOCKSU https://www.george3.co.uk/george/macro/unlocksu?rev=1705492539&do=diff UNLOCKSU (GIN Macro) Defined in: MACROS EWDAS Used in: ANTIC867, BRADSPLT867, CHINERR867, CHINTEG867, CLOSBAC867, CLOSDEL867, CONTEND867, CONTRACT866, EXINONE867, EXINTO867, EXOPEN867, FINDFS867, FLAW866, FLAWMAP866, FSERR867, NEXTUNIT867, RENAMEX867, REQCART866, SCEX866, SCEXEND867, SQOPEN867, WRITEFIP867 6KDQ # 6LD2 [??? UNLOCKSU 6LXL # ******** 6MC= #MAC UNLOCKSU 6MWW # 6NBG LDX 0 %… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNNORM https://www.george3.co.uk/george/macro/unnorm?rev=1705492539&do=diff UNNORM (GIN Macro) Defined in: MACROS RM59B Used in: ARCHIVE867, CANCRVX864, COMPRESS864, DTSUBSS867, EDIT867, FORMLOOP865, INCEOT865, INCPROC850, INCRV850, INDEX85, INRESTAR84, LISTFREE867, LISTNEXT867, LISTOPEN867, READFAIL866, RETRIEVE864, SCHEDENX860, SCHEDMTA860, TRAPCHEC867, USERDIR842, WHATRVSA867, WLB867, WLD864 4GRY ...[??? UNNORM SECT FILE FGN 6 DOC 4H3Q #MAC UNNORM 4HHB #STR %A 4J32 #SKI 4JGL DOWN NNORM,1 4K2= #STR %A 4KFW ( 4K^G #S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNOPCH https://www.george3.co.uk/george/macro/unopch?rev=1705492539&do=diff UNOPCH (GIN Macro) Defined in: WORK-MACROS Used in: COMPOST867, OPENEND865, OPENWORK866 655# ...[??? UNOPCH SECT FILE FGN 4 DOC 65*6 #MAC UNOPCH 65SQ LDX 0 CTOPEN(%A) 66#B SRL 0 12 66S2 ANDN 0 #5777 67?L BNZ 0 %B 67R= LDCT 0 #200 68=W ANDX 0 FINFC(%A) 68QG BNZ 0 %B 69=6 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNPACK https://www.george3.co.uk/george/macro/unpack?rev=1705492539&do=diff UNPACK (GIN Macro) Defined in: MACS PW Used in: IDFENQS867 =N#= #MAC UNPACK [T FARQUHARSON =NRW LDX %F JSOURCE2(2) =P?G BNG %F M1 [J IF 7020 ON 7900 OR 7007 =PR6 LDCH 0 JSOURCE1(2) [LOAD BASIC TYPE TO SEE IF MOP =Q=Q SBN 0 #12 =QQB BZE 0 M2 [J.IF UPX MOP LINE =R=2 SBN 0 #1 =RPL BZE 0 M2 [J.IF MPX MOP … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNPLUG https://www.george3.co.uk/george/macro/unplug?rev=1705492539&do=diff UNPLUG (GIN Macro) Defined in: LLSMACROS Used in: ANTIC867, BCAST867, BEXTRA83, CAFSPERI867, CHTAB, CIMOP867, CLOSBAC867, COMPCHAN84, CONIPB8, CONMXA85, CONMXB8, CONMXC8, CONTXCOD60, DISEVENT65, DOMONOP867, DRUM852, EVENTS864, EXINONE867, EXTEND866, FHLIST867, FHOBJIND860, GIVE867, HLSREAD867, INKS, INMOP867, IPCEN8, IPCOPENA83, IPCOPENB83, IPCPERI83, MONEVENT867, NETOFLNE867, OLMTD65, OLMTE85, OLPODD865, OPCA867, OPCAXCOD5, PERION867, READSPEC867, RELPER867, RENAMEX867, REQESLIP861, SCHDJOBA… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNPLUGRT https://www.george3.co.uk/george/macro/unplugrt?rev=1705492539&do=diff UNPLUGRT (GIN Macro) Defined in: LLSMACROS Used in: REALTIME867, REQESLIP861 8N?2 ...[??? UNPLUGRT SECT CENT FGN 6 DOC 8N*B # 8NT2 # 8P#L [ 8PS= [ MACRO TO UNPLUG A REALTIME PROGRAM 8Q?W #MAC UNPLUGRT 8QRG #STR PUC,%A 8R?6 DOWN UNPLUG,3 8RQQ #STR PUC,%A 8S=B #SKI 8SQ2 DOWN UNPLUG,4 8T9L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNQUEUE https://www.george3.co.uk/george/macro/unqueue?rev=1705492539&do=diff UNQUEUE (GIN Macro) Defined in: CHCHCOORMAC2 Used in: BCAST867, CDCIPB864, CONIPB8, FINISHB867, IPBINB867, IPBOUT867, JAMSWAP865, PROCONTX867, SAVEJOB865 5T?# ...[??? UNQUEUE SECT CENT FGN 32 DOC 5TH6 #MAC UNQUEUE 5W2Q LDN 0 0 5WGB DSA 0 ATYPE(2) [CLEAR WAITING STYLE 5X22 LDX 0 CHAINADD(2) 5XFL SMO BACKCHAN(2) 5X^= STO 0 0 [REMOVE THIS ACTIVITY FROM THE QUEUE 5YDW LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSAVE https://www.george3.co.uk/george/macro/unsave?rev=1705492539&do=diff UNSAVE (GIN Macro) Defined in: MACROS HL Used in: ABANDON867, CHTAB, CONNECT867, INKS, SCHEDJOB867 22FL ...[??? UNSAVE SECT CENT FGN 5 DOC 22^= # 23DW # UNSAVE MACRO 23YG # RESTORES A JOB HELD IN A FILE WITH LOCAL NAME EQUAL TO THAT 24D6 # OF THE JOB NAME A USER NAME THE SAME AS THE OWNER OF THE 24XQ # JOB AND A LANGUAGE CODE OF B1B1 254Y ...# THE FIRST PARAMETER IS A WORD CONTAINING THE JOB NUMBER 25=6 ...# … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSET https://www.george3.co.uk/george/macro/unset?rev=1705492539&do=diff UNSET (GIN Macro) Defined in: MACROS VB Used in: FINISH867, FINISHB867, INSTPARA867, IPALL864, LPTWO7, PROFLAG83, SETUPARA867 79P8 ...[??? UNSET SECT CENT FGN 7 DOC 79^2 # UNSET UNIVERSAL IDENTIFIERS :- 7=DL #MAC UNSET 7=Y= #INT 7?CW #ORD 7?XG ZNAME 12H%A 7#C6 ZSPACE 4H 7#WQ ZIN STO 0 19?+0 7*BB LDN 7 1 7*W2 LDX 0 ZNAME+1 7B*L TXU 0 ZSPACE 7BT= ADN 7 0 7C#W LDX … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETBIT https://www.george3.co.uk/george/macro/unsetbit?rev=1705492539&do=diff UNSETBIT (GIN Macro) Defined in: MACROS JSR Used in: CLEAN867, GETWORD867, INCFIN864, LOADERR70, PRINT70 8XXJ ...[??? UNSETBIT SECT CENT FGN 9 DOC 8Y7B # 8YM2 # THIS MACRO UNSETS BIT %A OF WORD %B 8^6L # 8^L= #MAC UNSETBIT 925W FLIPS %B,%A 92KG #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETERR https://www.george3.co.uk/george/macro/unseterr?rev=1705492539&do=diff UNSETERR (GIN Macro) Defined in: MACRO COMPRO Used in: 8NK8 ...[??? UNSETERR SECT CENT FGN 21 DOC 8NT2 #MAC UNSETERR 8P#L SMO FX2 8PS= STOZ EXT+8 8Q?W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETFB https://www.george3.co.uk/george/macro/unsetfb?rev=1705492539&do=diff UNSETFB (GIN Macro) Defined in: MACROS Used in: BSALFAIL, BSBLFAIL867, RITEFAIL864, TRANFAIL866 *NXX ...[??? UNSETFB SECT FILE FGN 9 DOC *NY8 ...# *NYP ...# *P22 #MAC UNSETFB *PFL #SKI %A-2 *P^= ( *QDW #SKI %A-1 *QYG ( *RD6 LDX 1 %B *RXQ SLL 1 1 *SCB ADX 1 ALFTP *SX2 LDX 0 A1(1) *TBL #SKI K6BSTS>199-199 *TW= ( *W*W BPZ 0 MUNSETFB3 *WTG GEOERR 0,WRNGLFN *X… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETHK https://www.george3.co.uk/george/macro/unsethk?rev=1705492539&do=diff UNSETHK (GIN Macro) Defined in: MACROS IH Used in: COMPRO867, COMPROA867 2L2L # 2LG= #MAC UNSETHK 2L^W MODD LDX 0 EXT+9,%A,FX2 2MFG SLL 0 11 2M^6 BPZ 0 MUNSETHK1 [ J IF NOT HOOK-STARTED 2NDQ FJOCA 1,FX2 2NYB SPRIVOFF JSSTART,1 [ SWITCH OFF SYSTEM STARTED STATUS 2PD2 LDX 1 FX1 2PXL MUNSETHK1 2QC= NGN 0 6 2QWW SLC 0 12 [ #77727777 2RBG … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETRCTP https://www.george3.co.uk/george/macro/unsetrctp?rev=1705492539&do=diff UNSETRCTP (GIN Macro) Defined in: RCTPMACS Used in: REQESLIP861 3Q6W # THIS MACRO UNSETS CURRENT JOB FROM THAT OF RCTP TYPE 3QLG # AND DECREMENTS COUNT OF EXTANT RCTP JOBS. 3R66 #MAC UNSETRCTP 3RKQ LDN 0 1 3S5B SBS 0 CTRCTP 3SK2 FJOPCA 1,%A 3T4L LDCT 0 #200 3TJ= ERS 0 JMISC(1) 3W3W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSETRTP https://www.george3.co.uk/george/macro/unsetrtp?rev=1705492539&do=diff UNSETRTP (GIN Macro) Defined in: MACROS LLS Used in: REALTIME867 3R66 #MAC UNSETRTP 3RKQ #STR %A,1 3S5B LDX 1 %A 3SK2 FLIPS JCLASS(1),14 3T4L FPCAJO 1 3TJ= LDN 2 4 3W3W ADX 1 2 3WHG MUNSETRTP 3X36 LDX 0 GSIGN 3XGQ SMO 2 3Y2B ANDX 0 ACR1-2(1) 3YG2 SMO 2 3Y^L ERS 0 ACR1-2(1) 3^F= SBN 1 1 3^YW BCT 2 MUNSETRTP 42D… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNSHSTAR https://www.george3.co.uk/george/macro/unshstar?rev=1705492539&do=diff UNSHSTAR (GIN Macro) Defined in: MACROS IH Used in: 3BXG # 3CC6 #MAC UNSHSTAR 3CWQ NGN 0 2 3DBB SLC 0 12 [#77767777 3DW2 MODD ANDS 0 EXT+9,%A,FX2 3F*L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UNTRUST https://www.george3.co.uk/george/macro/untrust?rev=1705492539&do=diff UNTRUST (GIN Macro) Defined in: CHCHCOORMAC2 Used in: CHCH865 SCNG ...[ MACROS FOR 2960 DME DUAL PROCESSOR ENHANCEMENT SD86 ...[ ============================================== SDMQ ...[ SF7B ...[??? UNTRUST SECT CENT FGN 1 DOC SFM2 ...[ SG6L ...[??? ENTRUST SECT CENT FGN 1 DOC SGL= ...[ SH5W ...[??? CONCURR SECT CENT FGN 1 DOC SHKG ...[ SJ56 ...[??? FBIDEXEC SECT FGN 1 DOC SJJQ ...[ SK4B ...[ SKJ2 ...[ SL3L ...[ SLH= ...[??? UNT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UP https://www.george3.co.uk/george/macro/up?rev=1705492539&do=diff UP (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ABANDONA867, ACTPRI867, ADDJOB867, ADJCHECK85, ADJUNCTS85, ALAS822, ALLOCATE867, ANALYSE865, ANALYSEA3, ANTIC867, APPEND864, ASSIGN860, BACKMARK850, BACKMASS860, BACKROOM865, BCAST867, BLOGNAL865, BMAPDIR865, BMCNTRL866, BMFIXIT864, BMINDEX866, BMJLCONV860, BMPRCHEK860, BMQUEST866, BMQUESTB866, BMSAVJOB864, BMSJRNL866, BMSTATS850, BMSTREAM853, BMXEND7, BRADDATA867, BRADEMUL867, BRADSPLT867, BSALFAIL, BSBLFAIL867, BSPRUNE867, BSUJSTAT867, BUDGON… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UPDATE https://www.george3.co.uk/george/macro/update?rev=1705492539&do=diff UPDATE (GIN Macro) Defined in: MACS JIB Used in: APPEND864, IPBSCAN867, LISTPROC867, MESSCG, MESSCJ, MONITOR36, PMCHECK867, PMWHATA866, RESTERR864 #X4Y ...[??? UPDATE SECT COMM FGN 25 DOC *9B2 #MAC UPDATE *9TL #STR %B *=*= #SKI *=SW LDX 0 CPPTR(2) *?#G #STR %B *?S6 LDX 0 %B *#?Q SMO FX2 *#RB STO 0 ACOMMUNE2 [PROG PROP NO OR DEVICE LIST PTR **?2 LDX 0 %C **QL SMO FX2 *… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UPDATEJT https://www.george3.co.uk/george/macro/updatejt?rev=1705492539&do=diff UPDATEJT (GIN Macro) Defined in: MACRO COMPRO Used in: EDITOR867, EDITORA865 H#N2 ...[???UPDATEJT SECT. CENT H*7L ...#MAC UPDATEJT H*M= ...#STR %A HB6W ...#SKI HBLG ... LDX 2 FX2 HC66 ...#STR %A,2 HCKQ ... LDX 2 %A HD5B ... LDX 0 ACTCHCH(2) [CHAPTER CHANGE COUNT HDK2 ... STOZ ACTCHCH(2) [CLEAR IT HF4L ... MPY 0 CHAPTIME [CONVERT IT TO BEATS HFJ= ... DVR 0 BEATTIME [CONVERT TO MILLISECS HG3W ... LDX 0 CONTEXT(2) … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UPDOLC https://www.george3.co.uk/george/macro/updolc?rev=1705492539&do=diff UPDOLC (GIN Macro) Defined in: DUMP-MACROS Used in: DTSTART867, DTSUBSA867, SCHEDMTX867 9FG4 ...[??? UPDOLC SECT FILE FGN 65 DOC 9G9G [ 9GP6 [ 9H8Q ...[ THIS MACRO IS DESIGNED TO DO A NON-CORDINATING SEARCH OF THE 9HNB [ OLC, UPDATING ALL THE RELEVANT REQUEST BLOCKS. THERE ARE FOUR 9J82 [ ENTRY POINTS CORRESPONDING TO FOUR SEPERATE ACTIONS TO BE TAKEN 9JML [ 9K7= [ 1 XTAPEM/XTAPEP : SEARCH DOWN THE OFF LINE CHAIN 9KLW [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UPLINK https://www.george3.co.uk/george/macro/uplink?rev=1705492539&do=diff UPLINK (GIN Macro) Defined in: LLSMACROS Used in: PLUGIN867 8W6L ...[??? UPLINK SECT CENT FGN 6 DOC 8W8W [ 8WNG [ MACRO TO GO UP TO SEG KEPT IN LINK BELONGING TO SPEC ACTIVITY 8X86 #MAC UPLINK 8XMQ FINDLINK 2,%A 8Y7B #STR %B 8YM2 ( 8^6L LDN 0 %B 8^L= ADJUSTLK 2 925W ) 92KG LDN 0 ACC3(2) 9356 SMO FX2 93JQ LDN 1 ACC3 944B MOVE 0 ALINK 94J2 FREELINK %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) UPPLUS https://www.george3.co.uk/george/macro/upplus?rev=1705492539&do=diff UPPLUS (GIN Macro) Defined in: CHCHCOORMAC2 Used in: ACTPRI867, ADDJOB867, APPEND864, ASSIGN860, BMCNTRL866, BMJLCONV860, BMPRCHEK860, BMQUEST866, BMSAVJOB864, BMSTREAM853, BSALFAIL, BUDGTWO84, CDUM866, CHEKPRIV867, CHNUMCON867, CLOSEAB863, COMMFILE82, COMPOST867, CONSERNO6, CONSROOT867, COREALLF867, COREALLH860, DATECON37, DEMAND860, DIRENT867, DOMONOP867, DTSUBS867, DTSUBSA867, DUMMYA867, EDITET7, EDITEX7, EDITPT867, EDWRITE867, ENGAGE867, ERASEX866, FFFNORM7, FILESECU83, FINDOC867, FLAWMAP… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) URGTIME https://www.george3.co.uk/george/macro/urgtime?rev=1705492539&do=diff URGTIME (GIN Macro) Defined in: MACROS MACB Used in: BLOGNAL865, JDWRITE867 22FL ...[??? URGTIME SECT CENT FGN 2 DOC 3#^2 # 3*DL # TO CONCOCT THE TRANSIENT BUDGET BIT PATTERN RELATING TO A GIVEN 3*Y= # URGENCY.IT IS ASSUMED THAT THE URGENCY LETTER HAS JUST BEEN 3BCW # PUT INTO %A 3BXG #MAC URGTIME 3CC6 SLL %A GSHIFT 3CWQ ANDX %A MURGTIME(1) 3DBB ORX %A MURGTIME+1(1) 3DW2 ADN %A IZLINE 3F*L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USEFILE https://www.george3.co.uk/george/macro/usefile?rev=1705492539&do=diff USEFILE (GIN Macro) Defined in: MACROS DTP Used in: HMCQ ...[??? USEFILE SECT DIAG FGN 557 DOC HMXB #MAC USEFILE [M.C.D. MANN HNC2 [ HNWL [ HPB= [ ************* HPTW [ * USEFILE * HQ*G [ ************* HQT6 [ HR#Q [ HRSB #STR %A [IF A FILE NAME IS SPECIFIED: HS#2 ( HSRL #SKI ADTP HT?= #GEO *,TG %A(OWNE),RE [ISSUE "TG" (INTERNALLY ONLY) HTQW ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USERCHURGE https://www.george3.co.uk/george/macro/userchurge?rev=1705492539&do=diff USERCHURGE (GIN Macro) Defined in: MACROS SIB Used in: 2BNK ...# 2BP4 ...# 2BPH ...[??? USERCHURGE SECT COMM FGN 1 DOC 2BQ2 ...# 2BQF ...# 2BQY ...#MAC USERCHURGE 2BRC ...[ 2BRW ...[ ALLOWS USER CONTEXT CHANGELIST TOUR 2BS* ...[ %A - 'ON' OR 'OFF' (ANY OTHER STRING TREATED AS OFF) 2BSS ...[ 2BT? ...#UNS HWLSLCH 2BTQ ...( 2BW9 ...#MEN WLAA 2BWN ...#TRA K90WLAA 2BX7 ...#STR ON,%A 2BXL ...( 2BY5 ... +1 2BYJ ...#END 2B^3 ...#EX… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USERCRWF https://www.george3.co.uk/george/macro/usercrwf?rev=1705492539&do=diff USERCRWF (GIN Macro) Defined in: WORK-MACROS Used in: OPENWORK866, USEROPEN867 69FY ...[??? USERCRWF SECT FILE FGN 4 DOC 69PQ [ THE FOLLOWING MACRO UPDATES THE FCB & FEXTRA FOR A WORKFILE WHICH HAS 6=9B [ NOT BEEN WRITTEN TO FROM THE CREATE BLOCK. 6=P2 #MAC USERCRWF 6?8L DOWN OPENWORK,8 6?N= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USERJOB https://www.george3.co.uk/george/macro/userjob?rev=1705492539&do=diff USERJOB (GIN Macro) Defined in: MACRO COMPRO Used in: CONNECTA867, LISTNEXT867, LOGOUT867, PMSUMA867 9D38 ...[??? USERJOB SECT CENT FGN 21 DOC 9D?2 #MAC USERJOB 9DQL SETNCORE 3,3,FILE,ADICT 9F== CJOBLOCK 2 9FPW ADN 2 JUSER 9G9G ADN 3 A1 9GP6 MOVE 2 3 9H8Q #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USERNORM https://www.george3.co.uk/george/macro/usernorm?rev=1705492539&do=diff USERNORM (GIN Macro) Defined in: MACROS RM59B Used in: BUDGTWO84, LIST867, MAKEDIR84, NORMALUS864, PREPREAD867, TRAPPARA3 2N8Y ...[??? USERNORM SECT FILE FGN 6 DOC 2NDQ #MAC USERNORM 2NYB LDEX 0 %A 2PD2 SMO FX2 2PXL STO 0 ACOMMUNE6 2QC= #STR NOERRMESS,%B 2QWW ( 2RBG #STR %B 2RW6 GEOERR 1,USERNORM 2S*Q DOWN NORMALUS,4 2STB ) 2T*2 #STR NOERRMESS,%B 2TSL #SKI 2W#= DOWN… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USEROPEN https://www.george3.co.uk/george/macro/useropen?rev=1705492539&do=diff USEROPEN (GIN Macro) Defined in: OPEN-MACROS Used in: ABANDON867, CANCRVX864, CHTAB, COMHOOK867, CONCEPT85, COPYA867, COPYB867, CREATE867, DIRENT867, EDIT867, EDITMFO867, ERASE867, INKS, INRESTAR84, JOBLIST867, JWELLONE867, LDSTART850, LIBREQC867, LISTDIR867, LISTFREE867, LISTPARS867, MACRALAS864, MAKEVCC867, NEWOWN865, PNTLAST860, PREPREAD867, PRINT70, REGEN865, RENAME864, REPORT865, RETRIEVE864, SCEDIT84, SCHEDULE867, SECUREX85, SETPR867, TRAPLIST864, WA864, WHATRVSA867, WHTSTAT867, WLC867 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USEROPEX https://www.george3.co.uk/george/macro/useropex?rev=1705492539&do=diff USEROPEX (GIN Macro) Defined in: OPEN-MACROS Used in: ASSIGN860, COMPCHAN84, COPYA867, COPYB867, DEWELL867, DICTWELL867, EDIT867, ENWELL867, HOWBIG867, LIBINSEC864, LIBSEC867, LIBTSN867, LISTDIR867, LISTPARS867, MACRALAS864, OLMTA85, OLMTC85, PERFPASS864, PREPREAD867, REGEN865, RENAMAG864, SAVE864, USERSTRM867 3F5S ...[??? USEROPEX SECT FILE FGN 20 DOC 3F*L #MAC USEROPEX 3FT= LDX 2 FX2 3G#W #ACC %B 3GSG ( 3H#6 LDX 0 %B 3HRQ STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USEST https://www.george3.co.uk/george/macro/usest?rev=1705492539&do=diff USEST (GIN Macro) Defined in: MACROS EWDAS Used in: COOR865, EXINONE867, EXOPEN867, FLAWMAP866, NEXTUNIT867, SCEX866, WRITEFIP867 3G#W # 3H#6 # ********************************************************************** 3HRQ # * 3J?B # * MACROS FOR KEEPING/RELEASING STORAGE UNITS 3JR2 # * 3K=L # * USEST,M… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) USESTX https://www.george3.co.uk/george/macro/usestx?rev=1705492539&do=diff USESTX (GIN Macro) Defined in: MACROS EWDAS Used in: EXOPEN867, NEXTUNIT867, WRITEFIP867 4QB6 # 4QTQ ...[??? USESTX 4R*B # ****** 4RT2 #MAC USESTX 4S#L # 4SS= #STR %C 4T?W ( 4TRG LDX 0 %C 4W?6 SMO FX2 4WQQ STO 0 ACOMMUNE8 4X=B ) 4XQ2 #STR %C 4Y9L #SKI 4YP= ( 4^8W SMO FX2 4^NG STOZ ACOMMUNE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) V https://www.george3.co.uk/george/macro/v?rev=1705492539&do=diff V (GIN Macro) Defined in: MACROS SAR Used in: ALASB867, ATTRIBUT867, FFFNORM7, IDFENQS867, LISTSTAR867, MESSBB, ONLINEC867, PROPERTY867, TWINSETA866, TWINSETD866 6=J8 ...[??? V SECT COMM FGN 12 DOC 6=K4 ...[ 6=KY ...[ 6=LS ...#MAC V 6=P2 [THIS MACRO FREES THE SEMAPHORE GIVEN BY %A AND WAKES UP ALL 6?8L [ACTIVITIES WAITING WITH STYLE #144 AND AUXILIARY STYLE %A. 6??9 ...#UNS HWATIDY 6?*S ... VOP ,IDFANDPROP 6?DC ...#UNS HWATIDY 6?H2 ...#SKI 6?KK ...( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VALIDAT https://www.george3.co.uk/george/macro/validat?rev=1705492539&do=diff VALIDAT (GIN Macro) Defined in: MACROS SJ Used in: 29FJ ...[ 29LQ ...[ 29S2 ...[??? VALIDAT SECT FILE FGN 24 DOC 2*9B #MAC VALIDAT 2*?K ...[VALIDAT IS USE TO RECURSIVELY VALIDATE INDIVIDUAL PARAM, IT IS THE 2**S ...[BODY OF THE MACRO VALIDATE 2*D3 ...[IF THE PARAMET CAUSES A COMPILATION ERROR THEN THE MACRO IS LEFT 2*G= ...[WITH 20?NON ZERO 2*JF ...[ENTRY PARAMETR IS 20V :- NUMBER OF PARAMS. TO VALIDATE 2*LN ...[%A,%B ETC. ARE TO BE VALIDATED 2*P… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VALIDATE https://www.george3.co.uk/george/macro/validate?rev=1705492539&do=diff VALIDATE (GIN Macro) Defined in: MACROS SJ Used in: 22FL ...[??? VALIDATE SECT FILE FGN 24 DOC 27*W #MAC VALIDATE 27CK ...[VALIDATE TEST IF PARAMETERS ARE AE- SET, B:- NULL 27F# ...[ANY OTHER PARMETER CAUSES AN ERROR 27H3 ...[PARAMS. %A :- NUMBER OF PARAMETRSTO BE VALIDATED 27JQ ...[%B,%C ETC. PARAMS. 27LF ...[IF ANY GIVEN PARAMETER IS IN ERROR (EXCEPT %A) THE LAST ACTION OF THE 27N8 ...[MACRO IS TO SKIP THUS THE NEXT LINE AFTER A CALL TO THE MACRO IS SKIPPE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VALIDNEW https://www.george3.co.uk/george/macro/validnew?rev=1705492539&do=diff VALIDNEW (GIN Macro) Defined in: MACROS MSYS Used in: ?N?N ...[??? VALIDNEW SECT CENT FGN 56 DOC ?NHG #MAC VALIDNEW ?P36 #STR %A ?PGQ ( ?Q2B #STR #,%A ?QG2 ( ?Q^L #DEF 20?=-1 ?RF= ! CATEGORY WORD NOT OCTAL ?RYW #EXIT ?SDG ) ?SY6 ) ?TCQ #SKI 20? ?TXB ( ?WC2 #STR %B ?WWL #STR ?XB= #DEF 20?=-1 ?XTW #STR %A ?Y*G #STR ?YT6 #DEF 20?=-1 ?^#Q #SKI 20?+1<1$1 ?^SB ! YOU MAY NOT 'S… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VARDOWN https://www.george3.co.uk/george/macro/vardown?rev=1705492539&do=diff VARDOWN (GIN Macro) Defined in: MACROS VB Used in: 4HR8 ...[??? VARDOWN SECT CENT FGN 7 DOC 4J6X ...# 4JGL # 4K2= #MAC VARDOWN 4KFW #DEF 20?=%A+1/512 4K^G #SKI AMFNUMBER-20?&#40000000 4LF6 ( 4LYQ ! IDENTIFIER OUT OF RANGE 4MDB DOWN MONFILE,21 4MY2 #EXI 4NCL ) 4NX= DOWNY 20?+KMESSX,K%BMESSA 4PBW #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VARIADNR https://www.george3.co.uk/george/macro/variadnr?rev=1705492539&do=diff VARIADNR (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, DELETE864, PERUSFIL84, READFILE84, REWRITE864 3K2S ...[??? VARIADNR SECT FILE FGN 20 DOC 3K=L [ THIS MACRO IS USED TO UPDATE CTS. RELEVANT TO FILESTOR READ 3KQ= [ TRANSFERS ON VARIOUS TYPES OF FILE 3L9W #MAC VARIADNR 3LPG #SKI I516A 3M96 ( 3MNQ LDX 0 %A 3N8B STO 0 GEN5 3NN2 CALL 0 (ARIADR) 3P7L ) 3PM= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VARIADNW https://www.george3.co.uk/george/macro/variadnw?rev=1705492539&do=diff VARIADNW (GIN Macro) Defined in: RING-MACROS Used in: APPEND864, DELETE864, PERUSFIL84, READFILE84, REWRITE864 3PX4 ...[??? VARIADNW SECT FILE FGN 20 DOC 3Q6W [ AS FOR VARIADR BUT FOR WRITE TRANSFERS. 3QLG #MAC VARIADNW 3R66 #SKI I516A 3RKQ ( 3S5B LDX 0 %A 3SK2 STO 0 GEN5 3T4L CALL 0 (ARIADW) 3TJ= ) 3W3W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VCONON https://www.george3.co.uk/george/macro/vconon?rev=1705492539&do=diff VCONON (GIN Macro) Defined in: MACS CONC Used in: 5R52 ...#MAC VCONON 5RJL ...#STR %A,ON 5S4= ...#SKI 5SHW ...( 5T3G ...#MEN ONLINCL 5TH6 ...#TRA K41ONLINCL 5W2Q ... BRN K42ONLINCL 5WGB ...#TRA K43ONLINCL 5X22 ... BRN K44ONLINCL 5XFL ...#END 5X^= ...#MEN ATTACHB 5YDW ...#TRA K41ATTACHB 5YYG ... BRN K42ATTACHB 5^D6 ...#END 5^XQ ...) 62CB ...#STR OFF,%A 62X2 ...#SKI 63BL ...( 63W= ...#MEN ONLINCL 64*W ...#T… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VDUCODE https://www.george3.co.uk/george/macro/vducode?rev=1705492539&do=diff VDUCODE (GIN Macro) Defined in: MACS IPB Used in: B*^W #MAC VDUCODE BBFG #MEN IPBSCANB BB^6 #TRA K40IPBSCANB BCDQ #SKI %A-1 BCYB #SKI BDD2 0 [UNSET B0 OF ICONTU IF CODE 1 BDXL #SKI %A-2 BFC= #SKI BFWW #40000000 [SET B0 OF ICONTU IF CODE 2 BGBG #END BGW6 #MEN IPBSCAN BH*Q #TRA K40IPBSCAN BHTB #SKI %A-1 BJ*2 #SKI BJSL 0 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VETC https://www.george3.co.uk/george/macro/vetc?rev=1705492539&do=diff VETC (GIN Macro) Defined in: MACROS JSR Used in: OPILLS70 4J=S ...[??? VETC SECT CENT FGN 9 DOC 4JGL # THIS MACRO OBTAINS THE V,C,SMO,ZSM BITS IN STANDARD FORM 4K2= #MAC VETC [JSRAYNER.M V,C,SMO,ZSM.(1907) 4KFW LDCT 0 #600 4K^G SMO %A 4LF6 ANDX 0 8 4LYQ STO 0 JWSP1 4MDB LDCT 0 #140 4MY2 SMO %A 4NCL ANDX 0 9 4NX= ORX 0 JWSP1 4PBW #SKIP %B 4PWG ST… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VFREE https://www.george3.co.uk/george/macro/vfree?rev=1705492539&do=diff VFREE (GIN Macro) Defined in: HUNTMACS1 Used in: ALLOW84, BMAPTWO860, BMOUTPUT867, BMQUEST866, CAFSPERI867, CHANG867, COMPCHAN84, CONNECT867, DELETE864, DEWELL867, DIRENT867, DOMONOP867, DUMP860, EDIT867, EDITMFO867, ENWELL867, ERASE867, FFFNORM7, FHOBJ860, FHOBJBL860, FHOBJDIR860, HOWBIG867, IFEXPAN867, INDEX85, INSTPARA867, IPCONA864, IPCPASS8, LIBMANY867, LIBREQ866, LIBREQC867, LIBSEC867, LISTAST867, LISTCONK83, LISTDEV866, LISTFIND867, LISTIDF867, LISTOPEN867, LISTPARS867, LISTPROP867, LI… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VFREEBAX https://www.george3.co.uk/george/macro/vfreebax?rev=1705492539&do=diff VFREEBAX (GIN Macro) Defined in: MACROS HFD8 Used in: ORELMAIN867, USERONE867, USEROPEN867, USERSTRM867, USERTYPE83 2T*2 ...[??? VFREEBAX SECT FILE FGN 22 DOC 2W#= #MAC VFREEBAX 2WFD ...[ 2WLL ...[ FREEBAX BLOCKS IN FULLB IF PRESENT & FREECORE EMPTYB 2WRW HUNTW 1,BSTB,FULLB 2X?G BNG 1 M1VFREEBAX 2XR6 MFREEBAX 2Y=Q M1VFREEBAX 2YQB LDX 1 FX1 2^=2 LDX 2 FX2 2^PL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VFREEW https://www.george3.co.uk/george/macro/vfreew?rev=1705492539&do=diff VFREEW (GIN Macro) Defined in: HUNTMACS1 Used in: ABANDONA867, ALASB867, ATTACHC867, BMJLSLAV864, BSPRUNE867, BUDGTWO84, CHNUMCON867, COMPRESS864, COMPRO867, COMPROB867, COPYA867, COPYB867, CORESHED861, DSCNCT867, DTREST860, DTSUBSS867, EDITER867, ERROR867, FHOBJ860, FHOBJBL860, FHOBJDIR860, FHOBJIND860, FILESECU83, FORMLOOP865, GET6, GETFREE867, GETFREEB864, GETWORD867, HLSEMS864, HLSEVENT867, HLSREAD867, IDFCONFA867, IDFENQS867, IDFPER867, INCEND865, INCEOT865, INCFIN864, INCSET865, IPBERRO… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VOP https://www.george3.co.uk/george/macro/vop?rev=1705492539&do=diff VOP (GIN Macro) Defined in: MACROS SJ Used in: ABANDON867, ABANDONA867, ADDICT865, BACKMAP864, BACKROOM865, BMAPDIR865, BMAPONE867, BMCNTRL866, BMFIXIT864, BMJLIST864, BMJLSLAV864, BMQUEST866, BMQUESTB866, BMSAVJOB864, CLOSEND867, CREALEX864, DICTWELL867, ENWELL867, ERASE867, FREEBUFF860, FREEZE864, INCEND865, INCEOT865, JOBLIST867, JSASCAN867, JWELLONE867, JWUPDATE867, PROPERTY867, REGEN865, SCHDJOBA867, SCHEDULE867, SETJOBQ867, WSJOBS867 *HR# ...[ *HYG ...[ *J5Q ...[??? VOP SECT … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) VSKIP https://www.george3.co.uk/george/macro/vskip?rev=1705492539&do=diff VSKIP (GIN Macro) Defined in: ACCESSMACROS Used in: CHANG867, EDITPT867, FHOBJIND860, LISTRING864, LOAD60, READFILE84 8#W8 ...[??? VSKIP SECT FILE FGN 19 DOC 8*62 #MAC VSKIP 8*KL ...#STR %A 8B5= ( 8BJW LDCT 0 %A 8C4G ADN 0 %B 8CJ6 ) 8D3Q ...#STR %A 8DHB #SKI 8F32 LDN 0 %B 8FGL CALL 1 (ASTEP32) 8G2= ... DOWN READFILE,9 8GFW CALL 1 (ASTEP34) 8G^G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WAITPRIV https://www.george3.co.uk/george/macro/waitpriv?rev=1705492539&do=diff WAITPRIV (GIN Macro) Defined in: DUMP-MACROS Used in: GETBACK865, GETBAX865 8S2J ...[??? WAITPRIV SECT FILE FGN 65 DOC 8S=B # 8SQ2 # THIS MACRO TESTS IF ACTIVITY IS B.S.PRIVILEGED 8T9L # 8TP= #MAC WAITPRIV 8TS7 ... LDX 1 FX2 8TT6 ... JBS M1WAITPRIV,1,CLGBSPRIV [J IF ACT. ITSELF BS PRIVILEGED 8TW5 ... LDN 0 FILERING(1) 8TX4 ... BXE 0 FILERING(1),%A [EXIT IF FILE RING EMPTY 8TY3 ... TOPFCB 1 8T^2 ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WAITSTOP https://www.george3.co.uk/george/macro/waitstop?rev=1705492539&do=diff WAITSTOP (GIN Macro) Defined in: MACROS CBK Used in: MOPCOM867, PCTCON8, TERM867 2HS# ...[??? WAITSTOP SECT CENT FGN 2 DOC 2J46 # THIS MACROS CHECKS IF ACTY IS IN LONGWAIT - IF SO AND IN 'DEMAND' 2JHQ # IT SETS THE CANTDO MARKER AND WAKES THE ACTY 2K3B # ELSE IT SENDS THE ACTY DOWN THE BREAKIN PATH 2KH2 # 2L2L # IF THE ACTY IS NOT WAITING EXIT TO %A X0 DESTROYED ONLY 2LG= # ELSE ACTY WOKEN X1,X2 = FX1,FX2 2L^W # ENTRY - X2 -> ACTY 2MFG #MAC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WAITVOP https://www.george3.co.uk/george/macro/waitvop?rev=1705492539&do=diff WAITVOP (GIN Macro) Defined in: MACROS SJ Used in: SCHDJOBA867 *Q3T ...[ *Q3Y ...[??? WAITVOP SECT FILE FGN 27 DOC *Q43 ...#MAC WAITVOP *Q46 ...[ WAITS UNTIL SPECIFIED SEMAPHORE IS RELEASED *Q49 ... JBC M1WAITVOP,%B,%C [J IF LOCKOUT NOT SET *Q4# ... BS %B,%C1 [SET 'WAITERS' BIT *Q4C ...#STR %D *Q4G ...#SKI *Q4K ...( [COOR3 CASE *Q4N ...#SKI %C2&(#400:0) *Q4R ...! POP E… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WAKEHANGER https://www.george3.co.uk/george/macro/wakehanger?rev=1705492539&do=diff WAKEHANGER (GIN Macro) Defined in: MACROSIPC Used in: IPCONB8, IPQUAKE83 FDPY ...[??? WAKEHANG SECT COMM FGN 19 DOC FDXS ...[ RECHAIN TASK BLOCK AND PUT HANGER ON ACTIVITY LIST FF5Q #MAC WAKEHANGER FFKB LDX 0 %A FG52 LDX 2 FX2 FGJL ANDN 0 #7777 FH4= STO 0 ACOMMUNE1(2) FHHW MWHANGER1 FJ3G FINDACTFB 2,,IPCA,HANGER,MWHANGERX,FPTR FJH6 LDX 0 HLINKIPC(2) FK2Q SMO FX2 FKGB … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WAKEUP https://www.george3.co.uk/george/macro/wakeup?rev=1705492539&do=diff WAKEUP (GIN Macro) Defined in: MACS PCT Used in: BMCNTRL866, DTREST860, INPCT84, PCTLISTA867, PCTLISTB867, RENGAGE851, RMTLF864, RMTLFEND864 8SQ2 #MAC WAKEUP 8T9L #STR %A,CONSOLE 8TP= ( 8W8W #STR %A,LF 8WNG ( 8X86 LDN 0 1 8XMQ ADS 0 FREBUFF(3) 8Y7B LDX 0 FREBUFF(3) 8YM2 SBN 0 2 8^6L BNG 0 MWAKEFIN 8^L= ) 925W LDXC 0 EWAIT(3) 92KG BCC MWAKEFIN 9356 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHATBACK https://www.george3.co.uk/george/macro/whatback?rev=1705492539&do=diff WHATBACK (GIN Macro) Defined in: MACROSBRBS Used in: CONSET864, COPYA867, COPYB867, COPYFILE867, CREATE867, DTREST860, EDIT867, LOADPROG865, MAKEFILE863, MTSTART864, OPENREL865, ORELEND860, RESTLIMB864, SAVE864, SETIDF867, SJOPEN863, USERONE867 3?2G ...[??? WHATBACK SECT FILE FGN 14 DOC 3FT= #MAC WHATBACK 3FWD ...#STR VSF,%E 3FXL ...( 3FYS ... SMO FX2 3G22 ... STOZ ACOMMUNE5 3G38 ...) 3G4B ...#STR VSF,%E 3G5J ...#SKI 3G6Q ...( 3G7Y ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHATRET https://www.george3.co.uk/george/macro/whatret?rev=1705492539&do=diff WHATRET (GIN Macro) Defined in: DUMP-MACROS Used in: D^WN ...[???WHATRET SECT FILE FGN ? DOC D^WP ...[ D^WQ ...[THIS MACRO SWITCHES ON OR OFF THE USE OF THE COMMAND WHATRVS D^WR ...[ TO LIST DETAILS OF OUTSTANDING RETRIEVES D^WS ...[ D^WT ...#MAC WHATRET D^WY ...#STR %A,ON D^W^ ...#SKI D^X2 ...( D^X3 ... HIDECOM WV,OFF D^X5 ...#EXI D^X6 ...) D^X7 ...#STR %A,OFF D^X8 ...#SKI D^X9 ...( D^X= ... HIDECOM WV D^X# ...#EXI D^X* ...) D^XB ...#STR %A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHERETO https://www.george3.co.uk/george/macro/whereto?rev=1705492539&do=diff WHERETO (GIN Macro) Defined in: MACROS RJH Used in: INMOP867 #=*S ...[??? WHERETO SECT CENT FGN 71 DOC #=KL # #?5= # TO TEST IF ANY MOP OUTPUT IS REQUIRED #?JW #MAC WHERETO ##4G MOD LDX 0 AMXMSK,%A ##J6 ANDX 0 %B #*3Q BNZ 0 %C #*HB #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHICHCON https://www.george3.co.uk/george/macro/whichcon?rev=1705492539&do=diff WHICHCON (GIN Macro) Defined in: MACS JIB Used in: CDCIPB864, IPBCONS867, MORNING867 *DDJ ...[??? WHICHCON SECT COMM FGN 25 DOC *DNB [THIS MACRO ENTERS WITH UNIT AND LINE NO AND REPLIES WITH NAME *F82 [OF CONCEPTUAL TO WHICH IT IS ATTACHED *M6W ...#MAC WHICHCON *M7P ...#STR %C *M8J ...#SKI *M9C ... LDX 0 CPPTR(2) *M== ...#STR %C *M?5 ... LDX 0 %C *M?Y ... LDX 2 FX2 *M#R ... STO 0 ACOMMUNE1(2) *M*L ... STO %D ACOMMUNE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHICHMOP https://www.george3.co.uk/george/macro/whichmop?rev=1705492539&do=diff WHICHMOP (GIN Macro) Defined in: MACS IPB Used in: CPOBJ6, CROBJ6, FHOBJ860, FHOBJIND860, LPOBJ6, TPOBJ867, TROBJ867 BQN6 #MAC WHICHMOP BR7Q SMO FX2 BRMB LDX 0 IDENTINFO BS72 BZE 0 %A BSLL #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHILE https://www.george3.co.uk/george/macro/while?rev=1705492539&do=diff WHILE (GIN Macro) Defined in: IFMACS Used in: CONSET864, FINISH867, FORMLOOP865, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTOPEN867, LISTRING864, MESSAH, MESSDJ, OPER864, OPERA864, OPERAPP864, OPERIN867, PCTBEGIN863, WA864, WHATPROP865, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLG862, WLOUT865 69PQ [ 6=9B [ 6=P2 # 6?8L [??? WHILE SECT DEVT FGN 1 DOC 6?N= [ 6#7W #MAC WHILE 6#MG [ ===== 6*76 [ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WHILER https://www.george3.co.uk/george/macro/whiler?rev=1705492539&do=diff WHILER (GIN Macro) Defined in: IFMACS Used in: 8TKB ...[ 8TKL ...[ 8TKW ...[??? WHILER SECT COMM FGN 1 DOC 8TL6 ...[ 8TLB ...#MAC WHILER 8TLL ...[ ====== 8TLW ...[ 8TM6 ...[ CONTRACTION OF 'WHILE EITHER' 8TMB ...[ 8TML ... WHILE EITHER,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, - 8TMW ... %Q,%R,%S,%T 8TN6 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WIDTH7020 https://www.george3.co.uk/george/macro/width7020?rev=1705492539&do=diff WIDTH7020 (GIN Macro) Defined in: MACS PCT Used in: 99XW #MAC WIDTH7020 9=7N ...#OPT AOEW7020=0 9=CG #DEF 19?+9=1? 9=X6 #STR %B 9?BQ #LIS %B 9?WB #DEF 19?+0=33? 9#B2 #SKI %A 9#TL ( 9**= #SKI 19?+0]-33?<1$1 9*SW ( 9B#G #ALT A7021WIDTH=%A>80 9BFN ...#SKI AOEW7020$1 9BLW ...( 9BS6 #SKI %A>132$132 9C?Q #ALT A7021WIDTH=132 9C*^ ...) 9CD8 ...#SKI AOEW7020 9CGC ...( 9CJL ...#SKI %A>511$511 9CLT ...#ALT A7… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WIND https://www.george3.co.uk/george/macro/wind?rev=1705492539&do=diff WIND (GIN Macro) Defined in: ACCESSMACROS Used in: ASSIGN860, DUMP860, EDIT867, FHOBJIND860, GETDIR860, INCDTA865, INCEND865, INCSET865, INCSTART865, INCTAPES867, INLOOP84, LOCATE84, LPTWO7, RESTEND850, RESTLIMB864, REWRITE864, SCEDIT84, SCEDITAR84 4F*4 ...[??? WIND SECT FILE FGN 19 DOC 4FJW #MAC WIND 4G4G #STR %A 4GJ6 #SKI 4H3Q DOWN REWRITE,44 4HHB #STR %A 4J32 ( 4JGL LDCT 0 %A 4K2= SMO FX2 4KFW STO … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WKPFIND https://www.george3.co.uk/george/macro/wkpfind?rev=1705492539&do=diff WKPFIND (GIN Macro) Defined in: MACROS WELL Used in: CHEKPRIV867, NAMEPRIV, PRIVLEG84 5F4N ...[??? WKPFIND SECT CENT FGN 72 DOC 5F#G ...[ 5FS6 ...#MAC WKPFIND 5G?Q ... LDN 2 -3+%B 5GRB ... LDX 0 %A 5H?2 ... LDX 1 1+%A 5HQL ...MWKPF1 ADN 2 3 5J== ... LDX %C 2(2) 5JPW ... TXU 0 0(2) 5K9G ... TXU 1 1(2) 5KP6 ... BCC MWKPF2 5L8Q ... LDX %C 3(2) 5LNB ... BNZ %C MWKPF1 5M82 ...MWKPF2 LDX 1 FX1… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WKPTABLE https://www.george3.co.uk/george/macro/wkptable?rev=1705492539&do=diff WKPTABLE (GIN Macro) Defined in: MACROS WELL Used in: BMJLIST864, BMJLSLAV864, CHEKPRIV867, INITJOB867, NAMEPRIV, PRIVLEG84 55JR ...[??? WKPTABLE SECT CENT FGN 72 DOC 55KG ...[ 5656 ...#MAC WKPTABLE 56JQ ... 8HTRUSTED 574B ... +APTRUSTED 57J2 ... 8HHLSEXT 583L ... +APHLSEXT 58H= ... 8HDESTCOMM 592W ... +APDESTCOMM 59GG ... 8HNOTOWNER 5=26 ... +APNOTOWNER 5=FQ ... 8HNEWUSER 5=^B ... +APNEWUSER 5?F2 ... 8H… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WKSFILE https://www.george3.co.uk/george/macro/wksfile?rev=1705492539&do=diff WKSFILE (GIN Macro) Defined in: MACROS HFD8 Used in: SAVEJOB865 4*MW ...[??? WKSFILE SECT FILE FGN 22 DOC 4BM6 #MAC WKSFILE 4C6Q MOD LDN 2 FILERING,%A 4CLB STO 2 GEN2 4D62 M1WKSFILE 4DKL LDX 2 FPTRF(2) 4F5= BXE 2 GEN2,M2WKSFILE 4FJW SMO FBACKPOINT(2) 4G4G LDX 1 BPTR(2) 4GJ6 JMBAC M1WKSFILE,1,BFDIR,BFVSF,BFCARE 4H3Q LDX 1 FX1 4HHB LDX 2 FX2 4J… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WLNARROW https://www.george3.co.uk/george/macro/wlnarrow?rev=1705492539&do=diff WLNARROW (GIN Macro) Defined in: MACROS SIB Used in: 2C69 ...# 2C6= ...# 2C6? ...[??? WLNARROW SECT COMM FGN 1 DOC 2C6# ...# 2C6* ...# 2C6B ...#MAC WLNARROW 2C6C ...[ 2C6D ...[ ALLOWS FULL WL/SL/CH OUTPUT TO BE KEPT TO 2C6F ...[ A MAXIMUM OF 40 CHARS (GENERALLY) 2C6G ...[ %A - 'ALL', 'OPERATOR' OR 'OFF' 2C6H ...[ 2C6J ...#ALT 20? = 2 [DEFAULT SETTING 2C6K ...[ 2C6L ...#STR ALL,%A 2C6M ...#STR 2C6N ...#ALT 20? = -1 2C6P ...[ … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WLOUTLIM https://www.george3.co.uk/george/macro/wloutlim?rev=1705492539&do=diff WLOUTLIM (GIN Macro) Defined in: MACROS SIB Used in: 2BLQ ...[ 2BLS ...[??? WLOUTLIM SECT DEVT FGN 5 DOC 2BLW ...[ 2BLY ...#MAC WLOUTLIM 2BM2 ...[ 2BM4 ...[ SET LIMIT FOR FULL WL OUTPUT TO OPS CONSOLE 2BM6 ...[ 2BM8 ...#UNS JWLNARROW 2BM= ...( 2BM# ...#MEN WLOUT 2BMB ...#TRA K90WLOUT 2BMD ... +%A 2BMG ...#END 2BMJ ...#EXI 2BML ...) 2BMM ...#UNS HWLSLCH 2BMN ...( 2BMP ...#MEN WLD 2BMQ ...#TRA K90WLD 2BMR ... +%A 2BMS ...#END 2BMT ..… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WLSIZE https://www.george3.co.uk/george/macro/wlsize?rev=1705492539&do=diff WLSIZE (GIN Macro) Defined in: MACS LIST Used in: 2C7W [ 2C8= ...[ 2C8L ...[ RESTORE TIME MACRO TO SWITCH ON WL FILE SIZE ENHANCEMENT 2C92 ...#MAC WLSIZE 2C9B ...#UNS AWLSZ 2C9Q ...( 2C=6 ...#STR %A,ON 2C=G ...#SKI 2C=W ...( 2C?= ...#STR %A 2C?L ...#STR %A,0 2C#2 ...( 2C#B ...#MEND WLOUT 2C#Q ...#TRA K50WLOUT 2C*6 ... NULL 2C*G ...#END 2C*W ...#MEND LISTFREE 2CB= ...#TRA K50LISTFREE 2CBL ... NULL 2CC2 ...#END 2CCB ...… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORDFIN https://www.george3.co.uk/george/macro/wordfin?rev=1705492539&do=diff WORDFIN (GIN Macro) Defined in: MACROS GLJ Used in: ALTINST60, ANTIC867, BEXTSJ84, CAFSPERI867, CHINERR867, CHNUMCON867, CLOSBAC867, CLOSDEL867, COMPRO867, CONTEND867, CORE867, EXINONE867, EXINTO867, FAIL5, GETONA867, GIVE867, IFNUMS867, IPCOPENA83, LOADFIN860, MONRESUM850, NEXTUNIT867, OLMTB867, OLMTC85, OLMTE85, ONOFFALT60, OPILLS70, PERFAIL866, PERION867, PRINT70, PROGISH850, PROSTART867, READSPEC867, RENAMEX867, SAVE864, SAVEDA70, SCEXEND867, SCHDJOBA867, SPERION867, SQOPEN867, STEPBACK1 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORDSIN https://www.george3.co.uk/george/macro/wordsin?rev=1705492539&do=diff WORDSIN (GIN Macro) Defined in: MACROS JSR Used in: CONIPB8 F#PF ...[ AS FINMOVE BUT DOES UP TO 1024 WORDS F#PG ...#MAC WORDSIN F#PH ...#SKI G4 F#PJ ... FINMOVEZ %A,%B,%C,%D,%E,OUT,MVCH,%F,%G,MORE F#PK ...#SKI G3 F#PL ...( F#PM ... FADDRESS %A,%B F#PN ... LDX 0 %D F#PP ... REMOVE %B,%C,0 F#PQ ...) F#PR ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORDSOUT https://www.george3.co.uk/george/macro/wordsout?rev=1705492539&do=diff WORDSOUT (GIN Macro) Defined in: MACROS JSR Used in: CONIPB8 F#PW ...[ AS FOUTMOVE BUT DOES UP TO 1024 WORDS F#PX ...#MAC WORDSOUT F#PY ...#SKI G4 F#P^ ... FINMOVEZ %A,%B,%C,%D,%E,IN,MVCH,%F,%G,MORE F#Q2 ...#SKI G3 F#Q3 ...( F#Q4 ... FADDRESS %A,%B F#Q5 ... LDX 0 %D F#Q6 ... REMOVE %B,%C,0 F#Q7 ...) F#Q8 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORDST https://www.george3.co.uk/george/macro/wordst?rev=1705492539&do=diff WORDST (GIN Macro) Defined in: MACROS EWDAS Used in: CONTRACT866 ##J6 # #*3Q [??? WORDST #*HB # ****** #B32 #MAC WORDST #BGL # #C2= #OPT MWORDST1=0 #CFW CALL 0 MWORDST2 #C^G LDX 0 %A #DF6 #SKI MWORDST1-1 #DYQ ( #FDB #FRE MWORDST1 #FY2 #DEF MWORDST1=1 #GCL BRN MWORDST3 #GX= MWORDST4 #HBW #DEF MWORDST2=MWORDST4 #HW… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORKNAME https://www.george3.co.uk/george/macro/workname?rev=1705492539&do=diff WORKNAME (GIN Macro) Defined in: WORK-MACROS Used in: NORMALUS864, WORKFILE860 6?Y4 ...[??? WORKNAME SECT FILE FGN 4 DOC 6#7W #MAC WORKNAME 6#MG #SKI %A 6*76 ( 6*LQ LDX 0 %A 6B6B SMO FX2 6BL2 STO 0 ACOMMUNE1 6C5L ) 6CK= #SKI %A 6D4W #SKI 6DJG ( 6F46 SMO FX2 6FHQ STOZ ACOMMUNE1 6G3B ) 6GH2 DOWN WORKFILE,1 6H2L #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WORKNUMB https://www.george3.co.uk/george/macro/worknumb?rev=1705492539&do=diff WORKNUMB (GIN Macro) Defined in: WORK-MACROS Used in: CREATE867, FFFNORM7, SAVEJOB865, SETPC867, WORKFILE860 6H=D ...[??? WORKNUMB SECT FILE FGN 4 DOC 6HG= #MAC WORKNUMB 6H^W LDN 0 0 6JFG #SKI %B 6J^6 ... LDX 1 %B 6KDQ #SKI %B 6KYB #SKI 6LD2 ... LDX 1 FX2 6MWW #SKI %A-3 6NBG STO 3 GEN0 6NW6 ... BASEFCB 1,WORK,M2WORKNUMB,2 6P*Q ...M1WORKNUMB 6RRW #SKI %C 6S?G #SKI 6SR6 ( 6T=Q ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITEAUTO https://www.george3.co.uk/george/macro/writeauto?rev=1705492539&do=diff WRITEAUTO (GIN Macro) Defined in: MACROS Used in: BMCNTRL866, CORE867, DTREST860, GIVE867, RESTLIMB864, SJOPEN863 =34J ...[??? WRITEAUT SECT FILE FGN 9 DOC =3#B #MAC WRITEAUTO =3S2 #SKI BSOKAY =4?L ( =4R= #STR %A =5=W ( =5QG #DEF M1WRITAUTO=%A$FLAW =6=6 #DEF M2WRITAUTO=%A$BOBJ$FLAW<M1WRITAUTO =6PQ #DEF M3WRITAUTO=%A&BONLFAIL-BONLFAIL<M2WRITAUTO =79B #DEF M4WRITAUTO=%A&FREEBOBJ-FREEBOBJ<M3WRITAUTO =7P2 #DEF M5WRITAUTO=%A&BSETFREE-BSE… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITEB https://www.george3.co.uk/george/macro/writeb?rev=1705492539&do=diff WRITEB (GIN Macro) Defined in: ACCESSMACROS Used in: COPYA867, CREALEX864, FHOBJBL860, RESTLIMB864, REWRITE864, USELEX5 4M8J ...[??? WRITEB SECT FILE FGN 19 DOC 4MDB #MAC WRITEB 4MY2 #STR %A 4NCL #SKI 4NX= ( 4PBW #STR %B 4PWG ( 4QB6 #STR ANSWER,%B 4QTQ #SKI 4R*B DOWN REWRITE,57 4RT2 #STR FORCED,%B 4S#L #SKI 4SS= DOWN REWRITE,58 4T?W #STR ANSWER,%B 4TRG ( 4W?6 #STR FORCED,%B 4WQQ ( … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITED https://www.george3.co.uk/george/macro/writed?rev=1705492539&do=diff WRITED (GIN Macro) Defined in: MACROS RMD10 Used in: CONSET864, OPER864, RAND864, SAVEDA70 *B2D ...[??? WRITED SECT FILE FGN 16 DOC *BPW #MAC WRITED *C9G ACCSTO %A,ACOMMUNE8,FX2 *CP6 LDN 0 %B *D8Q SMO FX2 *DNB STO 0 ACOMMUNE9 *F82 #STR %B,8 *FML #SKI *G7= ! BUCK8 INVALID WITH WRITED *GLW DOWN RAND,2 *H6G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITEJL https://www.george3.co.uk/george/macro/writejl?rev=1705492539&do=diff WRITEJL (GIN Macro) Defined in: MACROS WELL Used in: JOBLIST867 45L4 ...[??? WRITEJL SECT CENT FGN 72 DOC 45TW [ 46*G [ 46T6 [ 47#Q #MAC WRITEJL 47SB MHUNTW 3,%A,%B 48#2 NAME 3,FILE,FWB 48RL INSERT 49?= MHUNTW 3,FILE,FWB 49QW NAME 3,%A,%B 4==G #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITEST https://www.george3.co.uk/george/macro/writest?rev=1705492539&do=diff WRITEST (GIN Macro) Defined in: MACROS EWDAS Used in: EXINTO867, EXINTWO866 BWK6 # BX4Q [??? WRITEST BXJB # ******* BY42 #MAC WRITEST BYHL # B^3= STOZ EWK+3(3) B^GW #STR C,%A C22G #SKI C2G6 CALL 0 MWRITESTX3 C2^Q #STR W,%A C3FB #SKI C3^2 CALL 0 MWRITESTX4 C4DL LDX 1 %B C4Y= #STR %D C5CW LDCT 0 #60… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRITESTX https://www.george3.co.uk/george/macro/writestx?rev=1705492539&do=diff WRITESTX (GIN Macro) Defined in: MACROS EWDAS Used in: C8T= # C9#W [??? WRITESTX C9SG # ******** C=#6 #MAC WRITESTX C=RQ # C??B #OPT MWRITESTX1=0 C?R2 #OPT MWRITESTX2=0 C#=L #STR C,%A C#Q= #SKI C*9W ( C*PG #SKI MWRITESTX1-1 CB96 ( CBNQ #FRE MWRITESTX1 CC8B #DEF MWRITESTX1=1 CCN2 BRN MWRITESTX5 CD7L MWRITESTX6 CDM= … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRONG https://www.george3.co.uk/george/macro/wrong?rev=1705492539&do=diff WRONG (GIN Macro) Defined in: MACROS PERI Used in: ALLOW84, ANSCOM865, ATTRIBUT867, BQUERY84, BUDGET84, CANCOM863, DUMMYB867, EDITER867, FORMLOOP865, FREEPER867, GETBAX865, GROPE867, HLSREAD867, IPBERROR867, IPBINB867, IPBSCAN867, IPLPM84, LIBMANY867, LISTNIP865, LOADERDA867, MESSAI, MESSCC, MESSCG, MESSCI, MESSDC, MESSDJ, MESSE, MONFILE867, MTCHECK860, ONLINEC867, OPERATOR867, PARAM865, PRIVLEG84, RENAME864, REPORT865, RIGHT867, SAVE864, SCHEDULE867, USEROPEN867, VCLASTWO867, VERBCLAS867, WL… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WRPVDUS https://www.george3.co.uk/george/macro/wrpvdus?rev=1705492539&do=diff WRPVDUS (GIN Macro) Defined in: MACS JIB Used in: *MF5 ...[ *MF8 ...[??? WRPVDUS SECT COMM FGN 53 DOC *MF? ...#MAC WRPVDUS *MFB ...#MEND IDFCONF *MFF ...#TRA K20IDFCONF *MFJ ... LDCT 0 #400 *MFM ...#TRA K21IDFCONF *MFQ ... NULL *MFT ...#END *MFY ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WSCOREPRI https://www.george3.co.uk/george/macro/wscorepri?rev=1705492539&do=diff WSCOREPRI (GIN Macro) Defined in: LLSMACROS Used in: 968R ...#MAC WSCOREPRI 968T ...#STR ON,%A 968X ...( 968^ ...#STR OFF,%A 9693 ...( 9695 ...! PARAMETER MUST BE ON OR OFF 9697 ...#EXI 9699 ...) 969? ...) 969* ...#MEN QPRINT 969C ...#TRA K50QPRINT 969F ...#STR OFF,%A 969H ...#SKI 969K ... 0 969M ...#STR ON,%A 969P ...#SKI 969R ... #40000000 969T ...#END 969X ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WSNARROW https://www.george3.co.uk/george/macro/wsnarrow?rev=1705492539&do=diff WSNARROW (GIN Macro) Defined in: MACROS GEM Used in: WSPARAM867 49?= # 49QW ...[??? WSNARROW SECT CENT FGN 2 DOC 4==G ...[ WSNARROW MACRO TO SHORTEN WS OUTPUT 4=Q6 ...#MAC WSNARROW 4?9Q ...[ MACRO TO SWITCH ON OR OFF RESTRICTION OF WS OUTPUT 4?PB ...#STR %A,ALL 4#92 ...#SKI [INC IF ALL 4#NL ...( 4*8= ... WSNARROW OFF 4*MW ...#MEN WSPARAM 4B7G ...#TRA K50WSPARAM+1 4BM6 ...#FID 2 2 1 4C6Q ...#END 4CLB ...#MEN QPRINT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WSRV https://www.george3.co.uk/george/macro/wsrv?rev=1705492539&do=diff WSRV (GIN Macro) Defined in: DUMP-MACROS Used in: WHATRVSA867, WTSTAT867 **F? ...[??? WSRV SECT FILE FGN 65 DOC **P5 ...[ *B8P ...[ THIS MACRO SEARCHES AROUND THE OFFLINE *BN* ...[ CHAIN AND THE ACTIVITY LIST IN ORDER *C7^ ...[ TO FIND A TSN OF A RETRIEVE TAPE THAT *CMK ...[ CAN SATISFY THE RETRIEVAL OF THE FILE *D79 ...[ SPECIFIED BY %A, %B, AND %C.. *DLT ...[ %A CONTAINS THE INCREMENT NUMBER *F6F ...[ %B CONTAINS THE FILE NUMBER *FB? ...[ %C CONT… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) WVOUTLIM https://www.george3.co.uk/george/macro/wvoutlim?rev=1705492539&do=diff WVOUTLIM (GIN Macro) Defined in: DUMP-MACROS Used in: D^XL ...[ D^XM ...[??? WVOUTLIM SECT FILE FGN ? DOC D^XN ...[ D^XP ...[DEFINES THE MAXIMUM NO OF RV REQUESTS D^XQ ...[ON WHICH WHATRVS MAY REPORT D^XR ...[WHEN SENDING OUTPUT TO AN OPS CONSOLE D^XS ...[DEFAULT 100 D^XT ...#MAC WVOUTLIM D^XW ...#STR %A D^XX ...#SKI D^XY ...( D^X^ ... WVOUTLIM 100 D^Y2 ...#EXI D^Y3 ...) D^Y4 ...#MEN WHATRVSA D^Y5 ...#TRA K90WHATRVSA D^Y6 ... +%A … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XCBINDEX https://www.george3.co.uk/george/macro/xcbindex?rev=1705492539&do=diff XCBINDEX (GIN Macro) Defined in: MACROS GEM Used in: BLOGNAL865, INCRCUBX860, LOGANAL864, SCEDITAR84 3L^# ...[??? XCBINDEX SECT CENT FGN 1 DOC 3M96 # 3MNQ #MAC XCBINDEX 3N8B CALL %A MXCBINDEX1 [%A IS THE LINK ADRESS 3NN2 #OPT MXCBINDEX2=1 3P7L #SKI MXCBINDEX2 3PM= ( 3Q6W BRN MY [BRN PAST END OF SUBROUTINE 3QLG #DEF MXCBINDEX1=0? [TRANSFER ADRESS. 3R6… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XCLEAR https://www.george3.co.uk/george/macro/xclear?rev=1705492539&do=diff XCLEAR (GIN Macro) Defined in: MACROS JSRG4 Used in: DETACHB867, HLSREAD867, MONRESUM850, PARAMA865 4^8W #MACRO XCLEAR 4^NG #SKIP %A-2 5286 CALL 0 (CLEAR) 52MQ #SKIP %A&1<1$1 537B STOZ 0(3) 53M2 #SKIP %A-3<1$1 546L SETBIT 0,0(3) 54L= #SKIP %B-1 555W ( 55KG ADN 3 HLOCKLEN 5656 XCLEAR %A,%B-1 56JQ ) 574B #NORMAL text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XFBDSKPA https://www.george3.co.uk/george/macro/xfbdskpa?rev=1705492539&do=diff XFBDSKPA (GIN Macro) Defined in: MACRO COMPRO Used in: BM=Q ...[??? XFBDSKPA SECT CENT FGN 21 DOC C22G #MAC XFBDSKPA C2G6 #DEF 21?=34?+0?+0]&#37777777 C2^Q #SKI 21?<1$1 C3FB ( C3^2 ...#CONSOLEOUT UNKNOWN COMMAND '%A' IN %B MACRO C4DL ...! UNKNOWN COMMAND '%A' IN %B MACRO C4Y= ) C5CW #SKI 21? C5XG ( C6C6 #SKI 21?-20? C6WQ ( C7BB #DEF 0?=0?+BICESIZE C7W2 ... XFBDSKPA %A,%B C8*L ) C8T= ) C9#W #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XGDRPTRS https://www.george3.co.uk/george/macro/xgdrptrs?rev=1705492539&do=diff XGDRPTRS (GIN Macro) Defined in: OPEN-MACROS Used in: CLOSTIDY860 ?9LY ...[??? XGDRPTRS SECT FILE FGN 20 DOC ?9WQ #MAC XGDRPTRS ?=BB LDX %B %A ?=W2 ADX %B FBACKPOINT(%A) ??*L MOD LDEX 0 ARINGNO,%B ??T= SBN 0 1 ?##W BZE 0 M2XGDR ?#SG M1XGDR ?*#6 NGX 0 0 ?*RQ ANDX 0 BITS22LS ?B?B NGNC %C 2 ?BR2 STO %C FREADWORD(%A) ?C=L STO %C FREADBLOCK(%A) ?C… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XLOADKEY https://www.george3.co.uk/george/macro/xloadkey?rev=1705492539&do=diff XLOADKEY (GIN Macro) Defined in: INDEX-MACROS Used in: 37*# ...[??? XLOADKEY SECT FILE FGN 9 DOC 37K6 #MAC XLOADKEY 384Q [ USED BY KEYREC. %A IS INSTRUCTION MNEMNONIC,%B IS A LOCATION TO 38JB [ STORE THE CONTENTS OF %C APPROPRIATELY MODIFIED INTO,IF MISSING 3942 [ ASSUMED X0,%C IS AN IDENTIFIER,IF %D PRESENT,X1 IS THE MODIFIER, 39HL [ IF ABSENT,SUB.A1 FROM %C & USE %E AS MODIFIER. 3=3= #STR %D 3=GW ( 3?2G #STR %B 3?G6 #… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XMELGUTS https://www.george3.co.uk/george/macro/xmelguts?rev=1705492539&do=diff XMELGUTS (GIN Macro) Defined in: LLSMACROS Used in: 5YYG [ 5^D6 #MAC XMELGUTS 5^XQ #STR %B 62CB #SKI 62X2 ( 63BL SMO 5 63W= LDXC 0 ASU 64*W BCS MGUTS4 [J IF MEMBER DOES NOT EXIST 64TG ) 65*6 LDCH 6 APR1(3) [PRIORITY 65SQ LDN 0 BPROG [START AND END CONDITIONS 66#B LDN 2 GMEL [FOR PROGRAM RING 66S2 SMO 7 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XMELPARS https://www.george3.co.uk/george/macro/xmelpars?rev=1705492539&do=diff XMELPARS (GIN Macro) Defined in: LLSMACROS Used in: 5GRB #MAC XMELPARS 5H?2 LDN 0 3 5HQL LDN 1 GEN0 5J== MOVE 0 5 [GEN0-GEN4 INC HOLD ACCS 5JPW #STR %A,3 5K9G LDX 3 %A [X3 -> PCA 5KP6 #STR %B 5L8Q ( 5LNB LDX 7 %B 5M82 SRC 7 2 5MML ADX 3 7 [B0,1,FOR CH PTR FOR MEMB NO 5N7= LDN 4 AFW2-AFW1 5NLW #ACC … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XRIGHT https://www.george3.co.uk/george/macro/xright?rev=1705492539&do=diff XRIGHT (GIN Macro) Defined in: MACS JIB Used in: RIGHT867 *MG3 ...[ *MGF ...[??? XRIGHT SECT COMM FGN 25 DOC *MH6 [ *N2Q [RIGHT MACRO *T2W ...#MAC XRIGHT *T3T ...#STR %B *T4S ...#SKI *T5R ... LDX 0 CPPTR(2) *T6Q ...#STR %B *T7P ... LDX 0 %B *T8N ... SMO FX2 *T9M ... STO 0 ACOMMUNE1 [UNIT *T=L ... DOWN IDFOFF,90 *T?K ... BRN %A *T#J ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XSFCB https://www.george3.co.uk/george/macro/xsfcb?rev=1705492539&do=diff XSFCB (GIN Macro) Defined in: RING-MACROS Used in: #?SN ...[??? XSFCB SECT FILE FGN 20 DOC ##4G #MAC XSFCB ##J6 [ THIS IS THE REDEFINED SFCB MACRO WHICH GIVES A POINTER IN %B TO THE #*3Q [ FCB OF THE FILE OPEN AT LEVEL %A TO THE CURRENT ACTIVITY #*HB SFSTACK %A,%B [TO GIVE %B-> TO FCA IN STACK BLOCK #B32 MOD ADX %B FBACKPOINT,%B [%B -> FSTACK #BGL MOD LDX %B BPTR,%B [%B -> FCB #C2= MOD LDX 0 ATYPE,%B … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XTESTSLOWEST https://www.george3.co.uk/george/macro/xtestslowest?rev=1705492539&do=diff XTESTSLOWEST (GIN Macro) Defined in: RING-MACROS Used in: 5H38 ...[??? XTESTSLO SECT FILE FGN 20 DOC 5H?2 # AS ABOVE , BUT CHECKS WORD POINTER TOO 5HQL #MAC XTESTSLOWEST 5J== LDEX 3 ARINGNO(%C) 5JPW SBN 3 1 5K9G BZE 3 %B 5KP6 ADN 3 1 5L8Q LDX 0 3 5LNB M4XTEST 5M82 ADN %C FELLEN 5MML BCT 0 M4XTEST 5N7= M2XTEST 5NLW SBN %C FELLEN 5P6G LDXC… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XTRALFPAR https://www.george3.co.uk/george/macro/xtralfpar?rev=1705492539&do=diff XTRALFPAR (GIN Macro) Defined in: MACROS LEF Used in: LISTFILE867 JJ9L ...#MAC XTRALFPAR JJP= ... 4H%A [ %A = PARAMETER KEY JK8W ... +0 [ %B,C,D = BIT TAGS (DEFAULT %B = %A) JKNG ...#STR %B JL86 ...#FID 0 BLFXTRA%B&#37 1 JLMQ ...#STR %B JM7B ...#STR JMM2 ...#FID 0 BLFXTRA%A&#37 1 JN6L ...#STR %C JNL= ...#FID 0 BLFXTRA%C&#37 1 JP5W ...#STR %D JPKG ...#FID 0 BLFXTRA%D&#37 1 JQ56 ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XWRONG https://www.george3.co.uk/george/macro/xwrong?rev=1705492539&do=diff XWRONG (GIN Macro) Defined in: MACS JIB Used in: FHLIST867, FREEPER867, RIGHT867, SCHEDMTA860 *TB4 ...[??? XWRONG SECT COMM FGN 25 DOC *TBL [WRONG MACRO *TW= [ B3*Q ...#MAC XWRONG B3BM ...#STR %C B3CJ ...#SKI B3DF ... LDX 0 CPPTR(2) B3FB ...#STR %C B3G? ... LDX 0 %C B3H8 ... SMO FX2 B3J5 ... STO 0 ACOMMUNE1 [UNIT NO B3K2 ... DOWN IDFOFF,80 B3KX ... BRN %A [BRK-IN B3LS ... … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XY https://www.george3.co.uk/george/macro/xy?rev=1705492539&do=diff XY (GIN Macro) Defined in: COMPMACMOON Used in: COMPSFILE, CONTRACT866, ENWELL867, FILECOMPS, INCEND865, PMDR864, RESTLIMB864 2*YS ...[??? XY SECT FILE FGN 9 DOC 2B8L #MAC XY 2BN= #DEF %AN=%A-A1 2C7W #STR %B 2CMG XY %B,%C,%D,%E,%F 2D76 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) XYZ https://www.george3.co.uk/george/macro/xyz?rev=1705492539&do=diff XYZ (GIN Macro) Defined in: COMPMACMOON Used in: ALAS822, ALASB867, FILECOMPS, IPALL864, LOGANAL864, PMLP866, PMWHATA866, PMWINDDN84, SETIDF867, WHATPERA867 29J8 ...[??? XYZ SECT FILE FGN 9 DOC 29S2 #MAC XYZ [DEFINES BITS IN NAME RECORD AND ENT BLOCK 2=?L #STR %C 2=R= ( 2?=W BITDEFS %A,%B,BE%C 2?QG BITDEFS %A-A1,%B,BN%C 2#=6 ) 2#PQ #STR %D%E%F%G%H 2*9B XYZ %A,%B+1,%D,%E,%F,%G,%H 2*P2 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YIDFUNON https://www.george3.co.uk/george/macro/yidfunon?rev=1705492539&do=diff YIDFUNON (GIN Macro) Defined in: MACS JIB Used in: ONLINEB867 B3PF ...[??? YIDFUNON SECT COMM FGN 25 DOC B49B #MAC YIDFUNON B4P2 SMO FX2 B58L STO %C ACOMMUNE2 B5N= DOWN IDFONLIN,2 [DEALS WITH 7900 UNIT B67W BRN %A B6MG BRN %B B776 #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YMOPOFF https://www.george3.co.uk/george/macro/ymopoff?rev=1705492539&do=diff YMOPOFF (GIN Macro) Defined in: MACS JIB Used in: IPBSTARB867, IPBSTART867, MOPCOM867 B79P ...[??? YMOPOFF SECT COMM FGN 25 DOC B#LL ...#MAC YMOPOFF B#MH ...#STR %C B#ND ...#SKI B#P* ... LDX 0 CPPTR(2) B#Q= ...#STR %C B#R7 ... LDX 0 %C B#S4 ... LDX 2 FX2 B#S^ ... STO 0 ACOMMUNE1(2) B#TW ... DOWN IDFOFF,22 B#WR ... BRN %A [BRK-IN B#XN ... BRN %B [ALREADY MOPPED OFF … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YMOPON https://www.george3.co.uk/george/macro/ymopon?rev=1705492539&do=diff YMOPON (GIN Macro) Defined in: MACS JIB Used in: IPBSTARB867, MOPCOM867 B*24 ...[??? YMOPON SECT COMM FGN 25 DOC BKRW #MAC YMOPON BL?G #STR %C BLR6 #SKI BM=Q LDX 0 CPPTR(2) BMQB #STR %C BN=2 LDX 0 %C BNPL LDX 2 FX2 BP9= STO 0 ACOMMUNE2(2) BP?T ...#STR IPBSW,%D BPBD ... STO 2 ACOMMUNE3(2) BPF3 ...#STR IPBSW,%D BPHL ...#SKI BPL9 ... STOZ ACOMMUNE3(2) BPNW DOWN IDFSCON,4 … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YRIGHT https://www.george3.co.uk/george/macro/yright?rev=1705492539&do=diff YRIGHT (GIN Macro) Defined in: MACS JIB Used in: RIGHT867 BRP^ ...[??? YRIGHT SECT COMM FGN 25 DOC BYM2 ...#MAC YRIGHT BYMT ...#STR %B BYNN ...#SKI BYPH ... LDX 0 CPPTR(2) BYQB ...#STR %B BYR9 ... LDX 0 %B BYS4 ... LDX 2 FX2 BYSX ... STO 0 ACOMMUNE1(2) [UNIT BYTQ ... DOWN IDFOFF,91 BYWK ... BRN %A BYXD ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YUNITOFF https://www.george3.co.uk/george/macro/yunitoff?rev=1705492539&do=diff YUNITOFF (GIN Macro) Defined in: MACS JIB Used in: ONLINEB867, RELPER867 BYYN ...[??? YUNITOFF SECT COMM FGN 25 DOC C26L ...#MAC YUNITOFF [RELEASE AN EXOTIC FROM BEING ONLINED C27M ... DOWN IDFOFF,21 [7900 CHAIN C28N ... BRN %A C29P ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) YWRONG https://www.george3.co.uk/george/macro/ywrong?rev=1705492539&do=diff YWRONG (GIN Macro) Defined in: MACS JIB Used in: DUMMYB867, FREEPER867, IPBINB867, RIGHT867 C2?= ...[??? YWRONG SECT COMM FGN 25 DOC C7G= ...#MAC YWRONG C7H9 ...#STR %C C7J8 ...#SKI C7K7 ... LDX 0 CPPTR(2) C7L6 ...#STR %C C7M5 ... LDX 0 %C C7N4 ... LDX 2 FX2 C7P3 ... STO 0 ACOMMUNE1(2) [UNIT NO. C7Q2 ... DOWN IDFOFF,81 C7Q^ ... BRN %A [BRK-IN C7RY ... BRN %B [CANNOT B… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ZERORING https://www.george3.co.uk/george/macro/zeroring?rev=1705492539&do=diff ZERORING (GIN Macro) Defined in: COREMACROS Used in: 6JP# ...[??? ZERORING SECT CENT FGN 32 DOC 6J^6 [ 6KDQ [THIS IS A RECURSIVE MACRO WHICH INITIALISES ALL RING ELEMENTS IN A 6KYB [QUEUE BLOCK UP TO BUT NOT INCLUDING CHAINADD/BACKCHAN 6LD2 [ 6LXL #MAC ZERORING 6MC= #OPT MZERORING1=%A 6MWW #OPT MZERORING=1 6NBG #SKI CHAINADD-ARINGNO-1-MZERORING1 6NW6 ( 6P*Q #SKI MZERORING 6PTB ( 6Q*2 LDX 3 FPTR(2) 6QS… text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ZERRORX https://www.george3.co.uk/george/macro/zerrorx?rev=1705492539&do=diff ZERRORX (GIN Macro) Defined in: MACS MISW Used in: ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, ATTJOUNL861, DETACH867, HARDWARA8, HOLDCOM867, HOWBIG867, LINECTRL864, LIST867, LISTFILE867, LISTFREE867, LISTPARS867, MAKEVCC867, ONLINCL864, ONLINEA867, ONLINEB867, ONLINEC867, PARSORT867, PERFPASS864 CJ4L #MAC ZERRORX CJJ= #STR %B CK3W CALL %B MZERR%B CKHG #STR %B CL36 #SKI CLGQ CALL 1 MZERR CM2B +%A CMG2 #STR %B CM^L … text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ZERRORY https://www.george3.co.uk/george/macro/zerrory?rev=1705492539&do=diff ZERRORY (GIN Macro) Defined in: MACS MISW Used in: ASSOC867, ATTACHA8, ATTACHB866, ATTACHC867, DETACH867, HARDWARA8, HOLDCOM867, LINECTRL864, LISTFILE867, LISTFREE867, LISTPARS867, MAKEVCC867, ONLINCL864, ONLINEA867, ONLINEB867, ONLINEC867, PARSORT867, PERFPASS864 CTT6 #MAC ZERRORY CW#Q #OPT MZERR=0? CWSB #SKI 0?-MZERR CX#2 #SKI CXRL COMERRX 0(1) CY?= #NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ZMOPOFF https://www.george3.co.uk/george/macro/zmopoff?rev=1705492539&do=diff ZMOPOFF (GIN Macro) Defined in: MACS JIB Used in: IDFCHK867, SETIDF867 C7TK ...# MOP OFF 7900 IN IDF WHEN IDF ALREADY OPEN C7TL ...#MAC ZMOPOFF C7TM ... LDX 0 %C C7TN ... LDX 2 FX2 C7TP ... STO 0 ACOMMUNE1(2) C7TQ ... DOWN IDFOFF,23 C7TR ... BRN (GEOERR) [BREAKIN IMPOSSIBLE C7TS ... BRN %B C7TT ...#NOR text/html 2024-01-17T11:55:39+00:00 Anonymous (anonymous@undisclosed.example.com) ZTSPECIAL https://www.george3.co.uk/george/macro/ztspecial?rev=1705492539&do=diff ZTSPECIAL (GIN Macro) Defined in: CENTCSSMACS Used in: 69PQ ...[ 6=9B ...[???? ZTSPECIAL 6=P2 ...[ RESTORE TIME MACRO TO SWITCH SPECIAL 6?8L ...[ COMMAND ZT IN AND OUT 6?N= ...[ " ZTSPECIAL" OR " ZTSPECIAL ON" SWITCHES IT IN 6#7W ...[ " ZTSPECIAL OFF" SWITCHES IT OUT 6#MG ...#MAC ZTSPECIAL 6*76 ...#STR %A,ON 6*LQ ...#STR 6B6B ...( 6BL2 ...#MEN VCLASTWO 6C5L ...#TRA K85VCLASTWO 6CK= ... BICE ZT,ZTIME,#0…