Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 2 | $$MTHLCK^PSOCSTM EN^PSOHLUP |
| Kernel | 1 | ^%ZTLOAD |
| VA FileMan | 1 | ^%DT |
PSOCSTM ;BHAM ISC/SAB - monthly rx cost compilation ;7/10/06 4:36pm
Source file <PSOCSTM.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 2 | $$MTHLCK^PSOCSTM EN^PSOHLUP |
| Kernel | 1 | ^%ZTLOAD |
| VA FileMan | 1 | ^%DT |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Outpatient Pharmacy | 3 | PSO COSTMONTH PSOCSTD PSOCSTM |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BEG | ||
| END | ||
| START | ||
| SRCH | ||
| Q | ||
| SRCH1 | ||
| INI | ||
| VST | ||
| CHK | ||
| SF | ||
| SET | ||
| SET1 | ||
| QUES | ||
| ZNODE | ;update zero nodes
|
|
| MTHLCK(GET) | ;lock for month end run or query if month end is running
; INPUT: GET = 1 try to get lock and keep locked ; 0 query if locked only, leave as unlocked ; RETURNS: 1 - already locked ; 0 - was not already locked |
|
| G | ;;
|
|
| D | ;;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | CHK+2 |
| ^PS(53 - [#53] | CHK+7 |
| ^PS(55 - [#55] | CHK+2 |
| ^PS(59 - [#59] | INI, CHK+5 |
| ^PSCST - [#50.9] | START+3!, START+4!, SET*, SET1*, SET1+1*, ZNODE+1, ZNODE+2, ZNODE+3, ZNODE+4*, ZNODE+5* |
| ^PSCST("B" | START+3!, START+4!, SRCH+1, SET* |
| ^PSCST(0 | SRCH+2* |
| ^PSDRUG - [#50] | CHK+3, CHK+9, CHK+16, CHK+23 |
| ^PSOCSTM | END+4, Q+2, MTHLCK+8, MTHLCK+9 |
| ^PSRX - [#52] | CHK, CHK+1, CHK+11, CHK+12, CHK+13, CHK+20, CHK+21 |
| ^PSRX("AL" | SRCH1+3, SRCH1+4, SRCH1+5, CHK!, CHK+20! |
| ^PSRX("AM" | SRCH1+8, SRCH1+9, SRCH1+10, CHK+11! |
| ^SC - [#44] | CHK+8 |
| ^TMP($J | START+1!, Q!, VST, VST+1, VST+2!, SF* |
| ^VA(200 - [#200] | CHK+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | BEG*, END*!, Q! |
| %DT("A" | BEG*, END* |
| %DT(0 | END* |
| A | Q! |
| A( | START+1*, SF+1, SF+2 |
| A1 | Q+1! |
| A1( | START+1*, SF+3* |
| AST | MTHLCK+11~*, MTHLCK+13, MTHLCK+16 |
| B | Q! |
| B( | START+1*, SF+1, SF+3 |
| B1 | Q+1! |
| B1( | START+1*, SF+3 |
| BDT | PSOCSTM+10!, BEG+1*, END, END+3!, START+3, START+4, SRCH, Q!, ZNODE+1 |
| >> BEGDATE | ZNODE+1 |
| C | Q+1! |
| C( | START+2*, SF+4, SF+5 |
| C1 | Q+1! |
| C1( | START+2*, SF+6* |
| CDT | Q+1!, SRCH1+4*, SRCH1+5, SRCH1+9*, SRCH1+10 |
| CLINIC | Q+1!, CHK+8*!, SF+1 |
| COST | Q!, CHK+9*, CHK+16*, CHK+18*, CHK+23*, SF |
| D | Q+1! |
| D( | START+2*, SF+4, SF+6 |
| D1 | Q+1! |
| D1( | START+2*, SF+6 |
| DATA | Q!, SF*, SF+2, SF+5 |
| DATA1 | Q!, SF+1*, SF+2, SF+4*, SF+5 |
| DATA2 | Q!, SF+1*, SF+2*, SF+4*, SF+5* |
| DFN | Q!, VST+1*, CHK+2*, SF |
| DIV | Q+1!, CHK+5*, CHK+13*, CHK+24*, SF |
| DRG | Q!, CHK+3*, CHK+9, CHK+16, CHK+23 |
| DT | PSOCSTM+10, SET1 |
| DV | Q+1!, INI*, VST*, VST+1, SET1+1* |
| EDT | PSOCSTM+10!, END+1*, END+3!, START+3, START+4, SRCH, Q!, ZNODE+1 |
| G | END+2*, END+3! |
| GET | MTHLCK~, MTHLCK+9, MTHLCK+10 |
| GOTLOCK | MTHLCK+7~, MTHLCK+8*, MTHLCK+9, MTHLCK+10 |
| I | START+1*, START+2*, Q!, SF+1*, SF+2, SF+3, SF+4*, SF+5, SF+6 |
| II | Q!, SF+2*, SF+5* |
| LATE | PSOCSTM+10*, BEG, END, Q! |
| ML | Q!, CHK+15*, CHK+18*, CHK+22*, SF |
| ND | ZNODE+1*, ZNODE+2, ZNODE+3, ZNODE+4, ZNODE+5, ZNODE+6! |
| NDT | Q+1!, SRCH1+5*, SRCH1+10* |
| NDZ | ZNODE+1*, ZNODE+2*, ZNODE+5*, ZNODE+6! |
| NDZ1 | ZNODE+3*, ZNODE+4*, ZNODE+6! |
| NDZ2 | ZNODE+2*, ZNODE+3, ZNODE+4, ZNODE+6! |
| NODE | ZNODE+6! |
| NODE( | ZNODE+1*, ZNODE+2*, ZNODE+3*, ZNODE+4, ZNODE+5 |
| OR | Q!, CHK+15*, CHK+18*, CHK+22*, SF |
| PAR | SRCH1+9*, SRCH1+10!, CHK+10 |
| PAST | Q!, CHK+7* |
| PGM | Q+1! |
| PHYS | Q!, CHK+6*, CHK+14*, CHK+24* |
| >> PR | CHK+10* |
| PSD | START+2*, SRCH+1*, SRCH+2, Q!, SF+4 |
| PSDT | START+3*, START+4*, SRCH*, SRCH+1*, Q!, SRCH1+2, SRCH1+3, SRCH1+7, SRCH1+8, CHK , CHK+11, CHK+20, SET, SET1, SET1+1, ZNODE+1*, ZNODE+2, ZNODE+3, ZNODE+4, ZNODE+5 |
| PSDT1 | Q!, SRCH1+2*, SRCH1+3*, SRCH1+4, SRCH1+5, SRCH1+7*, SRCH1+8*, SRCH1+9, SRCH1+10 |
| PSDTX | SRCH*, Q!, SRCH1+3, SRCH1+8 |
| PSG | START+1*, Q!, SF+1 |
| PSOCNT | SRCH+1*, SRCH+2, Q! |
| QTY | Q!, CHK+15*, CHK+16, CHK+18*, CHK+22*, CHK+23, SF |
| RF | Q!, CHK+15*, CHK+18*, CHK+22*, SF |
| RX0 | Q!, CHK+1*, CHK+2, CHK+3, CHK+6, CHK+7, CHK+8, CHK+9, CHK+14, CHK+18 , CHK+24 |
| RX1 | Q+1!, CHK+13*, CHK+14, CHK+15, CHK+16, CHK+21*, CHK+22, CHK+23, CHK+24 |
| RX2 | Q+1!, CHK+1*, CHK+5, CHK+13, CHK+17, CHK+24 |
| RXF | Q!, SRCH1+4*, SRCH1+9*, CHK, CHK+11, CHK+12, CHK+13, CHK+17, CHK+19, CHK+20 , CHK+21 |
| RXN | Q+1!, SRCH1+4*, SRCH1+9*, CHK, CHK+1, CHK+11, CHK+12, CHK+13, CHK+20, CHK+21 |
| STOP | START+4*, START+5! |
| VAL | Q+1! |
| VALUE | Q+1!, SF+2*, SF+5* |
| VAR | Q+1! |
| VIS | Q+1!, INI! |
| VIS( | INI*, VST+1*, SET1+1 |
| VISITS | Q+1!, INI*, VST+1*, SET1 |
| WD | Q+1!, CHK+15*, CHK+18*, CHK+22*, SF |
| X | START+1*, START+2*, Q+1! |
| X1 | Q+1! |
| X2 | Q+1! |
| Y | BEG, BEG+1, END, END+1, Q+1! |
| ZTDESC | END+2*, END+3! |
| ZTIO | END+2*, END+3! |
| >> ZTQUEUED | Q+1, MTHLCK+6, MTHLCK+12 |
| >> ZTREQ | Q+1* |
| ZTRTN | END+2*, END+3! |
| ZTSAVE | END+3! |
| ZTSAVE( | END+2* |
| >> ZTSK | END+3 |
