LA66 ;DALOI/JMC - LA*5.2*66 PATCH ENVIRONMENT CHECK ROUTINE ;May 7, 2008
Source file <LA66.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENV | ;
; Environment checks |
|
| PRE | ;
; Pre install |
|
| POST | ;
; Post install |
|
| BMES(STR,POS) | ;
; Display messages using BMES^XPDUTL or MES^XPDUTL ; Accepts single string or string array ; Input ; STR The string to display (byRef or byValue) ; POS <opt> value for $$CJ^XLFSTR (80=default) |
|
| MES(STR,CJ,LM) | ;
; Displays a string using MES^XPDUTL ; Inputs ; STR: String to display ; CJ: Center text? 1=yes 0=1 <dflt=1> ; LM: Left Margin (padding) |
|
| FMERR(LAREF,MSG) | ;
; Checks if a FileMan error occurred and displays help message ; and error text message. ; Input ; LAREF Name of array that has the FM DIERR subscripts ; ie FILE^DIE msg_root variable ; MSG <opt> Additional help text ; Output ; 1 if an error occurred, 0 if no error ; Also writes the messages to the device |
|
| ENV2 | ;
; Secondary Environment checks |
|
| RESTORE | ;
; Restore system after install |
|
| ALERT(MSG,RECIPS) | ;
|
|
| RTNNM() | ;
|
| Name | Field # of Occurrence |
|---|---|
| MSG^DIALOG | FMERR+14 |
| $$FIND1^DIC | POST+18, POST+29 |
| FILE^DIE | POST+24, POST+36, POST+50 |
| ZTSK^LA7ADL | RESTORE+6 |
| SETSTOP^LA7ADL1 | ENV2+6, RESTORE+7 |
| $$SITE^VASITE | POST+7 |
| $$HTE^XLFDT | ENV+7, ENV+13, POST+60 |
| $$CJ^XLFSTR | BMES+12, BMES+14, MES+11 |
| $$TRIM^XLFSTR | BMES+12, BMES+14, MES+11 |
| MES^XPDUTL | BMES+12, BMES+14, MES+13 |
| SETUP^XQALERT | ALERT+5 |
| $$ACTIVE^XUSER | ENV+26 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^HL(771 - [#771] | FIND1^DIC |
| Name | Line Occurrences |
|---|---|
| $$FMERR | POST+26, POST+37, POST+51 |
| $$RTNNM | ENV+4, POST+64, ENV2+8, RESTORE+4, RESTORE+9, RESTORE+16 |
| ALERT | ENV+8, ENV+14, POST+61 |
| BMES | ENV+9, ENV+15, ENV+19, ENV+23, ENV+27, ENV+35, ENV+41, ENV+43, PRE+2, PRE+3 , PRE+4, POST+4, POST+10, POST+11, POST+13, POST+21, POST+32, POST+39, POST+43, POST+48 , POST+52, POST+54, POST+57, POST+62, FMERR+16, FMERR+17, ENV2+7, RESTORE+8, RESTORE+15 |
| ENV2 | ENV+33 |
| MES | ENV+36 |
| RESTORE | POST+56 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CJ | MES~, MES+8*, MES+11, MES+12 |
| DA | ALERT+1~ |
| DIERR | POST+2~, POST+17!, POST+22!, POST+28!, POST+34!, POST+46! |
| DIK | ALERT+1~ |
| DT | POST+7 |
| DUZ | ENV+22, ENV+26, ENV2+6, RESTORE+7 |
| DUZ(0 | ENV+22 |
| FMERR | FMERR+10~, FMERR+13*, FMERR+18*, FMERR+19 |
| I | BMES+7~, BMES+11*, BMES+12*, ENV2+2~, ENV2+9*, ENV2+14*, ENV2+15* |
| IOM | ENV+18, MES+11 |
| IOSL | ENV+18 |
| LA7DIE | POST+2~ |
| LA7FAC | POST+2~, POST+7*, POST+8, POST+12, POST+23 |
| LA7I | POST+2~, POST+15*, POST+16, POST+44*, POST+45*, POST+47, POST+49 |
| LA7X | POST+2~, POST+16*, POST+18, POST+21, POST+26 |
| LA7Y | POST+2~, POST+18*, POST+19, POST+23, POST+29*, POST+30, POST+33, POST+35, POST+47*, POST+48 , POST+51 |
| LAADL | ENV+3~, ENV+32*, ENV+34, RESTORE+2~, RESTORE+4*, RESTORE+5 |
| LAERR | ENV+3~, ENV+17*, ENV+20*, ENV+24*, ENV+26, ENV+28*, ENV+31, ENV+38, ENV+39*, ENV+43 , POST+2~, POST+3*, POST+9*, POST+20*, POST+26*, POST+31*, POST+37*, POST+39, POST+51*, POST+54 , POST+57 |
| LAERRMSG | FMERR+10~, FMERR+14, FMERR+15, FMERR+17 |
| LAFDA | POST+2~, POST+22!, POST+28!, POST+34!, POST+46! |
| LAFDA(1 | POST+23*, POST+35* |
| LAFDA(2 | POST+49* |
| LAMSG | POST+2~, POST+22!, POST+28!, POST+34!, POST+46! |
| LAPOST | POST+2~, POST+3*, POST+38*, POST+44*, POST+54 |
| LAREF | FMERR~, FMERR+11*, FMERR+14 |
| LM | MES~, MES+9*, MES+10*, MES+12 |
| MSG | ENV+6~, ENV+7*, ENV+8, ENV+12~, ENV+13*, ENV+14, POST+59~, POST+60*, POST+61, FMERR~ , FMERR+12*, FMERR+16, ALERT~, ALERT+2 |
| OK | FMERR+10~ |
| POS | BMES~, BMES+8*, BMES+12, BMES+14 |
| RECIPS | ALERT~, ALERT+4 |
| STR | BMES~, BMES+10, BMES+14, MES~, MES+7*, MES+11*, MES+12*, MES+13 |
| STR( | BMES+12 |
| U | ENV+18 |
| X | BMES+7~, BMES+12*, MES+6~, MES+12*, ENV2+2~, ENV2+4*, ENV2+5, RESTORE+2~, RESTORE+13*, RESTORE+14* , RESTORE+15 |
| >> XPDABORT | ENV+38, ENV+40* |
| >> XPDDIQ("XPZ1" | ENV+45* |
| >> XPDENV | ENV+5, ENV+11, ENV+31, ENV+45 |
| >> XPDNM | ENV+7, ENV+13, POST+60 |
| >> XPDNOQUE | ENV+2* |
| >> XPDQUIT | ENV+38, ENV+40* |
| XQA | ALERT+1~, ALERT+4* |
| XQA("G.LMI" | ALERT+3* |
| XQAMSG | ALERT+1~, ALERT+2* |
| Name | Field # of Occurrence |
|---|---|
| $T( | RTNNM+1 |