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 |