Routine: PSGSETU

Information

PSGSETU ;BIR/CML3-PACKAGE UTILITIES ;10 Mar 99 / 10:53 AM

Source Information

Source file <PSGSETU.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	2	(,HOME)^%ZIS ^%ZISC
VA Fileman	2	NOW^%DTC ^DIC
RPC Broker	1	$$BROKER^XWBLIB
Registration	1	TERM^VALM0

Caller Graph

Caller Graph Total: 101

Package	Total	Caller Graph
Inpatient Medications	97	PSGAMS PSGAP PSGBRJ PSGCAP PSGCAP0 PSGDCC PSGDCT PSGDCTP PSGDS PSGEUD PSGEUDD PSGFILD0 PSGFILED PSGL PSGLBA PSGMAR PSGMMAR PSGOE PSGOEC PSGOECA PSGOEHA PSGORS0 PSGPER PSGPER1 PSGPL PSGPL1 PSGPLD PSGPLDP PSGPLPRG PSGPLRP PSGPLUP PSGPO PSGPR PSGPRVR PSGRET PSGS0 PSGSCT PSGSET PSGSICHK PSGSSP PSGTAP PSGTCTD PSGVBW PSGVBW0 PSGVBWP PSIVALNC PSIVAMIS PSIVAOR PSIVDRG PSIVLBDL PSIVMAN PSIVORA1 PSIVORC1 PSIVPGE PSIVPR PSIVREC PSIVRP1 PSIVRQ PSIVSET PSIVSTAT PSIVSUS PSIVSUS1 PSIVUWL PSIVXU PSJADT PSJEEU0 PSJEXP PSJI ACTIVE PSJI ALIGNMENT PSJI CONTROL CODES PSJI DELETE ORDER PSJI DEVICE PSJI DRUG FORM PSJI DRUG INQUIRY PSJI INDIVIDUAL SUSPENSE PSJI LBLI PSJI LBLS PSJI MGR PSJI OR PR PSJI PATIENT COST PSJI PROFILE PSJI PROVIDER REPORT PSJI SITE PARAMETERS PSJI SUPERVISOR PSJI USR1 PSJI USR2 PSJI WARD PSJI WARD/DRUG USAGE REPORT PSJLOI PSJMDWS PSJOE PSJPR PSJPRE42 PSJPRE43 PSJPRE44 PSJU MGR PSJU SFB
Pharmacy Data Management	4	PSSFIL PSSJI DRUG INQUIRY PSSJI EDIT DRUG COST PSSVIDRG

Name	Comments	DBIA/ICR reference
ENDTC(Y)	; convert FM internal date/time to user readable format
ENIVKV	; kill IV variables
ENKV	; when exiting package
ENCV	; check for (and set) package variables
SYSL	;

Name	Field # of Occurrence
NOW^%DTC	ENCV+5
^%ZIS	SYSL+4
HOME^%ZIS	ENCV+1, SYSL+4
^%ZISC	ENCV+1
^DIC	ENCV+15
TERM^VALM0	ENCV+4
$$BROKER^XWBLIB	ENCV+3

