PXRRLCSC ;ISL/PKR - PCE reports locations selection criteria routines. ;4/8/97
Source file <PXRRLCSC.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | ^DIC $$GET1^DIQ ^DIR |
PCE Patient Care Encounter | 1 | $$SORT^PXRRUTIL |
Registration | 1 | $$SITE^VASITE |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
BYLOC | ;Ask if the report should be broken down by clinic location or clinic
|
|
CSTOP | ;Get a list of clinic stop codes.
|
|
NSTOP | ;Select the clinic stop codes.
|
|
FACILITY | ;Get the facility list.
|
|
FAC | ;Select the facilities.
|
|
HLOC | ;Build a list of hospital locations.
|
|
NHLOC | ||
LOC(ADEF,BDEF) | ;Establish the location selection criteria.
|
|
LOC0 | ||
NEWPAGE | ;Allow the user to decide if they want each location to start on a new
|
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 |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^SC - [#44] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | NHLOC+9 |
^SC - [#44] | NHLOC+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADEF | LOC~, LOC0+5 |
BDEF | LOC~, LOC0+6 |
DIC | NSTOP+1*, NSTOP+4!, FAC+1*, FAC+4!, HLOC+4*, NHLOC+16! |
DIC("A" | CSTOP+3*, NSTOP+3*, FACILITY+5*, FAC+3*, HLOC+6*, NHLOC* |
DIC("B" | FACILITY+4* |
DIC(0 | NSTOP+2*, FAC+2*, HLOC+5* |
DIR | BYLOC+8!, FAC+24!, LOC0+7!, NEWPAGE+8! |
DIR("A" | BYLOC+6*, FAC+22*, LOC0+5*, NEWPAGE+5* |
DIR("B" | BYLOC+7*, FAC+23*, LOC0+6*, NEWPAGE+6* |
DIR(0 | BYLOC+4*, BYLOC+5*, FAC+19*, FAC+20*, LOC0+1*, LOC0+2*, LOC0+3*, LOC0+4*, NEWPAGE+4* |
DIROUT | BYLOC+3!, BYLOC+10, LOC0!, LOC0+8, NEWPAGE+3!, NEWPAGE+9 |
DIRUT | BYLOC+3!, FACILITY+2!, LOC0!, NEWPAGE+3! |
DTOUT | BYLOC+3!, BYLOC+10*, BYLOC+11, CSTOP+1!, NSTOP+5*, NSTOP+6, FACILITY+2!, FAC+5*, FAC+6, HLOC+2! , NHLOC+2*, NHLOC+3, LOC0!, LOC0+8*, LOC0+9, LOC0+14, LOC0+17, NEWPAGE+3!, NEWPAGE+9*, NEWPAGE+10 |
DUOUT | BYLOC+3!, BYLOC+11, CSTOP+1!, NSTOP+6, FACILITY+2!, FAC+6, HLOC+2!, NHLOC+3, NHLOC+17, LOC0! , LOC0+9, LOC0+15, LOC0+18, NEWPAGE+3!, NEWPAGE+10 |
IC | FACILITY+1~, FAC+12*, FAC+13, FAC+16 |
IEN | HLOC+1~, NHLOC+6*, NHLOC+8, NHLOC+13, NHLOC+15 |
>> NCS | CSTOP+2*, NSTOP+3, NSTOP+7, NSTOP+9*, NSTOP+11, NSTOP+13* |
>> NFAC | FACILITY+3*, FAC+3, FAC+8*, FAC+9, FAC+12, FAC+26*, FAC+28, FAC+32* |
>> NHL | HLOC+3*, NHLOC, NHLOC+5*, NHLOC+13, NHLOC+15, NHLOC+18, NHLOC+20* |
>> NONVA | FAC+29* |
>> PXRRCS( | NSTOP+11* |
>> PXRRFAC( | FAC+9*, FAC+13, FAC+16, FAC+28* |
>> PXRRFACN( | FAC+16* |
>> PXRRFACN("*" | FAC+27* |
>> PXRRLCHL( | NHLOC+13*, NHLOC+15* |
>> PXRRLCNP | NEWPAGE+11* |
>> PXRRLCSC | BYLOC+9*, LOC0+10* |
SC | HLOC+1~, NHLOC+9*, NHLOC+10*, NHLOC+11*, NHLOC+13, NHLOC+15 |
STATION | FACILITY+1~, FAC+15*, FAC+16 |
U | BYLOC+4, BYLOC+9, NSTOP+5, NSTOP+11, FACILITY+4, FAC+5, FAC+9, FAC+13, FAC+16, FAC+19 , NHLOC+2, NHLOC+6, NHLOC+8, NHLOC+9, NHLOC+13, NHLOC+15, LOC0+1, LOC0+10, NEWPAGE+11 |
X | BYLOC+2~, NSTOP+5, FACILITY+1~, FAC+5, FAC+13*, FAC+15, FAC+16, HLOC+1~, NHLOC+2, NHLOC+8* , NHLOC+9, LOC+1~, NEWPAGE+2~ |
Y | BYLOC+2~, BYLOC+9, NSTOP+7, NSTOP+8, NSTOP+11, FACILITY+1~, FAC+7, FAC+9, FAC+25, HLOC+1~ , NHLOC+4, NHLOC+6, NHLOC+18, LOC+1~, LOC0+10, LOC0+13, LOC0+16, NEWPAGE+2~, NEWPAGE+11 |
Y(0 | NSTOP+11, FAC+9, NHLOC+13, NHLOC+15, LOC0+10, NEWPAGE+11 |