Routine: ABSPOSRS

Package	Total	Call Graph
Pharmacy Point of Sale	2	$$FM2EXT^ABSPOSU1 SET^ABSPOSUQ
VA Fileman	2	^DIC ^DIR
Kernel	1	KILL^%ZTLOAD
Third Party Billing	1	$$EN^ABMVDF

Entry Points

Name	Comments	DBIA/ICR reference
FILES	;These fields must be 'audited' at the site to show up on this report
LOC	;EP
COMPUTE	;
HDR	;
POUT	;EP for exiting report
CHK
WHD	;EP for writing Report Header
XIT	;
HD	;
OUTPUT	;
DT	;EP
SEL
LOOP	; ; Display current exclusion parameters
HDB

External References

Name	Field # of Occurrence
KILL^%ZTLOAD	POUT+2
$$EN^ABMVDF	WHD+1
$$FM2EXT^ABSPOSU1	OUTPUT+18, HDR+5, HDR+6
SET^ABSPOSUQ	SEL+10
^DIC	LOC+6
^DIR	LOOP+17, DT+8, DT+13, HD+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"EXCLUSION PARAMETERS Currently in Effect for RESTRICTING the EXPORT to:",!?3,"=======================================================================" Line Location: LOOP+6
Function Call: WRITE	Prompt: !?3,"- Pharmacy.....: ",$P(^DIC(4,ABSPY("LOC"),0),"^",1) Line Location: LOOP+7
Function Call: WRITE	Prompt: !?3,"- Pharmacy.....: ",$P(^ABSP(9002313.56,ABSPY("LOC"),0),"^",1) Line Location: LOOP+9
Function Call: WRITE	Prompt: !?3,"- Edit Date Range....:" Line Location: LOOP+10
Function Call: WRITE	Prompt: " to: " Line Location: LOOP+11
Function Call: WRITE	Prompt: " (cont)" Line Location: OUTPUT+17
Function Call: WRITE	Prompt: ! Line Location: LOC+1
Function Call: WRITE	Prompt: !!," ============ Entry of ",Y," Range =============",! Line Location: DT+5
Function Call: WRITE	Prompt: ! Line Location: DT+11
Function Call: WRITE	Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!! Line Location: DT+17
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF"),! Line Location: WHD+1
Function Call: WRITE	Prompt: ABSPLINE,! Line Location: WHD+3
Function Call: WRITE	Prompt: ABSP("HD",0),?$S($D(ABSP(132)):108,1:57) Line Location: WHD+4
Function Call: WRITE	Prompt: Y," Page ",ABSP("PG") Line Location: WHD+4
Function Call: WRITE	Prompt: !,ABSPLINE Line Location: WHD+7
Function Call: WRITE	Prompt: ! Line Location: HD+2
Function Call: WRITE	Prompt: !,"Date/Time",?17,"User",?35,"Old Value",?58,"New Value" Line Location: HDB+2
Function Call: WRITE	Prompt: !,ABSPLINE Line Location: HDB+3
Routine Call	DIC Line Location: LOC+6
Routine Call	DIR Line Location: LOOP+17 DT+8 DT+13 HD+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABSP(9002313.56 - [#9002313.56]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSP(9002313.56 - [#9002313.56]	LOOP+9
^DD("DD"	WHD+4
^DIA - [#1.1]	COMPUTE+9, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14, COMPUTE+15
^DIC - [#1]	OUTPUT+12
^DIC(4 - [#4]	HDR+1
^TMP($J	COMPUTE+2!, COMPUTE+16*, OUTPUT+4, OUTPUT+6, OUTPUT+9, OUTPUT+14, OUTPUT+16, OUTPUT+20, OUTPUT+21, OUTPUT+22! , POUT+1!
^VA(200 - [#200]	OUTPUT+19

Label References

Name	Line Occurrences
@(	LOOP+20
CHK	HDR+1, HDR+4, HDR+5, HDR+6
DT	DT+9, DT+15, DT+17
HD	OUTPUT+17
HDB	OUTPUT+1
LOOP	SEL+4, LOOP+20
WHD	HDB
XIT	LOOP+5, LOOP+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	POUT+3!
>> ABM("CONJ"	CHK
>> ABM("HD"	CHK*
>> ABM("LVL"	CHK, CHK+1
>> ABM("TXT"	CHK
ABSP	SEL+1~, POUT+3!
ABSP("CONJ"	HDR+3, HDR+5, HDR+6*, CHK, CHK+1
ABSP("HD"	SEL+5, WHD+4, WHD+5, WHD+6, CHK, CHK+1
ABSP("LVL"	SEL+6, CHK, CHK+1
ABSP("PG"	WHD+4, HDB*
ABSP("RTYP"	SEL+2, SEL+3
ABSP("SUBR"	COMPUTE+1*
ABSP("TXT"	HDR+1, HDR+4, HDR+5, HDR+6, CHK, CHK+1
ABSP(132	WHD+3, WHD+4, CHK
ABSPADT	OUTPUT+2~, OUTPUT+3*
>> ABSPAIEN	COMPUTE+10, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14, COMPUTE+15
>> ABSPCNT	COMPUTE+3*
>> ABSPEDT	COMPUTE+7, COMPUTE+8, COMPUTE+9
ABSPFILE	COMPUTE+4, COMPUTE+9, COMPUTE+11, COMPUTE+12, COMPUTE+13, COMPUTE+14, COMPUTE+15, COMPUTE+16, OUTPUT+2~, OUTPUT+3 , OUTPUT+4*, OUTPUT+6, OUTPUT+9, OUTPUT+12, OUTPUT+14, OUTPUT+16, OUTPUT+20, OUTPUT+21
ABSPFLD	COMPUTE+5, COMPUTE+12, COMPUTE+16, OUTPUT+2~, OUTPUT+3, OUTPUT+5, OUTPUT+6, OUTPUT+9, OUTPUT+10, OUTPUT+13 , OUTPUT+14, OUTPUT+16, OUTPUT+20, OUTPUT+21
ABSPFNAM	COMPUTE+6, COMPUTE+16, OUTPUT+2~, OUTPUT+8, OUTPUT+9*, OUTPUT+12, OUTPUT+14, OUTPUT+16, OUTPUT+20, OUTPUT+21
ABSPLINE	WHD+2~, WHD+3, WHD+7, HDB+1~, HDB+3
>> ABSPM("CONJ"	HDR+1*
ABSPNEW	COMPUTE+15, COMPUTE+16, OUTPUT+2~, OUTPUT+3
ABSPOLD	COMPUTE+14, COMPUTE+16, OUTPUT+2~, OUTPUT+3
ABSPP	POUT+3!
ABSPQ	SEL+1~, SEL+10
ABSPQ("NS"	SEL+8*
ABSPQ("RC"	SEL+8*
ABSPQ("RP"	SEL+9*
ABSPQ("RX"	SEL+8*
>> ABSPSDT	COMPUTE+7, COMPUTE+8, COMPUTE+9, COMPUTE+11, COMPUTE+16, OUTPUT+7, OUTPUT+14*, OUTPUT+16, OUTPUT+18, OUTPUT+20 , OUTPUT+21
>> ABSPSEL	COMPUTE+3*, COMPUTE+4, COMPUTE+5, COMPUTE+6
>> ABSPSFLD	OUTPUT+5, OUTPUT+10, OUTPUT+13
ABSPUSER	COMPUTE+13, COMPUTE+16, OUTPUT+2~, OUTPUT+3, OUTPUT+15, OUTPUT+16, OUTPUT+19, OUTPUT+20, OUTPUT+21
ABSPY	SEL+1~, POUT+3!
ABSPY("DT"	LOOP+10, LOOP+11, COMPUTE+7, DT+1!, DT+3, DT+10, DT+16*, DT+17, HDR+2, HDR+5 , HDR+6
ABSPY("I"	XIT+1!
ABSPY("LOC"	LOOP+9, LOC+8*, HDR+1
ABSPY("X"	LOOP+3*, LOOP+11, XIT+1!
DIC	LOC+2~, LOC+3*, LOC+6!
DIC("A"	LOC+5*
DIC(0	LOC+4*
DIR	LOOP+13~, DT+1!, DT+14!, XIT+1!, HD+3~, POUT+3!
DIR("?"	LOOP+16*
DIR("A"	LOOP+15, DT+6, DT+12*
DIR(0	LOOP+14, DT+7, HD+3*
DIROUT	SEL+4, LOOP+5, LOOP+19, OUTPUT+4, OUTPUT+6, OUTPUT+14, OUTPUT+16, OUTPUT+17, HD+2, POUT+3!
DIRUT	DT+2, DT+9, DT+15, POUT+3!
DT	WHD+4
DTOUT	SEL+4, LOOP+5, LOOP+19, OUTPUT+4, OUTPUT+6, OUTPUT+14, OUTPUT+16, OUTPUT+17, HD+2, POUT+3!
DUOUT	SEL+4, OUTPUT+4, OUTPUT+6, OUTPUT+14, OUTPUT+16, OUTPUT+17, HD+2, POUT+3!
IO("Q"	HD+1, POUT+3!
IO("S"	HD+1
IOSL	OUTPUT+17, HD+2
IOST	HD+1
POP	POUT+3!
U	COMPUTE+12, COMPUTE+13, COMPUTE+14, COMPUTE+15, OUTPUT+12, OUTPUT+19, OUTPUT+20, OUTPUT+21, HDR+1
>> X	LOOP+11*
>> Y	LOOP+20, LOC+7, LOC+8, DT+4, DT+5, DT+6, DT+10, DT+16, WHD+4
ZTSK	POUT+3!

Marked Items

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSRS

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items