Routine: BARUFLTR

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC ^DIC FILE^DICN $$GET1^DIQ
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
IHS Accounts Receivable	2	BAR REPRINT FINANCE LETTERS BARPUC

Entry Points

Name	Comments	DBIA/ICR reference
REPRINT	;EP - REPRINT ALREADY PRINTED LETTERS
LETTER1	;EP -
SAVE(BARAMT,BARCOL,BARCHK,BARSCHED,BARINS,LTRIEN,BARRETYP,BARADJT)	;
QUE	; EP - QUE 'NOT SENT' OR 'DELAY SEND' REPORT
PRINT	;EP - PRINT THE LETTER
PUCCMT	; ; IF COMMENTS FOR PUC ITEMS, RETRIEVE & PRINT BAR1.817 pkd 2/24/2010
LETTER(BARAMT,BARCOL,BARCHK,BARSCHED,BARINS,BARLTR,BARRETYP,BARADJT)	;EP - PRINT LETTER ;BAR1.84
ID	;EP- DISPLAY LIST FOR 'A/R PRINTED LETTERS'

External References

Name	Field # of Occurrence
NOW^%DTC	SAVE+1
^%ZIS	LETTER1+10
HOME^%ZIS	QUE+7
^%ZISC	LETTER1+17
^%ZTLOAD	QUE+4
^DIC	PRINT+6, REPRINT+8
FILE^DICN	SAVE+15
$$GET1^DIQ	REPRINT+11, REPRINT+12, REPRINT+13, REPRINT+14, REPRINT+15, REPRINT+16, REPRINT+17, REPRINT+18, REPRINT+19, REPRINT+20 , ID+3, ID+5, ID+6, ID+7, ID+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Select device to print Finance letter..." Line Location: LETTER1+7
Function Call: WRITE	Prompt: !!,"CAN'T PRINT LETTER TO THE SCREEN!!" Line Location: LETTER1+12
Function Call: WRITE	Prompt: @IOF Line Location: LETTER1+16
Function Call: WRITE	Prompt: !!?5,"Report Cancelled!" Line Location: QUE+5
Function Call: WRITE	Prompt: !!?5,"Report task #: ",$G(ZTSK) Line Location: QUE+6
Function Call: WRITE	Prompt: !,"CANNOT FIND '"_BARLTR_" IN A/R LETTERS & TEXT FILE" Line Location: PRINT+7
Function Call: WRITE	Prompt: !,LINETXT Line Location: PRINT+15
Function Call: WRITE	Prompt: !!,DSH,!,"Comments:" Line Location: PUCCMT+7
Function Call: WRITE	Prompt: !,CMT(LN,0) Line Location: PUCCMT+7
Function Call: WRITE	Prompt: !! Line Location: REPRINT+7
Function Call: WRITE	Prompt: ?22,$P(TYPE," LETTER") Line Location: ID+4
Function Call: WRITE	Prompt: ?45,$J($$GET1^DIQ(90052,+Y_",",.04,"E"),10,2) Line Location: ID+5
Function Call: WRITE	Prompt: !?27,$S(TYPE["UNBILLED":$$GET1^DIQ(90052,+Y_",",.11,"I"),1:$$GET1^DIQ(90052,+Y_",",.12,"I")) Line Location: ID+6
Function Call: WRITE	Prompt: !?6,$$GET1^DIQ(90052,+Y_",",.05,"I") Line Location: ID+7
Function Call: WRITE	Prompt: ?60,$$GET1^DIQ(90052,+Y_",",.02,"E") Line Location: ID+8
Routine Call	%ZIS Line Location: QUE+7
Routine Call	DIC Line Location: PRINT+6 REPRINT+8
Routine Call	%ZIS Line Location: LETTER1+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BAR(90052 - [#90052]	Classic Fileman Calls, GET1^DIQ
^BAR(90052.03 - [#90052.03]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BAR(90052.03 - [#90052.03]	PRINT+11, PRINT+12
^BARCOL(	PUCCMT+3, PUCCMT+4
^DD("DD"	LETTER1+1

Label References

Name	Line Occurrences
LETTER1	REPRINT+22
PRINT	LETTER1+15
PUCCMT	PRINT+16
QUE	LETTER1+13
SAVE	PRINT+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SAVE+2
>> %ZIS	LETTER1+9*
>> %ZIS("B"	LETTER1+8*
BARADJT	LETTER~, PRINT+18, SAVE~
BARAMT	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+13*
BARCHK	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+15*
BARCOL	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+14*
>> BARDUZ	LETTER1+5, REPRINT+11
>> BARDUZ2	LETTER1+6, REPRINT+12
>> BAREXNOW	LETTER1+2*
BAREXTYP	REPRINT+1~
BARINS	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+17*
BARLTR	LETTER~, QUE+2, PRINT+3, PRINT+7, SAVE+13, REPRINT+1~, REPRINT+18*
>> BARPRTQ	PRINT+16
BARRETYP	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+19, REPRINT+20
>> BARSAVE	LETTER+1, PRINT+17, REPRINT+21
BARSCHED	LETTER~, PRINT+18, SAVE~, REPRINT+1~, REPRINT+16*
>> BARTX(14	PUCCMT+3, PUCCMT+4
>> BARTX(15	PUCCMT+3, PUCCMT+4
CMT	PUCCMT+2~, PUCCMT+3, PUCCMT+4, PUCCMT+5*, PUCCMT+7
CMT(	PUCCMT+7
CMT(0	PUCCMT+5
DA	PRINT+2!, REPRINT+3!
DIC	PRINT+2!, PRINT+4, SAVE+4, REPRINT+3!, REPRINT+5*
DIC("DR"	SAVE+5, SAVE+6, SAVE+7, SAVE+8, SAVE+9, SAVE+10, SAVE+11, SAVE+12, SAVE+13, SAVE+14
DIC("W"	REPRINT+6*
DIC(0	PRINT+5, SAVE+3, REPRINT+4*
DIE	PRINT+2!, REPRINT+3!
>> DINUM	SAVE+2*
DIR	PRINT+2!, REPRINT+3!
DO	SAVE+15!
DR	PRINT+2!, REPRINT+3!
DSH	PUCCMT+2~, PUCCMT+6*, PUCCMT+7
DT	LETTER1+1
DUZ	LETTER1+5
DUZ(2	LETTER1+6, PUCCMT+3, PUCCMT+4
>> IENS	REPRINT+10*, REPRINT+11, REPRINT+12, REPRINT+13, REPRINT+14, REPRINT+15, REPRINT+16, REPRINT+17, REPRINT+18, REPRINT+19 , REPRINT+20
IO	LETTER1+14
IO("Q"	LETTER1+13
IOF	LETTER1+16
LINE	PRINT+1~, PRINT+10, PRINT+11, PRINT+12
>> LINETXT	PRINT+12*, PRINT+13, PRINT+14, PRINT+15
LN	PUCCMT+2~, PUCCMT+7*
LTRIEN	PRINT+1~, PRINT+9*, PRINT+11, PRINT+12, PRINT+16, PRINT+18, SAVE~
NOSAVE	REPRINT+2!
>> POP	LETTER1+11
TYPE	ID+2~, ID+3*, ID+4, ID+6
>> X	PRINT+3, SAVE+2
>> Y	LETTER1+1*, LETTER1+2, PRINT+7, PRINT+9, REPRINT+9, REPRINT+10, ID+3, ID+5, ID+6, ID+7 , ID+8
>> ZTDESC	QUE+2*
>> ZTRTN	QUE+1*
>> ZTSAVE("BAR*"	QUE+3*
>> ZTSK	QUE+5, QUE+6

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARUFLTR

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: