Routine: IBCIASN

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

IBCIASN ;DSI/JSR - STANDALONE OPTION TO RE-ASSIGN CLAIMS ;18-MAY-2001

Source Information

Source file <IBCIASN.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Integrated Billing	2	STATS^IBCISC COMMENT^IBCIUT7
VA FileMan	1	^DIC

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

Package	Total	Caller Graph
Integrated Billing	1	IBCI ASSIGN CLAIMSMANAGER BILL

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
ASK	;
INFO	; Display the data elements on the 0 node of file 351.9 and displays ; biller and coder. ; For the purpose of defining a comment path TYPE=5 indicates that a ; stand alone option is calling ^IBCISC. ; This options allows for the re-assignement of a claim from a coder ; biller.
Q1	;

External References

Name	Field # of Occurrence
^DIC	ASK+16
STATS^IBCISC	INFO+7
COMMENT^IBCIUT7	INFO+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ASK+2
Function Call: WRITE	Prompt: !!?4,"* RECORD IS LOCKED *" Line Location: ASK+19
Function Call: WRITE	Prompt: !?4,"Another user is currently editing this bill." Line Location: ASK+20
Function Call: WRITE	Prompt: !?4,"Please try again later." Line Location: ASK+21
Routine Call	DIC Line Location: ASK+16

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	ASK+18, ASK+24
^XUSEC("IBCI CLAIMSMANAGER ASSIGN"	ASK+12

Label References

Name	Line Occurrences
ASK	EN+2
INFO	ASK+23
Q1	EN+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ASK+1~, Q1+1!
D	ASK+1~
DIC	ASK+1~, ASK+2*
DIC("A"	ASK+2*
DIC("S"	ASK+13, ASK+15
DIC(0	ASK+2*
>> DIRUT	INFO+8
DISYS	ASK+1~
DUZ	ASK+12
IBCIBII	ASK+1~
IBCIBIL	ASK+1~
IBCICNM	ASK+1~
IBCICOD	ASK+1~
IBIFN	ASK+1~, ASK+17*, ASK+18, ASK+24, INFO+9, Q1+1!
IBQUIT	EN+1, EN+2, ASK+2, ASK+16*, Q1+1!
TYPE	ASK+1~, INFO+6*, INFO+9
X	ASK+1~
Y	ASK+16, ASK+17, Q1+1!