GMRC1004 ; IHS/CIA/MGH - PRE-INSTALL ROUTINE FOR GMRC PATCH 1004 ;06-Jun-2013 20:22;DU
Source file <GMRC1004.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | CREIXN^DDMOD FILE^DIE | 
| CIA Utilities | 1 | REGNMSP^CIAURPC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRE | ;EP; beginning of pre install code | |
| RESET | ;EP | |
| XREF | ;Create a new type cross-reference | |
| ENV | ;EP; environmen check | |
| PATCH(X) | ;return 1 if patch X was installed, X=aaaa*nn.nn*nnnn | |
| UPDATE(IEN,VALUE) | ;Update data | |
| POST | ;EP; beginnig of post install code | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(9.4 - [#9.4] | PATCH+4, PATCH+5, PATCH+7, PATCH+8 | 
| ^GMR(123.5 - [#123.5] | RESET+6, RESET+7 | 
| Name | Line Occurrences | 
|---|---|
| $$PATCH | ENV+6 | 
| RESET | POST+2 | 
| UPDATE | RESET+8, RESET+9 | 
| XREF | POST+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DATA | RESET+4~, RESET+7*, RESET+8, RESET+9 | 
| FDA | UPDATE+1~ | 
| FDA( | UPDATE+2* | 
| I | PATCH+3~, PATCH+4*, PATCH+5, PATCH+7, PATCH+8, RESET+4~, RESET+5*, RESET+6*, RESET+7, RESET+8 , RESET+9, UPDATE+2 | 
| IEN | UPDATE~ | 
| J | PATCH+3~, PATCH+5*, PATCH+7, PATCH+8 | 
| MSG | XREF+1~ | 
| NUM | PATCH+3~, PATCH+8*, PATCH+9 | 
| PATCH | ENV+1~, ENV+5*, ENV+6, ENV+7 | 
| RESULT | XREF+1~, XREF+20 | 
| U | RESET+8, RESET+9 | 
| VALUE | UPDATE~, UPDATE+2 | 
| X | PATCH~, PATCH+2, PATCH+4, PATCH+5*, PATCH+7, PATCH+8, PATCH+9 | 
| >> XPDDIQ("XPZ1" | ENV+2* | 
| >> XPDDIQ("XPZ2" | ENV+2* | 
| >> XPDQUIT | ENV+7* | 
| XREF | XREF+1~, XREF+20 | 
| XREF("ACTIVITY" | XREF+10* | 
| XREF("DESCR" | XREF+5*, XREF+6*, XREF+7* | 
| XREF("EXECUTION" | XREF+9* | 
| XREF("FILE" | XREF+18* | 
| XREF("NAME" | XREF+3* | 
| XREF("ROOT FI | LE" , XREF+19* | 
| XREF("SHORT D | ESCR" , XREF+4* | 
| XREF("TYPE" | XREF+2* | 
| XREF("USE" | XREF+8* | 
| XREF("VAL" | XREF+11*, XREF+12*, XREF+13*, XREF+14*, XREF+15*, XREF+16*, XREF+17* |