LR334PO ;VA/DALOI/FHS/RSH - LR*5.2*334 PATCH POST INSTALL ROUTINE;31-AUG-2001
Source file <LR334PO.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 4 | (,$$FIND1,FIND)^DIC (FILE,UPDATE)^DIE (,IXALL)^DIK ($$GET1,GETS)^DIQ | 
| Lab Service | 2 | BMES^LR334 (ALERT,MAIL)^LR334POA | 
| Kernel | 1 | $$HTFM^XLFDT | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRE | ; | |
| REINDEX | ;Reindex LAM to fire new x-refs | |
| SET | ; | |
| VENDOR | ;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 | ;Find and correct existing spelling or duplicate numbers errors. | |
| WRT | ; | |
| P1 | ||
| DEL | ; | |
| ERMSG | ;STUFF THE TEMP GLOBAL WITH ANY ERROR MESSAGES | |
| KIL | ||
| SCR(LRMSG) | ;Store message in ^XTMP("LRNLT" Global | |
| KREC | ; DELETES THE RECORD FROM THE FILE | |
| POST | ;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^LR334 | P1, DSS+2, DSS+18 | 
| ALERT^LR334POA | REINDEX+10 | 
| MAIL^LR334POA | P1+25 | 
| $$HTFM^XLFDT | VENDOR+9, REINDEX+6, REINDEX+8, POST+3 | 
| 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(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, P1+14, GNDE+5, GNDE+6 | 
| ^LAM - [#64] | REINDEX+1, P1, CMP+9*, DSS+13 | 
| ^LAM("C" | CHK+14 | 
| ^LAM(0 | REINDEX+5*, P1+3*, P1+24* | 
| ^LAM(99999 | P1+1 | 
| ^XTMP("LRNLT" | REINDEX+7!, REINDEX+8*, POST+2!, POST+3*, POST+4*, 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+20 | 
| CMP | P1+18 | 
| DEL | CHK+6, CHK+21, SET+3 | 
| EN1 | REINDEX+1 | 
| ERMSG | CHGNM+7, AREC+4 | 
| GNDE | P1+21 | 
| KREC | P1+17, P1+22 | 
| 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+3 | 
| 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+21, 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+20, 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+15, P1+25, 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+19, 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, KIL+1! | 
| LRIEN | REINDEX+9~, DEL+2, ERR+1, P1+9*, P1+10, P1+13, P1+14, 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, P1+14, 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+23!, KIL+3! | 
| LROUT(42 | P1+22, CHGNM+4, CHGNM+8 | 
| LROUT(45 | P1+22, AREC+2 | 
| LRPROCNM | KIL+3!, CHGNM+2, CHGNM+8, CHGNM+9!, CMP+3*, CMP+7, ERMSG+2 | 
| LRREC | POST+1~, P1+13*, P1+15, P1+16, P1+17, KIL+3!, CMP+3 | 
| LRREC9 | POST+1~, P1+14*, CMP+8, CMP+9 | 
| 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+16*, 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 | 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+3, P1+3 , P1+16, P1+17, P1+24, CMP+3, CMP+9, 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, CMP+8, CMP+9 |