PSOERSE5 ;ALB/RM - PSO eRx UTILITIES ;Feb 12, 2024@12:43:34
Source file <PSOERSE5.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 6 | DISPRX^PSOERSE4 ADDITEM^PSOERX1A $$GETRULES^PSOERX1D TXT2ARY^PSOERXD1 ($$GETRESP,$$RESOLV)^PSOERXU2 $$ERXDRSCH^PSOERXUT |
VA FileMan | 1 | ($$GET1,GETS)^DIQ |
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 | 1 | PSOERSE4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
QTSUMDT1(TMPGBL,PSOIEN,MTYPE,CHGMESRI,CHGMESRQ,RESPVAL,LINE) | ; Quit Summary Detail early?
|
|
SETMRC(TMPGBL,PSOIEN,CHGMESRI,CHGMESRQ,RESPVAL,RULE,LINE) | ; Set values for MRC variables
|
|
RESTSMDT(TMPGBL,SMALLMP,PSOIEN,RESPVAL,RULE,LINE) | ; Print rest of Summary/Details screen for CXD - G/T/S/OS/D
|
|
MEDPRES(TMPGBL,PSOIEN,LINE) | ; Medication Prescribed
|
|
CXRES(TMPGBL,ERXIEN,RESPVAL,RULE,RULES,LINE) | ;
|
|
MEDREQDR(TMPGBL,PSOIEN,RULE,LINE) | ; Medication Requested section driver
|
|
MEDREQ(TMPGBL,REQIEN,F,IENS,IEN311,LINE,CNT) | ; Medication Request section
|
|
NOTE(TMPGBL,STR,TITLE,REQUIRED,LINE) | ; Print possibly multi-line comment
|
|
CXREQ(TMPGBL,ERXIEN,RULE,LINE) | ;
|
|
MSGHIS(TMPGBL,ERXIEN,LINE) | ;
|
|
QTSUMDT2(TMPGBL,PSOIEN,MTYPE,CHGMESRI,RESPVAL,LINE) | ; Quit Summary Detail later?
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | SETMRC+2, SETMRC+8, SETMRC+9, SETMRC+20, RESTSMDT+3, RESTSMDT+5, CXRES+9, CXRES+35, CXRES+36, CXRES+66 , CXRES+74, CXRES+75, CXRES+80, CXRES+81, CXRES+82, MEDREQ+10, CXREQ+5, CXREQ+6, CXREQ+7, CXREQ+20 , CXREQ+21, MSGHIS+4, MSGHIS+8, MSGHIS+9, MSGHIS+10, MSGHIS+13 |
GETS^DIQ | CXRES+19, CXRES+30, MEDREQDR+6 |
DISPRX^PSOERSE4 | RESTSMDT+4 |
ADDITEM^PSOERX1A | MEDREQ+20, MEDREQ+21, MEDREQ+22 |
$$GETRULES^PSOERX1D | QTSUMDT1+6, QTSUMDT2+6 |
TXT2ARY^PSOERXD1 | SETMRC+12, SETMRC+22, CXRES+46, CXRES+54, CXRES+67, MEDREQ+14, MEDREQ+28, MEDREQ+37, NOTE+3, CXREQ+13 |
$$GETRESP^PSOERXU2 | CXRES+11, MSGHIS+5 |
$$RESOLV^PSOERXU2 | CXRES+6, MEDREQDR+2, CXREQ+4, MSGHIS+6, MSGHIS+7 |
$$ERXDRSCH^PSOERXUT | MEDREQ+14 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(52.49 - [#52.49] | SETMRC+5, SETMRC+25, CXRES+26, CXRES+27, CXRES+33, CXRES+39, CXRES+79, MEDREQDR+4, MEDREQ+34, MEDREQ+35 , MSGHIS+12 |
Name | Line Occurrences |
---|---|
$$SETMRC | QTSUMDT1+8 |
CXREQ | RESTSMDT+8 |
CXRES | RESTSMDT+6 |
MEDPRES | RESTSMDT+2 |
MEDREQ | MEDREQDR+9 |
MEDREQDR | RESTSMDT+7 |
MSGHIS | RESTSMDT+9 |
NOTE | MEDREQ+18 |
RESTSMDT | SETMRC+27, QTSUMDT2+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CHGMESRE | SETMRC+1~, SETMRC+2*, SETMRC+3 |
CHGMESRI | QTSUMDT1~, QTSUMDT1+4, QTSUMDT1+6, QTSUMDT1+8, SETMRC~, SETMRC+4, QTSUMDT2~, QTSUMDT2+4, QTSUMDT2+6 |
CHGMESRQ | QTSUMDT1~, QTSUMDT1+8, SETMRC~, SETMRC+2, RESTSMDT+1~, RESTSMDT+5* |
CHMSSUB | SETMRC+1~, SETMRC+8*, SETMRC+9*, SETMRC+10*, SETMRC+12 |
CNT | MEDREQDR+1~, MEDREQDR+2*, MEDREQDR+8*, MEDREQDR+9, MEDREQ~, MEDREQ+12 |
CODEIEN | CXRES+1~, CXRES+81*, CXRES+82 |
COMM | CXRES+1~, CXRES+66*, CXRES+67, CXREQ+1~, CXREQ+7*, CXREQ+13 |
COMMARY | CXRES+1~, CXRES+67!, CXRES+68, CXRES+72, CXREQ+1~, CXREQ+13!, CXREQ+14, CXREQ+18 |
COMMARY( | CXRES+69, CXRES+70, CXREQ+15, CXREQ+16 |
COMMBY | CXRES+1~, CXRES+74*, CXRES+76, CXREQ+1~, CXREQ+20*, CXREQ+22 |
COMMDTTM | CXRES+1~, CXRES+75*, CXRES+77, CXREQ+1~, CXREQ+21*, CXREQ+23 |
CTXT | CXREQ+1~, CXREQ+16*, CXREQ+17 |
DATE | CXRES+1~, CXRES+25*, CXRES+64 |
DAYSUP | MEDREQ+1~, MEDREQ+8*, MEDREQ+22 |
DDAT | MEDREQDR+10! |
DDAT( | MEDREQDR+7, MEDREQ+2, MEDREQ+3, MEDREQ+5, MEDREQ+6, MEDREQ+7, MEDREQ+8, MEDREQ+9 |
DELTA | CXRES+1~ |
DRCVGST | CXRES+1~, CXRES+35*, CXRES+36*, CXRES+37*, CXRES+39*, CXRES+54 |
DRUG | MEDREQ+1~, MEDREQ+2*, MEDREQ+14 |
ERESCODE | CXRES+1~, CXRES+80*, CXRES+86 |
ERXDAT | CXRES+1~ |
ERXDAT( | CXRES+20, CXRES+21, CXRES+22, CXRES+23, CXRES+24, CXRES+25, CXRES+31, CXRES+32 |
ERXHID | MSGHIS+3~ |
ERXIEN | CXRES~, CXRES+6, CXRES+9, CXRES+11, CXRES+13, CXRES+26, CXRES+27, CXRES+39, MEDREQ+14, CXREQ~ , CXREQ+4, MSGHIS~, MSGHIS+4, MSGHIS+5, MSGHIS+6, MSGHIS+7, MSGHIS+12, MSGHIS+13 |
ERXREF | MSGHIS+3~ |
ERXRES | MSGHIS+3~, MSGHIS+13* |
F | MEDREQDR+1~, MEDREQDR+5*, MEDREQDR+6, MEDREQDR+7, MEDREQDR+9, MEDREQ~, MEDREQ+2, MEDREQ+3, MEDREQ+5, MEDREQ+6 , MEDREQ+7, MEDREQ+8, MEDREQ+9 |
FLAG | MSGHIS+1~, MSGHIS+2* |
FLG | QTSUMDT1+1~, QTSUMDT1+3*, QTSUMDT1+5*, QTSUMDT1+7*, QTSUMDT1+8*, QTSUMDT1+9, RESTSMDT+1~, CXRES+1~, CXRES+7*, CXRES+14* , CXRES+15*, CXRES+16*, CXRES+17, CXRES+83*, CXRES+84*, CXRES+85, QTSUMDT2+1~, QTSUMDT2+3*, QTSUMDT2+5*, QTSUMDT2+7* , QTSUMDT2+8, QTSUMDT2+9 |
FN | CXRES+1~ |
FND | MEDREQ+1~ |
FOUND | MSGHIS+3~, MSGHIS+11*, MSGHIS+12, MSGHIS+13* |
I | SETMRC+1~, SETMRC+14*, SETMRC+15*, SETMRC+16, SETMRC+24*, CXRES+1~, CXRES+33*, CXRES+34, CXRES+35, CXRES+37 , CXRES+38*, CXRES+47*, CXRES+48, CXRES+56*, CXRES+57, CXRES+69*, CXRES+70, CXRES+79*, CXRES+80, CXRES+81 , MEDREQDR+1~, MEDREQDR+3*, MEDREQDR+4*, MEDREQDR+5, MEDREQDR+9, MEDREQ+1~, MEDREQ+15*, MEDREQ+16, MEDREQ+29*, MEDREQ+30 , MEDREQ+34*, MEDREQ+35, MEDREQ+38*, MEDREQ+39, MEDREQ+40, NOTE+1~, NOTE+5*, NOTE+6, CXREQ+1~, CXREQ+15* , CXREQ+16, MSGHIS+3~, MSGHIS+12*, MSGHIS+13 |
ID | CXRES+2~, CXRES+24*, CXRES+63 |
IEN311 | MEDREQ~, MEDREQ+34, MEDREQ+35 |
IENS | SETMRC+1~, SETMRC+5*, SETMRC+6, SETMRC+7*, SETMRC+8, SETMRC+10, CXRES+2~, CXRES+18*, CXRES+20, CXRES+21 , CXRES+22, CXRES+23, CXRES+24, CXRES+25, CXRES+29, CXRES+80, CXRES+81, MEDREQDR+1~, MEDREQDR+5*, MEDREQDR+6 , MEDREQDR+7, MEDREQDR+9, MEDREQ~, MEDREQ+2, MEDREQ+3, MEDREQ+5, MEDREQ+6, MEDREQ+7, MEDREQ+8, MEDREQ+9 |
IENS2 | CXRES+2~, CXRES+29*, CXRES+30, CXRES+31, CXRES+32, CXRES+35 |
J | CXRES+2~ |
LEN | NOTE+1~, NOTE+2*, NOTE+3, NOTE+6 |
LINE | QTSUMDT1~, QTSUMDT1+8, SETMRC~, SETMRC+3, SETMRC+16*, SETMRC+18*, SETMRC+23*, SETMRC+24*, SETMRC+27, RESTSMDT~ , RESTSMDT+2, RESTSMDT+6, RESTSMDT+7, RESTSMDT+8, RESTSMDT+9, MEDPRES~, MEDPRES+1*, MEDPRES+2*, MEDPRES+3*, CXRES~ , CXRES+40*, CXRES+41*, CXRES+42*, CXRES+43, CXRES+48*, CXRES+49*, CXRES+51, CXRES+52, CXRES+53, CXRES+58* , CXRES+59*, CXRES+60*, CXRES+62, CXRES+63, CXRES+64, CXRES+65*, CXRES+71*, CXRES+73*, CXRES+76*, CXRES+77* , CXRES+78*, CXRES+87*, CXRES+88, CXRES+89*, MEDREQDR~, MEDREQDR+9, MEDREQ~, MEDREQ+11*, MEDREQ+12*, MEDREQ+16* , MEDREQ+17*, MEDREQ+18, MEDREQ+23*, MEDREQ+25*, MEDREQ+31*, MEDREQ+32*, MEDREQ+39, MEDREQ+40*, MEDREQ+41*, NOTE~ , NOTE+6*, NOTE+8*, CXREQ~, CXREQ+8*, CXREQ+9*, CXREQ+10*, CXREQ+11*, CXREQ+12*, CXREQ+17*, CXREQ+19* , CXREQ+22*, CXREQ+23*, MSGHIS~, MSGHIS+14*, MSGHIS+15*, MSGHIS+16*, MSGHIS+17*, MSGHIS+18*, QTSUMDT2~, QTSUMDT2+8 |
LTXT | MEDREQ+1~, MEDREQ+19*, MEDREQ+20, MEDREQ+21, MEDREQ+22, MEDREQ+23 |
MIEN | CXRES+2~ |
MTYPE | QTSUMDT1~, QTSUMDT1+4, QTSUMDT1+6, CXRES+2~, CXRES+9*, CXRES+10, MSGHIS+3~, MSGHIS+4*, MSGHIS+5, MSGHIS+6 , MSGHIS+7, QTSUMDT2~, QTSUMDT2+4, QTSUMDT2+6 |
NO311 | QTSUMDT1+1~, SETMRC+1~, SETMRC+25*, SETMRC+26*, SETMRC+27, SETMRC+28 |
NOTE | CXRES+2~, CXRES+23*, CXRES+44, CXRES+46, MEDREQ+1~, MEDREQ+5*, MEDREQ+18 |
NOTEARY | SETMRC+1~, SETMRC+11!, SETMRC+12, SETMRC+13, SETMRC+17, CXRES+2~, CXRES+45!, CXRES+46, CXRES+54!, CXRES+55 , CXRES+59, MEDREQ+1~, MEDREQ+13!, MEDREQ+14, MEDREQ+27!, MEDREQ+28, NOTE+1~, NOTE+3, NOTE+4, NOTE+7 |
NOTEARY( | SETMRC+15, SETMRC+16, CXRES+47, CXRES+48, CXRES+56, CXRES+57, MEDREQ+15, MEDREQ+16, MEDREQ+29, MEDREQ+30 , NOTE+5, NOTE+6 |
PRAUTHST | CXRES+2~, CXRES+32*, CXRES+39*, CXRES+53 |
PRIAUTH | CXRES+2~, CXRES+31*, CXRES+39*, CXRES+52 |
PSOIEN | QTSUMDT1~, QTSUMDT1+6, QTSUMDT1+8, SETMRC~, SETMRC+5, SETMRC+7, SETMRC+20, SETMRC+25, SETMRC+27, RESTSMDT~ , RESTSMDT+2, RESTSMDT+3, RESTSMDT+5, RESTSMDT+6, RESTSMDT+7, RESTSMDT+8, RESTSMDT+9, MEDPRES~, MEDREQDR~, MEDREQDR+2 , QTSUMDT2~, QTSUMDT2+6, QTSUMDT2+8 |
QTY | MEDREQ+1~, MEDREQ+6*, MEDREQ+20 |
QUOM | MEDREQ+1~, MEDREQ+9*, MEDREQ+10*, MEDREQ+24, MEDREQ+26, MEDREQ+28 |
REATXT | SETMRC+1~ |
REATXT(1 | SETMRC+21, SETMRC+22 |
RECODE | CXRES+2~ |
REFILL | MEDREQ+1~, MEDREQ+7*, MEDREQ+21 |
RELERX | MSGHIS+3~, MSGHIS+10*, MSGHIS+17 |
REQBY | CXREQ+1~, CXREQ+5*, CXREQ+10 |
REQDTTM | CXREQ+1~, CXREQ+6*, CXREQ+11 |
REQID | MSGHIS+3~, MSGHIS+9*, MSGHIS+16 |
REQIEN | CXRES+2~, CXRES+6*, CXRES+13*, MEDREQDR+1~, MEDREQDR+2*, MEDREQDR+4, MEDREQDR+5, MEDREQDR+9, MEDREQ~, MEDREQ+34 , MEDREQ+35, CXREQ+1~, CXREQ+4*, CXREQ+5, CXREQ+6, CXREQ+7, CXREQ+20, CXREQ+21, MSGHIS+5*, MSGHIS+6* , MSGHIS+7*, MSGHIS+9, MSGHIS+10 |
REQUIRED | NOTE~, NOTE+7 |
RESCODE | CXRES+2~, CXRES+22* |
RESDESC | CXRES+3~, CXRES+82*, CXRES+88 |
RESDTTM | CXRES+3~, CXRES+20*, CXRES+43 |
RESID | MSGHIS+3~, MSGHIS+8*, MSGHIS+18 |
RESIEN | CXRES+3~, CXRES+6*, CXRES+11*, CXRES+12, CXRES+18, CXRES+19, CXRES+33, CXRES+66, CXRES+74, CXRES+75 , CXRES+79, MSGHIS+5*, MSGHIS+6*, MSGHIS+7*, MSGHIS+8 |
RESPVAL | QTSUMDT1~, QTSUMDT1+4, QTSUMDT1+6, QTSUMDT1+8, SETMRC~, SETMRC+27, RESTSMDT~, RESTSMDT+3, RESTSMDT+6, CXRES~ , CXRES+50, CXRES+61, CXRES+84, QTSUMDT2~, QTSUMDT2+4, QTSUMDT2+6, QTSUMDT2+8 |
RESTEXT | CXRES+3~, CXRES+86*, CXRES+87 |
RESVAL | CXRES+3~, CXRES+21*, CXRES+42, CXRES+86 |
RET | SETMRC+1~, SETMRC+22! |
RET( | SETMRC+24 |
RULE | QTSUMDT1+1~, QTSUMDT1+5*, QTSUMDT1+6*, QTSUMDT1+7, QTSUMDT1+8, SETMRC~, SETMRC+25, SETMRC+26, SETMRC+27, RESTSMDT~ , RESTSMDT+6, RESTSMDT+7, RESTSMDT+8, CXRES~, CXRES+5, CXRES+8, MEDREQDR~, MEDREQDR+2, CXREQ~, CXREQ+4 , QTSUMDT2+1~, QTSUMDT2+5*, QTSUMDT2+6*, QTSUMDT2+7, QTSUMDT2+8 |
RULES | CXRES~, CXRES+5, CXRES+8 |
SFIEN | CXRES+3~, CXRES+27*, CXRES+28, CXRES+29, CXRES+33 |
SIG | MEDREQ+1~ |
SIGARY | MEDREQ+1~, MEDREQ+37! |
SIGARY( | MEDREQ+38, MEDREQ+39, MEDREQ+40 |
SIGDATA | MEDREQ+1~, MEDREQ+33*, MEDREQ+35*, MEDREQ+36, MEDREQ+37 |
SMALLMP | RESTSMDT~, RESTSMDT+2, RESTSMDT+3 |
STATUS | RESTSMDT+1~, CXRES+3~ |
STR | NOTE~, NOTE+3 |
STR1 | CXRES+3~ |
STR1ARY | CXRES+3~ |
STR2 | CXRES+3~ |
STR2ARY | CXRES+3~ |
SUB | MEDREQ+1~, MEDREQ+3*, MEDREQ+4*, MEDREQ+17 |
TITLE | NOTE~, NOTE+2, NOTE+6, NOTE+8 |
TMPGBL | QTSUMDT1~, QTSUMDT1+8, SETMRC~, SETMRC+3, SETMRC+16, SETMRC+18, SETMRC+23, SETMRC+24, SETMRC+27, RESTSMDT~ , RESTSMDT+2, RESTSMDT+6, RESTSMDT+7, RESTSMDT+8, RESTSMDT+9, MEDPRES~, MEDPRES+1, MEDPRES+2, MEDPRES+3, CXRES~ , CXRES+40, CXRES+41, CXRES+42, CXRES+43, CXRES+48, CXRES+49, CXRES+52, CXRES+53, CXRES+58, CXRES+59 , CXRES+60, CXRES+63, CXRES+64, CXRES+65, CXRES+71, CXRES+73, CXRES+76, CXRES+77, CXRES+78, CXRES+87 , CXRES+88, CXRES+89, MEDREQDR~, MEDREQDR+9, MEDREQ~, MEDREQ+11, MEDREQ+12, MEDREQ+16, MEDREQ+17, MEDREQ+18 , MEDREQ+23, MEDREQ+25, MEDREQ+31, MEDREQ+32, MEDREQ+39, MEDREQ+40, MEDREQ+41, NOTE~, NOTE+6, NOTE+8 , CXREQ~, CXREQ+8, CXREQ+9, CXREQ+10, CXREQ+11, CXREQ+12, CXREQ+17, CXREQ+19, CXREQ+22, CXREQ+23 , MSGHIS~, MSGHIS+14, MSGHIS+15, MSGHIS+16, MSGHIS+17, MSGHIS+18, QTSUMDT2~, QTSUMDT2+8 |
TXT | CXRES+4~, CXRES+57*, CXRES+58, CXRES+70*, CXRES+71, MEDREQ+1~, MEDREQ+30*, MEDREQ+31 |
X | SETMRC+1~, SETMRC+20*, SETMRC+22* |
XLINE | CXRES+4~, CXRES+51*, CXRES+60, CXRES+62*, CXRES+65, CXRES+78*, CXRES+89 |