PSODOSUN ;BIR/RTR - Dose Check Utility routine ;11/18/08
Source file <PSODOSUN.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 2 | EN^PSODOSU2 $$GETGN^PSODOSUN |
VA FileMan | 2 | ^DIR ^DIWP |
Kernel | 1 | SIG^XUSESIG |
Pharmacy Data Management | 1 | DATA^PSS50 |
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 | PSODOSUN PSODOSUT PSONEW2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DOSE() | ;Write Dose output for renew, finish, copy, etc.
|
|
END | ;
|
|
SIG1 | ;
|
|
END2 | ;
|
|
EVAL(PSODLINS,PSODLINR,PSODLINX) | ;
|
|
DOSEX(PSODLXNT) | ;Write Dose exceptions for order entry/edit
|
|
ENDX | ;
|
|
ENDX2 | ;
|
|
DOSEZ() | ;Write Dose output summary for complex orders
|
|
ENDZ | ;
|
|
ENDZC | ;
|
|
SIG2 | ;
|
|
ENDZ2 | ;
|
|
HD | ;
|
|
MESG | ;Write out System error heading
|
|
GETGN(PSODRIEN) | ;get generic name
|
|
PROMPT | ;
|
|
RETURN | ;
|
|
HD3(PSOLINES,OVRRID) | ;
|
|
MSG1 | ;
|
|
MSG2 | ;
|
|
MSG3 | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP($J | DOSE+7, DOSE+9, END+12!, DOSEX+6, DOSEX+8, DOSEZ+12, DOSEZ+14, ENDZC+5!, GETGN+1!, GETGN+3 |
^UTILITY($J | DOSE+9!, DOSE+10, DOSE+11!, DOSEX+8!, DOSEX+9, DOSEX+10!, DOSEZ+14!, DOSEZ+15, DOSEZ+16! |
^XUSEC("PSORPH" | END+7, END+10, ENDX+9, ENDX+14, ENDX+22, ENDX+25, ENDZ+8, ENDZC+2, HD+3, PROMPT+6 , PROMPT+8, PROMPT+13, PROMPT+14, PROMPT+17, PROMPT+18, RETURN+1 |
Name | Line Occurrences |
---|---|
$$EVAL | END+10, ENDX+22, ENDZC+2 |
$$GETGN | ENDZC+5 |
END | DOSE+7 |
ENDX | DOSEX+6 |
ENDX2 | ENDX+24 |
ENDZ | DOSEZ+12 |
ENDZ2 | ENDZC+3 |
HD | DOSE+8, DOSE+10, DOSEX+7, DOSEX+9, DOSEZ+13, DOSEZ+15, MESG+1 |
MESG | DOSE+8, DOSEX+7, DOSEZ+13 |
MSG1 | SIG1+2, SIG2+2 |
MSG2 | SIG1+3, SIG2+3 |
PROMPT | END+5, ENDZ+4 |
RETURN | ENDX+10, ENDX+18, PROMPT+4, PROMPT+10, PROMPT+15, PROMPT+19 |
SIG1 | SIG1+2 |
SIG2 | SIG2+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIR | DOSE+1~, END+4!, END+8!, END+11!, END+14!, DOSEX+1~, ENDX+25!, DOSEZ+3~, ENDZ+9!, ENDZC+4! , ENDZC+7!, HD+2~, HD+4!, RETURN+2!, HD3+1~, HD3+4~!, MSG3+1~, MSG3+2! |
DIR("?" | END+13*, ENDZC+6* |
DIR("A" | END+8*, END+12*, ENDX+25*, ENDZ+9*, ENDZC+5*, HD+4*, RETURN+2*, HD3+4*, MSG3+2* |
DIR("B" | END+8*, END+11*, ENDX+25*, ENDZ+9*, ENDZC+4*, HD+4* |
DIR(0 | END+8*, END+11*, ENDX+25*, ENDZ+9*, ENDZC+4*, HD+4*, RETURN+2*, HD3+4*, MSG3+2* |
DIROUT | DOSE+1~, DOSEX+1~, DOSEZ+3~, HD+2~, HD3+4~ |
DIRUT | DOSE+1~, DOSEX+1~, DOSEZ+3~, HD+2~, HD3+4~ |
DIWF | DOSE+8~, DOSEX+7~, DOSEZ+13~ |
DIWL | DOSE+8~, DOSE+9*, DOSE+10, DOSEX+7~, DOSEX+8*, DOSEX+9, DOSEZ+13~, DOSEZ+14*, DOSEZ+15 |
DIWR | DOSE+8~, DOSE+9*, DOSEX+7~, DOSEX+8*, DOSEZ+13~, DOSEZ+14* |
DTOUT | DOSE+1~, END+7, END+15, DOSEX+1~, ENDX+25, DOSEZ+3~, ENDZ+8, ENDZC+8, HD+2~, HD+3 , HD3+1~, HD3+4~, HD3+5 |
DUOUT | DOSE+1~, END+7, END+15, DOSEX+1~, ENDX+25, DOSEZ+3~, ENDZ+8, ENDZC+8, HD+2~, HD+3 , HD3+1~, HD3+4~, HD3+5 |
DUZ | END+7, END+10, ENDX+9, ENDX+14, ENDX+22, ENDX+25, ENDZ+8, ENDZC+2, HD+3, PROMPT+6 , PROMPT+8, PROMPT+13, PROMPT+14, PROMPT+17, PROMPT+18, RETURN+1 |
IOF | DOSE+7, DOSEX+3, DOSEZ+5, HD+5, RETURN+2, HD3+6 |
IOSL | HD+1, PROMPT+4, HD3+3 |
MSGX | MSG3+1~ |
OVRRID | HD3~, HD3+2*, HD3+3, HD3+4! |
>> PSOCKCON | ENDX+8 |
>> PSOCOPY | DOSE+7, ENDX+15, ENDX+16, DOSEZ+7, ENDZC+3 |
>> PSOCPXB | DOSE+6, DOSEX+5, ENDX+17, DOSEZ+8, DOSEZ+10, DOSEZ+11, ENDZ+6, PROMPT+9, PROMPT+14, PROMPT+18 |
PSOCPXC | DOSE+2~, DOSE+4*, DOSE+5*, DOSE+6*, DOSEX+5*, DOSEZ+2~, DOSEZ+6*, DOSEZ+8*, DOSEZ+10*, DOSEZ+13 , DOSEZ+15 |
>> PSOCPXD | ENDX+15 |
PSOCPXF | DOSE+2~, DOSE+4*, DOSEZ+2~, DOSEZ+6*, ENDZ+6 |
PSOCPXG | DOSE+2~, DOSE+4*, DOSEZ+2~ |
PSOCPXH | DOSEZ+2~, DOSEZ+6* |
PSOCPXRR | DOSE+2~, DOSE+13!, ENDX+3!, DOSEZ+2~ |
>> PSOCPXV | ENDX+16, ENDX+17, ENDX+23 |
PSODAILY | END+4!, ENDZ+2! |
>> PSODCAN | PROMPT+14, PROMPT+18 |
PSODCONT | DOSEX+2~, DOSEX+3*, ENDX+23 |
PSODELNX | DOSE+2~, DOSEX+2~, DOSEZ+2~ |
PSODELXF | DOSE+8~, DOSE+10*, DOSEX+7~, DOSEX+9*, DOSEZ+13~, DOSEZ+15* |
PSODELXR | DOSE+8~, DOSE+10*, DOSEX+7~, DOSEX+9*, DOSEZ+13~, DOSEZ+15* |
PSODLALZ | DOSE+1~, DOSE+4*, END+2, ENDX+4, ENDX+24, ENDZ+3 |
>> PSODLBD4 | ENDX+24, DOSEZ+7, ENDZC+3 |
PSODLECT | DOSE+2~, DOSEZ+4~ |
PSODLERA | DOSE+1~, DOSEX+1~, DOSEZ+3~ |
PSODLERB | DOSE+1~, DOSEX+1~, DOSEZ+3~ |
PSODLERF | DOSE+1~, DOSE+4*, DOSEX+1~, DOSEX+3*, DOSEZ+3~, DOSEZ+6* |
PSODLERR | DOSE+2~, DOSE+4*, END+2, ENDX+4, ENDZ+3 |
PSODLERX | DOSE+2~, DOSEX+2~, DOSEZ+4~ |
PSODLERZ | DOSE+1~, DOSE+4*, DOSEX+1~, DOSEX+3*, DOSEZ+3~, DOSEZ+6* |
PSODLESM | DOSEZ+2~ |
PSODLEXR | DOSE+2~, DOSEZ+4~ |
PSODLFLG | DOSE+1~, DOSE+7*, END+2, END+3, DOSEX+6*, ENDX+4, ENDX+9, ENDX+14, ENDX+21, ENDX+22 , DOSEZ+11, DOSEZ+12*, ENDZ+3, PROMPT+7, PROMPT+12, PROMPT+17 |
PSODLINR | DOSE+1~, DOSE+4*, END+6, END+9, END+10, END+17, END2+2, EVAL~, EVAL+1, DOSEX+1~ , DOSEX+3*, ENDX+22, ENDX+24, DOSEZ+3~, DOSEZ+6*, ENDZ+5, ENDZC+1, ENDZC+2, ENDZ2+2 |
PSODLINS | DOSE+1~, DOSE+4*, END+6, END+9, END+10, END+17, END2+2, EVAL~, EVAL+1, DOSEX+1~ , DOSEX+3*, ENDX+22, ENDX+24, DOSEZ+3~, DOSEZ+6*, ENDZ+5, ENDZC+1, ENDZC+2, ENDZ2+2 |
PSODLINX | DOSE+1~, DOSE+4*, END+6, END+9, END+10, END+17, END2+2, EVAL~, EVAL+1, DOSEX+1~ , DOSEX+3*, ENDX+22, ENDX+24, DOSEZ+3~, DOSEZ+6*, ENDZ+5, ENDZC+1, ENDZC+2, ENDZ2+2 |
PSODLMSG | DOSE+1~, DOSEX+1~, DOSEZ+3~ |
PSODLNN1 | DOSE+2~, DOSEX+2~, DOSEZ+4~ |
PSODLOFF | DOSE+1~, DOSE+4*, DOSE+7*, END+2, DOSEX+2~, DOSEX+3*, DOSEX+6*, ENDX+4, DOSEZ+4~, DOSEZ+6* , DOSEZ+12*, ENDZ+3, PROMPT+4 |
PSODLP1 | DOSE+1~, DOSEX+1~, DOSEZ+3~ |
PSODLPL | DOSE+1~, DOSEX+1~, DOSEZ+3~ |
PSODLQT | DOSE+2~, DOSE+4*, DOSE+10, DOSE+13*, END+5, DOSEX+2~, DOSEX+3*, DOSEX+9, ENDX+11, ENDX+19 , DOSEZ+4~, DOSEZ+6*, DOSEZ+12*, DOSEZ+13, DOSEZ+15, ENDZ+4, HD+1, MESG+1, RETURN+2*, HD3+2* , HD3+3, HD3+5*, MSG3+3* |
PSODLXNT | DOSEX~ |
PSODOSEX | END+4!, END+7*, END+15*, END+18!, ENDX+25*, ENDX2+1!, ENDZ+7!, ENDZ+8*, ENDZC+7!, ENDZC+8* , HD+3* |
>> PSODOSNW | ENDX+15 |
PSODOSX | DOSEX+2~, ENDX+1*, PROMPT+9, PROMPT+14, PROMPT+18 |
PSODRIEN | GETGN~, GETGN+2, GETGN+3 |
>> PSODRUG("IEN" | END+12, ENDZC+5 |
PSODSEQ | DOSE+2~, DOSEX+2~, DOSEZ+2~ |
PSODTYPE | DOSE+2~, DOSE+4*, DOSEX+2~, DOSEX+3*, DOSEZ+2~, DOSEZ+6* |
>> PSOEDDOS | DOSE+5, DOSEX+4, DOSEX+5, DOSEZ+1, DOSEZ+7, ENDZC+3 |
>> PSOEDIT | DOSE+7, ENDX+15, ENDX+16 |
PSOEDOUT | DOSE+2~, DOSE+4*, DOSEZ+2~, DOSEZ+6*, DOSEZ+7*, DOSEZ+8, ENDZ+6, PROMPT+8, PROMPT+13 |
PSOERROR | DOSE+3~, DOSE+4*, DOSEX+2~, DOSEX+3*, DOSEZ+4~, DOSEZ+6* |
PSOEXCPT | DOSE+3~, DOSE+4*, DOSEX+2~, DOSEX+3*, DOSEZ+4~, DOSEZ+6* |
>> PSOFOERR | DOSE+7, ENDX+8, ENDX+13, DOSEZ+11, PROMPT+5, PROMPT+12 |
PSOINTRO | DOSE+3~, DOSE+4*, DOSEX+2~, DOSEX+3*, DOSEZ+4~, DOSEZ+6* |
PSOLASTD | DOSEZ+2~, DOSEZ+6* |
PSOLASTS | DOSE+2~, DOSE+4*, DOSEZ+2~, DOSEZ+6*, ENDZ+6 |
PSOLINES | HD3~, HD3+2*, HD3+3, HD3+4! |
PSOQTOUT | DOSE+2~, DOSE+4*, END+5, ENDX+8, ENDX+11, ENDX+13, ENDX+19, DOSEZ+2~, DOSEZ+6*, ENDZ+4 , RETURN+2*, MSG3+3* |
>> PSOQUIT | END+7*, END+15*, ENDX+25*, ENDZ+8*, ENDZC+8*, HD+3* |
>> PSOREINS | END+7, END+15, ENDX+25, ENDZ+8, ENDZC+8, HD+3 |
>> PSORENWD | PROMPT+6, PROMPT+8, PROMPT+9, PROMPT+13, PROMPT+14, PROMPT+18 |
>> PSORX("DFLG" | END+1, END+5, END2+1, ENDX+2, ENDX+11, ENDX+19, ENDZ+1, ENDZ+4, ENDZ2+1, HD+3* , RETURN+2*, HD3+5*, MSG3+3* |
>> PSORX("EDIT" | DOSEZ+7, ENDZC+3 |
>> PSORXED | DOSE+5, DOSEX+5, DOSEZ+7, ENDZC+3 |
>> PSORXED("CONJUNCTION" | DOSEX+4, DOSEZ+1 |
PSOSIGC | DOSE+3~, END+19*, SIG1+2*, ENDZC+9*, SIG2+2* |
>> PSOTOF | DOSEZ+5 |
>> PSRX("DFLG" | END+7, ENDZ+8 |
X | DOSE+1~, DOSE+8~, DOSE+9*, DOSEX+1~, DOSEX+7~, DOSEX+8*, DOSEZ+3~, DOSEZ+13~, DOSEZ+14*, HD+2~ , HD3+1~, HD3+4~ |
X1 | DOSE+1~, SIG1+2, SIG1+3, DOSEX+1~, DOSEZ+3~, SIG2+2, SIG2+3 |
Y | DOSE+1~, END+4!, END+7, END+11!, END+15, END+17, DOSEX+1~, ENDX+24*, ENDX+25!, DOSEZ+3~ , ENDZ+8, ENDZ+9!, ENDZC+4!, ENDZC+8, HD+2~, HD+3, HD+4!, RETURN+2!, HD3+1~, HD3+4~! , HD3+5 |