Routine: RMPOBIL0

Package	Total	Call Graph
VA FileMan	5	^DIC FILE^DICN ^DIE EN1^DIP ^DIR
Prosthetics	4	EN^RMPOLM $$VDRNM^RMPOPED ACCEPT^RMPOPST3 HOSITE^RMPOUTL0
Kernel	2	HOME^%ZIS KILL^XUSCLEAN

Package

Total

Call Graph

VA FileMan

^DIC FILE^DICN ^DIE EN1^DIP ^DIR

Prosthetics

EN^RMPOLM $$VDRNM^RMPOPED ACCEPT^RMPOPST3 HOSITE^RMPOUTL0

Kernel

HOME^%ZIS KILL^XUSCLEAN

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

Package	Total	Caller Graph
Prosthetics	6	RMPO ACCEPT BILL RMPO BILLING TRANSACTIONS RMPO-BILLING-PRESORT RMPOPS23 RMPOPST2 RMPORMB

Package

Total

Caller Graph

Prosthetics

RMPO ACCEPT BILL RMPO BILLING TRANSACTIONS RMPO-BILLING-PRESORT RMPOPS23 RMPOPST2 RMPORMB

Entry Points

Name	Comments	DBIA/ICR reference
OLD	; Enter from top (OLD code)
MAIN	; Proper entry point
VENDOR(LAYGO)	;Select Vendor
CKSITE	;Set up Site in Billing if it is not there
MONTH(LAYGO)	;Determine Billing Month
QUIT()
BUILDM	; BUILD MONTH ; Set up Month
GEN1	; ALL PATIENTS FOR A GIVEN VENDOR
GEN2	;INNER LOOP
OK2BLD(VENDOR)	; Determine whether to include trx for RMPODFN
VDRSTAT(VDR)	;
BUILDV	; Set up the VENDOR multiple
BUILDP	;Now the Patient level
BUILDI	; BUILD ITEM (REQUIRES ZX1 = ENTIRE ITEM NODE FROM FILE #665)
PREBILL	; Proper entry point
BLDSTAT(RMPODFN)	;STATUS OF PT FOR GIVEN BUILD
EXIT	;Kill variables before quitting

Name	Field # of Occurrence
HOME^%ZIS	MAIN+1, PREBILL+1
^DIC	VENDOR+6, MONTH+5
FILE^DICN	CKSITE+3, BUILDM+7, BUILDV+6, BUILDP+6, BUILDI+7
^DIE	VENDOR+11, BUILDI+24
EN1^DIP	PREBILL+18
^DIR	GEN1+11, PREBILL+9, PREBILL+19
EN^RMPOLM	OLD+6
$$VDRNM^RMPOPED	GEN1+2
ACCEPT^RMPOPST3	OLD+7
HOSITE^RMPOUTL0	MAIN+3, PREBILL+3
KILL^XUSCLEAN	EXIT+1

Name

Field # of Occurrence

HOME^%ZIS

MAIN+1, PREBILL+1

^DIC

VENDOR+6, MONTH+5

FILE^DICN

CKSITE+3, BUILDM+7, BUILDV+6, BUILDP+6, BUILDI+7

^DIE

VENDOR+11, BUILDI+24

EN1^DIP

PREBILL+18

^DIR

GEN1+11, PREBILL+9, PREBILL+19

OLD+6

GEN1+2

OLD+7

MAIN+3, PREBILL+3

EXIT+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Generating "_RMPOMTH_" billing transactions for " Line Location: GEN1+1
Function Call: WRITE	Prompt: $$VDRNM^RMPOPED(RMPOVDR),!!,"This may take a while..." Line Location: GEN1+2
Function Call: WRITE	Prompt: ?25,Y Line Location: PREBILL+11
Routine Call	%ZIS Line Location: MAIN+1 PREBILL+1
Routine Call	DIC Line Location: VENDOR+6 MONTH+5
Routine Call	DIE Line Location: VENDOR+11 BUILDI+24
Routine Call	DIR Line Location: GEN1+11 PREBILL+9 PREBILL+19

FileNo	Call Tags
^RMPR(665 - [#665]	Classic Fileman Calls
^RMPO(665.72 - [#665.72]	Classic Fileman Calls

FileNo

Call Tags

^RMPR(665 - [#665]

Classic Fileman Calls

^RMPO(665.72 - [#665.72]

Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PREBILL+11
^DD(665.72	MONTH+4, BUILDM+6
^DD(665.723	VENDOR+5, BUILDV+5
^DD(665.7231	BUILDP+4
^DD(665.72319	BUILDI+6
^DPT - [#2]	OK2BLD+14
^RMPO(665.72 - [#665.72]	MAIN+8, CKSITE+1, BUILDM+2, BUILDV+1, BUILDP+1
^RMPR(665 - [#665]	GEN1+8, GEN1+10, GEN2+3, GEN2+4, OK2BLD+3, OK2BLD+6, OK2BLD+9, OK2BLD+18, OK2BLD+21, OK2BLD+29 , VDRSTAT+3, VDRSTAT+4

Name

Line Occurrences (* Changed, ! Killed)

PREBILL+11

MONTH+4, BUILDM+6

VENDOR+5, BUILDV+5

BUILDP+4

BUILDI+6

OK2BLD+14

^RMPO(665.72 - [#665.72]

MAIN+8, CKSITE+1, BUILDM+2, BUILDV+1, BUILDP+1

^RMPR(665 - [#665]

GEN1+8, GEN1+10, GEN2+3, GEN2+4, OK2BLD+3, OK2BLD+6, OK2BLD+9, OK2BLD+18, OK2BLD+21, OK2BLD+29
, VDRSTAT+3, VDRSTAT+4

Name	Line Occurrences
$$OK2BLD	GEN1+10, BLDSTAT+2
$$QUIT	VENDOR+6, MONTH+5, GEN1+11, PREBILL+9
$$VDRSTAT	OK2BLD+31
BUILDI	GEN2+6
BUILDP	GEN2+6
CKSITE	MAIN+4
EXIT	OLD+4, OLD+7, PREBILL+20
GEN1	MAIN+9
GEN2	GEN1+10
MAIN	OLD+2
MONTH	MAIN+5
VENDOR	MAIN+6

Name

Line Occurrences

$$OK2BLD

GEN1+10, BLDSTAT+2

$$QUIT

VENDOR+6, MONTH+5, GEN1+11, PREBILL+9

$$VDRSTAT

OK2BLD+31

GEN2+6

GEN2+6

MAIN+4

OLD+4, OLD+7, PREBILL+20

GEN1

MAIN+9

GEN2

GEN1+10

MAIN

OLD+2

MONTH

MAIN+5

VENDOR

MAIN+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT(0	VENDOR+10!
>> ACTIVDT	GEN1+7, GEN1+8, GEN1+10
>> BY	PREBILL+14*
DA	OLD+5!, VENDOR+2!, VENDOR+11, CKSITE+2!, MONTH+2!, BUILDM+3!, BUILDV+2!, BUILDP+2!, BUILDI+2!, BUILDI+8
DA(1	VENDOR+3, VENDOR+4, MONTH+3, BUILDM+5, BUILDM+6, BUILDV+3, BUILDV+4, BUILDP+3, BUILDP+5, BUILDI+3 , BUILDI+5
DA(2	VENDOR+3, VENDOR+4, BUILDV+3, BUILDV+4, BUILDP+3, BUILDP+5, BUILDI+3, BUILDI+5
DA(3	BUILDP+3, BUILDP+5, BUILDI+3, BUILDI+5
DA(4	BUILDI+3*, BUILDI+5
DD	OLD+5!, CKSITE+2!, BUILDV+2!, BUILDP+2!, BUILDI+2!
DIC	OLD+5!, VENDOR+2!, VENDOR+4, VENDOR+11, CKSITE+2!, CKSITE+3, MONTH+2!, MONTH+3, BUILDM+3!, BUILDM+6 , BUILDV+2!, BUILDV+4, BUILDP+2!, BUILDP+5, BUILDI+2!, BUILDI+5, BUILDI+8, PREBILL+13
DIC("P"	VENDOR+5, MONTH+4, BUILDM+6, BUILDV+5, BUILDP+4, BUILDI+6
DIC(0	VENDOR+6, CKSITE+3, MONTH+5, BUILDM+5, BUILDV+5, BUILDP+4, BUILDI+6*
DIE	VENDOR+11, BUILDI+2!, BUILDI+8
DINUM	CKSITE+3, BUILDM+4, BUILDV+3, BUILDP+3, BUILDI+2!
>> DIOEND	PREBILL+17*
DIR	OLD+5!, GEN1+11!, PREBILL+5!, PREBILL+19!
DIR("A"	PREBILL+8*
DIR(0	GEN1+11, PREBILL+6, PREBILL+19*
>> DIROUT	QUIT
>> DIS(0	PREBILL+16*
DO	OLD+5!, CKSITE+2!, BUILDV+2!, BUILDP+2!, BUILDI+2!
DR	OLD+5!, VENDOR+11, BUILDI+2!, BUILDI+13, BUILDI+14, BUILDI+15, BUILDI+16, BUILDI+17, BUILDI+18, BUILDI+19 , BUILDI+20, BUILDI+21, BUILDI+22, BUILDI+23
>> DTOUT	QUIT
>> DUOUT	QUIT
>> FLDS	PREBILL+15*
>> FOUND	VDRSTAT+2, VDRSTAT+4, VDRSTAT+5
>> L	PREBILL+13*
LAYGO	VENDOR~, VENDOR+6, MONTH~, MONTH+5
>> OK	BLDSTAT+2*, BLDSTAT+3, BLDSTAT+4, BLDSTAT+5, BLDSTAT+6, BLDSTAT+7, BLDSTAT+8, BLDSTAT+9, BLDSTAT+10, BLDSTAT+11 , BLDSTAT+12
>> QUIT	OLD+4, MAIN+2, MAIN+3, MAIN+5, MAIN+6, QUIT, PREBILL+2*, PREBILL+3, PREBILL+4
>> RMEND	PREBILL+2*, PREBILL+19
RMPODATE	OLD+4, MAIN+5, MONTH+2!, MONTH+6, MONTH+7, BUILDM+4, OK2BLD+10, OK2BLD+15, PREBILL+4, PREBILL+5! , PREBILL+10
RMPODFN	GEN1+7, GEN1+9, GEN1+10*, GEN2+3, GEN2+4, OK2BLD+3, OK2BLD+6, OK2BLD+9, OK2BLD+14, OK2BLD+18 , OK2BLD+21, OK2BLD+29, VDRSTAT+3, VDRSTAT+4, BUILDP+1, BUILDP+3, BUILDI+3, BLDSTAT~
>> RMPOINDT	OK2BLD+9, OK2BLD+10, OK2BLD+14, OK2BLD+15
>> RMPOMTH	MONTH+6*, GEN1+1
>> RMPOPRT	PREBILL+2*, PREBILL+19
>> RMPORVDT	MAIN+8, VENDOR+3, MONTH+7*, BUILDM+2, BUILDM+4, BUILDV+1, BUILDV+3, BUILDP+1, BUILDP+3, BUILDI+3
>> RMPORX	OK2BLD+21*, OK2BLD+22
>> RMPOTOT	BUILDI+11*, BUILDI+18
RMPOVDR	OLD+4, MAIN+6, MAIN+8, VENDOR+2!, VENDOR+7*, GEN1+2, GEN2+5, BUILDV+1, BUILDV+3, BUILDP+1 , BUILDP+3, BUILDI+3, BLDSTAT+2
>> RMPOXITE	OLD+4, MAIN+3, MAIN+8, VENDOR+3, CKSITE+1, CKSITE+3, MONTH+3, BUILDM+2, BUILDM+5, OK2BLD+3 , BUILDV+1, BUILDV+3, BUILDP+1, BUILDP+3, BUILDI+3, PREBILL+3
RMPR	EXIT+1~
RMPRSITE	EXIT+1~
>> RMREMARK	BUILDI+12*
U	VENDOR+5, VENDOR+9, MONTH+4, BUILDM+6, GEN2+5, OK2BLD+3, OK2BLD+9, VDRSTAT+4, BUILDV+5, BUILDP+4 , BUILDI+4, BUILDI+6, BUILDI+11, BUILDI+12, BUILDI+13, BUILDI+14, BUILDI+15, BUILDI+17, BUILDI+19, BUILDI+20 , BUILDI+22, BUILDI+23
VDR	VDRSTAT~, VDRSTAT+4
VENDOR	OK2BLD~, OK2BLD+31
>> X	CKSITE+3, BUILDM+4, BUILDV+3, BUILDP+3, BUILDI+4*
>> Y	VENDOR+6, VENDOR+7, VENDOR+9, VENDOR+11, MONTH+5, MONTH+6, BUILDI+8, PREBILL+9, PREBILL+10, PREBILL+11
>> Y(0	MONTH+6
>> ZV	BUILDP+4, BUILDP+5, BUILDI+4, BUILDI+5
>> ZX1	GEN2+4*, GEN2+5, BUILDI+4, BUILDI+11, BUILDI+12, BUILDI+13, BUILDI+14, BUILDI+15, BUILDI+17, BUILDI+19 , BUILDI+20, BUILDI+22, BUILDI+23
>> ZXITM	GEN2+2, GEN2+3, GEN2+4, VDRSTAT+2, VDRSTAT+3, VDRSTAT+4, BUILDI+21

Customize PDF page

Package: Prosthetics

Routine: RMPOBIL0

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: