Routine: ABSPOSQ

Information

ABSPOSQ ; IHS/FCS/DRS - POS background, Part 1 ;

Source file <ABSPOSQ.m>

Package	Total	Call Graph
Pharmacy Point of Sale	2	(LOG2CLM,LOG2LIST,LOG59)^ABSPOSL IMPOSS^ABSPOSUE
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Pharmacy Point of Sale	6	ABSPOSCA ABSPOSCE ABSPOSQ2 ABSPOSQA ABSPOSQB ABSPOSQG

Name	Comments	DBIA/ICR reference
CHG()
LOG2LIST(MSG)	;EP -
NOW()
LOG2CLM(MSG,IEN02)	;EP
RXI()	;EP -
AMT()	;EP -
EXTRCPT3()
QTY()
DRGNAME()
N57LAST()	;EP -
VMED()
ARSYSTEM()
VCN()
RXR()	;EP -
PROVIDER()
VISDATE()
PATIENT()
VISITIEN()
LOG59(MSG,IEN59)	;EP -
FILLDATE()
TYPE()	;EP -
DRGDFN()	;EP -
CPTIEN()
NDC()	;EP -
MAKEVCN()	;EP - true/false should we assign a VCN # to the visit?
USER()

Name	Line Occurrences (* Changed, ! Killed)
^ABSCPT(9002300	CPTIEN
^ABSP(9002313.99 - [#9002313.99]	CPTIEN+3, ARSYSTEM
^ABSPT - [#9002313.59]	RXI+1, RXR+1, NDC+1, QTY, AMT+1, CHG, PATIENT, VISITIEN, USER
^ABSPTL("NON-FILEMAN"	N57LAST+1
^AUPNVSIT - [#9000010]	VISDATE, VCN
^PSDRUG - [#50]	DRGNAME
^PSRX - [#52]	DRGDFN+1, FILLDATE+1, VMED+1, PROVIDER

Name	Line Occurrences
$$ARSYSTEM	MAKEVCN+1
$$DRGDFN	DRGNAME, CPTIEN
$$EXTRCPT3	CPTIEN+4
$$RXI	DRGDFN+1, N57LAST+1, FILLDATE, VMED, PROVIDER
$$RXR	N57LAST+1, FILLDATE, VMED
$$TYPE	NDC+1, CPTIEN, CPTIEN+3, CPTIEN+4
$$VISDATE	FILLDATE+2
$$VISITIEN	VISDATE, VCN

Name	Field # of Occurrence
%	NOW~
%H	NOW~
%I	NOW~
AR	MAKEVCN+1~*, MAKEVCN+2, MAKEVCN+3
DUZ	USER
IEN02	LOG2CLM~, LOG2CLM+1
IEN59	RXI+1, RXR+1, NDC+1, QTY, AMT+1, CHG, EXTRCPT3, PATIENT, VISITIEN, USER , TYPE+1, TYPE+3, LOG59~, LOG59+1
MSG	LOG2LIST~, LOG2LIST+1, LOG2CLM~, LOG2CLM+1, LOG59~, LOG59+1
RXI	FILLDATE~, FILLDATE+1, VMED~, VMED+1
RXR	FILLDATE~, FILLDATE+1, VMED~, VMED+1
U	DRGDFN+1, DRGNAME, RXI+1, RXR+1, NDC+1, QTY, AMT+1, CHG, CPTIEN+3, PATIENT , VISITIEN, USER, FILLDATE+1, VISDATE, VMED+1, PROVIDER, VCN, ARSYSTEM
X	EXTRCPT3~, USER~, TYPE+1~, TYPE+2, TYPE+4, NOW~

Name	Field # of Occurrence
$T(	NDC+2, TYPE+3