PXCEHIST ;ISL/dee - Used to add an historical visit and display a visit ;9/5/96
Source file <PXCEHIST.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 2 | $$DISPLY01^PXCESIT EVISITDT^PXCEVSIT |
VA FileMan | 2 | $$EXTERNAL^DILFD ^DIR |
Registration | 1 | $$SITE^VASITE |
Name | Comments | DBIA/ICR reference |
---|---|---|
FORMAT | ;;Historical Encounter~9000010~0,21,150,800,811,812~~^AUPNVSIT
|
|
EVISITDT(DTPARM) | ;
|
|
ELOC | ;Used to edit location of the visit for historical visits
|
|
IN | ;This is a va location
|
|
OUT | ;This is a non va location
|
|
FINISH | ;
|
|
DISPLY01(PXCEVSIT) | ;
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | ELOC+8!, IN+10!, OUT+6! |
DIERR | IN+1~, IN+5 |
DIR | ELOC+8!, IN+10!, OUT+6! |
DIR("?" | IN+8* |
DIR("A" | ELOC+3*, IN+7*, OUT+4* |
DIR("B" | ELOC+4*, ELOC+5*, ELOC+6*, IN+5*, OUT+2* |
DIR(0 | ELOC+2*, IN+6*, OUT+3* |
>> DTOUT | ELOC+9, IN+12, OUT+8 |
DTPARM | EVISITDT~, EVISITDT+2 |
>> DUOUT | ELOC+9, IN+12, OUT+8 |
>> INOROUT | ELOC+10*, ELOC+11* |
>> PXCEAFTR(0 | EVISITDT+1, EVISITDT+3, ELOC+4, IN+2, IN+3, IN+14*, IN+16*, OUT+11*, OUT+12*, FINISH+1* , FINISH+2* |
>> PXCEAFTR(21 | ELOC+5, IN+15*, OUT+1, OUT+2, OUT+10* |
PXCEDILF | IN+1~ |
>> PXCEEND | ELOC+9*, IN+12*, OUT+8* |
PXCEEXT | IN+1~, IN+4*, IN+5 |
>> PXCEFILE | IN+4 |
PXCEINT | IN+1~, IN+2*, IN+3*, IN+4, IN+5 |
>> PXCEQUIT | ELOC+9*, IN+12*, OUT+8* |
>> PXCETEXT | IN+7, IN+8 |
PXCEVSIT | DISPLY01~, DISPLY01+1 |
>> X | EVISITDT+3*, IN+11, OUT+7 |
>> Y | EVISITDT+3*, ELOC+10, IN+11*, IN+14, OUT+7*, OUT+10 |