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 |