Routine: IBCEPTC3

Information

IBCEPTC3 ;ALB/ESG - EDI PREVIOUSLY TRANSMITTED CLAIMS ACTIONS ;12/19/05

Package	Total	Call Graph
Integrated Billing	7	$$ADDTBILL^IBCB1 EN1^IBCE837B $$COBN^IBCEF $$LAST364^IBCEF4 UPDEDI^IBCEM DEVSEL^IBCEPTC RPT^IBCEPTC1
VA FileMan	4	^DIC ^DIK $$GET1^DIQ ^DIR
List Manager	2	FULL^VALM1 EN^VALM2
Kernel	1	HOME^%ZIS

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 7

Package	Total	Caller Graph
Integrated Billing	7	IBCE VIEW PREV TRANS IBCE VIEW PREV TRANS BTCH SEL IBCE VIEW PREV TRANS EXIT IBCE VIEW PREV TRANS REPORT IBCE VIEW PREV TRANS RESUB IBCE VIEW PREV TRANS SELECT IBCEPTC

Entry Points

Name	Comments	DBIA/ICR reference
SELECT	; Select claims to resubmit
SELBATCH	; Select a batch to resubmit ; Assumes IBSORT is defined
SELBQ
MARK(IBIFN,IBZ,IBQ,IBI,IBASK,VALMHDR)	; Mark claim as selected for resubmit ; Returns VALMHDR killed if any selections/de-selections made
VIEW	; View claims selected
VIEWQ
RESUB	; Resubmit selected claims
RESUBQ	;
REPORT	; Print report ; Assumes IBSORT, IBDT1, IBDT2 defined
CKSENT(VALMBCK)	; Make sure selected entries are transmitted
TXOK(IBIFN)	; Function determines if claim is OK for live resubmission
TXOKX	;

External References

