Routine: PSJVINI1

Package	Total	Call Graph
VA Fileman	6	WAIT^DICD YN^DICN DT^DICRW IXALL^DIK I^DITR EN^DIU2

Package

Total

Call Graph

WAIT^DICD YN^DICN DT^DICRW IXALL^DIK I^DITR EN^DIU2

Package	Total	Caller Graph
Inpatient Medications	1	PSJVINIT

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"SHALL I WRITE OVER FILE SECURITY CODES" Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"ARE YOU SURE EVERYTHING'S OK" Line Location: ASK+2
Function Call: WRITE	Prompt: "." Line Location: ASK+5
Function Call: WRITE	Prompt: !?6,"Answer YES to replace the current "_Y_"S with the incoming ones." Line Location: W+1
Function Call: WRITE	Prompt: "." Line Location: IX+0

FileNo	Call Tags
^DIC - [#1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(	IX
^DIC - [#1]	IX+2
^UTILITY(	ASK+4!, ASK+6, DATA, DATA+1, DATA+2!
^UTILITY("DIK"	ASK+4!
^XMB(3.9 - [#3.9]	MSG+1, MSG+2, NT

Name	Field # of Occurrence
^(	ASK+6!, DATA+1, IX!, NT
^(0	DATA+1, MSG+2

Name	Field # of Occurrence
%	PSJVINI1+4, PSJVINI1+5, ASK, ASK+2, W+1, W+2, IX, N~, SAVE+2, M1 , M1+2, M1+3, M1+4*
A0	SAVE+1*!
D	PSJVINI1+4!, ASK+6, DATA, DATA+1, IX, IX+1, IX+2, M1*, M1+2
D0	PSJVINI1+4!, DATA+1*
DA	PSJVINI1+4!
DA(1	IX+1*
DDF	PSJVINI1+4!, DATA+2!
DDF(1	DATA*, DATA+1, DATA+2
DDT	PSJVINI1+4!, DATA+2!
DDT(0	DATA*
DFN	DATA+2!
DFR	PSJVINI1+4!, DATA+2!
DFR(1	DATA+1*
DIC	PSJVINI1+4!
>> DIDIU	ASK+3*
DIDUZ	PSJVINI1+4!
DIF	PSJVINI1+4!
>> DIFKEP	ASK+3
>> DIFKEP(	ASK+3
DIFQ	PSJVINI1+5!, ASK!, ASK+1, ASK+2!, W+2!
DIFQ(	ASK+6, W+2*, M1
DIFQ(0	ASK, W
>> DIFQR(	DATA+1, M1+2
DIK	PSJVINI1+4!, IX, IX+1, IX+2*
DIR	PSJVINI1+4!
>> DIU	ASK+3*
>> DIU(0	ASK+3*
DIX	PSJVINI1+4!
>> DKP	DATA+1*
DLAYGO	PSJVINI1+4!
>> DMRG	DATA+1*
>> DN	ASK+5*
>> DSEC	PSJVINI1+4, ASK, M1
DTN	PSJVINI1+4!, DATA+2!
DTO	PSJVINI1+4!, DATA+1*, DATA+2!
DTO(0	DATA+1*
DZ	PSJVINI1+4!
>> NO	PSJVINI1+5*
>> R	ASK+5*
U	PSJVINI1+4*, PSJVINI1+5, ASK+4, ASK+6, DATA, DATA+1, DATA+2, MSG+1
X	ASK+1, W+2, B36~, MSG+2, M0, NT, SAVE, SAVE+1, SAVE+2, M1
>> XCN	MSG+2, NT*
>> XMZ	MSG+1, MSG+2, NT
>> Y	W, W+1, SAVE, SAVE+2, M1*, M1+1, M1+2, M1+3
>> Z	DATA+1*

Information

Name	Field # of Occurrence
$T(@X	W
$T(@Y	M1+4