VSITCK ;ISD/RJP - Visit Field Check ;6/20/96
Source file <VSITCK.m>
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 2 | VSIT VSITDEF |
Name | Comments | DBIA/ICR reference |
---|---|---|
ERRCHK(NODE,VALUE,DATEFMT) | ;Checks the value to see if it is valid
|
|
SETALL | ;Do $GET on all of the nodes of the VSIT array
|
Name | Field # of Occurrence |
---|---|
$$GET^VSITVAR | ERRCHK+12 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("VSITDD" | ERRCHK+9, SETALL+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATEFMT | ERRCHK~, ERRCHK+12 |
ERR | ERRCHK+8~, ERRCHK+9*, ERRCHK+10*, ERRCHK+13 |
FLDINDX | SETALL+1~, SETALL+2*, SETALL+3*, SETALL+4 |
NODE | ERRCHK~, ERRCHK+6*, ERRCHK+9, ERRCHK+12 |
VALUE | ERRCHK~, ERRCHK+7*, ERRCHK+9, ERRCHK+11*, ERRCHK+12*, ERRCHK+13*, ERRCHK+14 |
>> VSIT( | SETALL+4* |
>> VSIT(0 | SETALL+5* |