FileNo	Call Tags
^PS(53.45 - [#53.45]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	ENCV+3
^TMP("PSJUSER"	ENCV+6, ENCV+21*
^VA(200 - [#200]	ENCV+8, ENCV+10
^XUSEC("PSJ "	ENCV+16
^XUSEC("PSJ RNFINISH"	ENCV+12, ENCV+18
^XUSEC("PSJ RNURSE"	ENCV+11
^XUSEC("PSJI PHARM TECH"	ENCV+14
^XUSEC("PSJI RNFINISH"	ENCV+13

Name	Line Occurrences
SYSL	ENCV+9, ENCV+19

Name	Field # of Occurrence
^(0	ENCV+8
^(1	ENCV+6, ENCV+8, ENCV+21*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ENKV+3!, ENCV+5, ENCV+6!, ENCV+8, ENCV+10, ENCV+21!
%DT	ENKV+3!, ENCV+1!
%H	ENKV+3!, ENCV+6!, ENCV+21!
%I	ENKV+3!, ENCV+6!, ENCV+21!
%T	ENKV+3!
%X	ENKV+3!
%Y	ENKV+3!
%ZIS	ENKV+3!, ENCV+1!, SYSL+4!*
CHK	ENIVKV+1!
D	ENKV+3!
D0	ENKV+3!
D1	ENKV+3!
D2	ENKV+3!
DA	ENKV+3!, ENCV+21!
DFN	ENKV+2!
DI	ENKV+3!
DIC	ENKV+3!, ENCV+1!, ENCV+15*, ENCV+21!
DIC(0	ENCV+15*
DICR	ENKV+3!
DIE	ENKV+3!
DIG	ENKV+3!
DIH	ENKV+3!
DIK	ENKV+3!
>> DINUM	ENCV+15*
DIQ	ENKV+3!
DIR	ENKV+3!
DIRUT	ENKV+3!
DISYS	ENKV+3!
DIU	ENKV+3!
DIV	ENKV+3!
DIW	ENKV+3!
DLAYGO	ENKV+3!, ENCV+15*, ENCV+21!
DP	ENKV+3!
DQ	ENKV+3!
DR	ENKV+3!
DT	ENCV+8, ENCV+10
DTOUT	ENKV+3!
DUOUT	ENKV+3!
DUZ	ENCV+8, ENCV+10, ENCV+11, ENCV+12, ENCV+13, ENCV+14, ENCV+15, ENCV+16, ENCV+18
DZ	ENKV+3!
IO	SYSL+4
IO("Q"	ENKV+3!
ION	SYSL+4
IOP	ENKV+3!, ENCV+1!, SYSL+3, SYSL+4
POP	ENKV+3!, SYSL+4
PSGDDI	ENKV+4!
PSGDT	ENKV+4!, ENCV+5*
PSGID	ENKV+4!
PSGION	ENKV+4!
PSGOD	ENKV+4!
PSGP	ENKV+1!
PSGPXDEV	ENKV+4!
PSIVBR	ENIVKV+1!
PSIVENO	ENIVKV+1!
PSIVPL	ENIVKV+1!
PSIVPR	ENIVKV+1!
PSIVSITE	ENIVKV+1!
PSIVSN	ENIVKV+1!
PSJIRNF	ENKV+4!, ENCV+13*
PSJITECH	ENKV+4!, ENCV+14*
PSJNKF	ENKV+2, ENKV+3!
PSJOCNT	ENKV+4!
PSJORPVN	ENKV+4!
PSJPAD	ENKV+1!
PSJPAGE	ENKV+1!
PSJPBID	ENKV+1!
PSJPCAF	ENKV+1!
PSJPDD	ENKV+1!
PSJPDOB	ENKV+1!
PSJPDX	ENKV+1!
PSJPFWD	ENKV+1!
PSJPHT	ENKV+1!
PSJPHTD	ENKV+1!
PSJPN	ENKV+4!
PSJPPID	ENKV+1!
PSJPPR	ENKV+1!
PSJPRB	ENKV+1!
PSJPSEX	ENKV+1!
PSJPSSN	ENKV+1!
PSJPTD	ENKV+1!
PSJPTS	ENKV+1!
PSJPTSP	ENKV+1!
PSJPWD	ENKV+1!
PSJPWDN	ENKV+1!
PSJPWT	ENKV+1!
PSJPWTD	ENKV+1!
PSJRNF	ENKV+4!, ENCV+12*
PSJSYSL	ENKV+4!, ENCV+8, ENCV+9, ENCV+18, ENCV+19, SYSL+1, SYSL+2, SYSL+4
PSJSYSP	ENKV+4!, ENCV+8, ENCV+16, ENCV+21
PSJSYSP0	ENKV+4!, ENCV+8, ENCV+16, ENCV+18, ENCV+20*, ENCV+21, SYSL+3
PSJSYSU	ENKV+4!, ENCV+6, ENCV+8, ENCV+10, ENCV+16, ENCV+17, ENCV+18*, ENCV+20, ENCV+21, SYSL+2
PSJSYSW	ENKV+4!
PSJSYSW0	ENKV+4!, ENCV+9, ENCV+19, SYSL+1, SYSL+2, SYSL+3
Q	ENKV+4!
QQ	ENKV+4!
VA	ENKV+2!
VADM	ENKV+2!
VAERR	ENKV+2!
VAIN	ENKV+2!
VAIP	ENKV+2!
>> VALMWD	ENCV+2
X	ENKV+3!, ENCV+3, ENCV+6!, ENCV+15, ENCV+16, ENCV+21!, SYSL+2, SYSL+3*
X1	ENKV+3!
X2	ENKV+3!
XX	ENKV+3!
Y	ENKV+3!, ENCV+16, ENCV+21!, ENDTC~, ENDTC+1, ENDTC+2, ENDTC+3
Y(0	ENCV+16
>> ZTQUEUED	ENCV+2
ZTSK	ENKV+3!

Customize PDF page

Package: Inpatient Medications

Routine: PSGSETU

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 101

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: