PRCHUEI ;OI&T/LKG -Routine for testing ;1/21/22 12:04
Source file <PRCHUEI.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
IFCAP | 2 | ^PRC(440 ^PRC(440.3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
VALIDUEI(PRCSTR) | ; Returns '1' if UEI is valid and '0' if not
|
|
UEICHK(PRCROOT) | ; Calculates checksum
|
Name | Line Occurrences |
---|---|
$$UEICHK | VALIDUEI+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
PRCI | UEICHK+1~, UEICHK+3*, UEICHK+6 |
PRCJ | UEICHK+1~, UEICHK+5*, UEICHK+6, UEICHK+7 |
PRCLEN | UEICHK+1~, UEICHK+2*, UEICHK+5, UEICHK+9* |
PRCROOT | UEICHK~, UEICHK+6, UEICHK+9*, UEICHK+10 |
PRCSTR | VALIDUEI~, VALIDUEI+2, VALIDUEI+3, VALIDUEI+4, VALIDUEI+5, VALIDUEI+6 |
PRCSUM | UEICHK+1~, UEICHK+3, UEICHK+4*, UEICHK+8*, UEICHK+9 |
PRCVAL | UEICHK+1~, UEICHK+6*, UEICHK+7*, UEICHK+8 |
PRCVALID | VALIDUEI+1~*, VALIDUEI+6*, VALIDUEI+7 |