ACDPVH1M ;IHS/ADC/EDE/KML - DISPLAY PATIENT VISITS FOR 1 MO;
Source file <ACDPVH1M.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EOJ | ;
|
|
GETPAT | ; GET PATIENT
|
|
DSPHIST | ; DISPLAY VISIT HISTORY TO HELP USER SELECT
|
|
START | ;
|
|
DISPLAY2 | ; DISPLAY VISIT FOR SELECTED MONTH
|
|
GETMONTH | ; GET MONTH
|
|
DISPLAY | ; EP - FOR TASKMAN
|
|
PATLOOP | ; DISPLAY PATIENTS UNTIL DONE
|
Name | Field # of Occurrence |
---|---|
^%ZIS | DISPLAY+1 |
^%ZISC | DISPLAY+5, EOJ+1 |
^%ZTLOAD | PATLOOP+14 |
CONF^ACDDEU | DISPLAY2+1 |
DEV^ACDDEU | PATLOOP+18 |
DSPCSH^ACDDEU | DISPLAY2+5 |
DSPHIST^ACDDEU | DSPHIST+3 |
DSPV^ACDDEU | DISPLAY2+5 |
GETVSITS^ACDDEU | PATLOOP+3 |
PAUSE^ACDDEU | PATLOOP+17 |
DIC^ACDFMC | GETPAT+3 |
^ACDKILL | EOJ+2 |
^DIR | GETMONTH+2 |
$$FMADD^XLFDT | PATLOOP+9 |
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) |
---|---|
^ACDVIS - [#9002172.1] | DISPLAY2+5 |
^DPT - [#2] | GETPAT+6 |
^TMP("ACD" | PATLOOP+5, PATLOOP+10, DISPLAY2+5 |
Name | Line Occurrences |
---|---|
DISPLAY | PATLOOP+16, PATLOOP+19 |
DISPLAY2 | DISPLAY+3 |
DSPHIST | PATLOOP+6 |
EOJ | START+2, DISPLAY+7 |
GETMONTH | PATLOOP+7 |
GETPAT | PATLOOP+1 |
PATLOOP | START+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ACDDFN | PATLOOP+5, PATLOOP+11, DISPLAY2+2, GETPAT+6* |
>> ACDDFNP | GETPAT+6* |
>> ACDMONTH | PATLOOP+9, PATLOOP+11, DISPLAY2+5, GETMONTH+5* |
>> ACDQ | START+1, PATLOOP+2, PATLOOP+4, PATLOOP+8, PATLOOP+18, GETPAT+1*, GETPAT+7*, GETMONTH+1*, GETMONTH+6* |
ACDSLAVE | PATLOOP+17, PATLOOP+19, PATLOOP+20!, DISPLAY+1, DISPLAY+5 |
>> ACDSTART | PATLOOP+9*, PATLOOP+10, DISPLAY2+4 |
>> ACDVIEN | DISPLAY2+5* |
>> ACDX | DISPLAY2+4*, DISPLAY2+5* |
>> ACDY | DISPLAY2+5* |
>> AUPNLK("ALL" | GETPAT+2*, GETPAT+4! |
DA | GETMONTH+2! |
>> DIC | GETPAT+3* |
>> DIC("S" | GETPAT+3* |
>> DIC(0 | GETPAT+3* |
DIR | GETMONTH+2! |
DIR("A" | GETMONTH+2* |
DIR(0 | GETMONTH+2* |
>> DIRUT | GETMONTH+3 |
IO | PATLOOP+19, PATLOOP+20*, DISPLAY+2 |
IO("Q" | PATLOOP+12 |
IO(0 | PATLOOP+19, PATLOOP+20 |
IOF | DISPLAY+4 |
>> IOP | DISPLAY+1* |
IOST | PATLOOP+17, DSPHIST+1~, DSPHIST+2*, DISPLAY+4 |
U | DISPLAY2+5, GETPAT+6 |
>> X | PATLOOP+10*, PATLOOP+11 |
>> Y | GETPAT+5, GETPAT+6, GETMONTH+4, GETMONTH+5 |
>> ZTDESC | PATLOOP+13* |
>> ZTDTH | PATLOOP+13* |
>> ZTQUEUED | DISPLAY+7 |
>> ZTREQ | DISPLAY+7* |
>> ZTRTN | PATLOOP+13* |
>> ZTSAVE("ACD*" | PATLOOP+13* |
>> ZTSAVE("^TMP(""ACD"",$J,""VISITS""," | PATLOOP+13* |