Routine: APSQFAS4

Package	Total	Call Graph
IHS Changes To Pharmacy	4	EN^APSQALLE RX^APSQCK ^APSQDGDG ^APSQDRDU
Outpatient Pharmacy	4	^PSODGDGI JUMP^PSODIR1 ^PSODRDUP ^PSORXI
VA Fileman	3	^%DT EN^DIQ1 ^DIR

Package	Total	Caller Graph
IHS Changes To Pharmacy	1	APSQFAS3

Entry Points

Name	Comments	DBIA/ICR reference
TRADEX
SET	;
END
POSTX	;
EOJ	;
TRADE	;
START	;
CLOZ	;
SELECTX
POST	;
SETX
SELECT	;

External References

Name	Field # of Occurrence
^%DT	SET+22
EN^APSQALLE	POST+10
RX^APSQCK	POST+15
^APSQDGDG	POST+8
^APSQDRDU	POST+4
EN^DIQ1	SET+18, SET+25
^DIR	TRADE+2
^PSODGDGI	POST+7
JUMP^PSODIR1	SELECT+9
^PSODRDUP	POST+3
^PSORXI	POST+10, POST+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,X Line Location: SELECT+6
Routine Call	DIR Line Location: TRADE+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	POST+4, POST+8, POST+9, POST+10, POST+15, CLOZ+3
^PSDRUG - [#50]	SELECT+4, SELECT+5, SET+3, SET+5, SET+7, SET+8, SET+9, SET+10, SET+14, POST+17 , CLOZ+1

Label References

Name	Line Occurrences
@(	CLOZ+3
CLOZ	POST+17
END	START+4
EOJ	END
POST	START+6
POSTX	POST+7, POST+8, POST+10, POST+14, POST+15, POST+16, POST+17
SELECT	START+2
SELECTX	SELECT+9, SELECT+10
SET	START+5
SETX	SET+9
TRADE	START+3, SELECT+16
TRADEX	TRADE+3

Naked Globals

Name	Field # of Occurrence
^("ND"	SET+3, SET+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	SET+22*
ANQRTN	CLOZ+1*, CLOZ+2, CLOZ+3, CLOZ+4!
ANQX	CLOZ+1*, CLOZ+3, CLOZ+4!
>> APSQ("DIQ1"	SETX+1!
>> APSQF(2	SELECT+4
DA	TRADE+1!, SET+17, SET+24
>> DFN	CLOZ+2*
DIC	SELECT+1!, TRADE+1!, TRADE+2!, SET+17, SET+24
DIC("B"	SELECT+2*
>> DIQ	SET+17, SET+24
>> DIQ(0	SET+17, SET+24
DIR	TRADE+1!, TRADE+2!
DIR(0	TRADE+2*
DIRUT	TRADE+3, TRADEX!
>> DR	SET+17, SET+24
DTOUT	SELECT+10, SELECTX!, TRADE+3, TRADEX!
DUOUT	SELECT+10, SELECTX!, TRADE+3, TRADEX!
>> P(5	CLOZ+2*, CLOZ+4!
>> PSODFN	CLOZ+2
PSODIR	SELECT+9!
PSODIR("FIELD"	SELECT+9
PSODIR("FLD"	SELECT+9*
PSODRG	EOJ+1!
PSODRG("QFLG"	START+1, START+4, SELECT+9, SELECT+12, SELECT+13
>> PSODRUG("AWP"	SET+14*
>> PSODRUG("CLN"	SET+5*
>> PSODRUG("COST"	SET+11*
>> PSODRUG("DEA"	SET+4*
>> PSODRUG("IEN"	SELECT+2, SET+1*, SET+17, SET+20, SET+21, SET+24, SET+26, POST+17, CLOZ+1, CLOZ+2
>> PSODRUG("MAXDOSE"	SET+4*
>> PSODRUG("NAME"	SELECT+2, SET+2*
>> PSODRUG("NDC"	SET+7*
>> PSODRUG("NDF"	SET+3*
>> PSODRUG("SIG"	SET+6*
>> PSODRUG("STKLVL"	SET+8*
>> PSODRUG("TRAD	E NAME" , SELECT+1!, TRADE+4*
>> PSODRUG("UNIT"	SET+12*
>> PSODRUG("VA C	LASS" , SET+1*
>> PSONEW("DFLG"	START+1, START+4, START+6, SELECT+10, TRADE+3
>> PSONEW("EXPIR	ATION DATE" , SET+21, SET+22
>> PSONEW("FIELD"	START+1, START+3, SELECT+9
>> PSONEW("FLD"	SELECT+9
>> PSONEW("LOT #	" , SET+20*
>> PSONEW("MANUFACTURER"	SET+26*
>> PSONEW("OLD V	AL" , SELECT+2*, SELECT+13
>> PSORX("DFLG"	START+6!, POST+1, POST+5, POST+7, POST+8, POST+10, POST+15, POST+17, CLOZ+3
>> PSORX("EDIT"	START+3, START+6, TRADE+3
>> PSORX("INTERVENE"	POST+9!, POST+10, POST+15, POSTX+1!
PSOX1	SET+10*, SET+11, SET+12, SETX!
PSOY	SELECT+14!*, SET+1, SET+3, SET+5, SET+7, SET+8, SET+9, SET+10, SET+14, SETX!
PSOY(0	SELECT+14*, SELECT+16, SET+1, SET+2, SET+4, SET+6
U	SELECT+5, SELECT+9
X	SELECT+1!, SELECT+5, SELECT+6, SELECT+9, SELECTX!, TRADE+1!, TRADEX!, SET+22, POST+4, POST+8 , POST+9, POST+10, POST+15, CLOZ+2, CLOZ+4!
Y	SELECT+1!, SELECT+4*, SELECT+5, SELECT+12, SELECT+13, SELECT+14, SELECTX!, TRADE+1!, TRADE+4, TRADEX! , SET+22
Y(0	SELECT+4*, SELECT+14

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSQFAS4

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: