PXRHS01 ; SLC/SBW - PCE Visit data extract main routine ;6/7/96
Source file <PXRHS01.m>
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 2 | PXRHS03 PXRHS04 |
Health Summary | 1 | GMTSPXOP |
Name | Comments | DBIA/ICR reference |
---|---|---|
VISIT(DFN,ENDDT,BEGDT,OCCLIM,CATCODE,EXTRCODE,TIMEORD) | ; Control branching
|
|
HSDATE() | ; $$() -> switch date
|
Name | Field # of Occurrence |
---|---|
GETREC^PXRHS02 | VISIT+81 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT("AA" | VISIT+61, VISIT+70, VISIT+75, VISIT+81 |
^PX(815 - [#815] | HSDATE+1 |
^TMP("PXHSV" | VISIT+68! |
Name | Line Occurrences |
---|---|
$$HSDATE | VISIT+69 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BEGDT | VISIT~, VISIT+64*, VISIT+67, VISIT+69 |
CATCODE | VISIT~, VISIT+81 |
CHGIVD | VISIT+62~, VISIT+78*, VISIT+79 |
DFN | VISIT~, VISIT+61, VISIT+70, VISIT+75, VISIT+81 |
DT | VISIT+64, VISIT+65 |
ENDDT | VISIT~, VISIT+65*, VISIT+67, VISIT+69 |
EXTRCODE | VISIT~, VISIT+81 |
IBEGDT | VISIT+62~, VISIT+67*, VISIT+79 |
IENDDT | VISIT+62~, VISIT+67*, VISIT+79 |
IHSDATE | VISIT+62~, VISIT+69*, VISIT+70 |
OCCLIM | VISIT~, VISIT+63*, VISIT+70, VISIT+75, VISIT+81 |
PXBEG | VISIT+62~, VISIT+69*, VISIT+70*, VISIT+73*, VISIT+75 |
PXCNT | VISIT+62~, VISIT+69*, VISIT+70, VISIT+75, VISIT+81 |
PXIVD | VISIT+62~, VISIT+73*, VISIT+75*, VISIT+78, VISIT+81 |
PXSTOP | VISIT+62~, VISIT+69*, VISIT+70 |
PXVDF | VISIT+62~, VISIT+80*, VISIT+81* |
TIMEORD | VISIT~, VISIT+81 |
U | HSDATE+1 |