Routine: BARUFEX

Package	Total	Call Graph
IHS Accounts Receivable	5	GETDATA^BARUFEX1 PRE^BARUFEX5 ($$CURSTAT,ASKFORRT)^BARUFUT ($$ASKFNAME,$$FILLSTR)^BARUFUT1 SENDFILE^BARUFUT2
VA Fileman	2	^%DT NOW^%DTC

Package	Total	Caller Graph
IHS Accounts Receivable	2	BAR UFMS EXTRACT TEST FILE BARUFUT

Entry Points

Name	Comments	DBIA/ICR reference
ASKTO	;EP - ASK TO DATE
DT(UDUZ,SESSID,BAROLD)	;EP - HEAVILY MODIFIED FOR BAR1.84 SCR80 1.4.1
NOTSENT(RECORD,TOTAMT)	;EP - CHECK THE NOT SENT CROSS REFERENCE
TRAILER()	;EP -
PULLSESS(UDUZ,SESSID)	;EP - PULL TRANSACTIONS LOGGED UNDER THIS SESSION
ASKDATE	;EP - ASK DATE RANGE
ASKFROM	;EP - ASK FROM DATE
EN(ARFROM,ARTO)	;EP - ENTRY TO MAIN UFMS EXTRACT. PULL ALL TRANSACTIONS W/IN DATE RANGE
OLD(SESSID)	;FIND OLDEST SESSION DATE BAR1.84 DD 4.1.1
ASKFILE	;EP - ASK FILENAME
ONETRAN(TRDATE,SESSID)	;EP - CREATE FILE FOR ONE/MANY A/R TRANSACTION
LCK(UDUZ,SESSID)	;EP; LOCK A/R SESSION FILE ;MRS:BAR1.87 IM30562

External References

