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* |