Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Routine: IBCRTN

Package: Integrated Billing

Routine: IBCRTN

Information

IBCRTN ;ALB/AAS - EDIT BILLS RETURNED FROM AR (NEW) ;23-MAY-90

Source Information

Source file <IBCRTN.m>

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Integrated Billing	5	4^IBCB1 (ARCHK,EDITS)^IBCB2 KILL^IBCMENU ^IBCSC1 ^IBCSCU
VA FileMan	5	^%DT ^DIC (FILE,YN)^DICN ^DIE ^DIR
Accounts Receivable	1	REL^PRCASVC

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: 2

Package	Total	Caller Graph
Integrated Billing	2	IB EDIT RETURNED BILL IB RETURN BILL

Entry Points

Name	Comments	DBIA/ICR reference
EN1	;
EN2	;
LOOK
FILE
EDIT
RTN
RTN1
NOEDT	;*303
SEND
PRINT
END

External References

Name	Field # of Occurrence
^%DT	FILE+1
^DIC	LOOK+1
FILE^DICN	FILE+1
YN^DICN	RTN1
^DIE	SEND
^DIR	NOEDT+2
4^IBCB1	PRINT
ARCHK^IBCB2	SEND+4
EDITS^IBCB2	RTN+1
KILL^IBCMENU	END
^IBCSC1	EDIT
^IBCSCU	EDIT
REL^PRCASVC	SEND+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Already being edited by another user" Line Location: LOOK+4
Function Call: WRITE	Prompt: !!,"WANT TO RETURN BILL TO A/R AT THIS TIME" Line Location: RTN1+0
Function Call: WRITE	Prompt: !?4,"YES - To set the status to Returned",!?4,"No - To take no action" Line Location: RTN1+1
Function Call: WRITE	Prompt: ! Line Location: NOEDT+2
Function Call: WRITE	Prompt: !,"Passing completed Bill to Accounts Receivable. Bill is no longer editable." Line Location: SEND+3
Function Call: WRITE	Prompt: !,"Completed Bill Successfully sent to Accounts Receivable." Line Location: SEND+5
Routine Call	DIC Line Location: LOOK+1
Routine Call	DIE Line Location: SEND
Routine Call	DIR Line Location: NOEDT+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGCR(399 - [#399]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	LOOK+2, LOOK+4, LOOK+5, FILE, SEND+1, SEND+4
^DGCR(399.3 - [#399.3]	LOOK+2
^XUSEC("IB AUTHORIZE"	RTN
^XUSEC("IB EDIT"	LOOK+5

Label References

Name	Line Occurrences
EDIT	EN1+5
EN1	EN1+5
EN2	EN2+5
END	EN1+5, EN2+5, FILE+1
LOOK	EN1+5, EN2+5, LOOK+2
NOEDT	LOOK+2
PRINT	EN1+5, EN2+5
RTN	EN2+5, EDIT
RTN1	RTN1+1
SEND	EN1+5, EN2+5

Naked Globals

Name	Field # of Occurrence
^(0	FILE*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	RTN1*, RTN1+1
>> %DT	FILE+1*
>> DA	SEND*
>> DA(1	FILE+1, SEND
DD	FILE!
DFN	LOOK+3*, LOOK+4!, END!
DGIFN	FILE+1*, EDIT~, SEND, SEND+1, END!
DIC	LOOK+1!, FILE+1, SEND*
DIC("DR"	FILE+1*
DIC("S"	LOOK+1*
DIC(0	LOOK+1, FILE+1
>> DIE	FILE+1, SEND
DIR	NOEDT+1~, NOEDT+2!
DIR("A"	NOEDT+2*
DIR(0	NOEDT+2*
DO	FILE!
DPTNOFZY	LOOK~*
>> DR	SEND*
DUZ	LOOK+5, FILE+1, RTN
IBAC	EN1+5, EN2+5, EDIT, END!
IBDISP	END!
IBER	END!
IBIFN	EN1+5, EN2+5, LOOK+3*, LOOK+4!, LOOK+5, FILE, FILE+1, EDIT!, RTN!, RTN+1! , RTN1!, SEND, SEND+1!, SEND+4!, PRINT, END!
IBNDI1	END!
IBNDS	END!
>> IBQUIT	RTN+1
IBV	EN1+5, EN2+5, END!
IBVIEW	PRINT*, END!
PRCAERR	END!
PRCASV	SEND+4, END!
PRCASV("OKAY"	SEND+4
U	LOOK+2
>> X	FILE+1*
>> Y	LOOK+1, LOOK+2, LOOK+3, FILE+1
>> Y(0	LOOK+3

Customize PDF page

Package: Integrated Billing

Routine: IBCRTN

Call Graph Total: 11

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Legend: