LR258PO ;DALOI/FHS/RSH - LR*5.2*258 PATCH POST INSTALL ROUTINE
Source file <LR258PO.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ;
|
|
SETUP | ; SETS UP THE FDA ARRAY TO ADD A NODE
|
|
DEL | ;
|
|
CMP | ; COMPARE FOUND CODES AND PROCEDURE NAMES
|
|
PRE | ;
|
|
SET | ;
|
|
AREC | ; ADDS ENTRIES FROM THE TRANSPORT MULTIPLE TO FILE 64
|
|
EN1 | ;Find and correct existing spelling or duplicate numbers errors.
|
|
GNDE | ; RETRIEVES NODES FROM THE TRANSPORT MULTIPLE
|
|
CHK642 | ;Looking for locally added suffix
|
|
CHK | ||
CHGNM | ; CHANGE THE PROCEDURE NAME IN THE RECORD
|
|
WRT | ;
|
|
KREC | ; DELETES THE RECORD FROM THE FILE
|
|
ERMSG | ;STUFF THE TEMP GLOBAL WITH ANY ERROR MESSAGES
|
|
MES642 | ;
|
|
POST | ;TRANSPORT FILE 64.81 INTO FILE 64 IF REQUIRED
|
|
REINDEX | ;Reindex LAM to fire new x-refs
|
|
NEWLST | ;Build list of added WKLD CODES
|
|
ALERT | ;
|
|
KIL | ||
SCR(LRMSG) | ;Store message in ^XTMP("LRNLT" Global
|
|
;Send message to G.LMI local mail group of added 64 codes
|
Name | Field # of Occurrence |
---|---|
^DIC | REINDEX+9, CHK+6, CHK+20, CMP+5 |
FILE^DIE | REINDEX+12, SET+1, CHGNM+3 |
UPDATE^DIE | AREC+1 |
^DIK | DEL+2, KREC+4 |
IXALL^DIK | REINDEX+3 |
GETS^DIQ | GNDE+2, GNDE+8, GNDE+12 |
EN^DIU2 | PRE+26 |
$$SITE^VASITE | MES642+2 |
$$FMTE^XLFDT | NEWLST+18 |
$$HTE^XLFDT | ALERT+3 |
$$HTFM^XLFDT | PRE+24, REINDEX+14, REINDEX+16 |
$$NOW^XLFDT | NEWLST+18 |
$$CJ^XLFSTR | PRE+20, REINDEX+2, REINDEX+13, REINDEX+23, ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17 |
^XMD | NEWLST+20, MES642+5 |
$$PATCH^XPDUTL | PRE+18 |
BMES^XPDUTL | REINDEX+2, REINDEX+13, REINDEX+23, ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17 |
SETUP^XQALERT | ALERT+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^LAM - [#64] | Classic Fileman Calls |
^LAB(64.81 - [#64.81] | Classic Fileman Calls |
64.8117 | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB( | POST+26 |
^LAB(64.2 - [#64.2] | PRE+21, PRE+25, PRE+27, REINDEX+7, REINDEX+8, CHK+29, CHK642+7 |
^LAB(64.81 - [#64.81] | REINDEX+18, REINDEX+19, POST+9, POST+12, GNDE+5, GNDE+6 |
^LAM - [#64] | REINDEX+1, ALERT+6, NEWLST+8 |
^LAM("C" | CHK+14, CMP+7, CMP+8 |
^LAM("VR" | POST+25* |
^LAM(0 | PRE+17, POST+2*, POST+23* |
^LAM(99999 | POST+1 |
^XTMP("LRNLT" | REINDEX+15!, REINDEX+16*, SCR+1, SCR+2*, NEWLST+14 |
^XTMP("LRNLT642" | PRE+22, PRE+23*, PRE+24*, PRE+25*, POST+3, CMP+10*, ERMSG+2*, ERMSG+5*, CHK642+4!, CHK642+8! , CHK642+10!, MES642+1! |
^XTMP("LRNLTERR" | REINDEX+14!* |
Name | Line Occurrences |
---|---|
AREC | GNDE+15 |
CHGNM | POST+17 |
CHK | REINDEX+22 |
CMP | POST+15 |
DEL | REINDEX+21, CHK+6, CHK+20, SET+3 |
ERMSG | CHGNM+7, AREC+4 |
GNDE | POST+18 |
KREC | POST+19 |
POST+27 | |
POST | REINDEX+24 |
SCR | WRT+1, WRT+2, POST+5, POST+6, POST+7, CHGNM+8, NEWLST+11, NEWLST+16 |
SET | CHK+33 |
SETUP | GNDE+4, GNDE+10, GNDE+14 |
WRT | SET+3 |
Name | Field # of Occurrence |
---|---|
^("VR" | POST+26* |
^(0 | PRE+27*, SCR+1*, NEWLST+8 |
^(1 | REINDEX+19 |
^(2 | REINDEX+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | EN1+1~, REINDEX+17~, DEL+1~, DEL+2*, KREC+2~, KREC+3* |
DA(1 | KREC+3*, KREC+4 |
DIC | EN1+1~, REINDEX+5~, REINDEX+6*, CHK~, CHK+4*, CHK+18*, CMP+1~, CMP+4* |
DIC("S" | CHK+5*, CHK+19* |
DIC(0 | REINDEX+6*, CHK+2*, CMP+4* |
DIFROM | MAIL+1~, CHK642+1! |
DIK | EN1+1~, REINDEX+3*!, REINDEX+17~, DEL+1~, DEL+2*, KREC+2~, KREC+4* |
DIRUT | EN1+1~ |
DIU | PRE+26*!, EN1+1~ |
DIU(0 | PRE+26* |
DT | PRE+24, REINDEX+14, REINDEX+16, MES642+2 |
DTOUT | EN1+1~ |
DUOUT | EN1+1~ |
>> I | POST+26* |
LRADD | POST+4*, POST+18, KIL!, CMP+2*, CMP+7*, CMP+14* |
LRANS | REINDEX+5~, REINDEX+10!, CHK+1!, SET+2, KIL! |
LRAR1 | POST+10!, KIL!, SETUP+19! |
LRBEG | KIL!, SETUP+11*, SETUP+13 |
LRCHG | POST+4*, POST+17, KIL!, CHGNM+2, CMP+2*, CMP+14*, CMP+15* |
LRCNT | KIL!, NEWLST+3~, NEWLST+4*, NEWLST+9*, NEWLST+10, CHK642+2~, CHK642+3*, CHK642+4* |
LRCODE | KIL!, CHGNM+8, CMP+3*, CMP+4, CMP+7, CMP+8, CMP+10, ERMSG+2 |
LRCTR | KIL!, GNDE+1* |
>> LRDBUG | CHK+32, CHK642+9 |
>> LRDEBUG | CHK+7, SET+2, POST+13, POST+27, GNDE+15, KREC+1 |
LRDOT | POST+4*, POST+11*, KIL! |
LREND | KIL!, SETUP+12*, SETUP+13 |
LRENODE | KIL+1!, CHGNM+6*, AREC+3*, ERMSG+3*, ERMSG+5, ERMSG+7! |
LRERR | POST+12*, POST+16, KIL+1!, CHGNM+5*, CMP+2*, CMP+11*, ERMSG+6* |
LRFDA | REINDEX+5~, REINDEX+10!, CHK+1!, CHK+33, POST+10!, KIL+1!, CHGNM+1! |
LRFDA( | REINDEX+11*, CHK+11*, CHK+15*, CHK+24*, CHK+27*, CHK+31* |
LRFDA(42 | CHGNM+2*, CHGNM+9! |
LRFDA(45 | SETUP+17*, GNDE+16!, AREC+5! |
LRFILE | REINDEX+17~, REINDEX+20*, REINDEX+21, CHK+3, CHK+7, CHK+11, CHK+15, CHK+16, CHK+24, CHK+27 , CHK+32, ERR+1, KIL+1! |
LRFLD | KIL+1!, SETUP+3*, SETUP+6*, SETUP+7*, SETUP+14, SETUP+17 |
LRFLE | KIL+1!, SETUP+2*, SETUP+4, SETUP+9, SETUP+11, SETUP+12 |
LRFNAM | KIL+1!, CMP+13*, CMP+14, CMP+15 |
LRI | REINDEX+5~, REINDEX+7*, REINDEX+8, REINDEX+11, KIL+1!, CHK642+2~, CHK642+10* |
LRIEN | REINDEX+17~, REINDEX+18*, REINDEX+19, DEL+2, ERR+1, POST+8*, POST+9, POST+12, KIL+1!, GNDE+2 , GNDE+8, GNDE+12, KREC+3, MAIL+1~, NEWLST+3~, NEWLST+7*, NEWLST+8, NEWLST+10 |
LRIENS | CHK+8*, CHK+11, CHK+15, CHK+21*, CHK+24, CHK+27, CHK+29, CHK+31, KIL+1!, SETUP+8* , SETUP+15*, SETUP+17 |
LRLAST | PRE+21*, PRE+23, PRE+27, PRE+28! |
LRLAST64 | POST+1*, NEWLST+5*, NEWLST+8, NEWLST+13! |
LRMLT | KIL+2!, GNDE+1*, GNDE+2, GNDE+7*, GNDE+8, GNDE+11*, GNDE+12 |
LRMSG | SCR~, SCR+2 |
LRN | POST+3*, KIL+2!, CMP+9*, CMP+10, ERMSG+1*, ERMSG+2, ERMSG+4*, ERMSG+5, MAIL+1~, NEWLST+3~ , NEWLST+5*, NEWLST+6*, NEWLST+7 |
LRN0 | REINDEX+17~, REINDEX+19*, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+17, CHK+22 , CHK+23, KIL+2! |
LRN1 | REINDEX+17~, REINDEX+19*, REINDEX+20, CHK+18, CHK+25, CHK+26, CHK+28, CHK+29, KIL+2! |
LRNAMX | CHK+1!, CHK+2*, CHK+17*, WRT+1, KIL+2! |
LRNAMY | CHK+1!, CHK+2*, CHK+10*, CHK+11, CHK+17*, CHK+23*, CHK+24, WRT+2, KIL+2! |
LRNEXT | POST+1*, POST+2, POST+8*, POST+9*, POST+12, KIL+2! |
LRNIEN | KIL+2! |
LRNODE | KIL+2!, SETUP+1*, SETUP+2, SETUP+3, SETUP+16, GNDE+3*, GNDE+9*, GNDE+13* |
LRNUM | KIL+2!, GNDE+5* |
LRNUMX | CHK+1!, CHK+4*, CHK+18*, WRT+1, KIL+3! |
LRNUMY | CHK+1!, CHK+4*, CHK+13*, CHK+14, CHK+15, CHK+26*, CHK+27, WRT+2, KIL+3! |
LRNX | KIL+3!, CHK642+2~, CHK642+5*, CHK642+6*, CHK642+7, CHK642+8, CHK642+9 |
LROUT | POST+10!, POST+20!, KIL+3! |
LROUT(42 | POST+19, CHGNM+4, CHGNM+8 |
LROUT(45 | POST+19, AREC+2 |
LRPROCNM | KIL+3!, CHGNM+2, CHGNM+8, CHGNM+9!, CMP+3*, CMP+10, CMP+14, CMP+15, ERMSG+2 |
>> LRPRT | NEWLST+15 |
LRREC | POST+12*, POST+13, POST+14, KIL+3!, CMP+3 |
LRSC | KIL+3!, CHK642+2~, CHK642+3* |
LRSCR | KIL+3!, SCR+1*, SCR+2 |
LRSEQ | KIL+3!, SETUP+14*, SETUP+15, GNDE+5*, GNDE+6*, GNDE+11* |
LRSIXT4 | POST+10!, KIL+3!, GNDE+16! |
LRSIXT4( | GNDE+15 |
LRSTR | NEWLST+3~, NEWLST+8*, NEWLST+10*, NEWLST+11 |
LRSUBFLE | KIL+4!, SETUP+5*, SETUP+13*, SETUP+17 |
LRSYN | CHK+29*, KIL+4! |
LRSYNIEN | CHK+29*, CHK+30, CHK+31, KIL+4! |
LRTRIEN | POST+14*, KIL+4!, SETUP+8, SETUP+15, GNDE+2, GNDE+5, GNDE+6, GNDE+8, GNDE+12, GNDE+15 , ERMSG+2, KREC+3 |
LRVAL | KIL+4!, SETUP+16*, SETUP+17 |
LRVR | POST+23*, POST+25, POST+26, KIL+4! |
U | PRE+27, REINDEX+8, REINDEX+20, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+17 , CHK+18, CHK+22, CHK+23, CHK+25, CHK+26, CHK+28, CHK+29, POST+2, POST+14, POST+23 , CMP+3, CMP+13, GNDE+5, NEWLST+8, MES642+2 |
X | EN1+1~, REINDEX+5~, REINDEX+8*, REINDEX+9, CHK~, CHK+2*, CHK+17*, KIL+4!, CMP+1~, CMP+4* |
XMDUZ | MAIL+1~, NEWLST+19*, CHK642+1!, MES642+4* |
XMSUB | MAIL+1~, NEWLST+18*, CHK642+1!, MES642+2* |
XMTEXT | MAIL+1~, NEWLST+19*, CHK642+1!, MES642+4* |
XMY | MAIL+1~, CHK642+1! |
XMY("G.LMI" | NEWLST+19* |
XMY("G.LMI@ISC-DALLAS" | MES642+3* |
>> XPDNM | PRE+16, ALERT+3 |
>> XPDQUIT | PRE+17, PRE+19* |
XQA | ALERT+2~ |
XQA("G.LMI" | ALERT+4* |
XQAMSG | ALERT+2~, ALERT+3* |
Y | EN1+1~, REINDEX+5~, REINDEX+9, REINDEX+11, CHK~, CHK+6, CHK+7, CHK+8, CHK+20, CHK+21 , CHK+32, KIL+4!, CMP+1~, CMP+6, CMP+12, CMP+15 |
Y(0 | CMP+13 |
Name | Field # of Occurrence |
---|---|
$T( | POST+23 |