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 |