©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
XTRUTL1 ;ISCSF/RWF - Developer Routine Utilities Build & Install Files ;2/14/07 15:50
Source file <XTRUTL1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VER(X) | ;returns version number from Build file, X=build name
|
|
| BUILD() | ;This will select an entry in the BUILD file.
|
|
| PATCH(X) | ;returns the patch number from the Build file, X=build name
|
|
| PLCP(PL,N) | ;Patch list contains patch number
|
|
| INSTALL() | ;This will select an entry in the INSTALL file.
|
|
| RTN(IEN,FILE) | ;This will build a list of routines from the BUILD or INSTALL (FILE) file.
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | BUILD+2, INSTALL+3 |
| FileNo | Call Tags |
|---|---|
| ^XPD(9.6 - [#9.6] | Classic Fileman Calls |
| ^XPD(9.7 - [#9.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^UTILITY($J | RTN+4*, RTN+5*, RTN+10*, RTN+11*, RTN+12* |
| ^XPD(9.6 - [#9.6] | RTN+4, RTN+5 |
| ^XTMP("XPDI" | RTN+10, RTN+11 |
| Name | Field # of Occurrence |
|---|---|
| ^( | RTN+4, RTN+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BLDA | BUILD+1~, INSTALL+1~ |
| DIC | BUILD+1~, BUILD+2*, INSTALL+1~, INSTALL+2* |
| DIC("S" | INSTALL+2* |
| DIC(0 | BUILD+2*, INSTALL+2* |
| FILE | RTN~, RTN+1*, RTN+3, RTN+8 |
| IEN | RTN~, RTN+1, RTN+4, RTN+5, RTN+10, RTN+11 |
| IX | RTN+2~, RTN+4*, RTN+5* |
| N | PLCP~, PLCP+1 |
| PAT | PLCP+1~*, PLCP+2 |
| PL | PLCP~ |
| R | RTN+2~, RTN+5*, RTN+10*, RTN+12 |
| U | RTN+2*, RTN+4, RTN+5 |
| X | BUILD+1~, INSTALL+1~, RTN+2~, RTN+4*, RTN+5*, RTN+9*, RTN+10*, RTN+11, RTN+12, VER~ , VER+1, VER+2, PATCH~, PATCH+1 |
| Y | BUILD+1~, BUILD+3, INSTALL+1~, INSTALL+4 |