Name	Field # of Occurrence
HOME^%ZIS	REPORT+9
^DIC	SELBATCH+11
^DIK	RESUB+74
$$GET1^DIQ	RESUB+51
^DIR	SELBATCH+9, SELBATCH+18, MARK+6, VIEW+4, VIEW+12, VIEW+17, RESUB+9, RESUB+18, RESUB+29, RESUB+106 , CKSENT+7
$$ADDTBILL^IBCB1	RESUB+54
EN1^IBCE837B	RESUB+68
$$COBN^IBCEF	TXOK+4
$$LAST364^IBCEF4	TXOK+8
UPDEDI^IBCEM	RESUB+80
DEVSEL^IBCEPTC	REPORT+4
RPT^IBCEPTC1	REPORT+7
FULL^VALM1	SELECT+2, SELBATCH+3, VIEW+2, RESUB+6, REPORT+3, CKSENT+5
EN^VALM2	SELECT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: SELBATCH+9
Function Call: WRITE	Prompt: ! Line Location: SELBATCH+18
Function Call: WRITE	Prompt: ! Line Location: MARK+6
Function Call: WRITE	Prompt: @IOF Line Location: VIEW+5
Function Call: WRITE	Prompt: !,+^TMP("IB_PREV_CLAIM_SELECT",$J)," claims selected:" Line Location: VIEW+7
Function Call: WRITE	Prompt: !," ",$E(^TMP("IB_PREV_CLAIM_LIST",$J,Z0,0),7,47) Line Location: VIEW+14
Function Call: WRITE	Prompt: ! Line Location: RESUB+29
Function Call: WRITE	Prompt: !!,"Resubmission in process ... " Line Location: RESUB+33
Function Call: WRITE	Prompt: ! Line Location: RESUB+106
Function Call: WRITE	Prompt: ! Line Location: CKSENT+7
Routine Call	%ZIS Line Location: REPORT+9
Routine Call	DIC Line Location: SELBATCH+11
Routine Call	DIR Line Location: SELBATCH+9 SELBATCH+18 MARK+6 VIEW+4 VIEW+12 VIEW+17 RESUB+9 RESUB+18 RESUB+29 RESUB+106 CKSENT+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBA(364 - [#364]	Classic Fileman Calls
^IBA(364.1 - [#364.1]	Classic Fileman Calls
^DGCR(399 - [#399]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	MARK+6, TXOK+6, TXOK+7
^IBA(364 - [#364]	SELECT+6, TXOK+9
^IBM(361.1 - [#361.1]	TXOK+4
^TMP("IBEDI_TEST_BATCH"	RESUB+42, RESUB+64, RESUB+65!, RESUB+84!
^TMP("IBONE"	RESUB+65!
^TMP("IBRCBOLD"	RESUB+37!, RESUB+57*, RESUB+80, RESUB+84!
^TMP("IBRESUBMIT"	RESUB+43, RESUB+64, RESUB+65!, RESUB+84!
^TMP("IBSELX"	RESUB+56, RESUB+65, RESUB+74, RESUB+84!
^TMP("IBSKIPPED"	RESUB+38!, RESUB+53*, RESUB+93, RESUB+103!
^TMP("IB_PREV_CLAIM_BATCH"	SELBATCH+13, SELBATCH+16, SELBATCH+20!, SELBATCH+23, SELBATCH+30*
^TMP("IB_PREV_CLAIM_LIST"	MARK+7, MARK+10, VIEW+9, VIEW+14
^TMP("IB_PREV_CLAIM_LIST_DX"	SELECT+5, SELBATCH+26
^TMP("IB_PREV_CLAIM_SELECT"	MARK+3, MARK+7!, MARK+9, VIEW+3, VIEW+7, VIEW+8, RESUB+7, RESUB+27, RESUB+39, RESUB+85! , CKSENT+4, CKSENT+6

Label References

Name	Line Occurrences
$$TXOK	RESUB+50
MARK	SELECT+8, SELBATCH+28, RESUB+44, RESUB+58
RESUBQ	RESUB+7, RESUB+19, RESUB+30
SELBQ	SELBATCH+5, SELBATCH+7, SELBATCH+12, SELBATCH+16
TXOKX	TXOK+4, TXOK+6, TXOK+7, TXOK+8, TXOK+9, TXOK+10
VIEWQ	VIEW+3, VIEW+16

Naked Globals

Name	Field # of Occurrence
^(	SELBATCH+24, VIEW+8, RESUB+39

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	RESUB+73~, RESUB+74*
DIC	SELBATCH+2~, SELBATCH+10*, SELBATCH+11!
DIC("S"	SELBATCH+10*
DIC(0	SELBATCH+10*
DIK	RESUB+73~, RESUB+74*
DIR	SELECT+1~, SELBATCH+2~, SELBATCH+9!, SELBATCH+18!, MARK+2~, MARK+6!, VIEW+1~, VIEW+4!, VIEW+12!, VIEW+17! , RESUB+1~, RESUB+8~, RESUB+9!, RESUB+18!, RESUB+29!, RESUB+106!, CKSENT+2~, CKSENT+7!
DIR("?"	RESUB+15, RESUB+16
DIR("A"	SELBATCH+6, SELBATCH+8, SELBATCH+17, MARK+6, VIEW+4, RESUB+9, RESUB+13, RESUB+27, RESUB+28, RESUB+87 , RESUB+89, RESUB+90, RESUB+91, RESUB+96, RESUB+100, RESUB+104!, RESUB+105, CKSENT+6
DIR("B"	SELBATCH+17, MARK+6, RESUB+14, RESUB+26, CKSENT+6*
DIR(0	SELBATCH+6, SELBATCH+8, SELBATCH+17, MARK+6, VIEW+4, VIEW+12, VIEW+17, RESUB+9, RESUB+12, RESUB+26 , RESUB+86, CKSENT+6
DIRCTR	RESUB+1~, RESUB+92, RESUB+96, RESUB+100*
DIRLN	RESUB+1~, RESUB+92, RESUB+96, RESUB+97, RESUB+99*, RESUB+100
DIROUT	RESUB+1~
DIRUT	RESUB+1~, RESUB+19
DTOUT	SELBATCH+2~, SELBATCH+19, RESUB+1~
DUOUT	SELBATCH+2~, SELBATCH+19, RESUB+1~
IB	RESUB+73~, RESUB+74, RESUB+79~, RESUB+80
IB364	RESUB+2~, RESUB+39, RESUB+42, RESUB+43, RESUB+44, RESUB+57, RESUB+58, TXOK+1~, TXOK+8, TXOK+9
IBABORT	RESUB+2~, RESUB+68, RESUB+72, RESUB+78, RESUB+104
IBACT	REPORT+2~, REPORT+4*, REPORT+5
IBASK	SELBATCH+2~, SELBATCH+15, SELBATCH+20, SELBATCH+28, SELBATCH+30, MARK~, MARK+5
IBCLMNO	RESUB+2~, RESUB+51, RESUB+53, RESUB+92, RESUB+93*, RESUB+99
IBCT	VIEW+1~, VIEW+6, VIEW+10, VIEW+11
IBD	TXOK+1~, TXOK+9*, TXOK+10
>> IBDT1	REPORT+7
>> IBDT2	REPORT+7
IBDX	SELBATCH+2~, SELBATCH+26*, SELBATCH+27, SELBATCH+28
IBFSKIP	RESUB+2~, RESUB+36, RESUB+52, RESUB+88
IBI	SELECT+1~, SELECT+5, SELECT+6, SELECT+8, SELBATCH+2~, SELBATCH+27, SELBATCH+28, MARK~, MARK+9
IBIFN	SELECT+1~, SELECT+6, SELECT+7, SELECT+8, MARK~, MARK+3, MARK+6, MARK+7, MARK+9, RESUB+2~ , RESUB+39, RESUB+44, RESUB+50, RESUB+51, RESUB+53, RESUB+54, RESUB+58, TXOK~, TXOK+4, TXOK+6 , TXOK+7, TXOK+8
>> IBLOC	SELECT+6, SELBATCH+5, RESUB+18, RESUB+21
IBOK	SELBATCH+2~, SELBATCH+15, SELBATCH+16, SELBATCH+19, CKSENT+2~, CKSENT+3, CKSENT+8, CKSENT+9
IBQ	SELECT+1~, SELECT+5, SELECT+8, SELBATCH+2~, SELBATCH+22, SELBATCH+23*, SELBATCH+24, MARK~, MARK+7, MARK+9 , MARK+10
IBQUIT	VIEW+1~, VIEW+6, VIEW+11, VIEW+13*, VIEW+16
IBREP	REPORT+6~, REPORT+7*
IBRSBTST	RESUB+2~, RESUB+5, RESUB+24, RESUB+68
IBSKCTR	RESUB+2~, RESUB+92, RESUB+94, RESUB+95, RESUB+97*, RESUB+100
>> IBSORT	SELBATCH+7, REPORT+7
IBSTAT	TXOK+1~, TXOK+10*
IBTYPPTC	RESUB+2~, RESUB+20, RESUB+21, RESUB+24, RESUB+27, RESUB+41, RESUB+47, RESUB+64, RESUB+87
IBY	SELBATCH+2~, SELBATCH+13*, SELBATCH+16, SELBATCH+20, SELBATCH+23, SELBATCH+30
IBZ	SELECT+1~, SELECT+4, SELECT+5, SELECT+8, SELBATCH+2~, SELBATCH+24, SELBATCH+25, SELBATCH+28, MARK~, MARK+6
IOF	VIEW+5
OK	TXOK+1~, TXOK+2, TXOK+11, TXOKX+1
U	SELECT+5, SELBATCH+25, SELBATCH+27, MARK+6, RESUB+55, TXOK+6, TXOK+7, TXOK+10
VALMBCK	SELECT+9, SELBQ, VIEWQ, RESUBQ+1, REPORT+10, CKSENT~, CKSENT+8, CKSENT+9*
>> VALMBG	SELBATCH+13*
VALMHDR	SELECT+8, SELBATCH+28, MARK~, MARK+7!, MARK+10!, RESUB+44, RESUB+58, RESUB+107!
VALMY	SELECT+1~
VALMY(	SELECT+4
X	SELECT+1~, SELBATCH+2~, MARK+2~, VIEW+1~, RESUB+3~, RESUB+8~, CKSENT+2~
>> XQORNOD(0	SELECT+3
Y	SELECT+1~, SELBATCH+2~, SELBATCH+12, SELBATCH+13, SELBATCH+20, MARK+2~, MARK+4, MARK+7, VIEW+1~, VIEW+13 , RESUB+3~, RESUB+8~, RESUB+21, RESUB+30, RESUB+54~, RESUB+55, RESUB+56, CKSENT+2~, CKSENT+8
Z	SELBATCH+2~, SELBATCH+25, SELBATCH+26, SELBATCH+28, VIEW+1~, VIEW+8, REPORT+2~
Z0	VIEW+1~, VIEW+8*, VIEW+9, VIEW+14
Z1	RESUB+3~, RESUB+39*, RESUB+44, RESUB+58

Customize PDF page

Package: Integrated Billing