PXCEVSIT ;slc/dee,ISA/KWP-Used in editing a visit ;04/30/99
Source file <PXCEVSIT.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 5 | DD^%DT NOW^%DTC ^DIC $$EXTERNAL^DILFD ^DIR |
| PCE Patient Care Encounter | 4 | $$SWITCHD^PXAPI CHIKOUT^PXBAPI2 PATINFO^PXCEPAT $$APPOINT^PXUTL1 |
| Scheduling | 1 | $$ELAP^SDPCE |
| Package | Total | Caller Graph |
|---|---|---|
| PCE Patient Care Encounter | 4 | PXBAPI1 PXCAVST1 PXCEHIST PXCEVFIL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EPAT | ;
|
|
| EHOSPLOC | ;
|
|
| EWORKLD2 | ;
|
|
| SKIP | ;Just returns used when need a edit routine that does nothing.
|
|
| ELIGIBIL(PATIENT,HOSPLOC,DATETIME) | ;+Eligibility from appointment if there is one.
|
|
| HELPDISP | ;
|
|
| HELPHLOC | ;
|
|
| EWORKLOD(ASK) | ;
|
|
| EVISITDT(REQTIME,DEFAULT) | ;
|
|
| ECODT | ;Check out date time
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | ELIGIBIL+4, ELIGIBIL+8, EWORKLD2+5, EWORKLD2+22, EWORKLD2+24 |
| Name | Line Occurrences |
|---|---|
| $$ELIGIBIL | EHOSPLOC+32 |
| EHOSPLOC | EHOSPLOC+20 |
| EWORKLD2 | EWORKLD2+17 |
| HELPHLOC | EHOSPLOC+20 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | ELIGIBIL+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EVISITDT+15~, EVISITDT+18 |
| %H | EVISITDT+15~ |
| %I | EVISITDT+15~ |
| ASK | EWORKLOD~, EWORKLD2+13 |
| DA | EVISITDT+23!, EHOSPLOC+18!, EWORKLOD+2~, EWORKLD2+1!, EWORKLD2+15!, EPAT+6! |
| DATETIME | ELIGIBIL~, ELIGIBIL+3, ELIGIBIL+4, ELIGIBIL+8 |
| DEFAULT | EVISITDT~, EVISITDT+14, EVISITDT+16, EVISITDT+17, EVISITDT+18 |
| DIC | EWORKLOD+2~, EWORKLD2+1!, EWORKLD2+9* |
| DIC("A" | EWORKLD2+12* |
| DIC("B" | EWORKLD2+8* |
| DIC("S" | EWORKLD2+11* |
| DIC(0 | EWORKLD2+10* |
| DIERR | EHOSPLOC+3~, EHOSPLOC+6, EWORKLD2+3~, EWORKLD2+8 |
| DIR | EVISITDT+23!, EHOSPLOC+18!, EWORKLD2+15!, EPAT+6! |
| DIR("?" | EVISITDT+21*, EHOSPLOC+9*, EPAT+4* |
| DIR("A" | EVISITDT+20*, EHOSPLOC+8*, EPAT+3* |
| DIR("B" | EVISITDT+13*, EVISITDT+16*, EVISITDT+17*, EVISITDT+18*, EVISITDT+19*, EHOSPLOC+6* |
| DIR("S" | EHOSPLOC+16* |
| DIR(0 | EVISITDT+9*, EVISITDT+10*, EVISITDT+11*, EVISITDT+12*, EHOSPLOC+7*, EPAT+2* |
| DT | EVISITDT+9, EVISITDT+17 |
| DTOUT | EHOSPLOC+19, EWORKLD2+1!, EWORKLD2+16, EPAT+8 |
| DUOUT | EHOSPLOC+19, EWORKLD2+1!, EWORKLD2+16, EPAT+8 |
| HLOC | EHOSPLOC+1~, EHOSPLOC+21*, EHOSPLOC+22, EHOSPLOC+27, EHOSPLOC+29, EHOSPLOC+32 |
| HOSPLOC | ELIGIBIL~, ELIGIBIL+2, ELIGIBIL+4, ELIGIBIL+8 |
| PATIENT | ELIGIBIL~, ELIGIBIL+1, ELIGIBIL+8 |
| >> PXCEAFTR( | EVISITDT+13, EHOSPLOC+4, ECODT+3* |
| >> PXCEAFTR(0 | EHOSPLOC+2, EHOSPLOC+22*, EHOSPLOC+27, EHOSPLOC+28, EHOSPLOC+32, EHOSPLOC+33*, EWORKLD2+2, EWORKLD2+4, EWORKLD2+5, EWORKLD2+8 , EWORKLD2+19*, EWORKLD2+21, ECODT+2, EPAT+1, EPAT+9* |
| >> PXCEAFTR(150 | EWORKLD2+24*, EWORKLD2+26* |
| >> PXCECAT | EVISITDT+8, EHOSPLOC+20, EWORKLD2+17 |
| PXCEDILF | EHOSPLOC+3~, EWORKLD2+3~ |
| PXCEELIG | ELIGIBIL+5~, ELIGIBIL+6*, ELIGIBIL+8*, ELIGIBIL+9, EHOSPLOC+31~, EHOSPLOC+32*, EHOSPLOC+33 |
| >> PXCEEND | EHOSPLOC+19*, EWORKLD2+16*, EPAT+8* |
| PXCEEXT | EHOSPLOC+3~, EHOSPLOC+5*, EHOSPLOC+6, EWORKLD2+3~, EWORKLD2+7*, EWORKLD2+8 |
| >> PXCEFILE | EHOSPLOC+5, EWORKLD2+7 |
| PXCEINDX | ELIGIBIL+5~, ELIGIBIL+7*, ELIGIBIL+8* |
| PXCEINT | EHOSPLOC+3~, EHOSPLOC+4*, EHOSPLOC+5, EHOSPLOC+6, EWORKLD2+3~, EWORKLD2+4*, EWORKLD2+5*, EWORKLD2+6, EWORKLD2+7 |
| >> PXCEPAT | EHOSPLOC+27, EHOSPLOC+32, ECODT+2, EPAT+10* |
| >> PXCEQUIT | EHOSPLOC+19*, EWORKLD2+16*, EPAT+8* |
| >> PXCETEXT | EVISITDT+13, EVISITDT+20, EVISITDT+21, EHOSPLOC+4, EHOSPLOC+5, EHOSPLOC+8, EHOSPLOC+9, EWORKLD2+7, EWORKLD2+12, ECODT+3 , EPAT+3, EPAT+4 |
| PXCHKOUT | ECODT+1~, ECODT+3 |
| >> PXELAP | EHOSPLOC+28* |
| PXHLOC | EWORKLD2+20~, EWORKLD2+21*, EWORKLD2+22, EWORKLD2+24, EWORKLD2+26 |
| PXLIMDT | EVISITDT+7~, EVISITDT+8*, EVISITDT+9 |
| PXSC | EWORKLD2+20~, EWORKLD2+22*, EWORKLD2+26 |
| REQTIME | EVISITDT~, EVISITDT+10, EVISITDT+11 |
| >> X | EPAT+7 |
| >> Y | EVISITDT+19*, EHOSPLOC+20, EHOSPLOC+21, EWORKLD2+6*, EWORKLD2+13, EWORKLD2+17, EWORKLD2+19, EWORKLD2+26, EPAT+7*, EPAT+9 , EPAT+10 |