Routine: RMPOPED

Package	Total	Call Graph
VA FileMan	6	(,FIND)^DIC FILE^DICN ^DIE ^DIK ($$GET1,GETS)^DIQ ^DIR
Prosthetics	5	$$GETFCP^RMPOBILU ($$DIAG10,$$QUESTION,SETPARAM)^RMPOICD1 (ACTVT,INACTVT)^RMPOPED (DLTITEM,RMPRWARN)^RMPOPED1 HOSITE^RMPOUTL0
DRG Grouper	1	($$CODEC,$$CSI,$$ICDDX,$$LS,$$SINFO,$$VLT)^ICDEX
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Prosthetics	9	HOME OXYGEN FUND CONTROL POINT RMPO ADD/EDIT PAT RMPO INACT/ACT RMPO SITE EE RMPOBIL0 RMPOLM RMPOPED RMPRPAT3 RMPRSE21

Entry Points

Name	Comments	DBIA/ICR reference
UNLOCK
EXIT
KEY	;user must have the RMPRSUPERVISOR key in order to add a new patient.
SITE	; Editing of Home Oxygen site parameter file.
FCPHLP	; Executable help for FCP multiple in 669.9
FCPIX	; Input transform for FCP multiple in 669.9
ACT	;activate/inactivate a home oxygen patient
ACT1	;Toggle ACTIVATE/INACTIVATE functions.
INACTVT	; Inactivate the patient if user wants to. ; Confirm if the user wants to proceed.
ACTVT	;Activate the patient if the user wants to.
PAT	;Add/Edit Home Oxygen Patient
LOOP	;
EDBLK	;
EDIT	;From Billing...
LOOKUP	;First look-up the patient
CONT
QUIT()
EQUIT()
LJ(S,W,C)	; LEFT JUSTIFY S IN A FIELD W WIDE PADDING WITH CHAR F
SITECHK	;If user chooses patient from site different from billing site
SET	;
DEMOG	;First edit the patient's basic fields
RX	;Edit the Rx Data
ITEM	;Add/Edit Items
ITEMP	; Add Primary Item
ITEMA	; Add Items
ITEMS	; Select Item ; Return ITEM = index into both ITEMS and IEN arrays
RMPRLOAD	; Load ICD, Code Set and Status
ITEME	; Edit an Item - ICD-10 Changes
ITEMEH	;CHECK HCPCS code for inactive ;RMPR3.0180
ITEMEP	; Primary Item edit...
PIEN(DFN)	; FIND PRIMARY ITEM ; RETURN IEN OF P.I. IN MULTIPLE ^ IEN IN FILE 661
ITEMD	; Display Items
ITEMNM(ITM)	; RETURN ITEM NAME
VDRNM(VDR)	; RETURN VENDOR NAME
ITEMK	; Delete an Item
ITEMO()	; Choose Option
PARSE(RMPRTXT)	; Utility to break line of text over 80 characters into 2 lines ; Input: ; RMPRTXT = Two line array to parse ; RMPRTXT(1) = ICD-## Diagnosis code: ###.#### - Required ; RMPRTXT(2) = Full Description up to 245 characters Required ; RMPRTXT(3) = Suspense Info Optional ; ; Output: ; RMPRTXT array with each line of text < 80 characters and ending in a whole word.

External References

