Routine: VAQPSE02

Package	Total	Call Graph
Integrated Billing	3	(CHG,ENCR)^IBAPDX0 $$PT^IBEFUNC $$DAT1^IBOUTL
Patient Data Exchange	1	$$NCRPFLD^VAQUTL2

Entry Points

Name	Comments	DBIA/ICR reference
IBAPDX	;ALB/CPM - EXTRACT MEANS TEST BILLING DATA FOR PDX ; 09-APR-93
EXTR(TRAN,DFN,ARR)	; PDX Entry Point for the data extraction. ; Input: TRAN -- Pointer to transaction in file #394.61 ; DFN -- Pointer to the patient in file #2 ; ARR -- Root for the output extract array ; Output: 0 -- Extraction was successful, or ; -1^err -- if an error was encountered during the extract.
CLOCK	; - get active billing clock data
EXTRQ

Name	Field # of Occurrence
CHG^IBAPDX0	CLOCK+21
ENCR^IBAPDX0	EXTR+26
$$PT^IBEFUNC	EXTR+30, CLOCK+2
$$DAT1^IBOUTL	EXTR+32, CLOCK+5
$$NCRPFLD^VAQUTL2	EXTR+30, EXTR+32, CLOCK+2, CLOCK+3, CLOCK+5, CLOCK+8

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EXTR+20
^IB - [#350]	CLOCK+15
^IB("AF"	CLOCK+14
^IB("AFDT"	CLOCK+12, CLOCK+13
^IBE(351 - [#351]	CLOCK+1
^IBE(351.1 - [#351.1]	EXTR+29
^VAT(394.61 - [#394.61]	EXTR+18, EXTR+19

Name	Line Occurrences
CLOCK	EXTR+29
EXTRQ	EXTR+23, EXTR+26, CLOCK+1, CLOCK+20

Name	Field # of Occurrence
ARR	EXTR~, EXTR+23, EXTR+29, EXTR+31, EXTR+33, CLOCK+1, CLOCK+4, CLOCK+6, CLOCK+9, CLOCK+20
C	EXTR+22~
DFN	EXTR~, EXTR+16, EXTR+17, EXTR+19, EXTR+20, EXTR+29, CLOCK+1, CLOCK+12, CLOCK+13
ERR	EXTR+22~, EXTR+23, EXTR+26, EXTRQ
IBARR	EXTR+22~, CLOCK+20
IBARR(	CLOCK+17*
IBATYP	EXTR+22~
IBCRYP	EXTR+22~, EXTR+30, EXTR+32, CLOCK+2, CLOCK+3, CLOCK+5, CLOCK+8
IBD	EXTR+22~, CLOCK+12*, CLOCK+13
IBDF	EXTR+22~, CLOCK+13*, CLOCK+14
IBEFDT	EXTR+22~, CLOCK+3*, CLOCK+5, CLOCK+17
IBENC	EXTR+22~, EXTR+30, EXTR+31, EXTR+32, EXTR+33, CLOCK+2, CLOCK+3, CLOCK+4, CLOCK+5, CLOCK+6 , CLOCK+8, CLOCK+9
IBENCPT	EXTR+22~
IBI	EXTR+22~, CLOCK+7*, CLOCK+8, CLOCK+9
IBID	EXTR+22~, EXTR+31, EXTR+33, CLOCK+2, CLOCK+4
IBN	EXTR+22~, CLOCK+14*, CLOCK+15, CLOCK+17
IBND	EXTR+22~, CLOCK+15*, CLOCK+16, CLOCK+17
IBREF	EXTR+22~, CLOCK+4*, CLOCK+6, CLOCK+9
IBSEQ	EXTR+22~
IBSNDR	EXTR+22~
IBSTR	EXTR+22~, EXTR+29, EXTR+30, EXTR+32, CLOCK+1, CLOCK+2, CLOCK+3, CLOCK+8
KEY1	EXTR+22~
KEY2	EXTR+22~
STRING	EXTR+22~, EXTR+30, EXTR+32, CLOCK+2, CLOCK+3, CLOCK+5, CLOCK+8
TRAN	EXTR~, EXTR+15*, EXTR+17, EXTR+18, EXTR+19
Y	EXTR+22~