Routine: PSXHSYS

Package	Total	Call Graph
Kernel	2	ISQED^%ZTLOAD ($$FMTE,$$HTE,$$HTFM)^XLFDT
VA Fileman	2	^DIE ^DIR
CMOP	1	EDITDOD^PSXHSYS1

Package	Total	Caller Graph
CMOP	2	PSXSTRT PSXYSTRT

Entry Points

External References

Name	Field # of Occurrence
ISQED^%ZTLOAD	STATUS+26, STATUS+30, STATUS+34, STATUS+38
^DIE	QRI+10, DRCSTMIS+2
^DIR	ASK1
EDITDOD^PSXHSYS1	EDIT+1
$$FMTE^XLFDT	STATUS+11, STATUS+13, STATUS+17, STATUS+26, STATUS+30, STATUS+34, STATUS+38
$$HTE^XLFDT	STATUS+16
$$HTFM^XLFDT	STATUS+26, STATUS+30, STATUS+34, STATUS+38

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: STATUS+2
Function Call: READ	Prompt: "Enter ""^"" to quit" Formatting: ! Timeout: 30 Variable: END Line Location: ASK+0
Function Call: WRITE	Prompt: !!,?((IOM\2)-($L(PSXTXT)\2)),PSXTXT Line Location: RPT+1
Function Call: WRITE	Prompt: !!," Interface",?23,": ",$S(PSXSTAT="R":"RUNNING",1:"STOPPED") Line Location: RPT+2
Function Call: WRITE	Prompt: !!," Last Order Processed ",?23,": ",$G(PSX1),$G(SP),$G(SITE),$G(SP1),$G(ACKTM) Line Location: RPT+5
Function Call: WRITE	Prompt: !!," Last Query Completed",?23,": #",$S($G(QFLG)=0:$G(QRY),$G(QFLG)=1:$G(QRY)-1,1:""),$G(SP2),$G(TRX),$G(SP5),$G(QTM) Line Location: RPT+6
Function Call: WRITE	Prompt: !!," Background Process",?43,"Last Ran",?66,"Scheduled For" Line Location: RPT+10
Function Call: WRITE	Prompt: !!," Release Data Filed in Master Database.....",?43,$G(LRF),SP4,$S($G(RFNS)=1:"Not Scheduled",1:$G(RFNXT)) Line Location: RPT+11
Function Call: WRITE	Prompt: !," Database Purge............................",?43,$G(DBF),SP4,$S($G(DBNS)=1:"Not Scheduled",1:$G(DBNXT)) Line Location: RPT+12
Function Call: WRITE	Prompt: !," Release File Purge........................",?43,$G(LRFP),SP4,$S($G(RFPNS)=1:"Not Scheduled",1:$G(RFPNXT)) Line Location: RPT+13
Function Call: WRITE	Prompt: !," Release Acknowledgement File Purge........",?43,$G(ARF),SP4,$S($G(AFNS)=1:"Not Scheduled",1:$G(AFNXT)) Line Location: RPT+14
Function Call: WRITE	Prompt: !!,"Query Request Interval: ",$G(QRI),"// " Line Location: QRI+0
Function Call: WRITE	Prompt: !!,"This is the minimum time interval between query requests.",!,"Enter the number in hour(s) and/or fractions of an hour interval.",!,"Example: 1.25 = 12 hr 25 min, .30 = 30 min, 1 = 1 hr.",! Line Location: QRI+7
Function Call: WRITE	Prompt: !,"Query Limit Request: ",$G(QLR)," Rx's// " Line Location: QLR+0
Function Call: WRITE	Prompt: !!,"This is the maximum number of Rx's that will be accepted during a query request.",! Line Location: QLR+2
Function Call: WRITE	Prompt: !,"Enter a numeric value between 1 and 99999." Line Location: QLR+4
Function Call: WRITE	Prompt: !,"Enter a numeric value between 1 and 99999." Line Location: QLR+5
Function Call: WRITE	Prompt: !,"Days to Retain Release Summary: ",$G(RAS)," days// " Line Location: RAS+0
Function Call: WRITE	Prompt: !!,"This is the number of days of Release Acknowledgements that will be retained in",!,"the file system. Maximum number of days is 10, minimum number of days is 0.",! Line Location: RAS+2
Function Call: WRITE	Prompt: !,"Enter a number value between 1 and 10." Line Location: RAS+4
Function Call: WRITE	Prompt: !,"Maximum number of days to keep is 10." Line Location: RAS+5
Function Call: WRITE	Prompt: !,"Minimum number of days to keep is 1." Line Location: RAS+6
Routine Call	DIE Line Location: QRI+10 DRCSTMIS+2
Routine Call	DIR Line Location: ASK1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSX(552.1	STATUS+14, STATUS+17, STATUS+18, STATUS+19, STATUS+20, STATUS+21, STATUS+22
^PSX(552.2	STATUS+14, STATUS+16, RPT+8, RPT+9
^PSX(553	STATUS+6, STATUS+14, EDIT+2, QRI+10, QRI+11, QLR+6*
^PSX(553.1	STATUS+9, STATUS+10, STATUS+11, STATUS+12, STATUS+13, STATUS+23
^PSX(554	STATUS+24, STATUS+26, STATUS+28, STATUS+30, STATUS+32, STATUS+34, STATUS+36, STATUS+38, RPT+7, RPT+9 , EDIT+6, RAS+8*, DRCSTMIS+2, DRCSTMIS+3
^XUSEC("PSXDOD"	EDIT+1

Label References

Name	Line Occurrences
ASK	STATUS+51
ASK1	STATUS+51
EXIT	STATUS+1, STATUS+52, ASK, ASK1
EXIT1	QRI+1, QLR+1, QLR+7, RAS+1
QLR	QLR+2, QLR+4, QLR+5
QRI	QRI+7, QRI+11
RAS	RAS+2, RAS+4, RAS+5, RAS+6
RPT	STATUS+51
STATUS	ASK

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACKSUM	RAS, RAS+1, RAS+2, RAS+3, RAS+4, RAS+5, RAS+6, RAS+8, EXIT1!
ACKT	STATUS+3!, EXIT!
ACKTM	STATUS+3!, STATUS+16, STATUS+17, RPT+5, EXIT!
AF	STATUS+4!, STATUS+36, STATUS+38, STATUS+39, EXIT+1!
AFNS	STATUS+4!, STATUS+36*, STATUS+37, RPT+14, EXIT+1!
AFNXT	STATUS+4!, STATUS+39*, RPT+14, EXIT+1!
ANXT	STATUS+4!, STATUS+38*, STATUS+39, EXIT+1!
ARF	STATUS+4!, STATUS+39*, RPT+14, EXIT+1!
ATM	STATUS+4!, STATUS+16, STATUS+17, EXIT+1!
BCNT	STATUS+3!, STATUS+8, STATUS+19, STATUS+40, RPT+3, RPT+4, EXIT!
CNT	STATUS+3!, STATUS+8, STATUS+18, STATUS+20*, RPT+3, EXIT!
CQRY	STATUS+4!, STATUS+23*, EXIT+1!
DA	QRI+9, QRI+10!, DRCSTMIS+1!, DRCSTMIS+2, DRCSTMIS+3!
DB	STATUS+4!, STATUS+28, STATUS+30, STATUS+31, EXIT+1!
DBF	STATUS+4!, STATUS+31*, RPT+12, EXIT+1!
DBNS	STATUS+4!, STATUS+28*, STATUS+29, RPT+12, EXIT+1!
DBNXT	STATUS+4!, STATUS+31*, RPT+12, EXIT+1!
DIE	QRI+9, QRI+10!, DRCSTMIS+1!, DRCSTMIS+2, DRCSTMIS+3!
>> DIR(0	ASK1*
>> DIROUT	ASK1
>> DIRUT	ASK1
DNXT	STATUS+4!, STATUS+30*, STATUS+31, EXIT+1!
DORD	STATUS+3!, STATUS+8, STATUS+22, EXIT!
DOWN	STATUS+3!, STATUS+8, STATUS+22, EXIT!
DQRY	STATUS+3!, STATUS+8, STATUS+23, EXIT!
DR	QRI+9, QRI+10!, DRCSTMIS+1!, DRCSTMIS+2, DRCSTMIS+3!
DRX	STATUS+3!, STATUS+8, STATUS+22, EXIT!
DT	STATUS+21, STATUS+23
DTIME	QRI, QLR, RAS
>> DTOUT	ASK1
DTQRY	STATUS+3!, STATUS+8, STATUS+23, EXIT!
>> DUOUT	ASK1
DUZ	EDIT+1
END	STATUS+1, STATUS+3!, STATUS+50, ASK!, EXIT!
HR	EDIT+4, EDIT+5, QRI+4, QRI+5, EXIT1!
I	STATUS+41*, STATUS+49!
IEN512	STATUS+4!, STATUS+14*, STATUS+16, EXIT+1!
IN5521	STATUS+4!, STATUS+14*, STATUS+17, EXIT+1!
IOF	STATUS+2
IOM	RPT+1, RPT+7, RPT+8
J	STATUS+42*, STATUS+49!
K	STATUS+43*, STATUS+49!
L	STATUS+45*, STATUS+49!
LEN	EDIT+3, QRI+3, EXIT1!
LFP	STATUS+4!, STATUS+34*, STATUS+35, EXIT+1!
LR	STATUS+4!, STATUS+26*, STATUS+27, EXIT+1!
LRF	STATUS+4!, STATUS+27*, RPT+11, EXIT+1!
LRFP	STATUS+4!, STATUS+35*, RPT+13, EXIT+1!
M	STATUS+44*, STATUS+49!
MIN	EDIT+4, EDIT+5, QRI+4, QRI+5, EXIT1!
N	STATUS+46*, STATUS+49!
O	STATUS+4!, STATUS+47*, STATUS+49!, EXIT+1!
OCNT	STATUS+3!, STATUS+8, STATUS+20, RPT+3, EXIT!
>> PSX(553	QRI+10
PSX1	STATUS+3!, STATUS+8~, STATUS+14, STATUS+15, STATUS+40, RPT+5, EXIT!
PSX2	STATUS+8~
PSXIN	STATUS+51, EXIT!
PSXSTAT	STATUS+3!, STATUS+5~, STATUS+6*, STATUS+7, RPT+2, EXIT!
PSXTXT	STATUS+3!, STATUS+5~, RPT*, RPT+1, EXIT!
PSXTXT1	STATUS+3!, STATUS+48*, RPT+7, EXIT!
PSXTXT2	STATUS+48*, RPT+8, EXIT!
PSXTXT3	STATUS+3!, STATUS+47*, RPT+9, EXIT!
QA	EDIT+2*, QRI+8, EXIT1!
QFLG	STATUS+4!, STATUS+8, STATUS+12, STATUS+40, RPT+6, EXIT+1!
QI	EDIT+2, EDIT+3, EDIT+4, EDIT+5, QRI+2, EXIT1!
QIA	QRI+2, QRI+3, QRI+4, QRI+5, EXIT1!
QLIM	QLR, QLR+1, QLR+2, QLR+3, QLR+4, QLR+5, QLR+6, EXIT1!
QLR	EDIT+2*, QLR, QLR+3, EXIT1!
QRI	EDIT+5*, QRI, EXIT1!
QRIB	QRI+5*, QRI+6, EXIT1!
QRY	STATUS+3!, STATUS+9, STATUS+10, STATUS+11, STATUS+12, STATUS+13, STATUS+23, STATUS+40, RPT+6, EXIT! , EXIT1!
QRYA	EXIT1!
QRYINT	QRI, QRI+1, QRI+2, QRI+7, QRI+8, QRI+9, QRI+11, EXIT1!
QT	STATUS+3!, STATUS+11, STATUS+13, EXIT!
QTM	STATUS+4!, STATUS+11, STATUS+13, RPT+6, EXIT+1!
RAS	EDIT+6*, QLR+7, RAS, RAS+3, EXIT1!
REC	EDIT+6, RAS+8, EXIT1!
RF	STATUS+4!, STATUS+24*, STATUS+26, EXIT+1!
RFANXT	STATUS+4!, STATUS+34*, STATUS+35, EXIT+1!
RFNS	STATUS+4!, STATUS+24*, STATUS+25, RPT+11, EXIT+1!
RFNXT	STATUS+4!, STATUS+27*, RPT+11, EXIT+1!
RFP	STATUS+4!, STATUS+32*, STATUS+34, EXIT+1!
RFPNS	STATUS+4!, STATUS+32*, STATUS+33, RPT+13, EXIT+1!
RFPNXT	STATUS+4!, STATUS+35*, RPT+13, EXIT+1!
RNXT	STATUS+4!, STATUS+26*, STATUS+27, EXIT+1!
SITE	STATUS+3!, STATUS+14*, STATUS+40, RPT+5, EXIT!
SP	STATUS+3!, STATUS+41*, RPT+5, EXIT!
SP1	STATUS+3!, STATUS+42*, RPT+5, EXIT!
SP2	STATUS+3!, STATUS+43*, RPT+6, EXIT!
SP3	STATUS+3!, STATUS+44*, EXIT!
SP4	STATUS+3!, STATUS+48*, RPT+11, RPT+12, RPT+13, RPT+14, EXIT!
SP5	STATUS+3!, STATUS+45*, RPT+6, EXIT!
SP6	STATUS+3!, STATUS+46*, RPT+3, EXIT!
SQRY	STATUS+4!, STATUS+23*, EXIT+1!
ST	STATUS+3!, EXIT!
ST1	STATUS+3!, EXIT!
ST2	STATUS+3!, EXIT!
STAT	STATUS+4!, STATUS+10*, STATUS+11, STATUS+12, STATUS+13, EXIT+1!
STRT	STATUS+4!, STATUS+21*, EXIT+1!
TQRY	STATUS+3!, EXIT!
TRANS	STATUS+4!, STATUS+14*, EXIT+1!
TRX	STATUS+3!, STATUS+8, STATUS+11, STATUS+12, STATUS+13, STATUS+40*, RPT+6, EXIT!
TTRX	STATUS+4!, STATUS+8, STATUS+12, EXIT+1!
X1	STATUS+3!, STATUS+40*, STATUS+41, EXIT!
X2	STATUS+3!, STATUS+40*, STATUS+42, EXIT!
X3	STATUS+3!, STATUS+40*, STATUS+43, EXIT!
X4	STATUS+3!, STATUS+40*, STATUS+44, EXIT!
X5	STATUS+3!, STATUS+40*, STATUS+45, EXIT!
X6	STATUS+3!, STATUS+40*, STATUS+46, EXIT!
XBAT	STATUS+4!, STATUS+21*, EXIT+1!
XREC	STATUS+4!, STATUS+21*, STATUS+22, EXIT+1!
XXX	STATUS+3!, STATUS+19*, EXIT!
>> Y	ASK1
YYY	STATUS+3!, STATUS+19*, EXIT!
ZTSK	STATUS+4!, STATUS+26, STATUS+30, STATUS+34, STATUS+38, EXIT+1!
ZTSK("D"	STATUS+26, STATUS+30, STATUS+34, STATUS+38
ZTSK(0	STATUS+26, STATUS+30, STATUS+34, STATUS+38
ZZZ	STATUS+3!, STATUS+4!, STATUS+19*, STATUS+20, EXIT!, EXIT+1!

Customize PDF page

Package: CMOP

Routine: PSXHSYS

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
STATUS	;display CMOP status for entry action on RX menu
ASK1
RPT
EDIT	;Enter/Edit site parameters on the CMOP host facility system.
QRI
QLR
EXIT
RAS
ASK
EXIT1
DRCSTMIS	;edit 554 parameter for "CMOP DRUG Cost Missing" report