Routine: ABMDCCL1

Package	Total	Call Graph
Third Party Billing	3	WHD^ABMDRHD PAZ^ABMDRUTL $$SDT^ABMDUTL

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: " (cont)" Line Location: PRINT+6
Function Call: WRITE	Prompt: !?3,"Visit Location: ",$P(^DIC(4,$P(ABM("PDFN"),U,3),0),U) Line Location: PRINT+10
Function Call: WRITE	Prompt: ! Condition for execution: ABM("VT")]"" Line Location: PRINT+13
Function Call: WRITE	Prompt: !?7,$S(ABMY("SORT")="C":" Clinic: "_$P(^DIC(40.7,$P(ABM("TXT"),U,3),0),U),1:"Visit Type: "_$P(^ABMDVTYP($P(ABM("TXT"),U,3),0),U)) Line Location: PRINT+13
Function Call: WRITE	Prompt: !! Line Location: PRINT+31
Function Call: WRITE	Prompt: ?3,"Reasons on report: " Line Location: PRINT+32
Function Call: WRITE	Prompt: !?6,"Rsn",?10,"Description",?57,"#times on report" Line Location: PRINT+33
Function Call: WRITE	Prompt: !?25,"Active",?54,"Claim",?62,"Visit" Line Location: HDB+5
Function Call: WRITE	Prompt: !?2,"Patient",?18,"HRN",?25,"Insurer",?54,"Number",?62,"Date",?75,"Rsn" Line Location: HDB+6
Function Call: WRITE	Prompt: !,"-------------------------------------------------------------------------------" Line Location: HDB+8
Function Call: WRITE	Prompt: !!,"Cancelling Official: ",$P(^VA(200,$P($G(^ABMCCLMS(DUZ(2),$P(ABM("TXT"),U,5),1)),U,4),0),U) Line Location: SUBHD+1
Function Call: WRITE	Prompt: !?27,"------" Line Location: SUB2+1
Function Call: WRITE	Prompt: !?16,"Subcount:",?27,ABM("CNT2") Line Location: SUB2+2
Function Call: WRITE	Prompt: !?27,"------" Line Location: SUB+1
Function Call: WRITE	Prompt: !?19,"Count:",?27,ABM("CNT1") Line Location: SUB+2

Name	Line Occurrences (* Changed, ! Killed)
^ABMCCLMR - [#9002274.31]	PRINT+36
^ABMCCLMS(	PRINT+8, PRINT+23, PRINT+25, PRINT+26, SUBHD+1
^ABMDVTYP - [#9002274.8]	PRINT+13
^AUPNPAT - [#9000001]	PRINT+17
^AUTNINS - [#9999999.18]	PRINT+19
^DIC(4 - [#4]	PRINT+10
^DIC(40.7 - [#40.7]	PRINT+13
^DPT - [#2]	PRINT+16
^VA(200 - [#200]	SUBHD+1

Name	Field # of Occurrence
>> ABM	PRINT+4, PRINT+5, PRINT+7
>> ABM("CANC"	PRINT+3, PRINT+9, PRINT+11*
>> ABM("CNT"	PRINT+3, PRINT+27
>> ABM("CNT1"	PRINT+3, PRINT+27, SUB, SUB+2, SUB+3*
>> ABM("CNT2"	PRINT+3, PRINT+27, SUB2, SUB2+2, SUB2+3, SUB, SUB+3
>> ABM("I"	HDB, SUB2+3, SUB+3*
>> ABM("LOC"	PRINT+3, PRINT+9, PRINT+10, PRINT+12*
>> ABM("PDFN"	PRINT+8*, PRINT+10, PRINT+16, PRINT+17, PRINT+19
>> ABM("PG"	PRINT+2, HDB
>> ABM("T"	PRINT+7*, PRINT+27, PRINT+28
>> ABM("TOT"	PRINT+3, PRINT+27
>> ABM("TOT1"	PRINT+3, PRINT+28, SUB+3*
>> ABM("TOT2"	PRINT+3, PRINT+28, SUB2+3, SUB+3
>> ABM("TXT"	PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+21, PRINT+23 , PRINT+25, PRINT+26, SUBHD+1
>> ABM("VT"	PRINT+3, PRINT+10, PRINT+13, PRINT+14*
>> ABM("Z"	PRINT+4*, PRINT+5
>> ABMR	PRINT+34, PRINT+35, PRINT+36
ABMRSN	PRINT+1!, PRINT+37!
ABMRSN(	PRINT+26*, PRINT+35, PRINT+36
>> ABMY("SORT"	PRINT+13
>> DIROUT	PRINT+5, PRINT+6, HD
>> DTOUT	PRINT+5, PRINT+6, HD
>> DUOUT	PRINT+5, PRINT+6, HD
DUZ(2	PRINT+8, PRINT+23, PRINT+25, PRINT+26, SUBHD+1
IOSL	PRINT+6
U	PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+16, PRINT+17 , PRINT+19, PRINT+21, PRINT+23, PRINT+25, PRINT+26, PRINT+36, SUBHD+1