Routine: PSOERCR0

Package	Total	Call Graph
Outpatient Pharmacy	16	EN^PSOERCR1 REF^PSOERSE1 (DSPERX,WRAP)^PSOERUT ($$CHECKREC,ASKCONT,BUILDSUM,CREATEPN)^PSOERX1H INCERX^PSOERXI1 $$RESTPOST^PSOERXO1 ($$HEADER,BHF,BL,MSG,RTYPE)^PSOERXOA (OALLERGY,OBENEFIT,OFAC,OOBSERVE)^PSOERXOB PATIENT^PSOERXOC OPHARM^PSOERXOD PERSON^PSOERXOE MEDS^PSOERXOG MEDREQ^PSOERXON UPDSTAT^PSOERXU1 DIRE^PSOERXX1 PAUSE^PSOSPMU1
VA FileMan	3	$$GET1^DIQ ^DIR EN^DIWE
Kernel	2	($$NAME,$$WHAT)^XUAF4 $$NPI^XUSNPI
List Manager	1	FULL^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO ERX CHANGE REQUEST PSO ERX RESEND CHANGE REQUEST
Kernel	1	^ORD(101

Name	Comments	DBIA/ICR reference
EN	; Action Entry Point
EN1	; Loop Entry Point
NOTES	; NOTE TO PROVIDER Prompt (Max 260 characters)
PNCOMM	; Patient Progress Note Comments
RESENDEC	;Allows a user to resend an eRx Change request in the Inbound eRx application
EXIT	; Exit the action
DEFREA(REACODE)	; Returns the Default Change Request Reason Text ; Input: REACODE - Pointer to the ERX SERVICE REASON CODES (#52.45)
HELP	; Sub-Code List
LISTMEDS	; Display Meds Already entered
SUMMARY	; Displays a Summary of the RxChangeRequest
PAUSE	; Decides whether to pause the listing or not

Name	Field # of Occurrence
$$GET1^DIQ	EN+7, EN+18, EN+19, EN+22, EN+28, EN1+3, EN1+4, EN1+5, EN1+6, EN1+10 , EN1+12, EN1+15, EN1+16, EN1+25, EN1+26, EN1+27, EN1+28, EN1+29, EN1+31, EN1+34 , EN1+35, RESENDEC+3, RESENDEC+7, RESENDEC+61, RESENDEC+73, DEFREA+4, SUMMARY+6, SUMMARY+8
^DIR	EN1+11, EN1+32, NOTES+32, NOTES+39, NOTES+44, NOTES+48, PNCOMM+3, RESENDEC+13, RESENDEC+18, RESENDEC+64 , RESENDEC+65, RESENDEC+66, RESENDEC+81, EXIT+5
EN^DIWE	NOTES+8
EN^PSOERCR1	NOTES+36, NOTES+40
REF^PSOERSE1	RESENDEC+94
DSPERX^PSOERUT	EN+25, NOTES+36
WRAP^PSOERUT	EN1+8
$$CHECKREC^PSOERX1H	EN+33
ASKCONT^PSOERX1H	RESENDEC+8
BUILDSUM^PSOERX1H	RESENDEC+6
CREATEPN^PSOERX1H	RESENDEC+87
INCERX^PSOERXI1	RESENDEC+76
$$RESTPOST^PSOERXO1	RESENDEC+62
$$HEADER^PSOERXOA	RESENDEC+29
BHF^PSOERXOA	RESENDEC+31, RESENDEC+56
BL^PSOERXOA	RESENDEC+35, RESENDEC+36, RESENDEC+39
MSG^PSOERXOA	RESENDEC+27, RESENDEC+57
RTYPE^PSOERXOA	RESENDEC+33, RESENDEC+55
OALLERGY^PSOERXOB	RESENDEC+43
OBENEFIT^PSOERXOB	RESENDEC+44
OFAC^PSOERXOB	RESENDEC+45
OOBSERVE^PSOERXOB	RESENDEC+49
PATIENT^PSOERXOC	RESENDEC+46
OPHARM^PSOERXOD	RESENDEC+47
PERSON^PSOERXOE	RESENDEC+48, RESENDEC+54
MEDS^PSOERXOG	RESENDEC+51
MEDREQ^PSOERXON	RESENDEC+53
UPDSTAT^PSOERXU1	RESENDEC+82
DIRE^PSOERXX1	EN+10, EN+13, EN+20, EN+23, RESENDEC+92
PAUSE^PSOSPMU1	NOTES+11, NOTES+12, NOTES+13, PNCOMM+8, HELP+3
FULL^VALM1	EN+5
$$NAME^XUAF4	EN+7
$$WHAT^XUAF4	EN+7, EN+9
$$NPI^XUSNPI	EN+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Institution NPI Number could not be found. Cannot create Change Request." Line Location: EN+10
Function Call: WRITE	Prompt: !!,$G(IOINHI),"You do not have the appropriate key to access this option.",!,$G(IOINORM) Line Location: EN+13
Function Call: WRITE	Prompt: !!,$G(IOINHI),"Change Request may not be used for this record type.",!,$G(IOINORM) Line Location: EN+20
Function Call: WRITE	Prompt: !!,$G(IOINHI),"The VistA Patient must be matched and validated first.",!,$G(IOINORM) Line Location: EN+23
Function Call: WRITE	Prompt: !!,$G(IOINHI),CRFOUND," Rx Change Request",$S(CRFOUND>1:"s have",1:" has")," already been sent for this eRx.",$G(IOINORM) Line Location: EN+30
Function Call: WRITE	Prompt: ! Line Location: EN+31
Function Call: WRITE	Prompt: !!,$G(IOINHI),"Substitutions are already allowed by prescriber for this eRx.",$G(IOINORM),$C(7) Line Location: EN1+13
Function Call: WRITE	Prompt: !,DIWESUB,":" Line Location: NOTES+7
Function Call: WRITE	Prompt: !!,$G(IOINHI),"The maximum length for this note is 260 characters.",$G(IOINORM),$C(7) Line Location: NOTES+11
Function Call: WRITE	Prompt: !!,$G(IOINHI),"The place holder [DRUG_NAME] must be replaced before proceeding.",$G(IOINORM),$C(7) Line Location: NOTES+12
Function Call: WRITE	Prompt: !!,$G(IOINHI),"The place holder [ADD_TEXT_HERE] must be replaced before proceeding.",$G(IOINORM),$C(7) Line Location: NOTES+13
Function Call: WRITE	Prompt: ! Line Location: NOTES+18
Function Call: WRITE	Prompt: !!,"A maximum of 9 Drug Suggestion can be entered!",!,$C(7) Line Location: NOTES+35
Function Call: WRITE	Prompt: ! Line Location: NOTES+36
Function Call: WRITE	Prompt: ! Line Location: NOTES+37
Function Call: WRITE	Prompt: ! Line Location: NOTES+39
Function Call: WRITE	Prompt: ! Line Location: NOTES+42
Function Call: WRITE	Prompt: ! Line Location: NOTES+44
Function Call: WRITE	Prompt: ! Line Location: NOTES+48
Function Call: WRITE	Prompt: ! Line Location: NOTES+48
Function Call: WRITE	Prompt: !?64,"Deleting..." Line Location: NOTES+49
Function Call: WRITE	Prompt: "Ok.",! Line Location: NOTES+49
Function Call: WRITE	Prompt: ! Line Location: PNCOMM+3
Function Call: WRITE	Prompt: !!,$G(IOINHI),"You must enter either Notes to Provider or at least one Drug Suggestion",$G(IOINORM),$C(7) Line Location: PNCOMM+7
Function Call: WRITE	Prompt: !,$G(IOINHI),"before proceeding.",$G(IOINORM),$C(7) Line Location: PNCOMM+8
Function Call: WRITE	Prompt: !!,$G(IOINHI),"Resend Change Request may not be used for this record type.",$G(IOINORM),! Line Location: RESENDEC+8
Function Call: WRITE	Prompt: ! Line Location: RESENDEC+11
Function Call: WRITE	Prompt: ! Line Location: RESENDEC+16
Function Call: WRITE	Prompt: !!,"Sending Request to Provider..." Line Location: RESENDEC+20
Function Call: WRITE	Prompt: !,$P(PSSRET(0),U,2) Line Location: RESENDEC+64
Function Call: WRITE	Prompt: !,PSSRET("errorMessage") Line Location: RESENDEC+65
Function Call: WRITE	Prompt: !,"The eRx Processing hub did not return a Hub identification number." Line Location: RESENDEC+66
Function Call: WRITE	Prompt: "Done." Line Location: RESENDEC+75
Function Call: WRITE	Prompt: !,"A problem was encountered while trying to file the RxChange request." Line Location: RESENDEC+78
Function Call: WRITE	Prompt: !,"RxChange Request was not filed in vista." Line Location: RESENDEC+79
Function Call: WRITE	Prompt: !!,"ERROR: "_$P(RES,U,2) Line Location: RESENDEC+80
Function Call: WRITE	Prompt: ! Line Location: RESENDEC+92
Function Call: WRITE	Prompt: ! Line Location: EXIT+3
Function Call: WRITE	Prompt: !," Complete List of Change Request Sub-Codes:",! Line Location: HELP+1
Function Call: READ	Prompt: ! Variable: "Type <Enter> to continue or '^' to exit Timeout: ",XX:DTIME Line Location: HELP+2
Function Call: WRITE	Prompt: ! Line Location: LISTMEDS+5
Function Call: WRITE	Prompt: IOUON Condition for execution: $D(IOUON) Line Location: LISTMEDS+5
Function Call: WRITE	Prompt: "# DRUG",?50,"QTY",?55,"# REFS",?63,"DAYS SUPPLY",?76,"SUBS" Line Location: LISTMEDS+5
Function Call: WRITE	Prompt: IOUOFF Condition for execution: $D(IOUOFF) Line Location: LISTMEDS+5
Function Call: WRITE	Prompt: !,XX,! Line Location: LISTMEDS+6
Function Call: WRITE	Prompt: ! Line Location: LISTMEDS+9
Function Call: WRITE	Prompt: MED,?3,"(",$P(Z,"^"),")",$E($P(Z,"^",2),1,43),?50,$J($P(Z,"^",6),3),?57,$J($P(Z,"^",10),2) Line Location: LISTMEDS+10
Function Call: WRITE	Prompt: ?65,$J($P(Z,"^",9),4),?76,$S($P(Z,"^",5):"NO",1:"YES"),! Line Location: LISTMEDS+11
Function Call: WRITE	Prompt: ?3 Line Location: LISTMEDS+13
Function Call: WRITE	Prompt: IOUON Condition for execution: $D(IOUON) Line Location: LISTMEDS+13
Function Call: WRITE	Prompt: "Sig :" Line Location: LISTMEDS+13
Function Call: WRITE	Prompt: IOUOFF Condition for execution: $D(IOUOFF) Line Location: LISTMEDS+13
Function Call: WRITE	Prompt: ?9,$E(SIG,1,70),! Line Location: LISTMEDS+15
Function Call: WRITE	Prompt: ?3 Line Location: LISTMEDS+17
Function Call: WRITE	Prompt: IOUON Condition for execution: $D(IOUON) Line Location: LISTMEDS+17
Function Call: WRITE	Prompt: "Note:" Line Location: LISTMEDS+17
Function Call: WRITE	Prompt: IOUOFF Condition for execution: $D(IOUOFF) Line Location: LISTMEDS+17
Function Call: WRITE	Prompt: ?9,$E(NOTE,1,71),! Line Location: LISTMEDS+18
Function Call: WRITE	Prompt: @IOF Line Location: SUMMARY+3
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+5
Function Call: WRITE	Prompt: !,$G(IOUON),XX,$G(IOUOFF) Line Location: SUMMARY+5
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+6
Function Call: WRITE	Prompt: "Change Request Reason Code: ",HIGH,$$GET1^DIQ(52.45,+$G(REACODE),.01)," - ",$$GET1^DIQ(52.45,+$G(REACODE),.02),NORM Line Location: SUMMARY+6
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+8
Function Call: WRITE	Prompt: "Change Request Reason Sub-Code: ",HIGH,$$GET1^DIQ(52.45,+$G(REASCODE),.01)," - ",$$GET1^DIQ(52.45,+$G(REASCODE),.02),NORM Line Location: SUMMARY+8
Function Call: WRITE	Prompt: !,HIGH,REATXT(I),NORM Line Location: SUMMARY+10
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+12
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+14
Function Call: WRITE	Prompt: "VA Progress Note Comment: ",!,HIGH,PNCOMM,NORM,! Line Location: SUMMARY+14
Function Call: WRITE	Prompt: $G(IOUON),XX,$G(IOUOFF) Line Location: SUMMARY+16
Function Call: WRITE	Prompt: "Press Return to continue" Line Location: PAUSE+4
Function Call: WRITE	Prompt: $C(8) Line Location: PAUSE+5
Function Call: WRITE	Prompt: XX Line Location: PAUSE+6
Function Call: WRITE	Prompt: $C(8) Line Location: PAUSE+7
Routine Call	DIR Line Location: EN1+11 EN1+32 NOTES+32 NOTES+39 NOTES+44 NOTES+48 PNCOMM+3 RESENDEC+13 RESENDEC+18 RESENDEC+64 RESENDEC+65 RESENDEC+66 RESENDEC+81 EXIT+5

FileNo	Call Tags
^PS(52.45 - [#52.45]	GET1^DIQ
^PS(52.49 - [#52.49]	GET1^DIQ
^PS(59 - [#59]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.45 - [#52.45]	EN1+2, EN1+24
^PS(52.49 - [#52.49]	EN+27, RESENDEC+4, RESENDEC+86
^TMP("PSOERCR0"	RESENDEC+22
^TMP("PSOERN2P"	NOTES+1!, NOTES+2*, NOTES+9, NOTES+10, NOTES+15
^XUSEC("PSDRPH"	EN+12
^XUSEC("PSO ERX ADV TECH"	EN+12

Name	Line Occurrences
EN1	EN1+12, RESENDEC+14, EXIT+5
EXIT	EN1+19, NOTES+14, NOTES+17, PNCOMM+3, RESENDEC+13, RESENDEC+18
LISTMEDS	NOTES+21, SUMMARY+12
NOTES	PNCOMM+6
PAUSE	LISTMEDS+5, LISTMEDS+6, LISTMEDS+10, LISTMEDS+13, LISTMEDS+15, LISTMEDS+17, LISTMEDS+18, SUMMARY+5, SUMMARY+6, SUMMARY+8 , SUMMARY+10, SUMMARY+14
RESENDEC	EN+16, EN+36
SUMMARY	RESENDEC+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	RESENDEC+23*, RESENDEC+35, RESENDEC+36, RESENDEC+39, RESENDEC+43, RESENDEC+44, RESENDEC+45, RESENDEC+46, RESENDEC+47, RESENDEC+48 , RESENDEC+49, RESENDEC+51, RESENDEC+53, RESENDEC+54
CODE	EN+1~, EN1+1, EN1+2, EN1+3, EN1+4, EN1+5, EN1+6, EN1+24*, EN1+25, EN1+26 , EN1+27, EN1+28, EN1+29
CODETYPE	EN+3~, EN1+23*, EN1+24
CRERXIEN	EN+3~, RESENDEC+86*, RESENDEC+87
CRFOUND	EN+3~, EN+27, EN+28, EN+29, EN+30
CRMED	EN+1~, NOTES+35, NOTES+40
CRMEDS	EN+1~, NOTES+50!, RESENDEC+53, RESENDEC+87
CRMEDS(	NOTES+20, NOTES+49!, NOTES+50*, LISTMEDS+7, LISTMEDS+8, LISTMEDS+12, LISTMEDS+14, LISTMEDS+16, LISTMEDS+17
CRMEDS(0	PNCOMM+6, RESENDEC+53, EXIT+2, LISTMEDS+3
CRMEDS(99	NOTES+35
DDWFLAGS	EN+3~
DEFREA	DEFREA+3~, DEFREA+4, DEFREA+5, DEFREA+6*, DEFREA+7
DELMED	EN+2~, NOTES+45*, NOTES+49
DESC	EN+1~, EN+2~, EN1+6!
DESC(	EN1+7
DESC(1	EN1+7
DIC	EN+2~, NOTES+5*
DIR	EN+1~, EN1+1!, EN1+20!, NOTES+22!, NOTES+38!, NOTES+43!, NOTES+46!, PNCOMM+1!, RESENDEC+11!, RESENDEC+16! , RESENDEC+64!, RESENDEC+65!, RESENDEC+66!, RESENDEC+81!, EXIT+3!
DIR("?"	EN1+1, EN1+5, EN1+9, EN1+22, EN1+29, NOTES+25, NOTES+26, NOTES+28, NOTES+29, NOTES+30 , NOTES+31, PNCOMM+2, HELP+2
DIR("A"	EN1+10, EN1+31, NOTES+23, NOTES+38, NOTES+43, NOTES+47, PNCOMM+1, RESENDEC+12, RESENDEC+17, EXIT+4
DIR("B"	EN1+10, EN1+31, NOTES+46, PNCOMM+1, RESENDEC+11, RESENDEC+16, EXIT+3*
DIR("L"	EN1+20, EN1+21, EN1+28, EN1+30
DIR(0	EN1+1, EN1+4, EN1+20, EN1+26, NOTES+22, NOTES+38, NOTES+43, NOTES+46, PNCOMM+1, RESENDEC+11 , RESENDEC+16, RESENDEC+64, RESENDEC+65, RESENDEC+66, RESENDEC+81, EXIT+3
DIROUT	EN+1~, EN1+11, EN1+32, NOTES+33, NOTES+39, NOTES+44, NOTES+48, RESENDEC+13, RESENDEC+18
DIRUT	EN+1~, EN1+11, EN1+32, NOTES+33, NOTES+39, NOTES+44, NOTES+48, PNCOMM+1!, RESENDEC+13, RESENDEC+18
DIV	EN+3~, RESENDEC+60*, RESENDEC+76
DIWESUB	EN+2~, NOTES+7*
DTIME	HELP+2
DUOUT	EN+1~, NOTES+8
DUZ	EN+12, RESENDEC+72
DWLW	EN+2~, NOTES+6*
DWPK	EN+2~, NOTES+6*
ERROR	EN+2~, NOTES+18, NOTES+21, NOTES+35*
>> ERXIEN	EN+4, EN+18, EN+19, EN+22, EN+25, EN+27, EN+36, EN1+12, NOTES+36, RESENDEC+3 , RESENDEC+4, RESENDEC+6, RESENDEC+7, RESENDEC+25, RESENDEC+29, RESENDEC+43, RESENDEC+44, RESENDEC+45, RESENDEC+46, RESENDEC+47 , RESENDEC+48, RESENDEC+49, RESENDEC+51, RESENDEC+54, RESENDEC+61, RESENDEC+73, RESENDEC+82, RESENDEC+87, RESENDEC+88, EXIT+1
ERXSIG	SUMMARY+1~
ERXSTS	EN+1~, EN+18*, EN+19
EXTRCODE	EN+1~, EN1+15*, EN1+19, EN1+21, EN1+23, EN1+27, EN1+28, EN1+29, EN1+30, NOTES+17 , PNCOMM+6, RESENDEC+35
EXTSCODE	EN+1~, EN1+14, EN1+34, RESENDEC+36
FDAPNCOM	EN+1~
FINISH	EN+2~, NOTES+4, NOTES+9, NOTES+11, NOTES+12, NOTES+13, NOTES+18, NOTES+19, NOTES+33, NOTES+41*
GBL	EN+2~, RESENDEC+22*, RESENDEC+27, RESENDEC+29, RESENDEC+31, RESENDEC+33, RESENDEC+35, RESENDEC+36, RESENDEC+39, RESENDEC+43 , RESENDEC+44, RESENDEC+45, RESENDEC+46, RESENDEC+47, RESENDEC+48, RESENDEC+49, RESENDEC+51, RESENDEC+53, RESENDEC+54, RESENDEC+55 , RESENDEC+56, RESENDEC+57, RESENDEC+62, RESENDEC+70, RESENDEC+71, RESENDEC+90
HELP	EN+2~, EN1+7*, EN1+8
HIGH	SUMMARY+1~, SUMMARY+4*, SUMMARY+6, SUMMARY+8, SUMMARY+10, SUMMARY+14
HLP	EN+1~, EN1+1, EN1+5, EN1+9, EN1+21, EN1+29*
HUBID	EN+2~, RESENDEC+66, RESENDEC+68, RESENDEC+74*, RESENDEC+76, RESENDEC+85, RESENDEC+86
I	EN+1~, EN1+7, EN1+9, NOTES+2, NOTES+4, NOTES+9, NOTES+10, NOTES+15, NOTES+19, NOTES+50 , RESENDEC+37, RESENDEC+69~, RESENDEC+70, RESENDEC+71, DEFREA+3~, DEFREA+5, HELP+1~, HELP+2, HELP+3, LISTMEDS+14* , LISTMEDS+15, LISTMEDS+18, SUMMARY+10, PAUSE+1~, PAUSE+5, PAUSE+7*
>> II	NOTES+24, NOTES+25, NOTES+26, NOTES+28, NOTES+29, NOTES+30
INDEX	EN+1~, EN1+1!, EN1+20!
INDEX(	EN1+3, EN1+14, EN1+15, EN1+25, EN1+33, EN1+34
INSTNAME	EN+3~, EN+7*, RESENDEC+60
INSTNPI	EN+3~, EN+8, EN+9, EN+10, RESENDEC+60
IOF	SUMMARY+3
>> IOINHI	EN+13, EN+20, EN+23, EN+30, EN1+13, NOTES+11, NOTES+12, NOTES+13, PNCOMM+7, PNCOMM+8 , RESENDEC+8, SUMMARY+4
>> IOINORM	EN+13, EN+20, EN+23, EN+30, EN1+13, NOTES+11, NOTES+12, NOTES+13, PNCOMM+7, PNCOMM+8 , RESENDEC+8, SUMMARY+4
IOSL	PAUSE+3
>> IOUOFF	LISTMEDS+5, LISTMEDS+13, LISTMEDS+17, SUMMARY+5, SUMMARY+16
>> IOUON	LISTMEDS+5, LISTMEDS+6, LISTMEDS+13, LISTMEDS+17, SUMMARY+5, SUMMARY+16
LINE	EN+1~, EN+2~, EN1+21, EN1+28, EN1+30, NOTES+18, LISTMEDS+5, LISTMEDS+6, SUMMARY+3, PAUSE+2 , PAUSE+3
MED	EN+1~, NOTES+20, NOTES+50, LISTMEDS+1~, LISTMEDS+7*, LISTMEDS+8, LISTMEDS+9, LISTMEDS+10, LISTMEDS+12, LISTMEDS+14 , LISTMEDS+16, LISTMEDS+17
MEDCNT	EN+1~, NOTES+20*, NOTES+22, NOTES+23, NOTES+27, NOTES+38, NOTES+43
MEDIEN	SUMMARY+1~
MESSID	EN+3~, RESENDEC+29*
NORM	SUMMARY+1~, SUMMARY+4*, SUMMARY+6, SUMMARY+8, SUMMARY+10, SUMMARY+14
>> NOTE	LISTMEDS+17, LISTMEDS+18
NOTE2PRV	EN+3~
NOTES	SUMMARY+1~
NPIINST	EN+2~, EN+7*, EN+8, EN+9
NPLEN	EN+3~, NOTES+5, NOTES+11
ORGRXIEN	EN+3~, EN+16, EN+36, RESENDEC+4*, RESENDEC+25
PNCOMM	EN+3~, PNCOMM+1, PNCOMM+4, RESENDEC+5, RESENDEC+7!*, RESENDEC+87, SUMMARY+14
>> PSOIEN	RESENDEC+4
PSOQUIT	EN+2~, EN1+18, EN1+19, EN1+32, NOTES+3, NOTES+4, NOTES+8, NOTES+14, NOTES+17, NOTES+18* , NOTES+19, NOTES+32*
>> PSOSITE	EN+7, RESENDEC+46, RESENDEC+47, RESENDEC+48, RESENDEC+54
PSSRET	EN+2~, RESENDEC+62*
PSSRET("errorMessage"	RESENDEC+65
PSSRET("outboundMsgId"	RESENDEC+66
PSSRET(0	RESENDEC+64
QTYQUAL	SUMMARY+1~
REACODE	EN+1~, EN1+10, EN1+14, EN1+15*, EN1+16, DEFREA~, DEFREA+4, SUMMARY+6
REASCODE	EN+1~, EN1+14, EN1+31, EN1+33, EN1+34, EN1+35, SUMMARY+7, SUMMARY+8
REASONTXT	EN+3~, RESENDEC+37, RESENDEC+38, RESENDEC+39
REATXT	EN+2~, EN1+14!, EN1+16, EN1+33!, EN1+35, NOTES+15!, PNCOMM+6, DEFREA+3~
REATXT(	NOTES+2, NOTES+15*, RESENDEC+37, DEFREA+5, SUMMARY+10
RECARY	EN+2~, EN+33
RECARY(	EN+28*, EN+36
>> RECENTRY	EN+34*, EN+35, EN+36
RECFOUND	EN+3~, EN+16!, EN+35, EN+36, RESENDEC+1, RESENDEC+2, RESENDEC+5*
RELERX	EN+3~, EN+27*, EN+28
RES	RESENDEC+69~, RESENDEC+76, RESENDEC+77, RESENDEC+80
>> RESEND	EN+16, RESENDEC+1, RESENDEC+25, RESENDEC+82, RESENDEC+88, EXIT+1, SUMMARY+14
RTHID	EN+2~, RESENDEC+73*, RESENDEC+74
>> RXIEN	RESENDEC+61*
SELCTREC	EN+1~, EN+15, EN+29, EN+33, EN+34*, EN+35, RESENDEC+1, RESENDEC+25, RESENDEC+82, RESENDEC+88 , EXIT+1, SUMMARY+14
SIG	LISTMEDS+1~, LISTMEDS+14, LISTMEDS+15
STATION	EN+3~, EN+7*, RESENDEC+76
TMPARR	EN+2~, NOTES+50!*
TMPARR(	NOTES+50
TMPIEN	EN+3~, RESENDEC+4*, RESENDEC+88, EXIT+1
U	EN+8, RESENDEC+64, RESENDEC+74, RESENDEC+77, RESENDEC+80
VADAT	EN+2~, RESENDEC+72*, RESENDEC+76
>> VALMBCK	EN+5*
WRPHELP	EN+2~, EN1+8!
WRPHELP(	EN1+9
X	EN+1~, EN+2~, EN1+6, EN1+16, EN1+35, NOTES+10, NOTES+11, NOTES+12, NOTES+13, NOTES+32 , DEFREA+3~, DEFREA+4, PAUSE+1~, PAUSE+4
XX	HELP+1~, HELP+2, LISTMEDS+1~, LISTMEDS+6, SUMMARY+1~, SUMMARY+5, SUMMARY+16, PAUSE+1~, PAUSE+6*
XXL1	RESENDEC+69~, RESENDEC+71*, RESENDEC+76
Y	EN+1~, EN1+12, EN1+14, EN1+15, EN1+33, EN1+34, NOTES+34, NOTES+37, NOTES+40, NOTES+41 , NOTES+42, NOTES+45, NOTES+48, PNCOMM+3, PNCOMM+4, RESENDEC+14, RESENDEC+18, EXIT+5, LISTMEDS+1~, PAUSE+1~ , PAUSE+3*
Z	LISTMEDS+1~, LISTMEDS+8*, LISTMEDS+10, LISTMEDS+11

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOERCR0

Information

Source Information

Call Graph

Call Graph Total: 22

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: