LR302PO ;DALOI/FHS/RSH - LR*5.2*302 PATCH POST INSTALL ROUTINE;31-AUG-2001
Source file <LR302PO.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 4 | (,$$FIND1,FIND)^DIC (FILE,UPDATE)^DIE (,IXALL)^DIK ($$GET1,GETS)^DIQ |
Lab Service | 2 | BMES^LR302 (ALERT,MAIL)^LR302POA |
Kernel | 1 | $$HTFM^XLFDT |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ; EP
|
|
REINDEX | ;EP - Reindex LAM to fire new x-refs
|
|
SET | ;
|
|
VENDOR | ; EP - Save the vender pointer name into the VENDOR field.
|
|
AREC | ; ADDS ENTRIES FROM THE TRANSPORT MULTIPLE TO FILE 64
|
|
ERR | ;
|
|
SETUP | ; SETS UP THE FDA ARRAY TO ADD A NODE
|
|
CHK | ||
DSS | ;Update WKLD CODE file , DSS Feeder Key (#14) field to 'Yes"
|
|
CHGNM | ; CHANGE THE PROCEDURE NAME IN THE RECORD
|
|
EN1 | ;EP - Find and correct existing spelling or duplicate numbers errors.
|
|
WRT | ;
|
|
P1 | ||
DEL | ;
|
|
ERMSG | ;STUFF THE TEMP GLOBAL WITH ANY ERROR MESSAGES
|
|
KIL | ||
SCR(LRMSG) | ;EP - Store message in ^XTMP("LRNLT" Global
|
|
KREC | ; DELETES THE RECORD FROM THE FILE
|
|
POST | ; EP - TRANSPORT FILE 64.81 INTO FILE 64 IF REQUIRED
|
|
GNDE | ; RETRIEVES NODES FROM THE TRANSPORT MULTIPLE
|
|
CMP | ; COMPARE FOUND CODES AND PROCEDURE NAMES
|
Name | Field # of Occurrence |
---|---|
^DIC | CHK+6, CHK+21 |
$$FIND1^DIC | CMP+4 |
FIND^DIC | DSS+9 |
FILE^DIE | SET+1, CHGNM+3, DSS+15 |
UPDATE^DIE | AREC+1 |
^DIK | DEL+2, KREC+4 |
IXALL^DIK | REINDEX+4 |
$$GET1^DIQ | DSS+6 |
GETS^DIQ | GNDE+2, GNDE+8, GNDE+12 |
BMES^LR302 | P1, DSS+2, DSS+18 |
ALERT^LR302POA | REINDEX+10 |
MAIL^LR302POA | P1+27 |
$$HTFM^XLFDT | VENDOR+9, REINDEX+6, REINDEX+8, POST+2 |
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 |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^LAM - [#64] | Classic Fileman Calls, FIND1^DIC, FIND^DIC |
^LAB(64.81 - [#64.81] | Classic Fileman Calls |
64.8117 | GET1^DIQ, GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB( | P1+26* |
^LAB(64.2 - [#64.2] | VENDOR+2, VENDOR+4*, VENDOR+7, VENDOR+10, CHK+30 |
^LAB(64.3 - [#64.3] | VENDOR+3 |
^LAB(64.81 - [#64.81] | P1+10, P1+13, GNDE+5, GNDE+6 |
^LAM - [#64] | REINDEX+1, P1, DSS+13 |
^LAM("C" | CHK+14 |
^LAM("VR" | P1+24* |
^LAM(0 | REINDEX+5*, P1+3*, P1+23* |
^LAM(99999 | P1+1 |
^XTMP("LRNLT" | REINDEX+7!, REINDEX+8*, POST+1!, POST+2*, SCR+1, SCR+2* |
^XTMP("LRNLT642" | VENDOR+5, VENDOR+8*, VENDOR+9*, VENDOR+10*, P1+4, ERMSG+1, ERMSG+2*, ERMSG+5*, ERMSG+6* |
^XTMP("LRNLTERR" | REINDEX+6!* |
Name | Line Occurrences |
---|---|
AREC | GNDE+15 |
CHGNM | P1+19 |
CMP | P1+17 |
DEL | CHK+6, CHK+21, SET+3 |
DSS | POST+3 |
EN1 | REINDEX+1 |
ERMSG | CHGNM+7, AREC+4 |
GNDE | P1+20 |
KREC | P1+16, P1+21 |
POST | REINDEX+10 |
SCR | WRT+1, WRT+2, P1+6, P1+7, P1+8, CHGNM+8, CMP+7 |
SET | CHK+34 |
SETUP | GNDE+4, GNDE+10, GNDE+14 |
WRT | SET+3 |
Name | Field # of Occurrence |
---|---|
^( | VENDOR+2 |
^(0 | SCR+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ANS | CMP+1~ |
DA | EN1+1~, REINDEX+9~, DEL+1~, DEL+2*, KREC+2~, KREC+3* |
DA(1 | KREC+3*, KREC+4 |
DIC | EN1+1~, CHK~, CHK+4*, CHK+17~, CHK+19*, CMP+1~ |
DIC("S" | CHK+5*, CHK+20* |
DIC(0 | CHK+2* |
DIK | EN1+1~, REINDEX+3~, REINDEX+4*, REINDEX+9~, DEL+1~, DEL+2*, KREC+2~, KREC+4* |
DIRUT | EN1+1~ |
DIU | EN1+1~ |
DT | VENDOR+9, REINDEX+6, REINDEX+8, POST+2 |
DTOUT | EN1+1~ |
DUOUT | EN1+1~ |
ERR | DSS+3~, DSS+8!, DSS+10, DSS+14!, DSS+16 |
FDA | DSS+3~, DSS+14! |
FDA(1 | DSS+14* |
IEN | DSS+3~, DSS+12*, DSS+13, DSS+14 |
LRADD | P1+5*, P1+20, KIL!, CMP+2*, CMP+6* |
LRANS | CHK+1!, SET+2, KIL! |
LRAR1 | P1+11!, KIL!, SETUP+19! |
LRBEG | KIL!, SETUP+11*, SETUP+13 |
LRCHG | P1+5*, P1+19, KIL!, CHGNM+2, CMP+2* |
LRCNT | KIL! |
LRCODE | KIL!, CHGNM+8, CMP+3*, CMP+4, CMP+7, ERMSG+2 |
LRCTR | KIL!, GNDE+1* |
>> LRDBUG | CHK+7, CHK+33, SET+2, P1+14, P1+27, GNDE+15, KREC+1 |
LRDOT | P1+5*, P1+12*, KIL! |
LREND | KIL!, SETUP+12*, SETUP+13 |
LRENODE | KIL+1!, CHGNM+6*, AREC+3*, ERMSG+3*, ERMSG+5, ERMSG+8! |
LRERR | P1+13*, P1+18, KIL+1!, CHGNM+5*, CMP+2*, ERMSG+7* |
LRFDA | CHK+1!, CHK+34, P1+11!, KIL+1!, CHGNM+1! |
LRFDA( | CHK+11*, CHK+15*, CHK+25*, CHK+28*, CHK+32* |
LRFDA(42 | CHGNM+2*, CHGNM+9! |
LRFDA(45 | SETUP+17*, GNDE+16!, AREC+5! |
LRFILE | REINDEX+9~, CHK+3, CHK+7, CHK+11, CHK+15, CHK+16, CHK+25, CHK+28, CHK+33, 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! |
LRI | VENDOR+1~, VENDOR+2*, VENDOR+4, P1+25~, P1+26*, KIL+1! |
LRIEN | REINDEX+9~, DEL+2, ERR+1, P1+9*, P1+10, P1+13, KIL+1!, GNDE+2, GNDE+8, GNDE+12 , KREC+3 |
LRIENS | CHK+8*, CHK+11, CHK+15, CHK+22*, CHK+25, CHK+28, CHK+30, CHK+32, KIL+1!, SETUP+8* , SETUP+15*, SETUP+17 |
LRLAST | VENDOR+6~, VENDOR+7*, VENDOR+8 |
>> LRLAST64 | P1+1*, P1+2* |
LRMLT | KIL+2!, GNDE+1*, GNDE+2, GNDE+7*, GNDE+8, GNDE+11*, GNDE+12 |
LRMSG | SCR~, SCR+2 |
LRN | P1+4*, KIL+2!, CMP+6*, ERMSG+1*, ERMSG+2, ERMSG+4*, ERMSG+5, ERMSG+6 |
LRN0 | REINDEX+9~, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+18, CHK+23, CHK+24 , KIL+2! |
LRN1 | REINDEX+9~, CHK+19, CHK+26, CHK+27, CHK+29, CHK+30, KIL+2! |
LRNAMX | CHK+1!, CHK+2*, CHK+18*, WRT+1, KIL+2! |
LRNAMY | CHK+1!, CHK+2*, CHK+10*, CHK+11, CHK+18*, CHK+24*, CHK+25, WRT+2, KIL+2! |
LRNEXT | P1+1*, P1+2*, P1+3, P1+9*, P1+10*, P1+13, 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+19*, WRT+1, KIL+3! |
LRNUMY | CHK+1!, CHK+4*, CHK+13*, CHK+14, CHK+15, CHK+27*, CHK+28, WRT+2, KIL+3! |
LRNX | KIL+3! |
LROUT | P1+11!, P1+22!, KIL+3! |
LROUT(42 | P1+21, CHGNM+4, CHGNM+8 |
LROUT(45 | P1+21, AREC+2 |
LRPROCNM | KIL+3!, CHGNM+2, CHGNM+8, CHGNM+9!, CMP+3*, CMP+7, ERMSG+2 |
LRREC | P1+13*, P1+14, P1+15, P1+16, KIL+3!, CMP+3 |
LRSC | KIL+3! |
LRSCR | KIL+3!, SCR+1*, SCR+2 |
LRSEQ | KIL+3!, SETUP+14*, SETUP+15, GNDE+5*, GNDE+6*, GNDE+11* |
LRSIXT4 | P1+11!, KIL+3!, GNDE+16! |
LRSIXT4( | GNDE+15 |
LRSUBFLE | KIL+4!, SETUP+5*, SETUP+13*, SETUP+17 |
LRSYN | CHK+30*, KIL+4! |
LRSYNIEN | CHK+30*, CHK+31, CHK+32, KIL+4! |
LRTRIEN | P1+15*, 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 |
LRVEN | VENDOR+1~, VENDOR+2*, VENDOR+3*, VENDOR+4 |
LRVR | P1+23*, P1+24, P1+26, KIL+4! |
LST | DSS+3~, DSS+11*, DSS+12 |
NODE | DSS+3~, DSS+4*, DSS+5*, DSS+6 |
OUT | DSS+3~, DSS+8! |
OUT("DILIST" | DSS+11, DSS+12 |
U | VENDOR+2, VENDOR+3, VENDOR+4, REINDEX+5, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13 , CHK+18, CHK+19, CHK+23, CHK+24, CHK+26, CHK+27, CHK+29, CHK+30, POST+2, P1+3 , P1+15, P1+16, P1+23, CMP+3, GNDE+5 |
X | EN1+1~, CHK~, CHK+2*, CHK+18*, KIL+4!, CMP+1~, DSS+3~, DSS+6*, DSS+7, DSS+9 |
>> XPDNM | PRE+16 |
Y | EN1+1~, CHK~, CHK+6, CHK+7, CHK+8, CHK+21, CHK+22, CHK+33, KIL+4!, CMP+1~ , CMP+4*, CMP+5 |
Name | Field # of Occurrence |
---|---|
$T( | P1+23 |