PSSJSV ;BIR/CML3/WRT-SCHEDULE VALIDATION ;06/24/96
Source file <PSSJSV.m>
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 | 4 | ^PS(51.1 HOSPITAL LOCATION OLD SCHEDULE NAME(S) WARD |
Pharmacy Data Management | 3 | PSSJ EXT SCHEDULE EDIT PSSJEEU ^PS(51 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
DONE | ;
|
|
ENCHK | ; admin times
|
|
DIC | ; 51.1 look-up
|
|
DW | ; week days
|
|
DWC | ||
ENSNV | ; schedule name
|
|
ENSHV | ; shift in 51.1
|
|
ENVSST | ; shift start/stop times
|
|
ENFQD | ; frequency default
|
|
ENFREQ | ; validate frequency
|
|
DFCHK | ; validate dosing check frequency **pss_1_201**
|
|
HPDCHK | ; help prompt with specified formats for the dosing check frequency fields **pss_1_201**
|
|
OASCHK | ; check the 'D' cross reference to see if duplicates exist **pss_1_201**
|
|
ENDNV | ; day of the week name
|
|
DNVX | ; validate day of the week name
|
|
ENPSJ | ;validate schedule names for PSJ package **pss_1_201**
|
|
ENOAS(PSSOLD,PSSX) | ; entry for new OLD SCHEDULE NAME(S) into the multiple **pss_1_201**
|
|
SCRN | ;LOGIC TO SCREEN OUT @ IF NOT DAILY
|
|
ENPSJT | ; Validate schedule type (one-time PRN conflict)
|
|
CHKORD | ;Check order of days in DOW schedule name
|
|
RMTIME | ;Remove ward times when schedule becomes odd
|
|
DAYS | ; check days of week for correct order sequence
|
|
MSG1 | ; max length exceeded message
|
|
MSG2 | ; day of week order squence message
|
|
MSG3 | ; time input message
|
|
MSG4 | ; time sequence message
|
|
TIMECHK | ; time validation
|
Name | Field # of Occurrence |
---|---|
EN^DDIOL | HPDCHK+14, OASCHK+8, OASCHK+19, ENPSJ+16, ENOAS+10, ENOAS+19, SCRN+9, ENPSJT+12, MSG1+3, MSG2+3 , MSG3+3, MSG4+3 |
IX^DIC | DIC+2 |
FILE^DICN | ENOAS+30 |
^DIE | OASCHK+5 |
$$GET1^DIQ | ENCHK+7, ENCHK+10, ENCHK+17, ENPSJT+2, ENPSJT+13 |
^DIR | OASCHK+3 |
ENSVH^PSSJSV0 | EN+3 |
$$OASLE^PSSOAS | OASCHK+6 |
$$UP^XLFSTR | DFCHK+1, OASCHK+10, ENPSJ+3, ENOAS+1 |
$$VERSION^XPDUTL | ENSNV+2, ENSHV+1 |
FileNo | Call Tags |
---|---|
^PS(51.1 - [#51.1] | Classic Fileman Calls, GET1^DIQ |
^PS(52.6 - [#52.6] | GET1^DIQ |
52.61 | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(51.1 - [#51.1] | EN+6, ENCHK+9, DIC+2, ENSNV+3, ENFQD+1, OASCHK+4, OASCHK+5, OASCHK+13, OASCHK+14, OASCHK+18 , OASCHK+22, OASCHK+23, ENDNV+2, ENOAS+4, ENOAS+5, ENOAS+12, ENOAS+13, ENOAS+17, ENOAS+21, ENOAS+24 , ENOAS+25, ENOAS+28, RMTIME+2! |
^PS(51.15 - [#51.15] | DIC+5, ENSHV+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | ENPSJ+1~, ENPSJ+8*, ENPSJ+9, ENPSJT+1~, ENPSJT+2*, ENPSJT+3, ENPSJT+6, ENPSJT+13* |
B | ENPSJ+1~, ENPSJ+9*, ENPSJT+1~, ENPSJT+2*, ENPSJT+4*, ENPSJT+7*, ENPSJT+10*, ENPSJT+12, ENPSJT+13* |
D | DONE+1!, DIC+1* |
>> D0 | RMTIME+2 |
>> DA | ENCHK+7, ENSNV+3, ENFQD+1, ENFQD+3, OASCHK+1, OASCHK+4, OASCHK+5*, OASCHK+6*, OASCHK+22, OASCHK+23 , ENDNV+2, ENOAS+1, ENOAS+4, ENOAS+5, ENOAS+26, ENOAS+30, ENPSJT+2, ENPSJT+13 |
>> DA(1 | ENCHK+7, OASCHK+1, OASCHK+5*, OASCHK+6*, ENOAS+30* |
DIC | DONE+1!, DIC+1*, DIC+2!, OASCHK+5, ENOAS+30* |
DIC("A" | OASCHK+6* |
DIC("W" | DIC+1* |
DIC(0 | DIC+1*, ENOAS+30* |
>> DIE | OASCHK+5* |
DIR | OASCHK+5! |
DIR("A" | OASCHK+3* |
DIR(0 | OASCHK+3* |
DO | ENOAS+30! |
>> DOW | ENPSJ+11*, ENPSJ+12* |
>> DR | OASCHK+5* |
I | ENPSJ+1~, ENPSJ+9*, CHKORD+1~, CHKORD+3* |
>> IENS | ENCHK+9*, ENCHK+10, ENCHK+17 |
J | CHKORD+1~, CHKORD+3* |
L | CHKORD+1~, CHKORD+2*, CHKORD+3* |
MSG | HPDCHK+1~*, HPDCHK+14, OASCHK+1~*, OASCHK+12~, OASCHK+19, ENPSJ+13~, ENPSJ+16, ENOAS+1~*, ENOAS+10, ENOAS+19 , SCRN+9!, MSG1+3, MSG1+5!, MSG2+3, MSG2+5!, MSG3+3, MSG3+5!, MSG4+3, MSG4+5! |
MSG(1 | HPDCHK+6*, OASCHK+16*, ENPSJ+14*, ENOAS+7*, ENOAS+15*, MSG1+1*, MSG2+1*, MSG3+1*, MSG4+1* |
MSG(2 | HPDCHK+7*, OASCHK+17*, ENPSJ+14*, ENOAS+8*, ENOAS+16*, MSG1+1*, MSG2+1*, MSG3+1*, MSG4+1* |
MSG(3 | HPDCHK+8*, OASCHK+18*, ENPSJ+15*, ENOAS+9*, ENOAS+17*, MSG1+2*, MSG2+2*, MSG3+2*, MSG4+2* |
MSG(4 | HPDCHK+9*, ENOAS+18*, SCRN+9* |
MSG(5 | HPDCHK+10*, SCRN+9* |
MSG(6 | HPDCHK+11* |
MSG(7 | HPDCHK+12* |
MSG(8 | HPDCHK+13* |
N | CHKORD+1~, CHKORD+2*, CHKORD+3 |
P | CHKORD+1~, CHKORD+2*, CHKORD+3 |
>> PSJAT | EN+1*, EN+4*, EN+5*, EN+8, EN+12, DIC+2*, DIC+3*, DIC+5 |
>> PSJAT( | DIC+5* |
>> PSJAX | EN+1*, DIC+2* |
>> PSJM | EN+1*, EN+6, EN+10*, EN+14*, DIC+2* |
>> PSJNE | EN+3, EN+7, EN+8, DIC+1 |
>> PSJPP | EN+6, DIC+1, DIC+5, ENSNV+2, ENSHV+1, ENSHV+2, ENPSJ+7 |
>> PSJTS | EN+1*, EN+6, EN+7*, EN+8*, DIC+2*, DIC+3, DIC+4 |
>> PSJW | DIC+2, DIC+5 |
PSJX | EN+1!, EN+8, EN+13, DONE+1!, DIC+2* |
>> PSJY | EN+1*, EN+6, DIC+2* |
PSSAFLG | SCRN+1*, SCRN+6, SCRN+11!, TIMECHK+13* |
PSSAIEN | OASCHK+1~*, OASCHK+14*, OASCHK+15, OASCHK+18, ENOAS+2~*, ENOAS+13*, ENOAS+17 |
PSSBCHK | ENOAS+1~*, ENOAS+21*, ENOAS+22, ENOAS+24*, ENOAS+25, ENOAS+26 |
PSSBFL | ENOAS+1~*, ENOAS+21, ENOAS+22*, ENOAS+24, ENOAS+25, ENOAS+26*, ENOAS+30 |
PSSCCHK | ENOAS+1~*, ENOAS+25*, ENOAS+26 |
PSSCHK | ENOAS+2~*, ENOAS+12*, ENOAS+13 |
PSSCNT | OASCHK+1~*, OASCHK+4*, OASCHK+5, ENPSJ+1~, ENPSJ+12, SCRN+3!, CHKORD+2*, CHKORD+3* |
PSSD | OASCHK+1~*, OASCHK+3*, OASCHK+7 |
PSSD1 | DAYS+1~, DAYS+2*, DAYS+3, DAYS+4, DAYS+5!, DAYS+6!, DAYS+7!, DAYS+8 |
PSSD2 | DAYS+1~, DAYS+3*, DAYS+5, DAYS+6, DAYS+7 |
PSSD3 | DAYS+1~, DAYS+4*, DAYS+5 |
PSSD4 | DAYS+1~, DAYS+2*, DAYS+5* |
PSSD5 | DAYS+1~, DAYS+2*, DAYS+3 |
PSSD6 | DAYS+1~, DAYS+2*, DAYS+5 |
PSSDA | OASCHK+1~*, OASCHK+6, OASCHK+15, ENOAS+1~* |
PSSDASH | ENDNV+1~, DNVX+4*, DNVX+5, TIMECHK+1~, TIMECHK+3*, TIMECHK+5, TIMECHK+12 |
PSSDFL | ENOAS+2~*, ENOAS+12, ENOAS+13*, ENOAS+14, ENOAS+30 |
PSSDFLG | SCRN+1*, SCRN+8, SCRN+11!, DAYS+8*, TIMECHK+2* |
PSSDONE | OASCHK+1~*, OASCHK+6 |
>> PSSDOW | DNVX+7*, ENPSJ+1*, ENPSJT+9 |
PSSFLG | OASCHK+1~*, OASCHK+4, OASCHK+5*, ENPSJ+1~*, SCRN+1*, SCRN+9, SCRN+10, SCRN+11!, MSG1+4*, MSG2+4* , MSG3+4*, MSG4+4* |
PSSFND | DAYS+1~, DAYS+2*, DAYS+5*, DAYS+7, DAYS+8 |
>> PSSFRQ | ENCHK+17 |
PSSHFLG | HPDCHK+1~*, HPDCHK+3*, HPDCHK+5 |
>> PSSJSE | ENCHK+10, ENCHK+17 |
PSSLEN | TIMECHK+1~, TIMECHK+6*, TIMECHK+8, TIMECHK+11 |
PSSLOOP | TIMECHK+1~, TIMECHK+8*, TIMECHK+9 |
PSSMCHK | OASCHK+21~*, OASCHK+22*, OASCHK+23, ENOAS+1~*, ENOAS+4*, ENOAS+5 |
PSSMFL | OASCHK+21~*, OASCHK+22, OASCHK+23*, OASCHK+24, ENOAS+1~*, ENOAS+4, ENOAS+5*, ENOAS+6, ENOAS+30 |
PSSNNM | ENOAS+1~*, ENOAS+30 |
PSSOLD | ENOAS~, ENOAS+6, ENOAS+14, ENOAS+22, ENOAS+26, ENOAS+29 |
>> PSSON | ENPSJ+5, ENOAS+30 |
PSSRCHK | OASCHK+12~*, OASCHK+13*, OASCHK+14, ENOAS+1~*, ENOAS+28*, ENOAS+29 |
PSSRFL | OASCHK+12~*, OASCHK+13, OASCHK+14*, OASCHK+15, ENOAS+1~*, ENOAS+28, ENOAS+29*, ENOAS+30 |
>> PSSRN | OASCHK+5, OASCHK+6* |
>> PSSSCT | ENCHK+10 |
PSSTCHK | TIMECHK+1~ |
PSSTCHK( | TIMECHK+6*, TIMECHK+7*, TIMECHK+13, TIMECHK+14, TIMECHK+15, TIMECHK+16, TIMECHK+17 |
PSSTCHR | TIMECHK+1~, TIMECHK+9*, TIMECHK+10 |
PSSTFLG | SCRN+1*, SCRN+7, SCRN+11!, TIMECHK+2*, TIMECHK+3*, TIMECHK+4*, TIMECHK+10*, TIMECHK+11*, TIMECHK+15*, TIMECHK+17* |
PSSTIMCT | ENDNV+1~, DNVX+5*, TIMECHK+1~, TIMECHK+5*, TIMECHK+6, TIMECHK+7, TIMECHK+12*, TIMECHK+13, TIMECHK+14, TIMECHK+15 , TIMECHK+16, TIMECHK+17 |
PSSTIME | ENDNV+1~, DNVX+5*, DNVX+6, TIMECHK+1~, TIMECHK+5*, TIMECHK+6, TIMECHK+9, TIMECHK+11 |
PSSTLN | TIMECHK+1~, TIMECHK+3* |
PSSX | ENOAS~, ENOAS+5 |
PSSX1 | DFCHK+1~*, DFCHK+6*, DFCHK+9, DFCHK+10 |
PSSX2 | DFCHK+1~*, DFCHK+8, DFCHK+9, DFCHK+10, DFCHK+12, DFCHK+13 |
PSSXTIME | ENDNV+1~, DNVX+4*, DNVX+5, TIMECHK+1~, TIMECHK+3*, TIMECHK+4, TIMECHK+5 |
Q | DONE+1!, DW+3* |
QX | DONE+1!, DW+2*, DWC+1* |
R | RMTIME+1~, RMTIME+2* |
SCHED | ENCHK+1~, ENCHK+7*, ENCHK+8, ENCHK+9 |
SDW | DONE+1!, DW+1*, DW+2, DW+4 |
SWD | DONE+1!, DW+1*, DW+3, DWC+1* |
U | DIC+2, OASCHK+18, ENOAS+17 |
W | CHKORD+1~, CHKORD+2*, CHKORD+3 |
X | EN+1*!, EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8*, EN+9!, EN+10 , EN+11*, EN+12!, EN+13*, DONE+1!, ENCHK+2!, ENCHK+3!, ENCHK+4!, ENCHK+5, ENCHK+6, ENCHK+12 , ENCHK+13!, ENCHK+15!, ENCHK+16!, ENCHK+18, ENCHK+19!, ENCHK+20!, ENCHK+21!, ENCHK+22!, ENCHK+23, DIC+2* , DW+1*, DW+2*, DW+3!, DW+4*, DWC!, DWC+2!, ENSNV+1!, ENSNV+2!, ENSNV+3*, ENSHV+1! , ENSHV+2!, ENVSST+1!, ENVSST+2!, ENFQD+1*, ENFQD+2*, ENFQD+4*, ENFQD+6*, ENFREQ+1!, DFCHK+1*, DFCHK+3! , DFCHK+5!, DFCHK+6!, DFCHK+8!, DFCHK+9!, DFCHK+10!, DFCHK+12, DFCHK+13, DFCHK+14!, HPDCHK+3, OASCHK+3 , OASCHK+5!, OASCHK+7!, OASCHK+8!, OASCHK+10*, OASCHK+14, OASCHK+15!, OASCHK+23, OASCHK+24!, ENDNV+2*!, DNVX+1 , DNVX+2, DNVX+3!, DNVX+6!, DNVX+7, DNVX+8*, ENPSJ+3*, ENPSJ+4, ENPSJ+5, ENPSJ+8!, ENPSJ+9! , ENPSJ+10, ENPSJ+11*, ENPSJ+12*, ENOAS+1, ENOAS+6*, ENOAS+12, ENOAS+13, ENOAS+14*, ENOAS+21, ENOAS+24 , ENOAS+30*, SCRN+2, SCRN+3!, SCRN+5, SCRN+9, SCRN+10!, ENPSJT+3, ENPSJT+5!, ENPSJT+6, ENPSJT+8! , ENPSJT+9, ENPSJT+11!, CHKORD+2, CHKORD+3!, DAYS+2, MSG1+1, TIMECHK+2, TIMECHK+3 |
X(1 | ENCHK+3*, ENCHK+4*, ENCHK+6*, ENCHK+12!, ENCHK+18!, ENCHK+19, ENCHK+20, ENCHK+21, ENCHK+23!, DW+2* , DW+3, DW+4!, ENSHV+2*, ENSHV+3!, ENVSST+2*, ENVSST+3! |
X(2 | ENCHK+4*, ENCHK+12!, ENCHK+17*, ENCHK+18!, ENCHK+19, ENCHK+20, ENCHK+21, ENCHK+22, ENCHK+23!, ENSHV+2* , ENSHV+3! |
X(3 | ENCHK+4*, ENCHK+12!, ENCHK+18!, ENCHK+23! |
X(4 | ENCHK+10*, ENCHK+11, ENCHK+14 |
X0 | EN+5*, DONE+1!, DIC+2* |
X1 | EN+11*, EN+13, DONE+1!, ENFQD+1~, ENFQD+5*, ENFQD+6 |
X2 | EN+11*, EN+13, DONE+1!, ENFQD+1~, ENFQD+5*, ENFQD+6 |
XT | EN+5*, EN+12*, EN+13*, EN+14, DONE+1! |
Y | EN+5*, DONE+1!, DIC+2, DIC+5*, DWC+1*, OASCHK+4, OASCHK+22, ENPSJ+4 |
Y(0 | DIC+2, DIC+3 |
Y(1 | DIC+5* |
Y(2 | DIC+5* |
Z | DONE+1!, DW+3*, DWC, DWC+1, ENFQD+1~*, ENFQD+2, ENFQD+3*, ENFQD+4, ENFQD+5*, ENFQD+6 |
Z1 | ENSNV+3!, ENDNV+1~, DNVX+1*, DNVX+2*, ENPSJ+12! |
Z2 | ENSNV+3!, ENDNV+1~, DNVX+1*, DNVX+2*, DNVX+3, DNVX+8, ENPSJ+12! |
Z3 | ENSNV+3!, ENDNV+1~, DNVX+2*, ENPSJ+12! |
Z4 | ENSNV+3!, ENDNV+1~, DNVX+1*, DNVX+2, ENPSJ+12! |
ZX | ENSNV+3*!, DNVX+4, ENPSJ+11*!, ENPSJ+12! |