Routine: ABMURCON

Information

ABMURCON ; IHS/SD/SDR - 3PB/UFMS Reconcile Sessions Option

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Third Party Billing	9	WHD^ABMDRHD $$LAST^ABMENVCK $$FMT^ABMERUTL (CASHTOT,CASHTOTP)^ABMUCASH ($$ASUFAC,$$FINDLOC,FINDACLS,FINDAOPN)^ABMUCUTL (BATCH,BILL,CLOSE,CREATBTH,HEADER,NOSEND,PRINTSUM,RCONSESS,REEXPB,SELSESS,VIEWLIST,VIEWSEL)^ABMURCN1 RECORD^ABMURCN2 (ABBREVCK,PTINCK)^ABMUUTL $$EN^ABMVDF
VA Fileman	4	NOW^%DTC ^DIE $$GET1^DIQ ^DIR
IHS VA Utilities	1	^XBGSAVE
Kernel	1	$$VERSION^XPDUTL

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Third Party Billing	3	ABMURCN1 ABMURCN2 ABMUVBCR

Entry Points

Name	Comments	DBIA/ICR reference
RCONSESS	;mark session as transmitted
BILL	;EP - put entry in bill mult for transmit dt & save UFMS inv#
XIT	;EP
CREATBTH	;EP - create UFMS export entry
SENDBTCH	;EP - ask export ques; export=yes
EXPORT	;EP-loop thru sess; export data
SENDFILE(XBGL,XBFN)	;
XSUMDISP	;EP - Summary export display
PRINTSUM	;EP - print sum?
PTINCK	;EP - pseudo TINs chk
RECORD	;EP - get pieces; put together rec
BATCH	;EP - put bill in batch file
XSUM2	;EP; called from ABMUVBCR
NOSEND	;EP - don't send but mark reconciled
SELSESS	;SEL SESSIONS
GETFILNM(ASUFACS)	;EP - CREATE FILE NAME
SEL
EXTRACT	;
EP	;EP
TRAILER	;EP
FILENAME()	;

External References

