Routine: BARSYNC

Information

BARSYNC ; IHS/SD/LSL - File Synchronization ;

Source Information

Source file <BARSYNC.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA Fileman	5	DD^%DT NOW^%DTC ^DIE $$GET1^DIQ ^DIR
IHS Accounts Receivable	1	$$NEW^BARTR
IHS VA %Utilities	1	$$NOJOURN^ZIBGCHAR
Kernel	1	$$CJ^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
ENPOST	; EP - Entry point for Post init process to allow tasking.
EN	; EP - Entry point for processing other than post init.
BILLDATA	; ; Gather data from A/R Bill file.
ASKAGAIN	;
SETSYNC	; ; Set data into ^BARSYNC
START	;
MERGE	; ; Convert GLOBAL to accomodate multiple executions of Auto Sync
TRDATA	; ; Gather data for A/R Bill from A/R Transaction File via "AC" x-ref ; Find PSR transactions and do math to find balance
TRANS	; ; Create Auto Sync Transaction

External References

Name	Field # of Occurrence
DD^%DT	ASKAGAIN+4, ASKAGAIN+8
NOW^%DTC	START+2, START+20
$$NEW^BARTR	TRANS+3
^DIE	TRANS+22
$$GET1^DIQ	BILLDATA+4, BILLDATA+9
^DIR	ASKAGAIN+17
$$CJ^XLFSTR	ASKAGAIN+10, ASKAGAIN+11, ASKAGAIN+12
$$NOJOURN^ZIBGCHAR	START+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Auto Sync in Progress...",! Line Location: EN+4
Function Call: WRITE	Prompt: !,"Auto Sync Complete.",!! Line Location: EN+6
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Auto Sync was last run on "_BARLASTB,IOM) Line Location: ASKAGAIN+10
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(" and did NOT complete.",IOM),! Line Location: ASKAGAIN+11
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(" and completed on "_BARLASTE_".",IOM),! Line Location: ASKAGAIN+12
Routine Call	DIE Line Location: TRANS+22
Routine Call	DIR Line Location: ASKAGAIN+17

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^BARBL(2906 - [#90050.01]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARBL(	START+8, START+10, START+11, BILLDATA+2
^BARSYNC	EN+2, MERGE+5, MERGE+9, ASKAGAIN+2, START+4, START+21, MERGE+7, MERGE+8!, SETSYNC+2
^BARSYNC(""	START+1
^BARSYNC("START"	MERGE+3
^BARSYNC(9999999	ASKAGAIN+1
^BARTMP($J	MERGE+5*, MERGE+9, MERGE+10!
^BARTR(	TRDATA+4, TRDATA+5, TRDATA+6

Label References

Name	Line Occurrences
ASKAGAIN	EN+2
BILLDATA	START+12
MERGE	START+1
SETSYNC	START+18
START	ENPOST+1, EN+5
TRANS	START+16
TRDATA	START+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	START+3, START+21
>> BARAC	BILLDATA+4, BILLDATA+5, SETSYNC+2
>> BARADCAT	TRDATA+8*, TRDATA+11
>> BARAGAIN	EN+1, EN+3, ASKAGAIN+18, ASKAGAIN+19*
>> BARBAMT	START+14, START+15, BILLDATA+3*, SETSYNC+2
>> BARBILL	START+9, START+10, START+11, BILLDATA+2, BILLDATA+4, TRDATA+4, SETSYNC+2
>> BARBL(	BILLDATA+2*
>> BARBL(0	BILLDATA+3
>> BARBL(1	BILLDATA+6, BILLDATA+8
>> BARCDT	TRDATA+9*, TRDATA+12
BARDATE	MERGE+2~, MERGE+3*, MERGE+4, MERGE+5
>> BARDBT	TRDATA+10*, TRDATA+12
>> BARDIF	START+15*, TRANS+6
>> BARDOS	BILLDATA+6, BILLDATA+7, SETSYNC+2
>> BARDUZ	START+6*, START+19
>> BARJOURN	START+5*
>> BARLASTB	ASKAGAIN+1, ASKAGAIN+2, ASKAGAIN+3, ASKAGAIN+5, ASKAGAIN+10
>> BARLASTE	ASKAGAIN+2, ASKAGAIN+6, ASKAGAIN+7, ASKAGAIN+9, ASKAGAIN+11, ASKAGAIN+12
>> BARSTART	START+3*, START+4, START+21, SETSYNC+2
>> BARTAMT	START+14, START+15, TRDATA+3, TRDATA+12, SETSYNC+2
>> BARTR	TRDATA+3, TRDATA+4, TRDATA+5, TRDATA+6
>> BARTR(	TRDATA+6*
>> BARTR(0	TRDATA+9, TRDATA+10
>> BARTR(1	TRDATA+7, TRDATA+8
>> BARTRIEN	START+17, TRANS+3*, TRANS+4, TRANS+19
>> BARTRTYP	TRDATA+7*, TRDATA+11
>> BARVIS	BILLDATA+8*, BILLDATA+9
>> BARVISOU	BILLDATA+9, BILLDATA+10, SETSYNC+2
>> BARX	MERGE+6, MERGE+7, MERGE+8
DA	TRANS+19*, TRANS+23!
DIDEL	TRANS+21*, TRANS+23!
DIE	TRANS+20*, TRANS+23!
DIR	ASKAGAIN+13!
DIR("A"	ASKAGAIN+15*
DIR("B"	ASKAGAIN+16*
DIR(0	ASKAGAIN+14*
DR	TRANS+6, TRANS+7, TRANS+8, TRANS+9, TRANS+10, TRANS+11, TRANS+12, TRANS+13, TRANS+14, TRANS+15 , TRANS+16, TRANS+17, TRANS+23!
DUZ(2	START+6, START+7, START+8, START+10, START+11, START+19*, BILLDATA+2, TRDATA+4, TRDATA+5, TRDATA+6 , SETSYNC+2
>> I	BILLDATA+2, TRDATA+6
IOM	ASKAGAIN+10, ASKAGAIN+11, ASKAGAIN+12
U	BILLDATA+3, BILLDATA+6, BILLDATA+8, TRDATA+7, TRDATA+8, TRDATA+9, TRDATA+10, SETSYNC+2
>> Y	ASKAGAIN+3, ASKAGAIN+5, ASKAGAIN+7, ASKAGAIN+9, ASKAGAIN+18

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARSYNC

Call Graph Total: 8