©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
APSPDSC ; IHS/DSD/ENM - PRINT DISCHARGE SHEET ;29-Jan-2004 08:56;PLS
Source file <APSPDSC.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | C^%DTC ^DIC ^DIR |
| Kernel | 2 | ^%ZIS ^%ZTLOAD |
| Outpatient Pharmacy | 2 | ^PSOBUILD ^PSODSPL |
| IHS Changes To Pharmacy | 1 | ^APSPDSC1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| END | ||
| QUES | ;
|
|
| PATX | ;
|
|
| ASKX | ;Exit for ASK subroutine
|
|
| COPIES | ;
|
|
| START | ||
| INIT | ;
|
|
| EOJ | ;EP
|
|
| ASK | ;
|
|
| PAT | ;
|
|
| DEVICE | ;
|
|
| COPIESX | ;
|
|
| DEVICEX | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^AUPNPAT - [#9000001] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | INIT+6 |
| ^DIC(4 - [#4] | INIT+7 |
| ^DPT - [#2] | PAT+6 |
| ^PS(55 - [#55] | PAT+4 |
| Name | Line Occurrences |
|---|---|
| APSPDSC | START+4, START+6, START+7 |
| ASK | START+4, ASK+6, ASK+7 |
| ASKX | ASK+3, ASK+5 |
| COPIES | START+6 |
| COPIESX | COPIES+4 |
| DEVICE | START+7, DEVICE+4 |
| DEVICEX | DEVICE+3, DEVICE+5 |
| END | START, START+3 |
| EOJ | START+6, START+7, END |
| INIT | APSPDSC+3 |
| PAT | START, PAT+3, PAT+4 |
| PATX | PAT+2 |
| QUES | ASK+6, ASK+7 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | INIT+7, PAT+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | DEVICE+1*, EOJ+1! |
| %ZIS("A" | DEVICE+2* |
| APS | ASK+12*, ASKX+1!, EOJ+1! |
| APS1 | ASK+12*, ASK+13, ASK+15, ASKX+1!, EOJ+1! |
| APS2 | ASK+13*, ASK+15, ASKX+1!, EOJ+1! |
| APS3 | ASK+13*, ASK+14*, ASK+16, ASKX+1!, EOJ+1! |
| APSF | DEVICE+7*, EOJ+1! |
| APSPAGE | INIT+5*, EOJ+1! |
| APSPDSC | EOJ+1! |
| APSPDSC("COPIES" | COPIES+5* |
| APSPDSC("DATE" | INIT+6* |
| APSPDSC("FAC" | INIT+7* |
| APSPDSC("FLG" | START, START+3*, START+4, START+6, START+7, INIT+1*, INIT+3*, PAT+2*, ASK+3*, ASK+5* , DEVICE+3*, DEVICE+11*, COPIES+4* |
| APSPDSC("NAME" | PAT+6* |
| APSPDSC("ST" | START+2* |
| >> APSPZDT | ASK+2 |
| APSX | ASK+16*, EOJ+1! |
| DIC | PAT+1*!, EOJ+1! |
| DIC(0 | PAT+1* |
| DIR | ASK+1!, ASK+2!, COPIESX+1!, EOJ+4! |
| DIR("?" | ASK+2* |
| DIR("A" | ASK+2*, COPIES+2* |
| DIR("B" | COPIES+2* |
| DIR(0 | ASK+2*, COPIES+1* |
| DIRUT | ASK+3, COPIES+4, EOJ+4! |
| DR | PAT+1! |
| DRG | EOJ+3! |
| DRX0 | EOJ+3! |
| DT | INIT+2, INIT+6 |
| DTOUT | ASK+3, COPIES+4, EOJ+4! |
| >> DUOUT | ASK+3 |
| DUZ(2 | INIT+7 |
| IO | DEVICE+4 |
| IO("Q" | DEVICE+4!, DEVICE+5, EOJ+2! |
| IO(0 | DEVICE+4 |
| ION | DEVICE+8 |
| POP | DEVICE+3!, EOJ+2! |
| PS | EOJ+3! |
| PSC | EOJ+3! |
| PSEED | INIT+2*, EOJ+1! |
| PSFROM | INIT+3*, EOJ+2! |
| PSISD | EOJ+3! |
| PSLC | EOJ+3! |
| PSODFN | INIT+3!, PAT+5*, PAT+6, EOJ+1! |
| >> PSOOPT | INIT+4* |
| PSOSD | START+3, INIT+3!*, ASK+7, EOJ+1!, EOJ+2! |
| PSOSD("ACTIVE" | ASK+14, ASK+16 |
| PSRXS | ASK+4*, ASK+5, ASK+6, ASK+7, ASK+12, EOJ+2! |
| REFRM | EOJ+3! |
| RX0 | EOJ+3! |
| RX2 | EOJ+3! |
| RX3 | EOJ+3! |
| ST | EOJ+3! |
| ST0 | EOJ+3! |
| STAR | EOJ+3! |
| U | INIT+7, PAT+6, ASK+16 |
| W | EOJ+3! |
| X | INIT+2!, PAT+2, ASK+1!, EOJ+2! |
| X1 | INIT+2*!, EOJ+2! |
| X2 | INIT+2*!, EOJ+2! |
| Y | INIT+6*, PAT+3, PAT+4, PAT+5, ASK+4, COPIES+5, EOJ+2! |
| Z0 | EOJ+3! |
| Z1 | EOJ+3! |
| ZTDESC | DEVICE+9*, EOJ+2! |
| ZTIO | DEVICE+8*, EOJ+2! |
| ZTRTN | DEVICE+8*, EOJ+2! |
| ZTSAVE | DEVICE+6!, EOJ+2! |
| ZTSAVE( | DEVICE+7* |