Name	Field # of Occurrence
NOW^%DTC	GETFILNM+8
WHD^ABMDRHD	XSUMDISP+6
$$LAST^ABMENVCK	GETFILNM+6
$$FMT^ABMERUTL	TRAILER+1, GETFILNM+5
CASHTOT^ABMUCASH	XSUM2+33
CASHTOTP^ABMUCASH	XSUM2+47
$$ASUFAC^ABMUCUTL	FILENAME+2
$$FINDLOC^ABMUCUTL	FILENAME+1
FINDACLS^ABMUCUTL	EP+7
FINDAOPN^ABMUCUTL	SEL+3
BATCH^ABMURCN1	BATCH+1
BILL^ABMURCN1	BILL+2
CLOSE^ABMURCN1	SEL+15
CREATBTH^ABMURCN1	CREATBTH+1
HEADER^ABMURCN1	EP+5, SEL
NOSEND^ABMURCN1	NOSEND+1
PRINTSUM^ABMURCN1	PRINTSUM+1
RCONSESS^ABMURCN1	RCONSESS+1
REEXPB^ABMURCN1	EXTRACT+59
SELSESS^ABMURCN1	SELSESS+1
VIEWLIST^ABMURCN1	EP+9, SEL+6
VIEWSEL^ABMURCN1	SEL+11
RECORD^ABMURCN2	RECORD+1
ABBREVCK^ABMUUTL	SEL+32
PTINCK^ABMUUTL	PTINCK+1
$$EN^ABMVDF	XSUMDISP+2, XSUM2+8, XSUM2+9, XSUM2+12, XSUM2+13, XSUM2+14, XSUM2+15, XSUM2+17, XSUM2+18
^DIE	SENDBTCH+17, EXTRACT+68
$$GET1^DIQ	EXTRACT+41
^DIR	SEL+4, SEL+12, SEL+23, SEL+30, SEL+39, SEL+46, SEL+54, SEL+58, SENDBTCH+24, SENDFILE+19
^XBGSAVE	SENDFILE+24
$$VERSION^XPDUTL	GETFILNM+4, GETFILNM+5, GETFILNM+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"Someone is already exporting..." Line Location: EP+3
Function Call: WRITE	Prompt: !?5,"There are no CLOSED sessions." Line Location: EP+8
Function Call: WRITE	Prompt: ! Line Location: EP+10
Function Call: WRITE	Prompt: !!! Line Location: EP+24
Function Call: WRITE	Prompt: !?5,"There are no OPEN sessions.",! Line Location: SEL+4
Function Call: WRITE	Prompt: !! Line Location: SEL+8
Function Call: WRITE	Prompt: !!,"IMPORTANT!! IMPORTANT!! Pseudo TINs will be sent in this export!" Line Location: SEL+18
Function Call: WRITE	Prompt: !! Line Location: SEL+23
Function Call: WRITE	Prompt: !!,"IMPORTANT!! IMPORTANT!! Visit Locations missing abbreviations!" Line Location: SEL+34
Function Call: WRITE	Prompt: !! Line Location: SEL+39
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: XSUMDISP+2
Function Call: WRITE	Prompt: !,"Please ensure the following information is correct:",! Line Location: XSUMDISP+8
Function Call: WRITE	Prompt: ?26,"Approved",?38,"\|" Line Location: XSUM2+1
Function Call: WRITE	Prompt: !?1,$$EN^ABMVDF("ULN"),"Session/User",$$EN^ABMVDF("ULF") Line Location: XSUM2+8
Function Call: WRITE	Prompt: ?27,$$EN^ABMVDF("ULN"),"Bills",$$EN^ABMVDF("ULF") Line Location: XSUM2+9
Function Call: WRITE	Prompt: ?38,"\|" Line Location: XSUM2+10
Function Call: WRITE	Prompt: ! Line Location: XSUM2+19
Function Call: WRITE	Prompt: ABMLINE,!,"TOTALS:" Line Location: XSUM2+51
Function Call: WRITE	Prompt: ?25,+$G(ABMSBTOT),?27,$J($FN(+$G(ABMSATOT),",",2),10) Line Location: XSUM2+52
Function Call: WRITE	Prompt: ?38,"\|" Line Location: XSUM2+53
Function Call: WRITE	Prompt: !! Line Location: XSUM2+62
Function Call: WRITE	Prompt: ! Line Location: XSUM2+63
Function Call: WRITE	Prompt: !!,"EXPORTED IN FILE ",ABMFILE Line Location: XSUM2+64
Function Call: WRITE	Prompt: !,"File will be created using the following name: ",!?5,ABMFILE Line Location: FILENAME+3
Routine Call	DIE Line Location: SENDBTCH+17 EXTRACT+68
Routine Call	DIR Line Location: SEL+4 SEL+12 SEL+23 SEL+30 SEL+39 SEL+46 SEL+54 SEL+58 SENDBTCH+24 SENDFILE+19