Name	Field # of Occurrence
^%DT	ASKFROM+5, ASKTO+5
NOW^%DTC	DT+5
GETDATA^BARUFEX1	DT+16, NOTSENT+8, ONETRAN+15, EN+14
PRE^BARUFEX5	DT+10, ONETRAN+6, EN+9
$$CURSTAT^BARUFUT	DT+3
ASKFORRT^BARUFUT	PULLSESS+4, ASKFILE+3, ASKFILE+7, ONETRAN+8, ONETRAN+18
$$ASKFNAME^BARUFUT1	PULLSESS+3, ASKFILE+2, ONETRAN+7
$$FILLSTR^BARUFUT1	TRAILER+3, TRAILER+4, ONETRAN+21, ONETRAN+22, EN+18, EN+19
SENDFILE^BARUFUT2	TRAILER+6, ASKFILE+8, ONETRAN+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"SESSION NOT TRANSMITTED" Line Location: PULLSESS+4
Function Call: WRITE	Prompt: !!,"PROCESSING SESSION TRANSACTIONS FOR "_$P(^VA(200,UDUZ,0),U)_": "_SESSID Line Location: DT+13
Function Call: WRITE	Prompt: !!,"CHECKING PREVIOUSLY 'NOT SENT' TRANSACTIONS" Line Location: NOTSENT+2
Function Call: WRITE	Prompt: !,"INVALID DATE. TRY AGAIN!" Line Location: ASKFROM+7
Function Call: WRITE	Prompt: !,"INVALID DATE. TRY AGAIN!" Line Location: ASKTO+7
Function Call: WRITE	Prompt: !!,"END DATE MUST BE GREATER THAN BEGINING DATE" Line Location: ASKTO+9
Function Call: WRITE	Prompt: !!,"FILE NOT TRANSMITTED" Line Location: ASKFILE+3
Function Call: WRITE	Prompt: !!,"TRANSACTIONS NOT TRANSMITTED" Line Location: ONETRAN+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARSESS(	DT+15, NOTSENT+4, NOTSENT+5, NOTSENT+6, LCK+3
^BARTR(	EN+12
^BARUFEX($J	PULLSESS+2!, PULLSESS+6, PULLSESS+15, PULLSESS+16, PULLSESS+19, PULLSESS+20, TRAILER+5, ASKFILE+5, ONETRAN+3!, ONETRAN+16 , ONETRAN+23, EN+5!, EN+20*
^VA(200 - [#200]	DT+13

Label References

Name	Line Occurrences
$$LCK	PULLSESS+12, PULLSESS+17
$$OLD	PULLSESS+7
$$TRAILER	PULLSESS+15, PULLSESS+19
ASKFROM	ASKFROM+7, ASKTO+6, ASKTO+9
ASKTO	ASKTO+7
DT	PULLSESS+14, PULLSESS+18
EN	ASKFILE+4
NOTSENT	DT+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DT+6
%DT	ASKFROM+2!, ASKFROM+3, ASKTO+2!, ASKTO+3
%DT("A"	ASKFROM+4, ASKTO+4
APPLYTO	EN+4~
ARASUFAC	EN+4~
ARBILL	EN+3~
ARCOL	EN+4~
ARCOLDT	EN+4~
ARCOLIN	EN+4~
ARCREDIT	EN+3~
ARDEBIT	EN+3~
ARFROM	ONETRAN+4, ONETRAN+5, ONETRAN+6, EN~, EN+6*, EN+9, EN+10
ARTO	EN~, EN+7*, EN+8
BARACCT	EN+3~
BARAREA	EN+4~
>> BARB	DT+7*
>> BARDUZ	DT+8*, DT+10
>> BARFILE	PULLSESS+3, PULLSESS+6, PULLSESS+16, PULLSESS+20, TRAILER+6, TRAILER+10, ASKFILE+2, ASKFILE+8, ONETRAN+7, ONETRAN+24
>> BARFROM	ASKFROM+8*, ASKTO+9, ASKFILE+4
BARNOW	PULLSESS+1~, DT+6*
BAROLD	PULLSESS+1~, PULLSESS+7, PULLSESS+13, PULLSESS+14, DT~, DT+10
>> BARTO	ASKTO+8*, ASKTO+9, ASKFILE+4
>> CURSTAT	DT+3*, DT+4
DATE	OLD+1~, OLD+5*, OLD+6, OLD+7
DT	EN+6, EN+7
DUZ	DT+8, ONETRAN+6, EN+9
DUZ(2	DT+15, NOTSENT+4, NOTSENT+5, NOTSENT+6, LCK+3, EN+12
ENDDATE	EN+2~, EN+8*, EN+12
>> I	LCK+3*
IENS	EN+3~
NOTSENT	PULLSESS+1~, DT+9, DT+11*
OLD	OLD+1~, OLD+2, OLD+6, OLD+7*, OLD+8
PARNTLOC	EN+4~
>> RC	PULLSESS+3, PULLSESS+4, ASKFILE+2, ASKFILE+3, ONETRAN+7*, ONETRAN+8
REC	PULLSESS+8, PULLSESS+9, PULLSESS+10, PULLSESS+11, OLD+1~, OLD+3, OLD+4, OLD+5, ONETRAN+2~, ONETRAN+11* , ONETRAN+12*, ONETRAN+13
RECORD	PULLSESS+5, DT+11, DT+16, TRAILER+3, TRAILER+5, NOTSENT~, NOTSENT+8, ONETRAN+9, ONETRAN+15, ONETRAN+21 , ONETRAN+23, EN+11*, EN+14, EN+18, EN+20
>> RECORDS	TRAILER+3, TRAILER+5, ONETRAN+21, ONETRAN+23, EN+18*, EN+20
>> RECTYPE	TRAILER+2, TRAILER+5, ONETRAN+20, ONETRAN+23, EN+17*, EN+20
SESSID	PULLSESS~, PULLSESS+6, PULLSESS+7, PULLSESS+11, PULLSESS+12, PULLSESS+13, PULLSESS+14, PULLSESS+17, PULLSESS+18, DT~ , DT+3, DT+7, DT+13, DT+15, DT+16, NOTSENT+1~, NOTSENT+5, NOTSENT+6, NOTSENT+8, OLD~ , OLD+2, LCK~, LCK+3, LCK+5, ONETRAN~, ONETRAN+15
SESSID(	PULLSESS+9, PULLSESS+10, PULLSESS+11, OLD+4, OLD+5
TODATE	EN+2~
TOTAMT	PULLSESS+5, DT+11, DT+16, TRAILER+4, TRAILER+5, NOTSENT~, NOTSENT+8, ONETRAN+9, ONETRAN+15, ONETRAN+22 , ONETRAN+23, EN+11, EN+14, EN+19, EN+20
TPBIEN	EN+3~
TPBLOC	EN+3~
TPBSTAT	EN+3~
TRAILER	PULLSESS+1~, PULLSESS+15, PULLSESS+19
TRANTYPE	EN+4~
TRDATE	PULLSESS+1~, DT+14, DT+15, DT+16, NOTSENT+1~, NOTSENT+3, NOTSENT+4, NOTSENT+5, NOTSENT+6, NOTSENT+8 , ONETRAN~, ONETRAN+4, ONETRAN+13, ONETRAN+15, EN+2~, EN+10, EN+12*, EN+14
TRDATE(	ONETRAN+12, ONETRAN+13
U	PULLSESS+6, PULLSESS+10, PULLSESS+11, PULLSESS+16, PULLSESS+20, DT+13, TRAILER+10, OLD+5, ASKFROM+6, ASKTO+6
UDUZ	PULLSESS~, PULLSESS+10, PULLSESS+12, PULLSESS+14, PULLSESS+17, PULLSESS+18, DT~, DT+3, DT+13, DT+15 , DT+16, NOTSENT+1~, NOTSENT+6, NOTSENT+8, LCK~, LCK+3, ONETRAN+15
UFMSAMT	EN+4~
UFMSBILL	EN+3~
UFMSTRDT	EN+3~
UFMSTYPE	EN+4~
X	LCK+2~, LCK+3*, LCK+4, LCK+8, ASKFROM+6, ASKTO+6
>> Y	ASKFROM+7, ASKFROM+8, ASKTO+7, ASKTO+8

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARUFEX

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: