LR309 ;DALOI/CKA - LR*5.2*309 PATCH ENVIRONMENT CHECK ROUTINE ;June 10, 2008
Source file <LR309.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Does not prevent loading of the transport global.
|
|
POST | ; KIDS Post install for LR*5.2*309
|
|
CHECK | ; Perform environment check
|
|
EXIT | ;
|
|
MATCH | ;
|
|
REMOVE | ;Removes the DD entry for field #20
|
|
RECIP | ; Find recipients with LRAPSUPER key and LRLIASON key.
|
|
PRINT1 | ; Actually print the report
|
|
PTHDR | ; header for each new patient entry
|
|
PRTDATA | ;
|
|
HEADER2 | ; Prints header for all other pages
|
|
MSG | ||
SEND | ;Send the message to users of the security keys LRLIASON and LRAPSUPER
|
Name | Field # of Occurrence |
---|---|
$$GET1^DID | MATCH+15 |
^DIK | REMOVE+2 |
PT^LRX | MATCH+13, PRINT1+13 |
$$FMADD^XLFDT | MATCH+4 |
$$FMTE^XLFDT | MATCH+19 |
$$HTE^XLFDT | EN+5, EN+12, POST+17 |
$$NOW^XLFDT | MATCH+4, MATCH+5 |
$$CJ^XLFSTR | EN+9, EN+16, POST+2, POST+14, POST+15, POST+21, CHECK+2, CHECK+6, CHECK+10, EXIT+2 , EXIT+4, MATCH+7, MATCH+31, MATCH+34 |
^XMD | SEND+6 |
BMES^XPDUTL | EN+9, EN+16, POST+2, POST+14, POST+15, POST+21, CHECK+2, CHECK+6, CHECK+10, EXIT+2 , EXIT+4, MATCH+7, MATCH+31, MATCH+34 |
MES^XPDUTL | MATCH+45 |
SETUP^XQALERT | EN+7, EN+14, POST+19 |
$$ACTIVE^XUSER | CHECK+8 |
FileNo | Call Tags |
---|---|
^DIC - [#1] | GET1^DID |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LR - [#63] | MATCH+9, MATCH+10, MATCH+17, MATCH+18, MATCH+19, MATCH+27, MATCH+28, MATCH+29!, PRINT1+15 |
^TMP($J | PRINT1+1!, MSG* |
^XTMP("LR309" | POST+4, POST+11, MATCH+3!, MATCH+5*, MATCH+21*, MATCH+22*, MATCH+23*, MATCH+24*, MATCH+25*, MATCH+26* , MATCH+27*, MATCH+28*, MATCH+32, PRINT1+5, PRINT1+10, PRINT1+14, PTHDR+2, PTHDR+3, PTHDR+4, PTHDR+5 , PTHDR+6, PTHDR+7, PRTDATA+3, PRTDATA+4, HEADER2+6 |
^XUSEC("LRAPSUPER" | RECIP+2 |
^XUSEC("LRLIASON" | RECIP+4 |
Name | Line Occurrences |
---|---|
CHECK | EN+17 |
EXIT | EN+19 |
HEADER2 | PRINT1+9 |
MATCH | POST+3 |
MSG | PRINT1+20, PTHDR+3, PTHDR+6, PTHDR+7, PTHDR+8, PTHDR+9, PTHDR+10, PTHDR+11, PRTDATA+4, PRTDATA+5 , PRTDATA+6, PRTDATA+7, HEADER2+3, HEADER2+4, HEADER2+6, HEADER2+7, HEADER2+8 |
PRINT1 | POST+5 |
PRTDATA | PRINT1+19 |
PTHDR | PRINT1+17 |
RECIP | SEND+2 |
REMOVE | POST+9 |
SEND | POST+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGE | MATCH+2~, MATCH+25 |
DA | REMOVE+1~, REMOVE+2* |
DA(1 | REMOVE+2* |
DIFROM | SEND+1~ |
DIK | REMOVE+1~, REMOVE+2* |
DIR | PRTDATA+1~ |
DIRUT | PRTDATA+1~ |
DUZ | CHECK+4, CHECK+8 |
DUZ(0 | CHECK+4 |
IOM | EN+9, EN+16, POST+2, POST+14, POST+15, POST+21, CHECK+1, CHECK+2, CHECK+6, CHECK+10 , EXIT+2, EXIT+4, MATCH+7, MATCH+31, MATCH+34 |
IOSL | CHECK+1 |
LRACC | PRINT1+2~, PRINT1+15* |
LRANS | MATCH+14! |
LRCNT | MATCH+2~, MATCH+8* |
LRCURPNM | PRINT1+3~ |
LRDATA | PRINT1+2~, PRINT1+20*, PTHDR+1~, PTHDR+2*, PTHDR+3*, PTHDR+4*, PTHDR+5*, PTHDR+6*, PTHDR+7*, PTHDR+8* , PTHDR+9*, PTHDR+10*, PTHDR+11*, PRTDATA+1~, PRTDATA+4*, PRTDATA+5*, PRTDATA+6*, PRTDATA+7*, HEADER2+1~, HEADER2+3* , HEADER2+4*, HEADER2+6*, HEADER2+7*, HEADER2+8*, MSG |
LRDATE | PRINT1+2~ |
LRDFN | MATCH+1~, MATCH+8*, MATCH+9*, MATCH+10, MATCH+17, MATCH+18, MATCH+19, MATCH+21, MATCH+22, MATCH+23 , MATCH+24, MATCH+25, MATCH+26, MATCH+27, MATCH+28, MATCH+29, PRINT1+2~, PRINT1+6*, PRINT1+10*, PRINT1+14 , PRINT1+15, PTHDR+2, PTHDR+3, PTHDR+4, PTHDR+5, PTHDR+6, PTHDR+7, PRTDATA+3, PRTDATA+4, HEADER2+6 |
LRDPF | MATCH+12!, MATCH+15 |
LRDUZ | RECIP+1*, RECIP+2*, RECIP+3*, RECIP+4*, RECIP+5! |
LREDATE | MATCH+1~, MATCH+19*, MATCH+21 |
LRERR | MATCH+14!, MATCH+16 |
LRFNAM | MATCH+1~, MATCH+15*, MATCH+16*, MATCH+22 |
LRI | MATCH+1~, PRINT1+3~, PRINT1+7*, PRINT1+16, PRINT1+18*, PRINT1+20*, HEADER2+5, HEADER2+8* |
LRIDT | MATCH+2~, MATCH+11*, MATCH+17*, MATCH+18, MATCH+19, MATCH+21, MATCH+22, MATCH+23, MATCH+24, MATCH+25 , MATCH+26, MATCH+27, MATCH+28, MATCH+29, PRINT1+2~, PRINT1+7*, PRINT1+11*, PRINT1+14*, PRINT1+15, PRINT1+16 , PRINT1+18, PTHDR+2, PTHDR+3, PTHDR+4, PTHDR+5, PTHDR+6, PTHDR+7, PRTDATA+3, PRTDATA+4, HEADER2+5 , HEADER2+6 |
LRLINE | PRINT1+3~, PRTDATA+2*, PRTDATA+3*, PRTDATA+4 |
LRLNCNT | PRINT1+3~, PRINT1+8*, MSG* |
LRMATFND | MATCH+1~, MATCH+8*, MATCH+20* |
LRNAM | PRINT1+2~ |
LRPAGE | PRINT1+3~, PRINT1+8*, HEADER2+2*, HEADER2+3 |
LRPAT | PRINT1+2~ |
LRPDF | PRINT1+4~, PRINT1+12! |
LRRES | POST+1~ |
LRRMV | POST+1~ |
LRSTATE | PRINT1+2~ |
LRZTSK | PRINT1+3~ |
MSG | EN+2~, EN+8*, EN+9, EN+15*, EN+16, POST+1~, POST+12!, POST+13*, POST+14!, POST+20* , POST+21, CHECK+5*, CHECK+6!, CHECK+9*, CHECK+10!, MATCH+1~, MATCH+6*, MATCH+7!, MATCH+30*, MATCH+31! , MATCH+33*, MATCH+34!, MATCH+45, REMOVE+1~, PRTDATA+1~ |
MSG(1 | MATCH+35* |
MSG(10 | MATCH+44* |
MSG(2 | MATCH+36* |
MSG(3 | MATCH+37* |
MSG(4 | MATCH+38* |
MSG(5 | MATCH+39* |
MSG(6 | MATCH+40* |
MSG(7 | MATCH+41* |
MSG(8 | MATCH+42* |
MSG(9 | MATCH+43* |
PNM | MATCH+2~, MATCH+12!, MATCH+23, PRINT1+2~, PRINT1+12! |
SEX | MATCH+2~, MATCH+26, PRINT1+4~, PRINT1+12! |
SSN | MATCH+2~, MATCH+12!, MATCH+24, PRINT1+4~, PRINT1+12! |
U | CHECK+1, MATCH+27, PRINT1+15 |
VA | MATCH+12!, PRINT1+4~, PRINT1+12! |
VADM | MATCH+12!, PRINT1+4~, PRINT1+12! |
X | MATCH+1~, MATCH+4*, MATCH+5 |
X1 | MATCH+1~ |
X2 | MATCH+1~ |
XAQMSG | EN+2~ |
XDATA | MATCH+2~, MATCH+11* |
XDATA1 | MATCH+1~ |
XDATA2 | MATCH+2~, MATCH+11* |
XMDUN | SEND+1~, SEND+5* |
XMSUB | SEND+1~, SEND+3* |
XMTEXT | SEND+1~, SEND+4* |
XMY | SEND+1~ |
XMY( | RECIP+2*, RECIP+4* |
>> XPDDIQ("XPZ1" | EN+18* |
>> XPDENV | EN+3, EN+10, EN+18 |
>> XPDNM | EN+4, EN+11, POST+16 |
>> XPDQUIT | CHECK+3*, CHECK+7*, CHECK+11*, EXIT+1, EXIT+3 |
XQA | EN+2~, POST+1~ |
XQA("G.LMI" | EN+6*, EN+13*, POST+18* |
XQAMSG | EN+4*, EN+5*, EN+11*, EN+12*, POST+1~, POST+16*, POST+17* |