Routine: ABMDPST1

Package	Total	Call Graph
Third Party Billing	3	WHD^ABMDRHD PAZ^ABMDRUTL $$SDT^ABMDUTL
VA Fileman	2	^DIWP ^DIWW

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: " (cont)" Line Location: PRINT+11
Function Call: WRITE	Prompt: !?3,"Visit Location: ",$G(ABM("LOCATION NAME")) Line Location: PRINT+30
Function Call: WRITE	Prompt: !?6,"Status Updater: ",$G(ABM("PS UPDATER")) Line Location: PRINT+31
Function Call: WRITE	Prompt: !?5,"Visit Type: "_$P(^ABMDVTYP(ABM("VISIT TYPE"),0),U) Line Location: PRINT+32
Function Call: WRITE	Prompt: !?5," Clinic: "_$G(ABM("CLINIC")) Line Location: PRINT+33
Function Call: WRITE	Prompt: !?11,"Active Insurer: ",$P($G(^AUTNINS(ABM("I"),0)),U) Line Location: PRINT+34
Function Call: WRITE	Prompt: !!,"E N D O F R E P O R T" Line Location: PRINT+51
Function Call: WRITE	Prompt: !?26,"Claim",?34,"Visit" Line Location: HDB+1
Function Call: WRITE	Prompt: !?2,"Patient",?18,"HRN",?26,"Number",?34,"Date",?46,"Clinic",?60,"Reason" Line Location: HDB+2
Function Call: WRITE	Prompt: !,"-------------------------------------------------------------------------------" Line Location: HDB+3
Function Call: WRITE	Prompt: !?27,"------" Line Location: SUBHDR+1
Function Call: WRITE	Prompt: !?16,"Subtotal:",?27,ABM("SUB CNT") Line Location: SUBHDR+2
Function Call: WRITE	Prompt: !?27,"------" Line Location: TOTHDR+1
Function Call: WRITE	Prompt: !?19,"Total:",?27,ABM("TOTAL CNT") Line Location: TOTHDR+2

Name	Line Occurrences (* Changed, ! Killed)
^ABMDVTYP - [#9002274.8]	PRINT+32
^AUTNINS - [#9999999.18]	PRINT+34
^DIC(40.7 - [#40.7]	PRINT+20
^TMP("ABM-ICS"	XIT+1!
^UTILITY($J	PRINT+41!
^VA(200 - [#200]	PRINT+27

Name	Field # of Occurrence
>> ABM	PRINT+8, PRINT+9, PRINT+10, PRINT+12
>> ABM("ACTIVE I	NSURER TEMP" , PRINT+2!, PRINT+34*
>> ABM("CLAIM"	PRINT+17*, PRINT+20, PRINT+38
>> ABM("CLINIC T	EMP" , PRINT+2!, PRINT+33*
>> ABM("CLINIC"	PRINT+19, PRINT+20, PRINT+33, PRINT+40
>> ABM("HRN"	PRINT+16*, PRINT+37
>> ABM("I"	PRINT+23, PRINT+24, PRINT+34, HDB*
>> ABM("LOCATION	NAME" , PRINT+13, PRINT+30, TEMP" , PRINT+1!, PRINT+30
>> ABM("PATIENT"	PRINT+15*, PRINT+36
>> ABM("PG"	PRINT+3, HDB
>> ABM("PS REASO	N" , PRINT+21*, PRINT+44
>> ABM("PS UPDAT	ER TEMP" , PRINT+1!, PRINT+31, ER" , PRINT+25, PRINT+26, PRINT+27, PRINT+31
>> ABM("SORT"	PRINT+14*
>> ABM("SUB CNT"	, PRINT+5, PRINT+47, SUBHDR, SUBHDR+2, SUBHDR+3*
>> ABM("T"	PRINT+12*
>> ABM("TOTAL CN	T" , PRINT+6, PRINT+48, TOTHDR, TOTHDR+2, TOTHDR+3*
>> ABM("TXT"	PRINT+12*, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+21, PRINT+22 , PRINT+23, PRINT+25
>> ABM("VISIT DA	TE" , PRINT+22*, PRINT+39
>> ABM("VISIT TE	MP" , PRINT+1!, PRINT+32*
>> ABM("VISIT TY	PE" , PRINT+18*, PRINT+32
>> ABM("Z"	PRINT+7*, PRINT+8, PRINT+10
>> ABMY("SORT"	PRINT+32, PRINT+33
>> DIROUT	PRINT+10, PRINT+11, HD
>> DIWF	PRINT+43*
>> DIWL	PRINT+42*
>> DIWR	PRINT+42*
>> DTOUT	PRINT+10, PRINT+11, HD
>> DUOUT	PRINT+10, PRINT+11, HD
IOSL	PRINT+11
U	PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+20, PRINT+21 , PRINT+22, PRINT+23, PRINT+25, PRINT+27, PRINT+32, PRINT+34
>> X	PRINT+44*