Routine: IBCNFSND

Package	Total	Call Graph
MailMan	4	^XMD $$SUBGET^XMGAPI0 REC^XMS3 VAPOR^XMXEDIT
VA FileMan	4	^DIC FILE^DICN ^DIE ^DIK
Integrated Billing	2	GETPARAM^IBCNFRD ($$FILEDUE,MSGNOEXT,MSGNORES,MSGNOTRC)^IBCNFSND
Kernel	2	($$DEL,$$LIST,$$STATUS,CLOSE,OPEN)^%ZISH ($$FMADD,$$FMTH,$$HADD,$$HDIFF,$$HTFM,$$NOW,$$SCH)^XLFDT

Package	Total	Caller Graph
Integrated Billing	2	IBAMTC IBCNFSND

Entry Points

Name	Comments	DBIA/ICR reference
SENDEII	; send HMS extract files and check status of files transfers. ; this subroutine is called from IBAMTC routine which is an scheduled job running once a day.
FILEDUE(IBDUEDAY,IBLTDAY,IBCRDT,IBNOW)	; check if file is due ; input: IBDEUDAY - day of the month the file is due ; IBLTDAY - number of days after day of month to declare file is late ; IBCRDT - date/time last file was processed ; output: 1 - if file is due ; 0 - if file is not due
MSGNORES(IBFILE)	; Notify G.IBCNF EII IRM mail group that the result file is not received ; input: IBNORES - result file name ; output: none
MSGNOEXT(IBNOEXT)	; Notify G.IBCNF EII IRM mail group that the extract file is not created ; input: IBNOEXT(<file name>)="" list of the extract file names. ; output: none
MSGNOTRC(IBNOTREC)	; Notify G.IBCNF EII IRM mail group the confirmation messages are not received for extract files ; input: IBNOTREC - array where ; IBNOTREC((<file index>)= <file name> ^ ; IBNOTREC(<file index>, <message index>) = <message #> ^ ; output: none
CHKEXT(IBD0,IBFILE,IBAITC,IBNOTREC)	; For given extract file type check if all messages are confirmed. ; input: IBD0 - ien of HMS extract file status (#355.35) ; IBFILE - file name ; IBAITC = AITC DMI queue email address.
FILERD(DIR,FILE,IBTEXT)	; Read the extract file into @IBTEXT@ array ; input: DIR - HMS directory name ; FILE - extract file name ; output: IBTEXT - array name where file is read into as @IBTEXT@(<1...n>)
MSGSEND(XMY,XMSUB,IBTEXT,IBFROM,IBTO,IBMAXREC)	; send the extract file text to AITC DMI Queue ; input: XMY - array of recipients names ; XMSUB - message subject ; IBTEXT - array name where content of message is read from @IBTEXT@(IBFROM:IBTO) ; IBFROM - start of the message text in @IBTEXT@() array ; IBTO - end of the message text in @IBTEXT@() array ; IBMAXREC - maximum line length that can be put into each messge line. ; output: returns the created message id
CACTLOG(IBD0)	; create the activity log of HMS extract file status ; input: IBD0 - ien of HMS extract file status (#355.35) ; output: none ;
PURGELOG(IBAKEEP)	; purge the activity logs of HMS extract file status and HMS result file status ; input: IBAKEEP - number of days to keep the activity logs ; output: none
RESNDMSG(IBNOTREC,IBAKEEP)	; Resend the messages for which the confirmation messages are not received for extract files ; input: IBNOTREC - array where ; IBNOTREC((<file index>)= file name^AITC DMI queue email address ; IBNOTREC(<file index>, <message index>) = message # ^ send date time ; IBAKEEP = number of days before purge the new message ; output: none
GMSGTXT(XMZ,IBRESMSG)	; get message's txt ; input: XMZ - message id. ; output: IBRESMSG - array containing the message's txt

Name	Field # of Occurrence
$$DEL^%ZISH	SENDEII+81
$$LIST^%ZISH	SENDEII+44
$$STATUS^%ZISH	FILERD+13, FILERD+15
CLOSE^%ZISH	FILERD+18
OPEN^%ZISH	FILERD+9
^DIC	SENDEII+22
FILE^DICN	SENDEII+78, CACTLOG+9, CACTLOG+21, RESNDMSG+39
^DIE	SENDEII+50, RESNDMSG+19
^DIK	SENDEII+38, PURGELOG+17, PURGELOG+27
GETPARAM^IBCNFRD	SENDEII+7
$$FILEDUE^IBCNFSND	SENDEII+84, SENDEII+99
MSGNOEXT^IBCNFSND	SENDEII+94
MSGNORES^IBCNFSND	SENDEII+100
MSGNOTRC^IBCNFSND	SENDEII+90
$$FMADD^XLFDT	FILEDUE+19, FILEDUE+29
$$FMTH^XLFDT	FILEDUE+23, CHKEXT+16, PURGELOG+6
$$HADD^XLFDT	PURGELOG+6
$$HDIFF^XLFDT	CHKEXT+16
$$HTFM^XLFDT	SENDEII+71, FILEDUE+23, PURGELOG+6, RESNDMSG+32
$$NOW^XLFDT	SENDEII+25, FILEDUE+8, MSGNORES+6, MSGNOEXT+6, MSGNOTRC+8, CHKEXT+10, PURGELOG+5, RESNDMSG+8
$$SCH^XLFDT	FILEDUE+16
^XMD	MSGNORES+10, MSGNOEXT+15, MSGNOTRC+21, MSGSEND+23, RESNDMSG+29
$$SUBGET^XMGAPI0	RESNDMSG+25
REC^XMS3	GMSGTXT+9
VAPOR^XMXEDIT	SENDEII+71, RESNDMSG+32

FileNo	Call Tags
^IBA(355.35 - [#355.35]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^IBA(355.35 - [#355.35]	SENDEII+31, SENDEII+38, CHKEXT+13, CHKEXT+14, CHKEXT+16, CHKEXT+18, CACTLOG+6, CACTLOG+15, CACTLOG+16, PURGELOG+10 , PURGELOG+12, PURGELOG+15
^IBA(355.351 - [#355.351]	SENDEII+98, PURGELOG+21, PURGELOG+23, PURGELOG+25

Name	Line Occurrences
$$CHKEXT	SENDEII+33
$$MSGSEND	SENDEII+68
CACTLOG	SENDEII+34
FILERD	SENDEII+54
GMSGTXT	RESNDMSG+23
PURGELOG	SENDEII+104
RESNDMSG	SENDEII+91

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
D0	SENDEII+5~
D1	SENDEII+5~
D2	SENDEII+5~
DA	SENDEII+5~, SENDEII+36, SENDEII+38, SENDEII+50, CACTLOG+4~, CACTLOG+11!, PURGELOG+4~, PURGELOG+15, PURGELOG+25, RESNDMSG+17
DA(1	SENDEII+36, SENDEII+37, SENDEII+74, SENDEII+75, CACTLOG+7, CACTLOG+8, CACTLOG+13, CACTLOG+18, PURGELOG+14, PURGELOG+16 , PURGELOG+24, PURGELOG+26, RESNDMSG+17, RESNDMSG+18, RESNDMSG+35, RESNDMSG+36
DA(2	CACTLOG+12*, CACTLOG+18
DG	SENDEII+5~
DI	SENDEII+5~
DIC	SENDEII+5~, SENDEII+22!, SENDEII+74!, SENDEII+75, CACTLOG+4~, CACTLOG+8, CACTLOG+11!, CACTLOG+18, RESNDMSG+35!, RESNDMSG+36*
DIC("DR"	SENDEII+76, CACTLOG+19, RESNDMSG+37*
DIC(0	SENDEII+22, SENDEII+74, CACTLOG+7, CACTLOG+17, RESNDMSG+35*
DICR	SENDEII+5~
DIE	SENDEII+5~, SENDEII+50, RESNDMSG+18
DIK	SENDEII+5~, SENDEII+37, PURGELOG+4~, PURGELOG+16, PURGELOG+26*
DIR	FILERD~, FILERD+9
DIW	SENDEII+5~
DLAYGO	SENDEII+5~, SENDEII+74, CACTLOG+7, RESNDMSG+35*
DQ	SENDEII+5~
DR	SENDEII+5~, SENDEII+50, RESNDMSG+19
FILE	FILERD~, FILERD+9
FNDFILE	SENDEII+5~, SENDEII+44*
FNDFILES	SENDEII+5~, SENDEII+41!
FNDFILES(	SENDEII+45*, SENDEII+83
I	MSGNOTRC+6~, MSGNOTRC+11, MSGNOTRC+12, MSGNOTRC+14, MSGNOTRC+16, MSGNOTRC+18, FILERD+6~, MSGSEND+9~, MSGSEND+15*, MSGSEND+17
IBAITC	CHKEXT~, CHKEXT+19, RESNDMSG+7~, RESNDMSG+12*, RESNDMSG+27
IBAKEEP	SENDEII+4~, SENDEII+12*, SENDEII+71, SENDEII+91, SENDEII+104, PURGELOG~, PURGELOG+6, RESNDMSG~, RESNDMSG+32
IBCDT	CACTLOG+4~, CACTLOG+6*, CACTLOG+9
IBCNFPAR	SENDEII+3~, SENDEII+7
IBCNFPAR(	SENDEII+9, SENDEII+18, SENDEII+19, SENDEII+44, SENDEII+54, SENDEII+59, SENDEII+60, SENDEII+63, SENDEII+64, SENDEII+81 , SENDEII+99, SENDEII+100, CHKEXT+17
IBCONFRM	CHKEXT+9~, CHKEXT+11, CHKEXT+15, CHKEXT+20
IBCRDT	SENDEII+3~, SENDEII+24, SENDEII+25, SENDEII+84, SENDEII+98, SENDEII+99, FILEDUE~, FILEDUE+13, FILEDUE+32, FILEDUE+33 , PURGELOG+4~, PURGELOG+11, PURGELOG+12, PURGELOG+15, PURGELOG+22, PURGELOG+23, PURGELOG+25
IBD0	SENDEII+3~, SENDEII+23, SENDEII+31, SENDEII+33, SENDEII+34, SENDEII+36, SENDEII+38, SENDEII+50, SENDEII+74, CHKEXT~ , CHKEXT+13, CHKEXT+14, CHKEXT+16, CHKEXT+18, CHKEXT+19, CACTLOG~, CACTLOG+6, CACTLOG+7, CACTLOG+12, CACTLOG+15 , CACTLOG+16, PURGELOG+4~, PURGELOG+9, PURGELOG+10, PURGELOG+12, PURGELOG+14, PURGELOG+15, PURGELOG+20, PURGELOG+21, PURGELOG+23 , PURGELOG+24, PURGELOG+25, RESNDMSG+7~, RESNDMSG+9, RESNDMSG+11*, RESNDMSG+12, RESNDMSG+14, RESNDMSG+15, RESNDMSG+17, RESNDMSG+35
IBD1	SENDEII+3~, CHKEXT+9~, CHKEXT+12, CHKEXT+13, CHKEXT+14, CHKEXT+16, CHKEXT+18, CACTLOG+4~, CACTLOG+14, CACTLOG+15 , CACTLOG+16, RESNDMSG+7~, RESNDMSG+13, RESNDMSG+14, RESNDMSG+15, RESNDMSG+17
IBDIFF	CHKEXT+9~, CHKEXT+16*, CHKEXT+17
IBDUEDAY	FILEDUE~, FILEDUE+11, FILEDUE+17*, FILEDUE+18, FILEDUE+27
IBDUEDT	FILEDUE+7~, FILEDUE+18*, FILEDUE+19, FILEDUE+32
IBEXTNOD	SENDEII+3~, SENDEII+19*, SENDEII+20, SENDEII+22, SENDEII+33, SENDEII+67, SENDEII+84
IBFARR	SENDEII+3~, SENDEII+81
IBFARR(	SENDEII+80*
IBFDOM	FILEDUE+7~, FILEDUE+21*, FILEDUE+23
IBFILE	SENDEII+3~, SENDEII+20, SENDEII+33, SENDEII+42, SENDEII+45, SENDEII+66, SENDEII+83, SENDEII+85, MSGNORES~, MSGNORES+7 , MSGNOEXT+4~, MSGNOEXT+8, MSGNOEXT+10*, MSGNOEXT+12, CHKEXT~, CHKEXT+19
IBFILEX	SENDEII+5~, SENDEII+47*, SENDEII+54, SENDEII+80
IBFLIST	SENDEII+3~, SENDEII+41!, SENDEII+44!
IBFLIST(""	SENDEII+47
IBFROM	SENDEII+3~, SENDEII+63*, SENDEII+68, MSGSEND~, MSGSEND+13
IBFSPEC	SENDEII+3~, SENDEII+41!
IBFSPEC(	SENDEII+42*
IBI	FILERD+6~, FILERD+12, FILERD+16, FILERD+17, MSGSEND+9~, MSGSEND+12, MSGSEND+16, MSGSEND+17, MSGSEND+19
IBLATEDT	FILEDUE+7~, FILEDUE+19*, FILEDUE+32
IBLDM	FILEDUE+7~, FILEDUE+16*, FILEDUE+17
>> IBLDMP	FILEDUE+23*, FILEDUE+25, FILEDUE+28
IBLTDAY	FILEDUE~, FILEDUE+19, FILEDUE+29
IBMAXREC	SENDEII+4~, SENDEII+11*, SENDEII+68, MSGSEND~, MSGSEND+15, MSGSEND+17
IBMSG	MSGNORES+4~, MSGNOEXT+4~
IBMSG(	MSGNOEXT+12*
IBMSG(1	MSGNORES+7, MSGNOEXT+7
IBMSGNUM	SENDEII+3~, SENDEII+62*, SENDEII+63, SENDEII+64, SENDEII+66
IBNODE	CACTLOG+4~, CACTLOG+16*, CACTLOG+20
IBNOEXT	SENDEII+3~, SENDEII+94, MSGNOEXT~
IBNOEXT(	SENDEII+85*, MSGNOEXT+10
IBNORES	SENDEII+4~
IBNOTREC	SENDEII+3~, SENDEII+33, SENDEII+89, SENDEII+90, SENDEII+91, MSGNOTRC~, CHKEXT~, RESNDMSG~
IBNOTREC(	MSGNOTRC+12, MSGNOTRC+14, MSGNOTRC+16, MSGNOTRC+18, CHKEXT+18, CHKEXT+19, RESNDMSG+11, RESNDMSG+12, RESNDMSG+14, RESNDMSG+15
IBNOW	FILEDUE~, FILEDUE+8, FILEDUE+12, FILEDUE+16, FILEDUE+18, FILEDUE+21, FILEDUE+32, FILEDUE+33, MSGNORES+4~, MSGNORES+6* , MSGNOEXT+4~, MSGNOEXT+6, MSGNOTRC+6~, MSGNOTRC+8, CHKEXT+9~, CHKEXT+10, CHKEXT+16, PURGELOG+4~, PURGELOG+5, PURGELOG+6 , RESNDMSG+7~, RESNDMSG+8*
IBNUMMSG	SENDEII+4~, SENDEII+59, SENDEII+60, SENDEII+61*, SENDEII+62, SENDEII+66
IBNUMREC	SENDEII+4~, SENDEII+58*, SENDEII+59, SENDEII+60, SENDEII+65
IBPFDOM	FILEDUE+7~, FILEDUE+25*, FILEDUE+27
IBPSTDUE	SENDEII+4~, SENDEII+84, SENDEII+85, SENDEII+99, SENDEII+100
IBREC	FILERD+6~, FILERD+14, FILERD+17, MSGSEND+9~, MSGSEND+14, MSGSEND+15, MSGSEND+17
IBRESEND	RESNDMSG+7~, RESNDMSG+24*, RESNDMSG+26
IBRESMSG	MSGNOTRC+6~, RESNDMSG+7~, RESNDMSG+23, GMSGTXT~, GMSGTXT+5!
IBRESMSG(	MSGNOTRC+14, MSGNOTRC+18, GMSGTXT+12*
IBRESMSG(1	MSGNOTRC+9*
IBSTART	PURGELOG+4~, PURGELOG+6*, PURGELOG+12, PURGELOG+23
IBSUB1	SENDEII+4~, SENDEII+17, SENDEII+18, SENDEII+19
IBTEXT	SENDEII+4~, SENDEII+13*, SENDEII+14, SENDEII+54, SENDEII+58, SENDEII+68, SENDEII+106, FILERD~, FILERD+7, FILERD+17 , MSGSEND~, MSGSEND+14
IBTO	SENDEII+4~, SENDEII+64, SENDEII+65, SENDEII+68, MSGSEND~, MSGSEND+13
IBX	MSGNORES+4~, MSGNOEXT+4~, MSGNOEXT+9, MSGNOEXT+11, MSGNOEXT+12, MSGNOTRC+6~, MSGNOTRC+10, MSGNOTRC+13, MSGNOTRC+14, MSGNOTRC+17* , MSGNOTRC+18
IBXMSUB	SENDEII+4~, SENDEII+66*, SENDEII+68
IBXMY	SENDEII+4~, SENDEII+68
IBXMY(	SENDEII+67*
IBXMZ	SENDEII+4~, SENDEII+68, SENDEII+71, SENDEII+77, RESNDMSG+15, RESNDMSG+23, RESNDMSG+25, RESNDMSG+26, GMSGTXT+4~, GMSGTXT+6*
IO	FILERD+11
J	MSGNOTRC+6~, MSGNOTRC+15, MSGNOTRC+16, MSGNOTRC+18, MSGSEND+9~, MSGSEND+13*, MSGSEND+14
LATE	FILEDUE+7~, FILEDUE+9, FILEDUE+11, FILEDUE+32, FILEDUE+33*, FILEDUE+34
PLATEDT	FILEDUE+7~, FILEDUE+29*, FILEDUE+33
>> POP	FILERD+10
PREVDUE	FILEDUE+7~, FILEDUE+27, FILEDUE+28, FILEDUE+29, FILEDUE+33
TEMPTEXT	MSGSEND+9~, MSGSEND+10*, MSGSEND+11, MSGSEND+17, MSGSEND+19, MSGSEND+20, MSGSEND+24
U	SENDEII+20, SENDEII+22, SENDEII+24, SENDEII+33, SENDEII+67, SENDEII+84, SENDEII+98, MSGNOTRC+14, MSGNOTRC+18, CHKEXT+14 , CHKEXT+16, CHKEXT+18, CHKEXT+19, CACTLOG+6, CACTLOG+20, RESNDMSG+12, RESNDMSG+15
X	SENDEII+5~, SENDEII+22, SENDEII+77, CACTLOG+4~, CACTLOG+9, CACTLOG+11!, CACTLOG+20, RESNDMSG+38*
XMA	GMSGTXT+4~, GMSGTXT+7, GMSGTXT+11, GMSGTXT+12
XMDUN	SENDEII+5~
XMDUZ	MSGSEND+9~, MSGSEND+21*, RESNDMSG+7~
XMER	GMSGTXT+4~, GMSGTXT+8, GMSGTXT+10
XMPOS	RESNDMSG+7~
XMRG	GMSGTXT+4~, GMSGTXT+12
XMSUB	MSGNORES+4~, MSGNORES+5, MSGNOEXT+4~, MSGNOEXT+5, MSGNOTRC+6~, MSGNOTRC+7, MSGSEND~, RESNDMSG+7~, RESNDMSG+25, RESNDMSG+26*
XMTEXT	MSGNORES+4~, MSGNORES+8, MSGNOEXT+4~, MSGNOEXT+13, MSGNOTRC+6~, MSGNOTRC+19, MSGSEND+9~, MSGSEND+20, RESNDMSG+7~, RESNDMSG+28*
XMY	MSGNORES+4~, MSGNOEXT+4~, MSGNOTRC+6~, MSGSEND~, RESNDMSG+7~
XMY(	RESNDMSG+27*
XMY("G.IBCNF	EII IRM" , MSGNORES+9, MSGNOEXT+14, MSGNOTRC+20*
XMZ	SENDEII+5~, MSGSEND+25, RESNDMSG+7~, RESNDMSG+32, RESNDMSG+38, GMSGTXT~, GMSGTXT+6
Y	SENDEII+5~, SENDEII+23, SENDEII+81*, CACTLOG+4~, CACTLOG+13
Y(0	SENDEII+24

Customize PDF page

Package: Integrated Billing

Routine: IBCNFSND

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: