Routine: PSAORDP2

Package	Total	Call Graph
Drug Accountability	1	$$DATE^PSAORDP1
VA Fileman	1	^DIR

Package	Total	Caller Graph
Drug Accountability	1	PSAORDP1

Entry Points

Name	Comments	DBIA/ICR reference
LINEHDR	;item header
HDR1
ADJQ	;Print Adj Qty
ADJP	;Print Adj Price
SCREEN	;Hold on screen
HEADER	;Page header
ADJO	;Print Adj Order Unit
ADJD	;Print Adj Drug

External References

Name	Field # of Occurrence
^DIR	SCREEN+4
$$DATE^PSAORDP1	ADJD+3, ADJD+4, ADJQ+4, ADJQ+5, ADJO+4, ADJO+5, ADJP+4, ADJP+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSADVDT)_" "_$P($G(^VA(200,+PSADVDUZ,0)),"^")_" (V)" Line Location: ADJD+3
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSADPDT)_" "_$P($G(^VA(200,+PSADPDUZ,0)),"^")_" (P)" Line Location: ADJD+4
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAQVDT)_" "_$P($G(^VA(200,+PSAQVDUZ,0)),"^")_" (V) = "_PSADJQV,!?11,PSAQVREA Line Location: ADJQ+4
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAQPDT)_" "_$P($G(^VA(200,+PSAQPDUZ,0)),"^")_" (P) = "_PSADJQP,!?11,PSAQPREA Line Location: ADJQ+5
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAOVDT)_" "_$P($G(^VA(200,+PSAOVDUZ,0)),"^")_" (V) = "_$P($G(^DIC(51.5,+PSADJOV,0)),"^") Line Location: ADJO+4
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAOPDT)_" "_$P($G(^VA(200,+PSAOPDUZ,0)),"^")_" (P) = "_$P($G(^DIC(51.5,+PSADJOP,0)),"^") Line Location: ADJO+5
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAPVDT)_" "_$P($G(^VA(200,+PSAPVDUZ,0)),"^")_" (V) = $"_$S($L($P(PSADJPV,".",2))<2:$FN(PSADJPV,",",2),1:PSADJPV) Line Location: ADJP+4
Function Call: WRITE	Prompt: !?9,$$DATE^PSAORDP1(PSAPPDT)_" "_$P($G(^VA(200,+PSAPPDUZ,0)),"^")_" (P) = $"_$S($L($P(PSADJPP,".",2))<2:$FN(PSADJPP,",",2),1:PSADJPP) Line Location: ADJP+5
Function Call: WRITE	Prompt: !?50,"ORDER",?62,"COST/",?71,"EXTENDED" Line Location: LINEHDR+1
Function Call: WRITE	Prompt: !,"LINE#",?9,"NDC",?25,"VSN",?43,"QTY",?51,"UNIT",?62,"UNIT",?75,"COST",!,PSADLN,! Line Location: LINEHDR+2
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+1
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+3
Function Call: WRITE	Prompt: !?20,"DRUG ACCOUNTABILITY/INVENTORY INTERFACE" Line Location: HDR1+0
Function Call: WRITE	Prompt: !?27,"PRIME VENDOR ORDER REPORT",! Line Location: HDR1+1
Function Call: WRITE	Prompt: ?(74-$L(PSAPAGE)),"PAGE "_PSAPAGE,!,PSADLN Line Location: HDR1+3
Function Call: WRITE	Prompt: !,"RUN: "_PSARUN,?(74-$L(PSAPAGE)),"PAGE "_PSAPAGE,!,PSADLN Line Location: HDR1+4
Function Call: WRITE	Prompt: ! Line Location: SCREEN+1
Function Call: WRITE	Prompt: " * THE DRUG WAS MATCHED TO THE DRUG FILE." Line Location: SCREEN+2
Function Call: WRITE	Prompt: !,"** THE ITEM IS A SUPPLY ITEM." Line Location: SCREEN+3
Routine Call	DIR Line Location: SCREEN+4

Name	Line Occurrences (* Changed, ! Killed)
^DIC(51.5 - [#51.5]	ADJO+3, ADJO+4, ADJO+5
^VA(200 - [#200]	ADJD+3, ADJD+4, ADJQ+4, ADJQ+5, ADJO+4, ADJO+5, ADJP+4, ADJP+5

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	SCREEN+4!
DIR(0	SCREEN+4*
>> DIRUT	SCREEN+4
IOF	HEADER+1, HEADER+3
IOSL	ADJD+2, ADJQ+2, ADJO+2, ADJP+2
IOST	ADJD+2, ADJQ+2, ADJO+2, ADJP+2, HEADER+1, HDR1+3, HDR1+4
>> PSADJD	ADJD+1
>> PSADJDP	ADJD+2, ADJD+4
>> PSADJDRG	SCREEN+2
>> PSADJDV	ADJD+2, ADJD+3
>> PSADJO	ADJO+1, ADJO+3
>> PSADJOP	ADJO+2, ADJO+5
>> PSADJOV	ADJO+2, ADJO+4
>> PSADJP	ADJP+1, ADJP+3
>> PSADJPP	ADJP+2, ADJP+5
>> PSADJPV	ADJP+2, ADJP+4
>> PSADJQ	ADJQ+1, ADJQ+3
>> PSADJQP	ADJQ+2, ADJQ+5
>> PSADJQV	ADJQ+2, ADJQ+4
>> PSADJSUP	SCREEN+3
>> PSADLN	LINEHDR+2, HDR1+3, HDR1+4
>> PSADPDT	ADJD+4
>> PSADPDUZ	ADJD+4
>> PSADVDT	ADJD+3
>> PSADVDUZ	ADJD+3
>> PSAEND	SCREEN+2, SCREEN+3
>> PSAFPG	HEADER+1, HEADER+2*, HEADER+3
>> PSAINVN	HDR1+2
>> PSAOPDT	ADJO+5
>> PSAOPDUZ	ADJO+5
>> PSAORDER	HDR1+2
>> PSAOUT	ADJD+1, ADJD+2, ADJQ+1, ADJQ+2, ADJO+1, ADJO+2, ADJP+1, ADJP+2, SCREEN+4*
>> PSAOVDT	ADJO+4
>> PSAOVDUZ	ADJO+4
>> PSAPAGE	HDR1+2, HDR1+3, HDR1+4, HDR1+5*
>> PSAPPDT	ADJP+5
>> PSAPPDUZ	ADJP+5
>> PSAPVDT	ADJP+4
>> PSAPVDUZ	ADJP+4
>> PSAQPDT	ADJQ+5
>> PSAQPDUZ	ADJQ+5
>> PSAQPREA	ADJQ+5
>> PSAQVDT	ADJQ+4
>> PSAQVDUZ	ADJQ+4
>> PSAQVREA	ADJQ+4
>> PSARUN	HDR1+4
>> PSAS	SCREEN+1*
>> PSASS	SCREEN+1*

Customize PDF page

Package: Drug Accountability

Routine: PSAORDP2

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Line Occurrences
HDR1	HEADER+1
HEADER	ADJD+2, ADJQ+2, ADJO+2, ADJP+2
LINEHDR	ADJD+2, ADJQ+2, ADJO+2, ADJP+2
SCREEN	ADJD+2, ADJQ+2, ADJO+2, ADJP+2