PSOHLDS3 ;BHAM ISC/SAB,LC,PWC - BUILD PROFILE FOR AUTOMATED INTERFACE ;4/13/05 1:53pm
Source file <PSOHLDS3.m>
| Package | Total | Call Graph | 
|---|---|---|
| Outpatient Pharmacy | 4 | CUTDATE^PSOFUNC LAST^PSORFL FSIG^PSOUTLA EN2^PSOUTLA1 | 
| VA Fileman | 3 | ^%DT C^%DTC ^DIC | 
| Package | Total | Caller Graph | 
|---|---|---|
| Outpatient Pharmacy | 2 | PSOHLDS2 PSOHLDS4 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ISSD | ||
| DRNME | ||
| PRT | ||
| START2 | ;build NTE for drug interactions | |
| PEND | ;include pending orders in profile | |
| RXPNO | ||
| CHK | ||
| SPACE(PLN,CLN) | ;check if a space should be inserted between lines of text ; Input: PLN - previous line of text ; CLN - current line of text to be appended to previous ; function return: 0 - do not insert space ; 1 - insert space | |
| START | ;build profile for the NTE4 segment | |
| PPP | ||
| SIG | ;Format Sig | |
| START3 | ;build NTE for drug allergy warning label                    ;PSO*198 | |
| SD | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PS(50.606 - [#50.606] | PEND+6 | 
| ^PS(50.7 - [#50.7] | PEND+6 | 
| ^PS(52.4 - [#52.4] | START2+3, START2+9 | 
| ^PS(52.41 - [#52.41] | PEND+2, PEND+4 | 
| ^PS(55 - [#55] | START+5 | 
| ^PS(56 - [#56] | START2+4, START2+10 | 
| ^PSDRUG - [#50] | CHK+4, PEND+6, START2+6, START2+12, START3+4, START3+7 | 
| ^PSRX - [#52] | START+5, RXPNO, CHK+1, PRT+2, PRT+3, SIG+1, START2+2, START2+5, START2+6, START2+9 , START2+11, START2+12, START3+4, START3+7 | 
| ^TMP("PSO" | PRT+5*, PRT+6*, PRT+7*, PEND+11* | 
| ^TMP($J | START+2!, START+6, SD, PPP+1!, DRNME, ISSD, RXPNO, CHK+4* | 
| Name | Line Occurrences | 
|---|---|
| CHK | START+5 | 
| DRNME | SD, DRNME | 
| ISSD | DRNME | 
| PEND | PPP | 
| PPP | START+6 | 
| PRT | RXPNO | 
| RXPNO | ISSD, RXPNO | 
| SIG | PRT+4 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | START+5, RXPNO | 
| ^("STA" | START+5 | 
| ^(0 | RXPNO, CHK+4, PEND+6 | 
| ^(2 | START+5, RXPNO | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> %DT | START+4* | 
| A | PPP+2! | 
| B | PPP+2! | 
| BSIG | SIG+1!, SIG+4! | 
| BSIG( | SIG+3 | 
| CCHR2 | SPACE+8~, SPACE+13*, SPACE+15, SPACE+17, SPACE+19 | 
| CLN | SPACE~, SPACE+11, SPACE+13 | 
| CNT | SD*, PPP+3!, PRT+6, PRT+7, PRT+8*, PEND+11, PEND+12* | 
| >> CS | PRT+6, PRT+7, PEND+6, PEND+7, PEND+9, PEND+10, START2+7, START2+8, START2+13, START2+14 , START2+15, START3+5, START3+8, START3+9 | 
| DARX | START3+4*, START3+5, START3+7*, START3+8, START3+10! | 
| >> DAW | START3+1 | 
| >> DFN | START+1, START+3, START+5, PEND+2 | 
| DIC | PRT+1!*, PEND+8!* | 
| DIC(0 | PRT+1*, PEND+8* | 
| >> DIN | START3+3, START3+6 | 
| DIRX | START2+5*, START2+7, START2+8, START2+11*, START2+13, START2+14, START2+16! | 
| DRG | START2+6*, START2+7, START2+8, START2+12*, START2+13, START2+14, START2+16!, START3+4*, START3+5, START3+7* , START3+8, START3+10! | 
| DRNME | SD*, PPP+2!, DRNME*, ISSD, RXPNO, CHK+4*, PRT+6 | 
| DRP | PPP+2!, CHK+4* | 
| >> DT1 | START+4*, PRT+3 | 
| EXP | START+4*, PPP+2! | 
| EXPS | START+4*, PPP+2!, CHK+3 | 
| >> FS | PRT+5, PRT+7, START3+2 | 
| FSIG | PRT+4*, PRT+7, SIG+1! | 
| FSIG( | SIG+3*, PEND+10 | 
| FSIG("" | PRT+4 | 
| FSIG(1 | PEND+10 | 
| FSIGZZ | PEND+1~, PEND+10* | 
| GGGGG | SIG+3*, SIG+4!, PEND+1~ | 
| I | PPP+2! | 
| >> IDGN | START3+4, START3+7 | 
| II | START+2~, PPP+2!, CHK+1*, PRT+2* | 
| >> ING( | START3+9 | 
| INGRE | START3+9*, START3+10! | 
| >> IRXN | START2+2, START3+4, START3+7 | 
| ISSD | PPP+2!, ISSD*, RXPNO, CHK+3*, CHK+4, PRT+6 | 
| J | PPP+2!, CHK+3* | 
| LINE | PPP+2! | 
| LN | PPP+2! | 
| MESS | PPP+2! | 
| MJK | PPP+2!, PRT+2* | 
| NEW1 | START+4*, PPP+2!, CHK+3 | 
| NEW11 | START+4*, PPP+2!, CHK+3 | 
| >> NTE4 | PRT+5* | 
| >> NTE5 | START2+7*, START2+8*, START2+13*, START2+14*, START2+15* | 
| >> NTE6 | START3+2*, START3+5*, START3+8*, START3+9* | 
| PCHR2 | SPACE+8~, SPACE+12*, SPACE+14, SPACE+16, SPACE+18 | 
| PEND | PPP+3!, PEND+6*, PEND+7*, PEND+9*, PEND+10*, PEND+11 | 
| PHYS | PPP+2!, PRT+2*, PRT+7 | 
| PLN | SPACE~, SPACE+9, SPACE+10, SPACE+12 | 
| POP | PPP+2! | 
| PPPPP | PEND+1~, PEND+2* | 
| PQTY | PPP+2!, PRT*, PRT+7 | 
| >> PSI | PRT+5, PRT+6, PRT+7, PEND+11 | 
| >> PSODFN | START+3* | 
| PSODTCUT | START+3, PPP+3!, CHK, CHK+1 | 
| PSOPRPAS | PPP+3!, CHK+2 | 
| PSOSERV | START2+1!, START2+4*, START2+15 | 
| PSPCOUNT | PEND+1~, PEND+2* | 
| PSPPEND | PEND+1~, PEND+2* | 
| PSPPEND( | PEND+2*, PEND+4, PEND+10 | 
| PSPPEND(0 | PEND+3 | 
| PSPROSIG | SIG+1*, SIG+2, SIG+4! | 
| PSPSTAT | PEND+1~, PEND+2* | 
| PSSODRUG | PEND+1~ | 
| PZXZERO | PEND+1~, PEND+4*, PEND+5, PEND+7, PEND+8, PEND+9 | 
| PZZDRUG | PEND+1~, PEND+5*, PEND+6 | 
| PZZODRUG | PPP+3!, PEND+5*, PEND+6 | 
| RFDATE | PPP+3!, CHK+1 | 
| RFL | PPP+2!, PRT+7 | 
| RFS | PPP+2!, PRT*, PRT+7 | 
| >> RS | START2+8, START2+14, START3+9 | 
| RX | START2+2*, START2+3, START2+9, START2+16! | 
| RXF | PPP+2!, PRT+2*, PRT+7 | 
| RXNN | START+5*, PPP+2!, RXPNO*, CHK+1, CHK+3, CHK+4, PRT+2, PRT+3, SIG+1, SIG+2 , SIG+3 | 
| RXPNO | PPP+2!, ISSD*, RXPNO*, CHK+3*, CHK+4, PRT+6 | 
| RXPX | START+5*, PPP+2!, RXPNO*, CHK+2, CHK+3, CHK+4, PRT, PRT+1 | 
| RXPX2 | START+5*, PPP+2!, RXPNO*, CHK, PRT+3 | 
| RXX | START+5*, PPP+2!, START2+16! | 
| RXX( | START2+3*, START2+5, START2+6, START2+9*, START2+11, START2+12 | 
| RXY | START2+2*, START2+16! | 
| SCRIPT | START2+3*, START2+9*, START2+16! | 
| SD | SD*, PPP+3!, DRNME, ISSD, RXPNO, CHK+4*, PRT+6 | 
| SER | START2+4*, START2+5, START2+10*, START2+11, START2+16! | 
| SEV | START2+3*, START2+9*, START2+16! | 
| SEV( | START2+3*, START2+4, START2+9*, START2+10 | 
| SIG | PPP+3! | 
| STA | PPP+3!, PRT+3*, PRT+7 | 
| TSTC | SPACE+8~, SPACE+19*, SPACE+20 | 
| TSTP | SPACE+8~, SPACE+18*, SPACE+20*, SPACE+21, SPACE+22 | 
| TTTT | PPP+2! | 
| TYP | START2+5*, START2+7, START2+8, START2+11*, START2+13, START2+14, START2+16! | 
| X | START+4*, PPP+3!, PRT+1!*, PEND+8!*, START2+3*, START2+4, START2+5, START2+6, START2+7, START2+8 , START2+9*, START2+10, START2+11, START2+12, START2+13, START2+14 | 
| X1 | START+4*, PPP+3! | 
| X2 | START+4*, PPP+3! | 
| XY | START3+9*, START3+10! | 
| Y | START+4, PPP+3!, PRT+1!, PRT+2, PEND+8!, PEND+9 | 
| Z | START+4*, PPP+3! | 
| ZXXX | PEND+1~, PEND+4*, PEND+10 |