Routine: FBAAPP0

Customize PDF page

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

Information

FBAAPP0 ;AISC/GRR-ENTER FEE PHARMACY DETERMINATION CONT ;4/27/2005

Source Information

Source file <FBAAPP0.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Fee Basis	5	RDIN^FBAAPP FILEADJ^FBRXFA FILERR^FBRXFR $$ADJ^FBUTL2 $$CLESSR^FBUTL4A

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
Fee Basis	1	FBAAPP

Entry Points

Name	Comments	DBIA/ICR reference
HELPI
ALRDY
NO1	;ASK PHARMACIST TO SPECIFY ADJUSTMENT REASON
GOON	; entry point when prescription was denied by pharmacy
RSET	; entry point when prescription was not denied by pharmacy

External References

Name	Field # of Occurrence
RDIN^FBAAPP	HELPI, ALRDY
FILEADJ^FBRXFA	RSET+7
FILERR^FBRXFR	RSET+8
$$ADJ^FBUTL2	NO1+3
$$CLESSR^FBUTL4A	NO1+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Enter Invoice number you wish to make a determination on. Must",!,"be an invoice which is 'Pending Determination' status." Line Location: HELPI+0
Function Call: WRITE	Prompt: !,*7,"Someone is editing that invoice now!" Line Location: ALRDY+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FBAA(162.1 - [#162.1]	RSET+3, RSET+4!, RSET+5!*

Naked Globals

Name	Field # of Occurrence
^(2	RSET+4
^(3	RSET+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DT	GOON+1
DUZ	GOON+1
>> FBAAGP	RSET+1
>> FBAAPR	RSET+2
>> FBADJ	NO1+3, NO1+5, RSET+6, RSET+7
>> FBJ	RSET+3, RSET+4, RSET+5, RSET+7, RSET+8
>> FBK	RSET+3, RSET+4, RSET+7, RSET+8
>> FBRRMK	NO1+3, NO1+5, RSET+8
FBX	NO1+1~, NO1+3, NO1+5
>> FBY(0	NO1+3, GOON+1, RSET+1, RSET+2*, RSET+3
>> STAT	GOON+1*, RSET+4
U	NO1+3