XBUTL ;IHS/ITSC/CLS - XB MISCELLANEOUS UTILITIES [ 10/06/2005 9:59 AM ]
Source file <XBUTL.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LUHN(X) | ;calulate check digit, Luhn formula for NPI | |
| LINK(P,C) | ;link protocols child to parent | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^ORD(101 - [#101] | FIND1^DIC | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| AIEN | LINK+3~, LINK+6*, LINK+7, LINK+8 | 
| C | LINK~, LINK+4, LINK+6 | 
| ERR | LINK+3~ | 
| FDA | LINK+3~ | 
| FDA( | LINK+8* | 
| >> I | LUHN+8*, LUHN+9, LUHN+10, LUHN+11, LUHN+12, LUHN+14*, LUHN+15 | 
| IENARY | LINK+3~ | 
| IENARY(1 | LINK+5*, LINK+7, LINK+8 | 
| P | LINK~, LINK+4, LINK+5 | 
| PIEN | LINK+3~ | 
| X | LUHN~, LUHN+2*, LUHN+3, LUHN+4*, LUHN+6*, LUHN+7, LUHN+10, LUHN+12, LUHN+18*, LUHN+19* , LUHN+20* | 
| >> XBCD | LUHN+7*, LUHN+19 | 
| >> XBSTRING | LUHN+5*, LUHN+10*, LUHN+12*, LUHN+14, LUHN+15 | 
| >> XBTOT | LUHN+13*, LUHN+15*, LUHN+16*, LUHN+17*, LUHN+18 |