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* |