FileNo	Call Tags
^AUTNINS - [#9999999.18]	GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	EXTRACT+41
^ABMDPARM(	SEL+1, SEL+56, SEL+57, XSUMDISP+1, SENDFILE+12
^ABMUCASH - [#9002274.45]	XSUM2+40, XSUM2+44, EXTRACT+19, EXTRACT+20, EXTRACT+23, EXTRACT+24, EXTRACT+28, EXTRACT+30, EXTRACT+31, EXTRACT+33 , EXTRACT+34, EXTRACT+38, EXTRACT+39, EXTRACT+45, EXTRACT+46
^ABMUFMS($J	EXTRACT+1!, EXTRACT+69, TRAILER+2*
^ABMUTXMT - [#9002274.46]	EXTRACT+49, EXTRACT+51, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
^AUTNINS - [#9999999.18]	SEL+29, SEL+53
^DD("DD"	GETFILNM+11
^DIC(4 - [#4]	SEL+45
^VA(200 - [#200]	XSUM2+32

Label References

Name	Line Occurrences
$$GETFILNM	FILENAME+2
CREATBTH	EXTRACT+9
EXPORT	SENDBTCH+30
FILENAME	EXPORT+15
NOSEND	SEL+57
PRINTSUM	SENDBTCH+28, SENDBTCH+31
PTINCK	SEL+16
RECORD	EXTRACT+25, EXTRACT+35, EXTRACT+42, EXTRACT+58
SEL	SEL+14
SELSESS	EP+11, SEL+9
SENDBTCH	SEL+56
SENDFILE	EXTRACT+71
TRAILER	EXTRACT+70
XIT	XSUMDISP+6
XSUMDISP	SEL+55

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	GETFILNM+9, GETFILNM+10, GETFILNM+11
>> ABM("HD"	XSUMDISP+3, XSUMDISP+4
>> ABM("PG"	XSUMDISP+5*
>> ABMABAMT	XSUM2+34, XSUM2+48
>> ABMABILL	XSUM2+34, XSUM2+48
>> ABMAFLG	SENDBTCH+2, SENDBTCH+3, SENDBTCH+5, SENDBTCH+8, SENDBTCH+18
>> ABMBA	EXTRACT+18, EXTRACT+19, EXTRACT+20, EXTRACT+23, EXTRACT+24, EXTRACT+29, EXTRACT+30, EXTRACT+31, EXTRACT+33, EXTRACT+34
ABMBAL	XIT+1!
ABMBAOUT	EXTRACT+20, EXTRACT+21, EXTRACT+31, EXTRACT+41, EXTRACT+54, XIT+3!
>> ABMBBA	EXTRACT+52, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
>> ABMBBIEN	EXTRACT+55, EXTRACT+56, EXTRACT+57
>> ABMBIEN	EXTRACT+22, EXTRACT+23, EXTRACT+24, EXTRACT+32, EXTRACT+33, EXTRACT+34
>> ABMBSDT	EXTRACT+50, EXTRACT+51, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
>> ABMBUSER	EXTRACT+48, EXTRACT+49, EXTRACT+51, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
ABMC	EP+22*, SEL+10, XIT+1!
ABMC(	XSUM2+25, XSUM2+27, XSUM2+29, SENDBTCH+3, SENDBTCH+5, SENDBTCH+7, SENDBTCH+8, SENDBTCH+9, EXTRACT+11, EXTRACT+13 , EXTRACT+15
>> ABMCBAMT	XSUM2+38, XSUM2+42
>> ABMCBILL	XSUM2+38, XSUM2+42
>> ABMCCLMS	XSUM2+39, XSUM2+43
>> ABMCNT	EXTRACT+6*, TRAILER+1, TRAILER+2
>> ABMDT	SENDBTCH+1, SENDBTCH+3, SENDBTCH+5, SENDBTCH+7, SENDBTCH+8, SENDBTCH+9, SENDBTCH+15
>> ABMDT2	SENDBTCH+6, SENDBTCH+7, SENDBTCH+8, SENDBTCH+9
ABMDUZ	XSUM2+26, XSUM2+27, XSUM2+29, XSUM2+31, XSUM2+32, XSUM2+33, XSUM2+40, XSUM2+44, XSUM2+45, EXTRACT+12* , EXTRACT+13*, EXTRACT+15, EXTRACT+16, EXTRACT+19, EXTRACT+20, EXTRACT+23, EXTRACT+24, EXTRACT+26, EXTRACT+38, EXTRACT+39 , EXTRACT+45, EXTRACT+46, EXTRACT+63, EXTRACT+64, EXTRACT+65, XIT+2!
ABMDUZ2	XIT+2!
>> ABMEBAMT	XSUM2+37, XSUM2+50
ABMEBILL	XSUM2+24!, XSUM2+37, XSUM2+50
>> ABMFD	XSUM2+28, XSUM2+29, XSUM2+32, XSUM2+40, XSUM2+44, XSUM2+46
>> ABMFILE	XSUM2+64, EXTRACT+71, FILENAME+2*, FILENAME+3, FILENAME+4
ABMFLG	EP+6*, SEL+2!
>> ABMI	EP+13, EP+15, EP+16*, EP+17, EP+18, EP+19, EP+21
>> ABMINS	SEL+27, SEL+28, SEL+29, SEL+51, SEL+52, SEL+53
ABMLINE	XSUM2+51, XIT+3!
>> ABMLOC	XSUM2+40, XSUM2+44, EXTRACT+19, EXTRACT+20, EXTRACT+23, EXTRACT+24, EXTRACT+28, EXTRACT+30, EXTRACT+31, EXTRACT+33 , EXTRACT+34, EXTRACT+38, EXTRACT+39, EXTRACT+41, EXTRACT+45, EXTRACT+46, EXTRACT+62, FILENAME+1*, FILENAME+2, SENDFILE+12
>> ABMLOOP	EXTRACT+47*, EXTRACT+49, EXTRACT+51, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
>> ABMMABB(	SEL+44, SEL+45
>> ABMMIEN	EXTRACT+7*
>> ABMMT(	SEL+28, SEL+29
>> ABMMTINF	SEL+19, SEL+24
ABMO	EP+8, EP+11, EP+22, EP+23!, SEL+4, SEL+9, XIT+1!
ABMO(	EP+20!
>> ABMOCL	EXTRACT+5*
ABMOS	XIT+1!
ABMOS(	EP+16, EP+18, EP+19, EP+21!
ABMPASUF	XIT+2!
>> ABMPBTCH	EXTRACT+46*, EXTRACT+49, EXTRACT+51, EXTRACT+53, EXTRACT+54, EXTRACT+56, EXTRACT+57
ABMPREC	EXTRACT+24, EXTRACT+34, EXTRACT+39, EXTRACT+41, EXTRACT+57, XIT+2!
>> ABMPT(	SEL+52, SEL+53
>> ABMPTINF	SEL+18, SEL+48
>> ABMREC	TRAILER+1*, TRAILER+2
>> ABMRECT	EXTRACT+3*
>> ABMRQB	EXTRACT+37, EXTRACT+38, EXTRACT+39, EXTRACT+44, EXTRACT+45, EXTRACT+46
ABMRQFLG	XSUMDISP+7!
ABMSASUF	XIT+2!
ABMSATOT	XSUM2+21!, XSUM2+52
ABMSBTOT	XSUM2+21!, XSUM2+52, SENDBTCH+18
>> ABMSCNT	EP+12, EP+13, EP+14
ABMSDT	EP+18, EP+20, EXTRACT+14, EXTRACT+15*, EXTRACT+17, EXTRACT+19, EXTRACT+20, EXTRACT+23, EXTRACT+24, EXTRACT+30 , EXTRACT+31, EXTRACT+33, EXTRACT+34, EXTRACT+38, EXTRACT+39, EXTRACT+45, EXTRACT+46, EXTRACT+66, XIT+3!
ABMSESID	EXTRACT+17*, XIT+2!
ABMSESS	XSUM2+20, XSUM2+25, XSUM2+27, XSUM2+29, EXTRACT+8, EXTRACT+11, EXTRACT+13, EXTRACT+15, XIT+2!
ABMTBEN	XSUM2+24!, XSUM2+44*, XSUM2+58
ABMTCBAM	XSUM2+23!, XSUM2+56, XSUM2+60
ABMTCBIL	XSUM2+23!, XSUM2+56, XSUM2+60
ABMTCCLM	XSUM2+22!, XSUM2+57, XSUM2+61
>> ABMTCODE	EXTRACT+4*
>> ABMTEBAM	XSUM2+55
>> ABMTEBIL	XSUM2+55
>> ABMTOT	EXTRACT+2*, TRAILER+1
>> ABMTRIBL	SEL+1, SEL+17, SEL+24, SEL+33, SEL+40, SEL+48, XSUMDISP+1, XSUMDISP+3, XSUM2+2, XSUM2+5 , XSUM2+11, XSUM2+16, XSUM2+36, XSUM2+41, XSUM2+54, XSUM2+59
>> ABMURCON	EP+2
>> ABMUSER	EP+19, EP+20, SENDBTCH+4, SENDBTCH+5, SENDBTCH+7, SENDBTCH+8, SENDBTCH+9, SENDBTCH+12, SENDBTCH+13, SENDBTCH+14 , EXTRACT+27, EXTRACT+28*, EXTRACT+30, EXTRACT+31, EXTRACT+33, EXTRACT+34
>> ABMVDFN	SEL+43, SEL+44, SEL+45
>> ABMVDFNF	SEL+34, SEL+35, SEL+40
>> ABMXANS	SENDBTCH+25*, SENDBTCH+26, SENDBTCH+29
ABMY	EP+23!
ABMY("SESS"	EP+12, EP+13*, EP+14!, EP+17, SEL+10
ASUFACS	GETFILNM~, GETFILNM+14
DA	SENDBTCH+10!, SENDBTCH+15, EXTRACT+61!, EXTRACT+66
DA(1	SENDBTCH+12, SENDBTCH+13, SENDBTCH+14, EXTRACT+63, EXTRACT+64, EXTRACT+65
DA(2	SENDBTCH+11, SENDBTCH+13, SENDBTCH+14, EXTRACT+62, EXTRACT+64, EXTRACT+65
DATE	GETFILNM+1~, GETFILNM+10*, GETFILNM+13
DATETIME	GETFILNM+2!, GETFILNM+13*, GETFILNM+14
DIC	SENDBTCH+10!, EXTRACT+61!
DIE	SENDBTCH+10!, SENDBTCH+13, SENDBTCH+14, EXTRACT+61!, EXTRACT+64, EXTRACT+65
DIR	SEL+4!, SEL+7!, SEL+12!, SEL+23!, SEL+30!, SEL+39!, SEL+46!, SEL+54!, SEL+58!, SENDBTCH+21! , SENDBTCH+24!, SENDFILE+17!
DIR("A"	SEL+4, SEL+12, SEL+23, SEL+30, SEL+39, SEL+46, SEL+54, SEL+58, SENDBTCH+23*
DIR("B"	SEL+12*
DIR(0	SEL+4, SEL+12, SEL+23, SEL+30, SEL+39, SEL+46, SEL+54, SEL+58, SENDBTCH+22, SENDFILE+18
DIROUT	EP+23!, SEL+5, SEL+13
DR	SENDBTCH+10!, SENDBTCH+16, EXTRACT+61!, EXTRACT+67
DT	FILENAME+2
>> DTOUT	XSUMDISP+6
DUOUT	EP+23!, SEL+5, SEL+13, XSUMDISP+6
DUZ(2	SEL+1, SEL+56, SEL+57, XSUMDISP+1, SENDBTCH+11
FN	GETFILNM+1~, GETFILNM+7, GETFILNM+14, GETFILNM+15*, GETFILNM+16
FNEXT	GETFILNM+1~, GETFILNM+4, GETFILNM+5, GETFILNM+6*, GETFILNM+15
FNROOT	GETFILNM+1~, GETFILNM+3*, GETFILNM+7, GETFILNM+14
IO	XSUMDISP+6
>> POP	XSUMDISP+6
TIME	GETFILNM+1~, GETFILNM+12*, GETFILNM+13
U	EP+18, EP+19, SEL+1, SEL+29, SEL+45, SEL+53, SEL+56, SEL+57, XSUMDISP+1, XSUM2+32 , XSUM2+40, XSUM2+44, SENDBTCH+8, SENDBTCH+9, EXTRACT+20, EXTRACT+31, EXTRACT+41, EXTRACT+46, EXTRACT+54, SENDFILE+12
X	SEL+7!, SENDBTCH+10!, EXTRACT+61!
>> XBCON	SENDFILE+8*
>> XBE	SENDFILE+5*
>> XBF	SENDFILE+4*
>> XBFLG	XSUM2+65, XSUM2+66, SENDFILE+20, SENDFILE+22
>> XBFLG(1	XSUM2+67, SENDFILE+23*
>> XBFLT	SENDFILE+6*
XBFN	SENDFILE~, SENDFILE+1*
XBGL	SENDFILE~, SENDFILE+2*
>> XBMED	SENDFILE+7*
>> XBQ	SENDFILE+11*
>> XBQSHO	SENDFILE+3*
>> XBS1	SENDFILE+9, SENDFILE+10
>> XBUF	SENDFILE+12*, SENDFILE+13, SENDFILE+21
Y	SEL+7!, SEL+14, SENDBTCH+10!, SENDBTCH+25, EXTRACT+61!, GETFILNM+11*, GETFILNM+12
YR	GETFILNM+1~, GETFILNM+9*, GETFILNM+10
>> ZTQUEUED	SENDFILE+10

Customize PDF page

Package: Third Party Billing

Routine: ABMURCON

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: