APCDEA ; IHS/CMI/LAB - DATA ENTRY ENTER MODE ;
Source file <APCDEA.m>
Package | Total | Call Graph |
---|---|---|
Patient Care Component | 5 | ^APCDEA2 ^APCDECC ^APCDEIN ^APCDEKL ^APCDEMDI |
VA Fileman | 4 | ^%DT ^DIC YN^DICN ^DIR |
IHS Patient | 1 | ^AUPNPAT |
Name | Comments | DBIA/ICR reference |
---|---|---|
INAC(P,RETVAL) | ;EP - called to check to see if patient is inactive
|
|
HDR | ; Write Header
|
|
GETLOC | ; GET LOCATION OF ENCOUNTER
|
|
EOJ | ; END OF JOB
|
|
GETTYPE | ; GET TYPE OF ENCOUNTER
|
|
GETPAT | ;EP - GET PATIENT
|
|
EDTIME | ||
GETTMPLT | ; GET TEMPLATE
|
|
GETTIME | ;
|
|
GETCAT | ; GET SERVICE CATEGORY
|
|
TEXT | ;
|
|
PROCESS | ; PROCESS PATIENT
|
|
RESTOFIT | ||
GETDATE | ; GET DATE OF ENCOUNTER
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^AUPNPAT - [#9000001] | Classic Fileman Calls |
^AUTTLOC - [#9999999.06] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCDSITE - [#9001001.2] | GETPAT+4, GETPAT+10 |
^AUPNPAT - [#9000001] | INAC+2 |
^AUTTLOC - [#9999999.06] | GETLOC+8 |
^TMP("APCD" | EDTIME+1 |
Name | Line Occurrences |
---|---|
EOJ | HDR+9 |
GETCAT | HDR+8 |
GETDATE | RESTOFIT, GETDATE+8, GETDATE+9, GETDATE+10, EDTIME+2, EDTIME+3 |
GETLOC | HDR+8, GETLOC+8 |
GETPAT | RESTOFIT |
GETTIME | GETTIME+6, GETTIME+7 |
GETTYPE | HDR+8 |
INAC | GETPAT+9 |
PROCESS | RESTOFIT |
RESTOFIT | HDR+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | GETPAT+7* |
>> %DT | GETDATE+9* |
APCDAPP | PROCESS+2! |
>> APCDBEEP | GETTIME+6, EDTIME+2 |
>> APCDCAF("IN C | AF W/PATIENT" , GETPAT+3 |
>> APCDCAT | HDR+8*, GETCAT+2*, GETCAT+7*, GETDATE+6*, GETTIME+2 |
>> APCDDATE | RESTOFIT*, GETDATE+2, GETDATE+3*, GETDATE+6*, GETDATE+12*, GETTIME+5*, EDTIME, EDTIME+4* |
>> APCDDEFL | GETLOC+4, GETLOC+5 |
>> APCDDEFS | GETCAT+4 |
>> APCDDEFT | GETTYPE+4 |
APCDEXIT | HDR+4!, GETLOC+1, GETTYPE+1, GETCAT+1, GETDATE+1, GETDATE+6* |
>> APCDFLG | HDR+7 |
APCDJ | HDR+2*, HDR+3*, HDR+4! |
>> APCDLOC | HDR+8*, GETLOC+3*, GETLOC+9*, GETDATE+6* |
>> APCDMINI | HDR+2, HDR+3 |
APCDODAT | GETDATE+2*, GETDATE+7, GETDATE+11! |
>> APCDPARM | GETPAT+7 |
>> APCDPAT | RESTOFIT*, GETPAT+2*, GETPAT+3*, GETPAT+8*, GETPAT+9* |
>> APCDTIME | GETTIME+1*, GETTIME+2*, GETTIME+3, GETTIME+4*, EDTIME* |
>> APCDTPLT | HDR+8* |
>> APCDTPLT("NAME" | HDR+8* |
>> APCDTYPE | HDR+8*, GETTYPE+2*, GETTYPE+7*, GETDATE+6*, GETTIME+2 |
APCDX | HDR+2*, HDR+3*, HDR+4! |
>> AUPNLK("INAC" | GETPAT+4* |
DA | GETTYPE+3!, GETCAT+3!, INAC+4! |
DIC | GETLOC+4*!, GETLOC+5*!, GETPAT+5*! |
DIC("B" | GETLOC+4* |
DIC(0 | GETLOC+4*, GETLOC+5*, GETPAT+5* |
DIR | GETTYPE+3!, GETTYPE+5!, GETCAT+3!, GETCAT+5!, INAC+4! |
DIR("A" | GETTYPE+5*, GETCAT+5*, INAC+4* |
DIR("B" | GETTYPE+4*, GETCAT+4*, INAC+4* |
DIR(0 | GETTYPE+5*, GETCAT+5*, INAC+4* |
DIROUT | GETTYPE+3!, GETCAT+3! |
DIRUT | GETTYPE+3!, GETTYPE+6, GETCAT+3!, GETCAT+6, INAC+5 |
DT | GETDATE+10 |
DTIME | GETDATE+4, GETTIME+3 |
DTOUT | GETTYPE+3!, GETCAT+3! |
DUOUT | GETTYPE+3!, GETCAT+3! |
DUZ("AG" | GETPAT+10 |
DUZ(2 | GETPAT+4, GETPAT+10, INAC+2 |
IOF | HDR+1 |
P | INAC~, INAC+2 |
RETVAL | INAC~, INAC+1*, INAC+5*, INAC+6* |
U | GETLOC+8, GETPAT+4, GETPAT+7, INAC+2 |
X | GETTYPE+6*, GETCAT+6*, GETDATE+4*, GETDATE+5, GETDATE+6, GETDATE+7*, GETDATE+8!, GETDATE+10!, GETDATE+12, GETTIME+3* , GETTIME+5, GETTIME+6, GETTIME+7, GETTIME+8*, EDTIME*, EDTIME+2, EDTIME+3, EDTIME+4, GETPAT+9 |
>> Y | GETLOC+7, GETLOC+8, GETLOC+9, GETTYPE+7, GETCAT+7, GETDATE+9, GETDATE+10, GETPAT+3*, GETPAT+6, GETPAT+8 , INAC+6 |
Name | Field # of Occurrence |
---|---|
$T(TEXT+APCDJ | HDR+2, HDR+3 |