Routine: PSAVINC

Information

PSAVINC ;BIR/LTL-Update Prices ;7/23/97

Package	Total	Call Graph
VA Fileman	4	COMMA^%DTC ^DIC ^DIE ^DIR
Drug Accountability	1	^PSADA
IFCAP	1	($$DESCR,$$INVNAME,$$UNITCODE)^PRCPUX1

Package	Total	Caller Graph
Drug Accountability	1	PSA GIP CONT BAL UPDATE

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no drugs in ",PSALOCN Line Location: LOOK+1
Function Call: WRITE	Prompt: !!,"You may select one, several, or ^ALL drugs.",! Line Location: LOOK+2
Function Call: WRITE	Prompt: ! Line Location: CHKD+0
Function Call: WRITE	Prompt: X,"/" Line Location: LOOP+4
Function Call: WRITE	Prompt: X,"/" Line Location: LOOP+18
Function Call: WRITE	Prompt: " => ",X,"/",$P(PSAU(6),U,28),!! Line Location: LOOP+23
Function Call: WRITE	Prompt: !! Line Location: PRI+1
Function Call: WRITE	Prompt: "New price per ",$P(PSAU(9),U,8)," => ",$P($G(^(660)),U,6),!! Line Location: PRI+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HEADER+2
Function Call: WRITE	Prompt: !?2,"DRUG File Price Update",?55,PSARPDT,?70,"PAGE: ",PSAPG,!,PSALN,! Line Location: HEADER+2
Routine Call	DIE Line Location: PRI+1
Routine Call	DIC Line Location: CHKD
Routine Call	DIR Line Location: END HEADER+1

FileNo	Call Tags
^PSDRUG - [#50]	Classic Fileman Calls
^PSD(58.8 - [#58.8]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	START+1
^DIC(51.5 - [#51.5]	LOOP+5
^PRCP(445	LOOP+12, LOOP+13, LOOP+17
^PSD(58.8 - [#58.8]	LOOK+1, CHKD+1, LOOP+13
^PSDRUG - [#50]	LOOP+1, LOOP+2, LOOP+9, LOOP+10, LOOP+11, PRI+2

Name	Field # of Occurrence
^(660	PRI+2

Name	Field # of Occurrence
%DT	START+1~
DA	PSAVINC+4~, PRI*
DIC	PSAVINC+4~, CHKD*!
DIC("A"	CHKD*
DIC("S"	CHKD*
DIC(0	CHKD*
DIE	PRI*, PRI+1!
DIR	PSAVINC+4~, END!, HEADER+1!
DIR("A"	END*
DIR(0	END, HEADER+1
DR	PSAVINC+4~, PRI*
DT	START+1
DTOUT	PSAVINC+4~
DUOUT	PSAVINC+4~
IOF	HEADER+2
IOSL	LOOP
PSA	PSAVINC+4~
PSA(	CHKD, CHKD+1, START+2
PSA(0	START+1
PSACNT	PSAVINC+4~, LOOK+2, CHKD
PSALN	START+1~, HEADER+2*
PSALOC	PSAVINC+4~, LOOK, LOOK+1, CHKD+1
PSALOCN	PSAVINC+4~, LOOK+1, CHKD
PSAOUT	PSAVINC+4~, LOOK, START+1, START+2, LOOP, PRI+1, END, HEADER+1*
PSAPG	START+1~, HEADER+1, HEADER+2
PSAR	PSAVINC+4~, START+1~*
PSARPDT	PSAVINC+4~, START+1~*, HEADER+2
PSAT	PSAVINC+4~
PSAU	PSAVINC+4~, CHKD+1, START+1, START+2, LOOP+1, LOOP+2, LOOP+9, LOOP+10, LOOP+11, PRI , PRI+2
PSAU(1	START+1, LOOP+10, LOOP+11
PSAU(11	LOOP+19*, LOOP+20, LOOP+21
PSAU(2	LOOP+11*, LOOP+12, LOOP+13, LOOP+15, LOOP+17
PSAU(3	LOOP+13*, LOOP+15, LOOP+16, LOOP+17
PSAU(5	LOOP+14*
PSAU(6	LOOP+17*, LOOP+18, LOOP+19, LOOP+20, LOOP+21, LOOP+22, LOOP+23
PSAU(8	LOOP+5*, LOOP+6
PSAU(9	LOOP+2*, LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+8, PRI+2
U	LOOP+1, LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+8, LOOP+11, LOOP+18, LOOP+19, LOOP+20 , LOOP+21, LOOP+22, LOOP+23, PRI+2
X	PSAVINC+4~, CHKD, CHKD+1, LOOP+4, LOOP+7, LOOP+8, LOOP+18, LOOP+22, LOOP+23
X2	PSAVINC+4~, LOOP+4, LOOP+7, LOOP+18, LOOP+23
X3	PSAVINC+4~, LOOP+4, LOOP+7, LOOP+18, LOOP+23
Y	PSAVINC+4~, CHKD, START+1*, PRI+1, HEADER+1