Routine: ABSPIN1

Package	Total	Call Graph
VA Fileman	11	$$EZBLD^DIALOG E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ AUDIT^DIET $$GETTMP^DIKC1 ^DIR RW^DIR2
Pharmacy Point of Sale	2	^ABSPIN13 $$ILCAR^ABSPOSS1

Entry Points

External References

Name	Field # of Occurrence
^ABSPIN13	50
$$ILCAR^ABSPOSS1	X41
$$EZBLD^DIALOG	4+1, 33+1
E^DIE0	I+1
^DIE17	RD
F^DIE17	1, 2, 3, 5, 6, 7, 9, 10, 11, 12 , 13, 14, 15, 16, 17, 18, 19, 20, 21, 22 , 23, 24, 25, 26, 27, 28, 29, 30, 31, 32 , 33, 34, 35, 36, 37, 39, 40, 41, 42, 43 , 44, 45, 46, 47, 48, 49, 50
FIREREC^DIE17	1, 2, 3, 5, 6, 7, 9, 10, 12, 13 , 14, 15, 17, 18, 19, 20, 21, 23, 24, 25 , 26, 27, 29, 30, 31, 32, 34, 35, 36, 37 , 39, 41, 42, 43, 44, 45, 46, 47, 48
M^DIE17	T
N^DIE17	RP
OUT^DIE17	1, 2, 3, 5, 6, 7, 9, 10, 12, 13 , 14, 15, 17, 18, 19, 20, 21, 23, 24, 25 , 26, 27, 29, 30, 31, 32, 34, 35, 36, 37 , 39, 41, 42, 43, 44, 45, 46, 47, 48
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
AUDIT^DIET	C8+1, C8S+1, C11+1, C11S+1, C16+1, C16S+1, C22+1, C22S+1, C28+1, C28S+1 , C38+1, C38S+1, C40+1, C40S+1
$$GETTMP^DIKC1	BEGIN+1
^DIR	SET+2
RW^DIR2	O+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !?DL+DL-2,DLB_": " Line Location: W+0
Function Call: WRITE	Prompt: W Line Location: O+0
Function Call: WRITE	Prompt: Y Line Location: O+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>45 Line Location: O+0
Function Call: WRITE	Prompt: " (No Editing)" Line Location: O+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: TR+0
Function Call: WRITE	Prompt: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Function Call: WRITE	Prompt: !!,"OUTPATIENT SITE: One or more of the RPMS pharmacy package's",! Line Location: X1+0
Function Call: WRITE	Prompt: ?10,"Outpatient Sites (File 59) must be associated with",! Line Location: X2+0
Function Call: WRITE	Prompt: ?10,"this Point of Sale pharmacy entry",! Line Location: X3+0
Function Call: WRITE	Prompt: !!,"ENVOY TERMINAL ID: This is a number assigned to",! Line Location: X5+0
Function Call: WRITE	Prompt: ?10,"your pharmacy by Envoy. The number is sent as part of ",! Line Location: X6+0
Function Call: WRITE	Prompt: ?10,"each claim you send to Envoy.",! Line Location: X7+0
Function Call: WRITE	Prompt: !!,"NCPDP #: This is a number assigned to your pharmacy",! Line Location: X9+0
Function Call: WRITE	Prompt: ?10,"by the NCPDP. It used to be called the NABP #",! Line Location: X10+0
Function Call: WRITE	Prompt: !!,"DEFAULT DEA #: Many insurances require the prescriber's",! Line Location: X12+0
Function Call: WRITE	Prompt: ?10,"DEA number as part of the claim. If your pharmacy has",! Line Location: X13+0
Function Call: WRITE	Prompt: ?10,"a DEA # that may be used in case a prescriber doesn't have",! Line Location: X14+0
Function Call: WRITE	Prompt: ?10,"his DEA # on file with you, enter that default DEA # here.",! Line Location: X15+0
Function Call: WRITE	Prompt: !!,"MEDICAID #: If you are sending claims to your state's",! Line Location: X17+0
Function Call: WRITE	Prompt: ?10,"Medicaid program, and Medicaid has assigned a special",! Line Location: X18+0
Function Call: WRITE	Prompt: ?10,"Medicaid pharmacy number to your pharmacy, enter that",! Line Location: X19+0
Function Call: WRITE	Prompt: ?10,"number here. It is usually required as part of",! Line Location: X20+0
Function Call: WRITE	Prompt: ?10,"the Medicaid claim.",! Line Location: X21+0
Function Call: WRITE	Prompt: !!,"DEFAULT MEDICAID PROVIDER #: Usually, Medicaid assigns ID numbers",! Line Location: X23+0
Function Call: WRITE	Prompt: ?10,"to prescribers and those numbers must be sent as part of a",! Line Location: X24+0
Function Call: WRITE	Prompt: ?10,"Medicaid claim. If you have a default number which may be ",! Line Location: X25+0
Function Call: WRITE	Prompt: ?10,"used when you don't have a provider's Medicaid number on file",! Line Location: X26+0
Function Call: WRITE	Prompt: ?10,"enter that number here.",! Line Location: X27+0
Function Call: WRITE	Prompt: !!,"INSURER-ASSIGNED #: Usually, private insurance claims require the",! Line Location: X29+0
Function Call: WRITE	Prompt: ?10,"NCPDP #. But if any insurers have special numbers assigned to",! Line Location: X30+0
Function Call: WRITE	Prompt: ?10,"your pharmacy to be used on their claims, then enter those",! Line Location: X31+0
Function Call: WRITE	Prompt: ?10,"insurers and the numbers they assigned to you.",! Line Location: X32+0
Function Call: WRITE	Prompt: !!,"Auto-Print Pharmacy Expense Report for:",! Line Location: X34+0
Function Call: WRITE	Prompt: ?10,"""1"" All Patients.",! Line Location: X35+0
Function Call: WRITE	Prompt: ?10,"""0"" No Patients. (Do not print)",! Line Location: X36+0
Function Call: WRITE	Prompt: ?10,"""NB"" Non-Beneficiary Patients only.",! Line Location: X37+0
Function Call: WRITE	Prompt: !!,"What Device should the Pharmacy Expense Reports print to? ",! Line Location: X39+0
Function Call: WRITE	Prompt: !!,"These fields are used for printing pharmacy claims for non-electronic",! Line Location: X42+0
Function Call: WRITE	Prompt: "insurers. If you omit this data, the system will use the general",! Line Location: X43+0
Function Call: WRITE	Prompt: "billing system setup information.",! Line Location: X44+0
Function Call: WRITE	Prompt: !!,"The AR TYPE is required. When charges from this pharmacy",! Line Location: X45+0
Function Call: WRITE	Prompt: "are posted to Accounts Receivable, this is the AR TYPE assigned",! Line Location: X46+0
Function Call: WRITE	Prompt: "to those accounts. It might default if you have an RX type",! Line Location: X47+0
Function Call: WRITE	Prompt: "but you should explicitly assign an A/R type here.",! Line Location: X48+0
Routine Call	DIALOG Line Location: 4+1 33+1
Routine Call	DIR Line Location: SET+2

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]	DE, 4+4, M4, R4+1, 33+4, M33, R33+1
^DD(	T, R, R+1, C8S+1, C11S+1, C16S+1, C22S+1, C28S+1, C38S+1, C40S+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DIE(2388	BEGIN+2
^DISV(	RD+2, Z*

Label References

Name	Line Occurrences
$$KEYCHK	Z
33+1	R33+1
4+1	R4+1
@(	B, V
A	N, Z, Y, RP, 1, 2, 3, 5, 6, 7 , 9, 10, 12, 13, 14, 15, 17, 18, 19, 20 , 21, 23, 24, 25, 26, 27, 29, 30, 31, 32 , 34, 35, 36, 37, 39, 41, 42, 43, 44, 45 , 46, 47, 48
B	QS
BEGIN	ABSPIN1+1
C11F1	C11S
C11S	C11
C16F1	C16S
C16S	C16
C22F1	C22S
C22S	C22
C28F1	C28S
C28S	C28
C38F1	C38S
C38S	C38
C40F1	C40S
C40S	C40
C8F1	C8S
C8S	C8
D	RD, RD+1, P+1, QS
DE	ABSPIN1+1, 1, 2, 3, R4, 5, 6, 7, 9, 10 , 11, 12, 13, 14, 15, 16, 17, 18, 19, 20 , 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 , 31, 32, 33, R33, 34, 35, 36, 37, 39, 40 , 41, 42, 43, 44, 45, 46, 47, 48, 49
M33	33+3
M4	4+3
N	Y
NKEY	N
O	Y, RP
P	T
PR	RE, I+1
QS	RD, NKEY
R	R, R+1
RD	Y, I, I+1
RE	4+3, M4+1, 8+2, 11+2, 16+2, 22+2, 28+2, 33+3, M33+1, 38+3 , 40+3, 49+2
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X1	1
X10	10
X12	12
X13	13
X14	14
X15	15
X17	17
X18	18
X19	19
X2	2
X20	20
X21	21
X23	23
X24	24
X25	25
X26	26
X27	27
X29	29
X3	3
X30	30
X31	31
X32	32
X34	34
X35	35
X36	36
X37	37
X39	39
X41	41
X42	42
X43	43
X44	44
X45	45
X46	46
X47	47
X48	48
X5	5
X6	6
X7	7
X9	9
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("CAID"	DE+2
^("F"	SAVEVALS*
^("REP"	DE+3
^(0	DE+1, R, R+1, 4+3, 4+4, M4, R4+1, 33+3, 33+4, M33 , R33+1
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, T, R+2, SET+2*
%Z	DE+1, DE+2, DE+3*, DE+4!
>> D	N, D, 4, 4+1, 4+3, 4+4, M4, R4+1, 33, 33+1 , 33+3, 33+4, M33, R33+1*
>> D0	BEGIN+3*
>> DA	DE, BEGIN+3, 4+4, M4, R4+1, 33+4, M33, R33+1
DB	DE!, C8!, C8S!, C11!, C11S!, C16!, C16S!, C22!, C22S!, C28! , C28S!, C38!, C38S!, C40!, C40S!
DB(	T, P, X, SET, SET+1
>> DC	RP, 4+1, M4, 33+1, M33
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 8+1* , 11+1, 16+1, 22+1, 28+1, 38+1, 40+1
DE(1	4!, 33!
DE(11	DE+1*, C11, C11+1, C11S+1
DE(16	DE+1*, C16, C16+1, C16S+1
DE(22	DE+2*, C22, C22+1, C22S+1
DE(28	DE+2*, C28, C28+1, C28S+1
DE(33	M33*
DE(38	DE+3*, C38, C38+1, C38S+1
DE(4	M4*
DE(40	DE+3*, C40, C40+1, C40S+1
DE(49	DE+1*
DE(8	DE+1*, C8, C8+1, C8S+1
DG	DE!, PR, R, R+1*, R+2, 1, 2, 3, 5, 6 , 7, 9, 10, 11, 12, 13, 14, 15, 16, 17 , 18, 19, 20, 21, 22, 23, 24, 25, 26, 27 , 28, 29, 30, 31, 32, 33, 34, 35, 36, 37 , 39, 40, 41, 42, 43, 44, 45, 46, 47, 48 , 49, 50
DG(	Z*, C8S, C8S+1, C11S, C11S+1, C16S, C16S+1, C22S, C22S+1, C28S , C28S+1, C38S, C38S+1, C40S, C40S+1
>> DGO	4+1, 33+1
>> DIC	DE, P
>> DIC("S"	T, Z!
>> DIC(0	P, 1, 2, 3, 5, 6, 7, 9, 10, 12 , 13, 14, 15, 17, 18, 19, 20, 21, 23, 24 , 25, 26, 27, 29, 30, 31, 32, 34, 35, 36 , 37, 39, 41, 42, 43, 44, 45, 46, 47, 48
>> DICRREC	BEGIN+2*
>> DIE	DE*, P
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 2, 3, 5, 6, 7, 9, 10, 12 , 13, 14, 15, 17, 18, 19, 20, 21, 23, 24 , 25, 26, 27, 29, 30, 31, 32, 34, 35, 36 , 37, 39, 41, 42, 43, 44, 45, 46, 47, 48
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 4+1, 8, C8+1, C8S+1 , 11, C11+1, C11S+1, 16, C16+1, C16S+1, 22, C22+1, C22S+1, 28 , C28+1, C28S+1, 33+1, 38, C38+1, C38S+1, 40, C40+1, C40S+1, 49
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
>> DIIX	C8+1, C8S+1, C11+1, C11S+1, C16+1, C16S+1, C22+1, C22S+1, C28+1, C28S+1 , C38+1, C38S+1, C40+1, C40S+1
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 4+1, 8, 11, 16, 22, 28 , 33+1, 38, 40, 49
>> DNM	BEGIN*
>> DOW	4+1, 33+1
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2, C8S+1, C11S+1, C16S+1, C22S+1 , C28S+1, C38S+1, C40S+1
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 1, 2, 3* , 5, 6, 7, C8S, C8S+1, 9, 10, 11, C11S, C11S+1 , 12, 13, 14, 15, 16, C16S, C16S+1, 17, 18, 19 , 20, 21, 22, C22S, C22S+1, 23, 24, 25, 26, 27 , 28, C28S, C28S+1, 29, 30, 31, 32, 33, 34, 35 , 36, 37, C38S, C38S+1, 39, 40, C40S, C40S+1, 41, 42 , 43, 44, 45, 46, 47, 48, 49*
>> DQ(	A!, P+2, D*, PR
>> DSC(	4+3, 33+3
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 4+2, 8, 11, 16, 22 , 28, 33+2, 38, 38+2, 40, 40+2, 49, 49+1
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 4+1, 8, 11, 16, 22, 28, 33+1* , 38, 40, 49*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 4+1, 5, 6 , 7, 8, 8+1, 9, 10, 11, 11+1, 12, 13, 14 , 15, 16, 16+1, 17, 18, 19, 20, 21, 22, 22+1 , 23, 24, 25, 26, 27, 28, 28+1, 29, 30, 31* , 32, 33+1, 34, 35, 36, 37, 38, 38+1, 39, 40* , 40+1, 41, 42, 43, 44, 45, 46, 47, 48, 49*
>> DZ	QS*
U	DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1 , SET, BEGIN+3*, 1, 2, 3, 4+4, M4, R4+1, 5, 6 , 7, C8+1, C8S+1, 9, 10, C11+1, C11S+1, 12, 13, 14 , 15, C16+1, C16S+1, 17, 18, 19, 20, 21, C22+1, C22S+1 , 23, 24, 25, 26, 27, C28+1, C28S+1, 29, 30, 31 , 32, 33+4, M33, R33+1, 34, 35, 36, 37, C38+1, C38S+1 , 39, C40+1, C40S+1, 41, 42, 43, 44, 45, 46, 47 , 48
X	O+2, TR, N, RD, RD+1, RD+2, T, P, P+1!, P+2* , Z, X+1, QS, Y, PR, R, R+1, R+2, RP, I+1 , SET+2, NKEY, 1, 2, 3, 5, 6, 7, C8+1, C8S , C8S+1, X8!, 9, 10, C11+1, C11S, C11S+1, X11!, X11+1!, 12* , 13, 14, 15, C16+1, C16S, C16S+1, X16!, X16+1!, 17, 18 , 19, 20, 21, C22+1, C22S, C22S+1, X22!, X22+1!, 23, 24 , 25, 26, 27, C28+1, C28S, C28S+1, X28!, X28+1!, 29, 30 , 31, 32, 34, 35, 36, 37, C38+1, C38S, C38S+1, 39 , C40+1, C40S, C40S+1, 41, 42, 43, 44, 45, 46, 47 , 48*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, 2, 3, 5, 6, 7, 9, 10, 12, 13 , 14, 15, 17, 18, 19, 20, 21, 23, 24, 25 , 26, 27, 29, 30, 31, 32, 34, 35, 36, 37 , 39, 41, X41, 42, 43, 44, 45, 46, 47, 48
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPIN1

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items