PXRRLCD ;ISL/PKR,ALB/Zoltan - PCE Location Encounter reports driver. ;9/22/98
Source file <PXRRLCD.m>
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 1 | PXRR LOCATION ENCOUNTER COUNTS |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOC | ;Get the location list.
|
|
SAVE | ;Save the variables for queing.
|
|
EXIT | ;
|
|
FAC | ;Get the facility list.
|
|
MAIN | ;
|
|
DR | ;Get the date range.
|
|
SCAT | ;Get the service categories.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XTMP( | MAIN+3*, SCAT+20*, SCAT+27* |
Name | Line Occurrences |
---|---|
DR | SCAT+4 |
EXIT | FAC+3, LOC+3, DR+3, SCAT+3, SCAT+10 |
FAC | LOC+4 |
LOC | DR+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | SCAT+7* |
DESC | SCAT+16~, SCAT+17*, SCAT+20, SCAT+22*, SCAT+27 |
DT | MAIN+3 |
>> DTOUT | FAC+3, LOC+3, DR+3, SCAT+3 |
>> DUOUT | FAC+3, LOC+4, DR+4, SCAT+4 |
IO("Q" | SCAT+12 |
IODEV | SCAT+16~, SCAT+18*, SCAT+20, SCAT+23*, SCAT+27 |
IOM | SCAT+11 |
ION | SCAT+11 |
IOSL | SCAT+11 |
IOST | SCAT+11 |
NCS | LOC+1~ |
NFAC | FAC+1~ |
NHL | LOC+1~ |
>> POP | SCAT+10 |
PXRRBDT | DR+1~, DR+2 |
PXRRCS | LOC+1~ |
PXRREDT | DR+1~, DR+2 |
PXRRFAC | FAC+1~ |
PXRRFACN | FAC+1~ |
PXRRIOD | MAIN+1~, SCAT+11*, SCAT+23 |
PXRRLCHL | LOC+1~ |
PXRRLCJB | MAIN+1~ |
PXRRLCSC | LOC+1~, SCAT+24 |
PXRRLCST | MAIN+1~ |
PXRROPT | MAIN+1~ |
PXRRQUE | MAIN+1~, SCAT+12*, SCAT+14 |
PXRRSCAT | SCAT+1~ |
PXRRXTMP | MAIN+1~, MAIN+2*, MAIN+3, SCAT+20, SCAT+27 |
ROUTINE | SCAT+16~, SCAT+19*, SCAT+20, SCAT+24*, SCAT+25*, SCAT+27 |
U | MAIN+3, SCAT+24 |
>> ZTDTH | SCAT+26* |
>> ZTSAVE("NCS" | SAVE+2* |
>> ZTSAVE("NFAC" | SAVE+3* |
>> ZTSAVE("NHL" | SAVE+6* |
>> ZTSAVE("PXRRBDT" | SAVE+1* |
>> ZTSAVE("PXRRCS(" | SAVE+2* |
>> ZTSAVE("PXRREDT" | SAVE+1* |
>> ZTSAVE("PXRRFAC(" | SAVE+3* |
>> ZTSAVE("PXRRFACN(" | SAVE+4* |
>> ZTSAVE("PXRRIOD" | SAVE+5* |
>> ZTSAVE("PXRRLCHL(" | SAVE+6* |
>> ZTSAVE("PXRRLCSC" | SAVE+7* |
>> ZTSAVE("PXRRQUE" | SAVE+8* |
>> ZTSAVE("PXRRSCAT" | SAVE+9* |
>> ZTSAVE("PXRRXTMP" | SAVE+10* |