©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BLRPRE28 ; IHS/OIT/MPW - IHS Lab PATCH 1028 Environment/Post Install Routine ; [ 12/13/2010 07:30 AM ]
Source file <BLRPRE28.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 6 | HOME^%ZIS $$HTE^XLFDT ($$CJ,$$TRIM,$$UP)^XLFSTR $$ADD^XPDMENU ($$PATCH,$$VERSION,BMES,MES)^XPDUTL SETUP^XQALERT |
| VA Fileman | 3 | FIND^DIC DTNOLF^DICRW ^DIE |
| IHS Changes To Lab | 2 | (ADDMESG,BACKUPS,ENDINSTL,OKAY,SORRY,SORRYFIN,SORRYHED,TABMESG)^BLRKIDSU MODEAGDC^BLRPR28P |
| IHS VA Utilities | 1 | $$LOC^XBFUNC |
| MailMan | 1 | ^XMD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; EP
|
|
| SENDMAIL(MAILMSG) | ; EP -- Send MailMan E-mail to LMI group & Installer
|
|
| LETSGO | ; EP - USER IDENTIFIED -- LET'S GO
|
|
| ADDLINE(ASTR,LC) | ; EP -- Add a line to the STR array
|
|
| NEEDIT(MODULE,VERSION,PATCH,ERRARRAY) | ||
| SENDIT(WHO,WOTMSG) | ; EP - Send the Alert
|
|
| FATLSTOR(WOTERR) | ; Store Information concerning FATAL ERROR during Install
|
|
| CHECKLMI(ERRARRAY) | ||
| USERID | ; EP - CHECK FOR USER ID
|
|
| SORRYEND(WOTERR) | ; EP
|
|
| SNDALERT(ALERTMSG) | ; EP -- Send alert to LMI group & Installer
|
|
| MAILIT(WHO,MSG) | ; EP -- Send the MailMan Message
|
|
| DEBUG | ; EP - Debugging Line Label for environment checker
|
|
| SORRY(MSG,MODE,MSG2) | ||
| POST | ; EP -- POST INSTALL
|
|
| BACKUP | ; EP
|
|
| PTCHLAST | ; EP - Check for previous patch
|
|
| NEEDMSG(MESSAGE) | ; EP
|
| Name | Field # of Occurrence |
|---|---|
| HOME^%ZIS | USERID+5 |
| ADDMESG^BLRKIDSU | SORRYEND+10 |
| BACKUPS^BLRKIDSU | BACKUP+4 |
| ENDINSTL^BLRKIDSU | POST+44 |
| OKAY^BLRKIDSU | PTCHLAST+4, POST+11, POST+15, CHECKLMI+7, NEEDIT+16, NEEDIT+27 |
| SORRY^BLRKIDSU | USERID+9, NEEDMSG+4, NEEDMSG+8 |
| SORRYFIN^BLRKIDSU | SORRYEND+12 |
| SORRYHED^BLRKIDSU | SORRYEND+3 |
| TABMESG^BLRKIDSU | POST+12, POST+16, MAILIT+14 |
| MODEAGDC^BLRPR28P | POST+32 |
| FIND^DIC | CHECKLMI+4, NEEDIT+5 |
| DTNOLF^DICRW | USERID+6 |
| ^DIE | POST+26, POST+27, POST+28, POST+29 |
| $$LOC^XBFUNC | SORRY+17 |
| $$HTE^XLFDT | POST+39, FATLSTOR+7 |
| $$CJ^XLFSTR | POST+39, SORRY+17, SORRY+19, SORRY+21, SORRY+22, SORRY+25, SORRY+28, SORRY+29, SORRY+31 |
| $$TRIM^XLFSTR | NEEDMSG+7 |
| $$UP^XLFSTR | POST+39 |
| ^XMD | MAILIT+9 |
| $$ADD^XPDMENU | POST+10, POST+14, POST+20 |
| $$PATCH^XPDUTL | PTCHLAST+2, NEEDIT+22 |
| $$VERSION^XPDUTL | NEEDIT+10 |
| BMES^XPDUTL | PRE+1, LETSGO+1, LETSGO+3, LETSGO+11, POST+20, POST+35, SORRY+37, MAILIT+13, CHECKLMI+3, NEEDIT+8 , NEEDIT+21, SORRYEND+14 |
| MES^XPDUTL | PTCHLAST+1, USERID+11 |
| SETUP^XQALERT | SENDIT+3 |
| FileNo | Call Tags |
|---|---|
| ^DIC(19 - [#19] | Classic Fileman Calls |
| ^XMB(3.8 - [#3.8] | FIND^DIC |
| ^DIC(9.4 - [#9.4] | FIND^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BLRFATLI( | FATLSTOR+7*, FATLSTOR+13* |
| ^DIC(19 - [#19] | POST+26, POST+27, POST+28, POST+29 |
| ^VA(200 - [#200] | USERID+8 |
| Name | Line Occurrences |
|---|---|
| ADDLINE | SORRY+14, SORRY+15, SORRY+16, SORRY+17, SORRY+18, SORRY+19, SORRY+20, SORRY+21, SORRY+22, SORRY+23 , SORRY+25, SORRY+28, SORRY+29, SORRY+30, SORRY+31, SORRY+32, SORRY+34, SORRY+35 |
| CHECKLMI | LETSGO+9 |
| FATLSTOR | SORRYEND+21 |
| MAILIT | SENDMAIL+1, SENDMAIL+2 |
| NEEDIT | LETSGO+5, LETSGO+6, LETSGO+7 |
| NEEDMSG | NEEDIT+14, NEEDIT+25 |
| PRE | DEBUG+5 |
| SENDIT | SNDALERT+1, SNDALERT+2 |
| SENDMAIL | POST+40, SORRYEND+19 |
| SNDALERT | POST+41, SORRYEND+18 |
| SORRY | PRE+8, PTCHLAST+2, USERID+1, USERID+3, CHECKLMI+9 |
| SORRYEND | LETSGO+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALERTMSG | SNDALERT~, SNDALERT+1, SNDALERT+2 |
| ASTR | ADDLINE~, ADDLINE+1*, ADDLINE+2 |
| BLSMSG | POST+23~, POST+24*, POST+25, POST+30! |
| CP | PRE+2~, PRE+10*, USERID+9, LETSGO+3, BACKUP+1~, BACKUP+2*, BACKUP+4, POST+1~, POST+3*, POST+35 , POST+38, POST+40, POST+41, POST+44, DEBUG+1~, DEBUG+4*, SORRY+1*, MAILIT+1~, MAILIT+3*, NEEDMSG+4 , NEEDMSG+8 |
| DA | POST+23~, POST+26*, POST+27*, POST+28*, POST+29*, POST+30! |
| DEBUG | DEBUG+1~, DEBUG+2* |
| DIE | POST+23~, POST+25*, POST+30! |
| DIFQ | SORRY+10! |
| DIFROM | MAILIT+1~ |
| DR | POST+23~, POST+25*, POST+30! |
| DUZ | USERID+1, USERID+8, SNDALERT+2, SENDMAIL+2 |
| DUZ(0 | USERID+3 |
| ERRARRAY | PRE+6~, LETSGO+5, LETSGO+6, LETSGO+7, LETSGO+9, LETSGO+14, CHECKLMI~, NEEDIT~ |
| ERRARRAY( | NEEDIT+13*, NEEDIT+24* |
| ERRARRAY("XMB(3.8" | CHECKLMI+10* |
| HEREYAGO | CHECKLMI+1~, NEEDIT+2~ |
| HEREYAGO("DILIST" | CHECKLMI+6, NEEDIT+6 |
| LASTPTCH | PRE+4~ |
| LC | ADDLINE~, ADDLINE+2, ADDLINE+3* |
| LINECNT | SORRY+12~, SORRY+13*, SORRY+14, SORRY+15, SORRY+16, SORRY+17, SORRY+18, SORRY+19, SORRY+20, SORRY+21 , SORRY+22, SORRY+23, SORRY+25, SORRY+28, SORRY+29, SORRY+30, SORRY+31, SORRY+32, SORRY+34, SORRY+35 , SORRYEND+1~ |
| LSTPISTS | PRE+5~ |
| MAILMSG | SENDMAIL~, SENDMAIL+1, SENDMAIL+2 |
| MESSAGE | SORRY+3~, SORRY+5*, SORRY+8*, SORRY+19, SORRY+25, NEEDMSG~, NEEDMSG+3, NEEDMSG+6, NEEDMSG+7 |
| MODE | SORRY~, SORRY+4, SORRY+8, SORRY+25, SORRY+27 |
| MODULE | NEEDIT~, NEEDIT+5, NEEDIT+10, NEEDIT+13, NEEDIT+22, NEEDIT+24, SORRYEND+1~, SORRYEND+6*, SORRYEND+7*, SORRYEND+8 , SORRYEND+9, FATLSTOR+1~, FATLSTOR+9*, FATLSTOR+10*, FATLSTOR+11, FATLSTOR+12, FATLSTOR+13 |
| MSG | SORRY~, SORRY+21, MAILIT~, MAILIT+6 |
| MSG2 | SORRY~, SORRY+22 |
| NAME | NEEDIT+1~, NEEDIT+6*, NEEDIT+8, NEEDIT+13, NEEDIT+14, NEEDIT+16, NEEDIT+21, NEEDIT+24, NEEDIT+25, NEEDIT+27 , SORRYEND+1~, SORRYEND+6*, SORRYEND+8*, SORRYEND+9, FATLSTOR+1~, FATLSTOR+9*, FATLSTOR+11*, FATLSTOR+12, FATLSTOR+13 |
| NOW | FATLSTOR+1~, FATLSTOR+6*, FATLSTOR+7, FATLSTOR+13 |
| PATCH | NEEDIT~, NEEDIT+19, NEEDIT+21, NEEDIT+22, NEEDIT+24, NEEDIT+25, NEEDIT+27, SORRYEND+1~ |
| RPMS | PRE+2~, PRE+11*, LETSGO+3 |
| RPMSVER | PRE+2~, PRE+12*, LETSGO+3 |
| STR | PRE+3~, POST+37~, SORRY+12~, SORRY+37, SORRYEND+1~, SORRYEND+14 |
| STR( | ADDLINE+2* |
| STR(1 | POST+38* |
| STR(2 | POST+39* |
| STR1 | NEEDIT+2~, NEEDMSG+1~, NEEDMSG+3*, NEEDMSG+4, NEEDMSG+6*, NEEDMSG+8 |
| STR2 | NEEDIT+2~, NEEDMSG+1~, NEEDMSG+7*, NEEDMSG+8 |
| SYSPATCH | NEEDIT+3~, NEEDIT+22*, NEEDIT+23 |
| SYSVER | NEEDIT+3~, NEEDIT+10*, NEEDIT+12, NEEDIT+13, NEEDIT+14, NEEDIT+16, NEEDIT+17 |
| TMP | SORRYEND+1~ |
| U | USERID+8 |
| VERSION | NEEDIT~, NEEDIT+8, NEEDIT+12, NEEDIT+13, NEEDIT+14, NEEDIT+17, NEEDIT+21, NEEDIT+22, NEEDIT+24, NEEDIT+25 , NEEDIT+27, SORRYEND+1~, SORRYEND+6*, SORRYEND+9*, FATLSTOR+1~, FATLSTOR+9*, FATLSTOR+12*, FATLSTOR+13 |
| WHATMSG | SORRYEND+1~, SORRYEND+16*, SORRYEND+18, SORRYEND+19 |
| WHO | SENDIT~, SENDIT+2, MAILIT~, MAILIT+5 |
| WOTERR | SORRYEND~, SORRYEND+21, FATLSTOR~ |
| WOTERR( | SORRYEND+7, SORRYEND+8, SORRYEND+9, FATLSTOR+10, FATLSTOR+11, FATLSTOR+12, FATLSTOR+13 |
| WOTMSG | SENDIT~, SENDIT+1 |
| >> X | PTCHLAST+10*, USERID+8*, USERID+9, LETSGO+1, POST+7*, POST+10*, POST+11, POST+12, POST+14*, POST+15 , POST+16, POST+20* |
| XMDUZ | MAILIT+1~, MAILIT+8* |
| XMMG | MAILIT+1~, MAILIT+11, MAILIT+14 |
| XMSUB | MAILIT+1~, MAILIT+6* |
| XMTEXT | MAILIT+1~, MAILIT+7* |
| XMY | MAILIT+1~ |
| XMY( | MAILIT+5* |
| >> XPDABORT | PTCHLAST+12*, LETSGO+11, LETSGO+13, SORRY+6* |
| >> XPDDIQ( | PTCHLAST+10*, POST+7* |
| XPDNM | PRE+8, PRE+10, PRE+11, PRE+12, DEBUG+1~, DEBUG+3*, MAILIT+8, SORRYEND+16, FATLSTOR+4*, FATLSTOR+7 , FATLSTOR+13 |
| >> XPDNOQUE | PTCHLAST+6* |
| XQA | SENDIT+4! |
| XQA( | SENDIT+2* |
| XQAMSG | SENDIT+1*, SENDIT+4! |
| Name | Field # of Occurrence |
|---|---|
| $T( | BACKUP+2, POST+3, DEBUG+4, SORRY+1, MAILIT+3, FATLSTOR+4 |