Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSSJSV

Package: Pharmacy Data Management

Routine: PSSJSV


Information

PSSJSV ;BIR/CML3/WRT-SCHEDULE VALIDATION ;06/24/96

Source Information

Source file <PSSJSV.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 6 EN^DDIOL  IX^DIC  FILE^DICN  ^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 $$UP^XLFSTR  $$VERSION^XPDUTL  
Pharmacy Data Management 2 ENSVH^PSSJSV0  $$OASLE^PSSOAS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Inpatient Medications 3 HOSPITAL LOCATION  OLD SCHEDULE NAME(S)  WARD  
Pharmacy Data Management 3 PSSJ EXT SCHEDULE EDIT  ^PS(51  PSSJEEU  
Outpatient Pharmacy 1 ^PS(51.1  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(51.1 - [#51.1] Classic Fileman Calls,  GET1^DIQ
^PS(52.6 - [#52.6] GET1^DIQ
52.61 GET1^DIQ

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
CHKORD ENPSJ+12
DAYS SCRN+4
DIC EN+6
DNVX ENSNV+3, ENPSJ+11
DONE EN+2, EN+4, EN+5, EN+6, EN+7, EN+9, EN+10, EN+12
DW EN+4
DWC DW+3
ENCHK EN+5, DW+1
ENOAS ENPSJ+5
MSG1 SCRN+5
MSG2 SCRN+8
MSG3 SCRN+7
MSG4 SCRN+6
OASCHK ENPSJ+4
TIMECHK SCRN+4

Naked Globals

Name Field # of Occurrence
^( EN+6
^(0 DIC+2, DIC+5, ENSNV+3, ENFQD+1, ENDNV+2
^(1 DIC+5

Local Variables

Legend:

>> 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*, DWCDWC+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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All