Name	Field # of Occurrence
^DIC	SITE+3, ACT1+2, LOOKUP+3, RX+9, ITEMA+2
FIND^DIC	FCPIX+5
FILE^DICN	ITEMA+6
^DIE	SITE+11, INACTVT+6, ACTVT+6, SET+3, DEMOG+4, DEMOG+7, DEMOG+8, RX+13, ITEME+9, ITEMEH+4 , ITEMEH+29, ITEMEH+38, ITEMEH+82, ITEMEH+87, ITEMEH+96, ITEMEP+2, ITEMEP+8
^DIK	ITEMK+6
$$GET1^DIQ	RX+15, ITEMEH+17, ITEMEH+18
GETS^DIQ	SITECHK+7, ITEMNM+2, VDRNM+2
^DIR	INACTVT+3, ACTVT+2, SITECHK+13, ITEMS+24, ITEMK+3, ITEMO+2
$$CODEC^ICDEX	ITEMD+21
$$CSI^ICDEX	ITEMEH+21, ITEMD+18
$$ICDDX^ICDEX	ITEMEH+25
$$LS^ICDEX	ITEMD+16
$$SINFO^ICDEX	ITEMS+4, ITEMEH+13, ITEMEH+22, ITEMD+4, ITEMD+19
$$VLT^ICDEX	ITEMEH+50
$$GETFCP^RMPOBILU	ITEMEH+94
$$DIAG10^RMPOICD1	ITEMEH+57
$$QUESTION^RMPOICD1	ITEMEH+71
SETPARAM^RMPOICD1	ITEMEH+46
ACTVT^RMPOPED	ACT1+14
INACTVT^RMPOPED	ACT1+12
DLTITEM^RMPOPED1	ITEMEH+71
RMPRWARN^RMPOPED1	ITEMS+14, ITEMS+40
HOSITE^RMPOUTL0	ACT+2, PAT+2
$$FMTE^XLFDT	RX+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"You do not hold the RMPRSUPERVISOR key!!" Line Location: KEY+5
Function Call: WRITE	Prompt: ?10,$C(7)_Y(0,0)_" -- record in use. Try again later." Line Location: SITE+9
Function Call: WRITE	Prompt: !,"Control Point is not a valid IFCAP FCP.." Line Location: FCPIX+8
Function Call: WRITE	Prompt: @IOF Line Location: ACT+3
Function Call: WRITE	Prompt: ?10,$C(7)_Y(0,0)_" -- record in use. Try later." Line Location: ACT1+6
Function Call: WRITE	Prompt: !!,$C(7)_NAME_" has not been added as a Home Oxygen patient." Line Location: ACT1+9
Function Call: WRITE	Prompt: !,"Please add using the ""Add/Edit Home Oxygen Patient"" option." Line Location: ACT1+10
Function Call: WRITE	Prompt: !,"EDITING "_$P(^DPT(RMPODFN,0),U)_"...",! Line Location: EDIT+3
Function Call: WRITE	Prompt: !!?10,*7," << Record in use. Try later. >>" Line Location: EDIT+6
Function Call: WRITE	Prompt: !!! Line Location: LOOKUP+2
Function Call: WRITE	Prompt: !!?10,*7," << Record in use. Try later. >>" Line Location: CONT+2
Function Call: WRITE	Prompt: WIDE Line Location: LJ+0
Function Call: WRITE	Prompt: !!,"Patient's Home Oxygen Contract Location (HOCL) is " Line Location: SITECHK+8
Function Call: WRITE	Prompt: $G(X(665,IENS,19.12,"E")) Line Location: SITECHK+9
Function Call: WRITE	Prompt: !,"You are working on billing for HOCL "_RMPO("NAME"),! Line Location: SITECHK+10
Function Call: WRITE	Prompt: !!,$C(7)_"No items found, please enter PRIMARY ITEM",! Line Location: ITEMP+1
Function Call: WRITE	Prompt: " ",$E(ITEMS(ITEM),1,33) Line Location: ITEMS+27
Function Call: WRITE	Prompt: ! Line Location: ITEMS+33
Function Call: WRITE	Prompt: !!,"Inactivated HCPCS not allowed, please enter active code",!! Line Location: ITEMEH+3
Function Call: WRITE	Prompt: !!,RMPPARAM("NO DATA FOUND") Line Location: ITEMEH+61
Function Call: WRITE	Prompt: " <NOTHING TO DELETE>" Line Location: ITEMEH+70
Function Call: WRITE	Prompt: $C(7)_"REQUIRED FIELD!" Line Location: ITEMEH+95
Function Call: WRITE	Prompt: !!,"The following items are already in this patient's template:",! Line Location: ITEMD+7
Function Call: WRITE	Prompt: !," Item Description Vendor ICD CS+" Line Location: ITEMD+8
Function Call: WRITE	Prompt: !,RMPRTXT Line Location: ITEMD+33
Function Call: WRITE	Prompt: !!," * = Primary Item " Line Location: ITEMD+36
Function Call: WRITE	Prompt: !,"CS = Code Set for ICD Diagnosis code" Line Location: ITEMD+37
Function Call: WRITE	Prompt: !," + = Item with active ICD code on start date of prescription",! Line Location: ITEMD+38
Function Call: WRITE	Prompt: " ...deleted!" Line Location: ITEMK+6
Routine Call	DIC Line Location: SITE+3 ACT1+2 LOOKUP+3 RX+9 ITEMA+2
Routine Call	DIC Line Location: FCPIX+5
Routine Call	DIE Line Location: SITE+11 INACTVT+6 ACTVT+6 SET+3 DEMOG+4 DEMOG+7 DEMOG+8 RX+13 ITEME+9 ITEMEH+4 ITEMEH+29 ITEMEH+38 ITEMEH+82 ITEMEH+87 ITEMEH+96 ITEMEP+2 ITEMEP+8
Routine Call	DIR Line Location: INACTVT+3 ACTVT+2 SITECHK+13 ITEMS+24 ITEMK+3 ITEMO+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
420.01	FIND^DIC
^PRC(440 - [#440]	GETS^DIQ
^RMPR(661 - [#661]	Classic Fileman Calls, GETS^DIQ
^RMPR(665 - [#665]	Classic Fileman Calls, GETS^DIQ
665.193	GET1^DIQ
^RMPR(669.9 - [#669.9]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DEMOG+8
^DD(665	ITEMA+5
^DIC(19.1 - [#19.1]	KEY+3
^DPT - [#2]	EDIT+3
^PRC(420 - [#420]	FCPIX+8
^RMPR(661.1 - [#661.1]	ITEMEH+2, ITEMEH+7, ITEMEH+8
^RMPR(665 - [#665]	UNLOCK, ACT1+4, ACT1+8, ACT1+12, ACT1+14, EDIT+2, EDIT+5, CONT+1, SITECHK+2, DEMOG+5 , RX+7, ITEMEH+1, ITEMEH+6, ITEMEH+88, ITEMEH+89, ITEMEH+92, ITEMEP+3, ITEMEP+6, PIEN+4, PIEN+5 , PIEN+6, ITEMD+6, ITEMD+9, ITEMD+10
^RMPR(669.9 - [#669.9]	SITE+7, SITE+16, FCPIX+4
^VA(200 - [#200]	KEY+4

Label References

Name	Line Occurrences
$$EQUIT	SITE+11, DEMOG+4, DEMOG+7, RX+13, ITEME+9, ITEMEH+30, ITEMEH+39, ITEMEH+90, ITEMEH+96
$$ITEMNM	ITEMD+22
$$ITEMO	ITEM+7
$$LJ	ITEMD+25
$$QUIT	SITE+3, ACT1+2, INACTVT+4, ACTVT+3, LOOKUP+3, SITECHK+13, DEMOG+8, RX+9, ITEM+7, ITEMA+2 , ITEMS+26, ITEMEH+40, ITEMEH+78, ITEMEH+84, ITEMEP+2
$$VDRNM	ITEMD+22
ACT1	ACT1+5, ACT1+8, ACT1+12, ACT1+14
DEMOG	EDBLK+6
EDBLK	LOOP+3, EDIT+7
EXIT	ACT+2, ACT1+2, PAT+3, LOOP+2, LOOP+3, EDIT+7
ITEM	EDBLK+9, ITEM+5, ITEM+9, ITEM+11, ITEM+15, ITEM+18
ITEMA	ITEM+9, ITEMP+2
ITEMD	ITEM+3
ITEME	ITEM+9, ITEM+17, ITEMP+3
ITEMEH	ITEMEH+2
ITEMEP	ITEME+8
ITEMK	ITEM+11
ITEMP	ITEM+5
ITEMS	ITEM+11, ITEM+13
LOOKUP	LOOP+2, CONT+2
LOOP	LOOP+4
PAT	KEY+6
RMPRLOAD	ITEMS+9, ITEMS+31
RX	EDBLK+7
SET	SITECHK+4, SITECHK+14
SITE	SITE+8, SITE+17
SITECHK	EDBLK+1
UNLOCK	EXIT+1, LOOP+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	EXIT!, LJ~, LJ+2*, LJ+3
D0	EXIT!, FCPIX+4
DA	EXIT!, SITE+1!, SITE+5, SITE+13!, ACT1+1!, ACT1+3, ACT1+4, ACT1+8, ACT1+12, ACT1+14 , EDIT+4, EDIT+5, LOOKUP+1!, CONT, CONT+1, SET+1!, SET+2, DEMOG+2!, DEMOG+3, RX+3! , RX+13, ITEMA+3!, ITEME+6!, ITEME+7, ITEME+9, ITEMEH+1, ITEMEH+6, ITEMEH+88, ITEMEH+89, ITEMEP+2 , ITEMEP+8, ITEMEP+9, ITEMK+4!, ITEMK+5*
DA(1	RX+6, RX+7, RX+11, ITEMA+5, ITEME+7, ITEMEH+1, ITEMEH+88, ITEMEH+89, ITEMK+5
DD	EXIT!, SITE+1!, SITE+13!, ITEMA+3!
DFCP	ITEME+1~, ITEME+3, ITEMEH+92, ITEMEH+94
DFN	EXIT!, PIEN~, PIEN+4, PIEN+5, PIEN+6
DIC	EXIT!, SITE+1!, SITE+2, SITE+11, SITE+13!, ACT1+1!, ACT1+2, ACT1+3, LOOKUP+1!, LOOKUP+2* , RX+3!, RX+5, RX+13, ITEMA+2!, ITEMA+3!, ITEMA+4*, ITEMEH+35!
DIC("A"	SITE+2*, SITE+4!
DIC("B"	RX+8, ITEMEH+37
DIC("P"	RX+6, ITEMA+5
DIC("W"	RX+4*
DIC(0	SITE+2, ACT1+2, LOOKUP+2, RX+5, ITEMA+2, ITEMA+4
DIE	EXIT!, SITE+1!, SITE+11, SITE+13!, ACT1+3, LOOKUP+1!, SET+1!, SET+3, DEMOG+2!, DEMOG+4 , RX+3!, RX+13, ITEME+6!, ITEME+7
DIE("NO^"	INACTVT+5, ACTVT+5
DIK	EXIT!, ITEMK+4!, ITEMK+5*
DIR	EXIT!, INACTVT+2!, ACTVT+1!, SITECHK+11!, ITEMS+17!, ITEMK+2!, ITEMO+1!
DIR("?"	ITEMS+20, ITEMS+21
DIR("A"	INACTVT+3, ACTVT+2, SITECHK+12, ITEMS+19, ITEMK+2, ITEMO+2
DIR("B"	INACTVT+2, ACTVT+1, SITECHK+11, ITEMK+3
DIR(0	INACTVT+2, ACTVT+1, SITECHK+11, ITEMS+19, ITEMK+2, ITEMO+2
DIROUT	EXIT!, QUIT
DIRUT	EXIT!
DO	EXIT!, ITEMA+3!
DR	EXIT!, SITE+1!, SITE+11, SITE+13!, INACTVT+5, ACTVT+4, LOOKUP+1!, SET+1!, SET+3, DEMOG+2! , DEMOG+4, DEMOG+6!, DEMOG+8!, RX+3!, RX+13, ITEME+6!, ITEME+9, ITEMEH+4, ITEMEH+7, ITEMEH+9 , ITEMEH+10, ITEMEH+27, ITEMEH+36, ITEMEH+81, ITEMEH+86, ITEMEH+96, ITEMEP+2, ITEMEP+8
DT	DEMOG+8
DTOUT	EXIT!, QUIT, EQUIT
DUOUT	EXIT!, QUIT
DUZ	KEY+4, INACTVT+5
FCP	ITEME+1~, ITEME+3, ITEMEH+93, ITEMEH+94, ITEMEH+95, ITEMEH+96
I	ITEMD+1~, ITEMD+5, ITEMD+9, ITEMD+10, ITEMD+23
ICDID	ITEME+1~, ITEME+3*
IEN	EXIT!, ITEM+5, ITEMA+6, ITEMS+7, ITEMS+19, ITEMD+5!, ITEMD+9, ITEMD+23, ITEMD+25, ITEMD+26 , ITEMD+34, ITEMD+35, ITEMD+39*
IEN(	ITEMA+6, ITEMS+40, ITEME+7, ITEMEH+16, ITEMEH+71, ITEMEH+92, ITEMD+23, ITEMK+5
IENS	EXIT!, SITECHK+6, SITECHK+7, SITECHK+9, ITEMNM+1, ITEMNM+2, ITEMNM+3, VDRNM+2*, VDRNM+3
IOF	ACT+3
ITEM	EXIT!, ITEM+5, ITEM+9, ITEM+11, ITEM+16, ITEMP+2, ITEMA+1, ITEMA+6, ITEMS+7, ITEMS+14 , ITEMS+18, ITEMS+25, ITEMS+27, ITEMS+40, RMPRLOAD+1, RMPRLOAD+2, RMPRLOAD+3, ITEME+7, ITEMEH+16, ITEMEH+71 , ITEMEH+92, ITEMK+5
ITEMS	EXIT!, ITEMS+21, ITEMD+5!
ITEMS(	ITEMS+27, ITEMD+34*
ITEMS(1	ITEMS+7
ITM	EXIT!, ITEMNM~, ITEMNM+1
ITMACT	EXIT!, ITEM+7, ITEM+9, ITEM+11, ITEM+13, ITEMS+7, ITEMS+29, ITEMS+38, ITEME+5
ITMNM	ITEMD+1~, ITEMD+22*, ITEMD+25
KEY	KEY+2~, KEY+3*, KEY+4
NAME	ACT1+1~, ACT1+3*, ACT1+9, INACTVT+3, ACTVT+2
PFLG	ITEMEP+1~
PI	EXIT!, ITEMP+3*!
PIEN	ITEMEP+1~, PIEN+2~, PIEN+3, PIEN+4, PIEN+5, PIEN+6*, PIEN+7
PIF	ITEMD+1~, ITEMD+11*, ITEMD+25
QUIT	EXIT!, ACT+2, PAT+1, PAT+3, LOOP+1, LOOP+2, LOOP+3, EDBLK+1, EDBLK+6, EDBLK+7 , EDIT+4, QUIT, EQUIT, ITEM+5, ITEM+9, ITEM+11, ITEM+16, ITEM+17, ITEMP+2, ITEME+8 , ITEMEH+63, ITEMEH+74*, ITEMEH+93, ITEMEH+94
RMCPRENT	ITEME+1~, ITEME+3, ITEMEH+8, ITEMEH+9, ITEMEH+28!
RMCPT	ITEME+6!, ITEMEH+7*, ITEMEH+9, ITEMEH+10, ITEMEH+88, ITEMEH+89
RMCPTHCP	ITEME+2~, ITEME+4, ITEMEH+6, ITEMEH+7, ITEMEH+8, ITEMEH+28!
RMDA	ITEMEP+1~, ITEMEP+2*, ITEMEP+3, ITEMEP+7, ITEMEP+9
RMNO	ITEMEP+1~, ITEMEP+5*
>> RMPO("NAME"	SITECHK+10, SITECHK+12
RMPODFN	UNLOCK, LOOP+2, EDIT+1, EDIT+2, EDIT+3, EDIT+4, LOOKUP+1!, CONT, SITECHK+2, SITECHK+6 , SET+2, DEMOG+3, DEMOG+5, RX+5, RX+6, ITEMA+4, ITEMA+5, ITEMS+14, ITEMS+40, ITEME+7 , ITEMEH+6, ITEMEH+16, ITEMEH+71, ITEMEH+92, ITEMEP+3, ITEMEP+6, ITEMD+6, ITEMD+9, ITEMD+10, ITEMK+5
>> RMPOELIG	DEMOG+5*, DEMOG+6
RMPOHCP	ITEME+2~, ITEME+6!, ITEMEH+1*, ITEMEH+2
>> RMPOPATN	EDIT+1
RMPOX	FCPIX+4*, FCPIX+6, FCPIX+7!
RMPOXITE	SITE+1!, SITE+5*, SITE+7, SITE+16, PAT+3, SITECHK+3, SET+3
RMPPARAM	ITEMEH+44~, ITEMEH+46, ITEMEH+57
RMPPARAM("DEL	ETE IT" , ITEMEH+71
RMPPARAM("NO	DATA FOUND" , ITEMEH+61
RMPPARAM("SEARCH_PROMPT"	ITEMEH+51, ITEMEH+52, ITEMEH+53
RMPRACS	ITEMS+2~, ITEMS+4, ITEMS+5, ITEMS+14, ITEMS+40, ITEME+1~, ITEME+3, ITEMEH+13, ITEMEH+14, ITEMEH+33 , ITEMEH+43, ITEMD+1~, ITEMD+2, ITEMD+18, ITEMD+19, ITEMD+20, ITEMD+30, ITEMD+31, ITEMD+35
RMPRACSI	ITEME+1~, ITEME+3, ITEMEH+14, ITEMEH+25
RMPRACT	ITEMS+2~, ITEMS+12, ITEMS+36, RMPRLOAD+3, ITEMD+1~, ITEMD+13, ITEMD+16*, ITEMD+32, ITEMD+35
RMPRANS	ITEMS+2~
RMPRCNT1	PARSE+11~, PARSE+28, PARSE+29, PARSE+30, PARSE+31, PARSE+34, PARSE+37, PARSE+38, PARSE+39, PARSE+44 , PARSE+46
RMPRCNT2	PARSE+11~, PARSE+36*, PARSE+37, PARSE+38, PARSE+39
RMPRCONT	EDBLK+4~, EDBLK+5, ITEM+15, ITEMS+14, ITEMS+40
RMPRCS	ITEMS+2~, RMPRLOAD+2*
RMPRCSI	ITEME+1~, ITEME+3, ITEMEH+21, ITEMEH+22
RMPRDATA	ITEME+1~, ITEME+3, ITEMEH+25
RMPRDATE	ITEME+1~, ITEME+3, ITEMEH+22, ITEMEH+23*, ITEMEH+25
RMPRDOI	EDBLK+2~, EDBLK+5, EDBLK+8, RX+15, ITEMS+4, ITEMEH+13, ITEMEH+50, ITEMEH+57, ITEMD+4, ITEMD+16
RMPRFILE	ITEME+1~, ITEMEH+16*, ITEMEH+17, ITEMEH+18
RMPRFND	PARSE+11~, PARSE+12, PARSE+28, PARSE+29, PARSE+32, PARSE+35, PARSE+36, PARSE+37, PARSE+40
RMPRICD	ITEMS+2~, ITEMS+12, ITEMS+14, ITEMS+33, ITEMS+40, RMPRLOAD+1, ITEME+1~, ITEME+3, ITEMEH+55, ITEMEH+57* , ITEMEH+59, ITEMEH+61, ITEMEH+63, ITEMEH+65, ITEMEH+67, ITEMEH+69, ITEMEH+74, ITEMEH+76, ITEMEH+80, ITEMEH+81 , ITEMD+1~, ITEMD+2, ITEMD+13, ITEMD+14, ITEMD+16, ITEMD+18, ITEMD+21*, ITEMD+27, ITEMD+28, ITEMD+35
RMPRICDE	ITEME+2~, ITEME+3, ITEMEH+17, ITEMEH+25, ITEMEH+37, ITEMEH+51, ITEMEH+57, ITEMEH+70
RMPRICDI	ITEME+2~, ITEME+4, ITEMEH+18, ITEMEH+19, ITEMEH+20, ITEMEH+21, ITEMEH+48, ITEMEH+50
RMPRICS	ITEMS+2~
RMPRIEN	ITEME+2~, ITEME+4, ITEMEH+19
RMPRIENS	RX+2~, RX+11, RX+15, ITEME+2~, ITEME+4, ITEMEH+16*, ITEMEH+17, ITEMEH+18
RMPRINDX	ITEME+2~
RMPRITEM	ITEMS+43!, ITEMD+5!
RMPRITEM(	RMPRLOAD+1, RMPRLOAD+2, RMPRLOAD+3, ITEMD+26, ITEMD+35
RMPRLLEN	ITEMEH+52, ITEMEH+53, PARSE+11~, PARSE+27, PARSE+28
RMPRPCS	ITEMD+1~, ITEMD+2, ITEMD+4
RMPRQUIT	ITEMS+2~, ITEMS+22, ITEMS+23, ITEMS+25, ITEMS+29, ITEMS+33, ITEMS+36, ITEMS+41, ITEME+2~, ITEME+4* , ITEMEH+55, ITEMEH+59, ITEMEH+63, ITEMEH+65, ITEMEH+67, ITEMEH+71, ITEMEH+74
RMPRSUSP	PARSE+11~, PARSE+16*, PARSE+22, PARSE+23, PARSE+24, PARSE+42, PARSE+44, PARSE+46
RMPRTXT	ITEME+2~, ITEME+4, ITEMEH+50, ITEMEH+53, ITEMD+1~, ITEMD+25, ITEMD+26, ITEMD+28, ITEMD+29, ITEMD+30 , ITEMD+31, ITEMD+32, ITEMD+33, ITEMD+34, PARSE~
RMPRTXT(	PARSE+34, PARSE+37, PARSE+38, PARSE+39, PARSE+44, PARSE+46
RMPRTXT(1	PARSE+13, PARSE+18, PARSE+19, PARSE+23, PARSE+27, PARSE+30
RMPRTXT(2	PARSE+14, PARSE+18, PARSE+19, PARSE+20!, PARSE+24, PARSE+29, PARSE+30, PARSE+31*
RMPRTXT(3	PARSE+16!
RMPRWARN	EDBLK+3~, EDBLK+5, ITEM+15, ITEMS+15, ITEMS+41
>> RMX	ITEMEP+6*, ITEMEP+7, ITEMEP+8
RXD	RX+2~, RX+7*, RX+8
RXDI	RX+2~
S	EXIT!, LJ~, LJ+3*, LJ+4
U	FCPIX+4, ACT1+8, ACT1+12, ACT1+14, EDIT+3, SITECHK+2, DEMOG+5, ITEMA+5, ITEMS+5, RMPRLOAD+1 , RMPRLOAD+2, RMPRLOAD+3, ITEMEH+1, ITEMEH+2, ITEMEH+6, ITEMEH+7, ITEMEH+8, ITEMEH+14, ITEMEH+23, ITEMEH+33 , ITEMEH+43, ITEMEH+65, ITEMEH+88, ITEMEH+89, ITEMEH+92, ITEMEH+96, ITEMEP+3, PIEN+5, PIEN+6, ITEMD+11 , ITEMD+13, ITEMD+20, ITEMD+22, ITEMD+35
VDR	EXIT!, VDRNM~, VDRNM+1, VDRNM+2
VDRNM	ITEMD+1~, ITEMD+22, ITEMD+24, ITEMD+25
W	EXIT!, LJ~, LJ+3
X	EXIT!, FCPIX+2, FCPIX+3!, FCPIX+4, FCPIX+5, FCPIX+6, FCPIX+8!, ITEMA+5, PIEN+2~, PIEN+3* , PIEN+4*, PIEN+5
X("DILIST"	FCPIX+6, FCPIX+7!
X(440	VDRNM+3
X(661	ITEMNM+3
X(665	SITECHK+9
Y	EXIT!, SITE+3, SITE+5, ACT1+2, ACT1+3, INACTVT+4, ACTVT+3, LOOKUP+3, CONT, EQUIT , SITECHK+2, SITECHK+3, SITECHK+4, SITECHK+13, DEMOG+8, RX+9, RX+11, RX+13, ITEMA+2, ITEMA+5 , ITEMA+6, ITEMS+25, ITEMS+27, ITEMK+3, ITEMO+3
Y(0	SITE+9, ACT1+3, ACT1+6
Z	EXIT!, ITEMD+1~, ITEMD+10*, ITEMD+11, ITEMD+13, ITEMD+22
ZST	EXIT!, FCPIX+4*, FCPIX+5, FCPIX+8

Customize PDF page

Package: Prosthetics

Routine: RMPOPED

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: