ACDPFACE ;IHS/ADC/EDE/KML - DISPLAY PATIENT VISIT;
Source file <ACDPFACE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EOJ | ;
|
|
| GETPAT | ; GET PATIENT
|
|
| START | ;
|
|
| PATLOOP | ; DISPLAY PATIENTS UNTIL DONE
|
|
| DISPLAYQ | ; EP - FOR TASKMAN
|
|
| DISPLAY | ; EP - DISPLAY VISIT AND SUBORDINATE FILE ENTRY
|
|
| SELECT | ; SELECT A CDMIS INITIAL/REOPEN/TDC VISIT
|
| Name | Line Occurrences |
|---|---|
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACDIIF("C" | DISPLAYQ+9 |
| ^ACDTDC("C" | DISPLAYQ+8 |
| ^ACDVIS - [#9002172.1] | SELECT+8, DISPLAYQ+7 |
| ^DPT - [#2] | GETPAT+6 |
| ^TMP("ACD" | SELECT+5, SELECT+7 |
| Name | Line Occurrences |
|---|---|
| @( | DISPLAYQ+11 |
| DISPLAY | PATLOOP+7, PATLOOP+10 |
| DISPLAYQ | DISPLAY+6 |
| EOJ | START+3, DISPLAYQ+18 |
| GETPAT | PATLOOP+1 |
| PATLOOP | START+2 |
| SELECT | PATLOOP+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACDCOMC | DISPLAYQ+5~ |
| ACDCOMCL | DISPLAYQ+5~ |
| ACDCOMT | DISPLAYQ+5~ |
| ACDCOMTL | DISPLAYQ+5~ |
| ACDCONT | DISPLAYQ+5~ |
| ACDCONTL | DISPLAYQ+5~ |
| >> ACDDA | DISPLAYQ+6*, DISPLAYQ+8*, DISPLAYQ+9*, DISPLAYQ+10 |
| ACDDFN | GETPAT+6*, DISPLAYQ+5~ |
| ACDDFNP | GETPAT+6*, DISPLAYQ+5~ |
| ACDLC | SELECT+6*, SELECT+10*, SELECT+11, SELECT+14, SELECT+17, SELECT+18, SELECT+20! |
| ACDPDD | SELECT+15! |
| ACDPDD( | SELECT+14 |
| ACDPFACE | DISPLAYQ+12*, DISPLAYQ+14! |
| ACDPROV | DISPLAYQ+5~ |
| ACDPROVP | DISPLAYQ+5~ |
| >> ACDQ | START+2, PATLOOP+2, PATLOOP+4, PATLOOP+6*, PATLOOP+9, GETPAT+1*, GETPAT+7*, SELECT+1*, SELECT+22* |
| ACDSLAVE | PATLOOP+8, PATLOOP+10, PATLOOP+11!, DISPLAYQ+1, DISPLAYQ+17 |
| >> ACDTC | SELECT+8*, SELECT+9, DISPLAYQ+7*, DISPLAYQ+8, DISPLAYQ+10, DISPLAYQ+11 |
| >> ACDVIEN | SELECT+3*, SELECT+19*, SELECT+21, DISPLAYQ+6, DISPLAYQ+7, DISPLAYQ+8, DISPLAYQ+9 |
| ACDVLST | SELECT+4!, SELECT+20! |
| ACDVLST( | SELECT+11*, SELECT+19 |
| ACDWSTAF | DISPLAYQ+6! |
| ACDWSTAF(1 | DISPLAYQ+6* |
| >> ACDX | SELECT+6*, SELECT+7* |
| >> ACDY | SELECT+6*, SELECT+7*, SELECT+8, SELECT+11, SELECT+12, SELECT+14 |
| >> AUPNLK("ALL" | GETPAT+2*, GETPAT+4! |
| DA | SELECT+12*, SELECT+18! |
| >> DIC | GETPAT+3*, SELECT+12* |
| >> DIC("S" | GETPAT+3* |
| >> DIC(0 | GETPAT+3* |
| >> DIQ | SELECT+12* |
| DIR | SELECT+18! |
| DIR("A" | SELECT+18* |
| DIR(0 | SELECT+18* |
| >> DR | SELECT+12* |
| IO | PATLOOP+10, PATLOOP+11*, DISPLAYQ+2, DISPLAYQ+15 |
| IO("Q" | DISPLAY+2 |
| IO(0 | PATLOOP+10, PATLOOP+11, DISPLAYQ+15 |
| IOF | DISPLAYQ+15 |
| >> IOP | DISPLAYQ+1* |
| IOST | PATLOOP+8, DISPLAYQ+4 |
| U | GETPAT+6, SELECT+8, DISPLAYQ+7 |
| >> Y | GETPAT+5, GETPAT+6, SELECT+19 |
| >> ZTDESC | DISPLAY+3* |
| >> ZTDTH | DISPLAY+3* |
| >> ZTQUEUED | DISPLAYQ+18 |
| >> ZTREQ | DISPLAYQ+18* |
| >> ZTRTN | DISPLAY+3* |
| >> ZTSAVE("ACD*" | DISPLAY+3* |