Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOERCR0

Package: Outpatient Pharmacy

Routine: PSOERCR0


Information

PSOERCR0 ;BHAM/MR - eRx Change Request Functionality ; 11 Jul 2025 7:14 PM

Source Information

Source file <PSOERCR0.m>

Call Graph

Call Graph

Call Graph Total: 26

Package Total Call Graph
Outpatient Pharmacy 18 (EN,LISTMEDS,SUMMARY)^PSOERCR1  $$CHKDIVRSN^PSOERPC3  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  
^PSOLSET  PAUSE^PSOSPMU1  
VA FileMan 4 $$FIND1^DIC  $$GET1^DIQ  ^DIR  EN^DIWE  
Kernel 3 $$TRIM^XLFSTR  ($$NAME,$$WHAT)^XUAF4  $$NPI^XUSNPI  
List Manager 1 FULL^VALM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

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

Entry Points

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
SENDCHRQ(ERXIEN,CRMEDS,ERXBTCHFLG) ;Batch eRx Change Request entry point, called from PSO ERX BATCH CHANGE REQUEST SUBMISSION protocol
; Input: ERXIEN - eRx for the Change Request (Pointer to to #52.49)
; CRMEDS - Array containg Suggested Med(s)
; ERXBTCHFLG - 1: Indicates a Batch CH REQ Submission
EXIT ; Exit the action

External References

Name Field # of Occurrence
$$FIND1^DIC SENDCHRQ+69
$$GET1^DIQ EN+13, EN+15, EN+26, EN+32, EN+38, EN1+3, EN1+4, EN1+5, EN1+6, EN1+10
EN1+12, EN1+15, EN1+18, EN1+28, EN1+29, EN1+30, EN1+31, EN1+32, EN1+33, EN1+34
EN1+36, EN1+40, EN1+43, RESENDEC+3, RESENDEC+7, SENDCHRQ+42, SENDCHRQ+54, SENDCHRQ+63
^DIR EN1+11, EN1+37, NOTES+33, NOTES+40, NOTES+45, NOTES+49, NOTES+57, PNCOMM+3, RESENDEC+13, RESENDEC+27
, SENDCHRQ+45, SENDCHRQ+46, SENDCHRQ+47, SENDCHRQ+62, EXIT+5
EN^DIWE NOTES+8
EN^PSOERCR1 NOTES+37, NOTES+41
LISTMEDS^PSOERCR1 NOTES+22
SUMMARY^PSOERCR1 RESENDEC+9
$$CHKDIVRSN^PSOERPC3 EN1+17, EN1+42
REF^PSOERSE1 RESENDEC+38
DSPERX^PSOERUT EN+35
WRAP^PSOERUT EN1+8
$$CHECKREC^PSOERX1H EN+43
ASKCONT^PSOERX1H RESENDEC+8
BUILDSUM^PSOERX1H RESENDEC+6
CREATEPN^PSOERX1H SENDCHRQ+71
INCERX^PSOERXI1 SENDCHRQ+57
$$RESTPOST^PSOERXO1 SENDCHRQ+43
$$HEADER^PSOERXOA SENDCHRQ+9
BHF^PSOERXOA SENDCHRQ+11, SENDCHRQ+37
BL^PSOERXOA SENDCHRQ+15, SENDCHRQ+16, SENDCHRQ+19
MSG^PSOERXOA SENDCHRQ+7, SENDCHRQ+38
RTYPE^PSOERXOA SENDCHRQ+13, SENDCHRQ+36
OALLERGY^PSOERXOB SENDCHRQ+23
OBENEFIT^PSOERXOB SENDCHRQ+24
OFAC^PSOERXOB SENDCHRQ+25
OOBSERVE^PSOERXOB SENDCHRQ+29
PATIENT^PSOERXOC SENDCHRQ+26
OPHARM^PSOERXOD SENDCHRQ+27
PERSON^PSOERXOE SENDCHRQ+28, SENDCHRQ+35
MEDS^PSOERXOG SENDCHRQ+32
MEDREQ^PSOERXON SENDCHRQ+34
UPDSTAT^PSOERXU1 SENDCHRQ+64
DIRE^PSOERXX1 EN+18, EN+21, EN+28, EN+30, EN+33, RESENDEC+37
^PSOLSET EN+12
PAUSE^PSOSPMU1 NOTES+11, NOTES+13, PNCOMM+8
FULL^VALM1 EN+9
$$TRIM^XLFSTR NOTES+10, SENDCHRQ+17
$$NAME^XUAF4 EN+15
$$WHAT^XUAF4 EN+15, EN+17
$$NPI^XUSNPI EN+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",!
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !!,"Institution NPI Number could not be found. Cannot create Change Request."
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !!,$G(IOINHI),"You do not have the appropriate key to access this option.",!,$G(IOINORM)
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!,$G(IOINHI),"Change Request may not be used for this record type.",!,$G(IOINORM)
  • Line Location: EN+28
Function Call: WRITE
  • Prompt: !!,$G(IOINHI),"Change Request can only be made on Response if it has been processed/completed.",!,$G(IOINORM)
  • Line Location: EN+30
Function Call: WRITE
  • Prompt: !!,$G(IOINHI),"The VistA Patient must be matched and validated first.",!,$G(IOINORM)
  • Line Location: EN+33
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+40
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+41
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 ",X," must be replaced before proceeding.",$G(IOINORM),$C(7)
  • Line Location: NOTES+13
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+19
Function Call: WRITE
  • Prompt: !!,"A maximum of 9 Drug Suggestion can be entered!",!,$C(7)
  • Line Location: NOTES+36
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+37
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+38
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+40
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+43
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+45
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+49
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTES+49
Function Call: WRITE
  • Prompt: !?64,"Deleting..."
  • Line Location: NOTES+50
Function Call: WRITE
  • Prompt: "Ok.",!
  • Line Location: NOTES+50
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),"You can only used this action on an existing Change Request eRx record.",$G(IOINORM),!
  • Line Location: RESENDEC+8
Function Call: WRITE
  • Prompt: !
  • Line Location: RESENDEC+11
Function Call: WRITE
  • Prompt: !
  • Line Location: RESENDEC+25
Function Call: WRITE
  • Prompt: !!,"Sending Request to Provider..."
  • Line Location: RESENDEC+29
Function Call: WRITE
  • Prompt: !
  • Line Location: RESENDEC+37
Function Call: WRITE
  • Prompt: !,$P(PSSRET(0),U,2)
  • Line Location: SENDCHRQ+45
Function Call: WRITE
  • Prompt: !,PSSRET("errorMessage")
  • Line Location: SENDCHRQ+46
Function Call: WRITE
  • Prompt: !,"The eRx Processing hub did not return a Hub identification number."
  • Line Location: SENDCHRQ+47
Function Call: WRITE
  • Prompt: "Done."
  • Line Location: SENDCHRQ+56
Function Call: WRITE
  • Prompt: !,"A problem was encountered while trying to file the RxChange request."
  • Line Location: SENDCHRQ+59
Function Call: WRITE
  • Prompt: !,"RxChange Request was not filed in vista."
  • Line Location: SENDCHRQ+60
Function Call: WRITE
  • Prompt: !!,"ERROR: "_$P(RES,U,2)
  • Line Location: SENDCHRQ+61
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+3
Routine Call
  • DIC
  • Line Location:
    • SENDCHRQ+69
Routine Call
  • DIR
  • Line Location:
    • EN1+11
    • EN1+37
    • NOTES+33
    • NOTES+40
    • NOTES+45
    • NOTES+49
    • NOTES+57
    • PNCOMM+3
    • RESENDEC+13
    • RESENDEC+27
    • SENDCHRQ+45
    • SENDCHRQ+46
    • SENDCHRQ+47
    • SENDCHRQ+62
    • EXIT+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.45 - [#52.45] GET1^DIQ
^PS(52.49 - [#52.49] GET1^DIQ
^PS(59 - [#59] GET1^DIQ
^TIU(8925.1 - [#8925.1] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.45 - [#52.45] EN1+2, EN1+27
^PS(52.49 - [#52.49] EN+37, RESENDEC+4, SENDCHRQ+31, SENDCHRQ+70
^TMP("PSOERCR0" SENDCHRQ+6
^TMP("PSOERN2P" NOTES+1!, NOTES+2*, NOTES+9, NOTES+10, NOTES+11, NOTES+15
^XUSEC("PSDRPH" EN+20
^XUSEC("PSO ERX ADV TECH" EN+20

Label References

Name Line Occurrences
EN1 EN+7, EN1+12, RESENDEC+14, EXIT+5
EXIT EN+12, EN1+21, NOTES+14, NOTES+17, NOTES+53, PNCOMM+3, RESENDEC+13, RESENDEC+27
NOTES PNCOMM+6
RESENDEC EN+24, EN+46
SENDCHRQ RESENDEC+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CHRQTYPE NOTES+18, NOTES+53, RESENDEC+22, RESENDEC+23
>> CNT RESENDEC+31*, SENDCHRQ+15, SENDCHRQ+16, SENDCHRQ+19, SENDCHRQ+23, SENDCHRQ+24, SENDCHRQ+25, SENDCHRQ+26, SENDCHRQ+27, SENDCHRQ+28
, SENDCHRQ+29, SENDCHRQ+32, SENDCHRQ+34, SENDCHRQ+35
CODE EN+1~, EN1+1*, EN1+2*, EN1+3, EN1+4, EN1+5, EN1+6, EN1+27*, EN1+28, EN1+29
EN1+30, EN1+31, EN1+32, EN1+33, EN1+34
CODETYPE EN+4~, EN1+26*, EN1+27
CRERXIEN EN+4~, SENDCHRQ+70*, SENDCHRQ+71
CRFOUND EN+4~, EN+37*, EN+38*, EN+39, EN+40
CRMED EN+1~, NOTES+36*, NOTES+41*
CRMEDS EN+1~, NOTES+51!, RESENDEC+22, RESENDEC+35, SENDCHRQ~, SENDCHRQ+34, SENDCHRQ+71
CRMEDS( NOTES+21, NOTES+50!, NOTES+51*
CRMEDS(0 PNCOMM+6, SENDCHRQ+34, EXIT+2
CRMEDS(99 NOTES+36
DDWFLAGS EN+4~
DELMED EN+2~, NOTES+46*, NOTES+50
DESC EN+1~, EN+3~, EN1+6!
DESC( EN1+7
DESC(1 EN1+7
DIC EN+2~, NOTES+5*
DIR EN+1~, EN1+1!, EN1+23!, NOTES+23!, NOTES+39!, NOTES+44!, NOTES+47!, NOTES+54!, PNCOMM+1!, RESENDEC+11!
RESENDEC+25!, SENDCHRQ+45!, SENDCHRQ+46!, SENDCHRQ+47!, SENDCHRQ+62!, EXIT+3!
DIR("?" EN1+1*, EN1+5*, EN1+9*, EN1+25*, EN1+32*, NOTES+26*, NOTES+27*, NOTES+29*, NOTES+30*, NOTES+31*
NOTES+32*, NOTES+56*, PNCOMM+2*
DIR("A" EN1+10*, EN1+36*, NOTES+24*, NOTES+39*, NOTES+44*, NOTES+48*, NOTES+54*, PNCOMM+1*, RESENDEC+12*, RESENDEC+26*
EXIT+4*
DIR("B" EN1+10*, EN1+36*, NOTES+47*, NOTES+55*, PNCOMM+1*, RESENDEC+11*, RESENDEC+25*, EXIT+3*
DIR("L" EN1+23*, EN1+24*, EN1+31*, EN1+34*, EN1+35*
DIR(0 EN1+1*, EN1+4*, EN1+23*, EN1+29*, NOTES+23*, NOTES+39*, NOTES+44*, NOTES+47*, NOTES+54*, PNCOMM+1*
RESENDEC+11*, RESENDEC+25*, SENDCHRQ+45*, SENDCHRQ+46*, SENDCHRQ+47*, SENDCHRQ+62*, EXIT+3*
DIROUT EN+2~, EN1+11, EN1+37, NOTES+34, NOTES+40, NOTES+45, NOTES+49, NOTES+53, NOTES+57, RESENDEC+13
RESENDEC+27
DIRUT EN+2~, EN1+11, EN1+37, NOTES+34, NOTES+40, NOTES+45, NOTES+49, NOTES+53, NOTES+54!, NOTES+57
PNCOMM+1!, RESENDEC+13, RESENDEC+27
DIV EN+3~, SENDCHRQ+41*, SENDCHRQ+57
DIWESUB EN+2~, NOTES+7*
DUOUT EN+2~, NOTES+8
DUZ EN+20, SENDCHRQ+53
DWLW EN+2~, NOTES+6*
DWPK EN+2~, NOTES+6*
ERROR EN+3~, NOTES+19*, NOTES+22*, NOTES+36*
ERXBTCHFLG EN+7, EN1+12, NOTES+18, NOTES+53, RESENDEC+1, RESENDEC+16, SENDCHRQ~, SENDCHRQ+64, SENDCHRQ+71
ERXIEN EN+8, EN+26, EN+32, EN+35, EN+37, EN+46*, EN1+12, RESENDEC+3, RESENDEC+4, RESENDEC+6
RESENDEC+7, RESENDEC+33*, RESENDEC+35, SENDCHRQ~, SENDCHRQ+9, SENDCHRQ+23, SENDCHRQ+24, SENDCHRQ+25, SENDCHRQ+26, SENDCHRQ+27
, SENDCHRQ+28, SENDCHRQ+29, SENDCHRQ+31, SENDCHRQ+32, SENDCHRQ+35, SENDCHRQ+42, SENDCHRQ+54, SENDCHRQ+63, SENDCHRQ+64, SENDCHRQ+71
, SENDCHRQ+72*, EXIT+1*
ERXSTS EN+1~, EN+26*, EN+27, EN+29, SENDCHRQ+5~, SENDCHRQ+63*, SENDCHRQ+64
EXTRCODE EN+1~, EN1+15*, EN1+21, EN1+24, EN1+26, EN1+30, EN1+31, EN1+32, EN1+33, EN1+34
EN1+35, EN1+40, NOTES+17, PNCOMM+6, RESENDEC+18, SENDCHRQ+15
EXTSCODE EN+1~, EN1+14*, EN1+22, EN1+40*, RESENDEC+19, SENDCHRQ+16
FDAPNCOM EN+2~
FINISH EN+3~, NOTES+4*, NOTES+9, NOTES+11*, NOTES+13*, NOTES+19*, NOTES+20, NOTES+34*, NOTES+42*
GBL EN+3~, SENDCHRQ+5~, SENDCHRQ+6*, SENDCHRQ+7, SENDCHRQ+9, SENDCHRQ+11, SENDCHRQ+13, SENDCHRQ+15, SENDCHRQ+16, SENDCHRQ+19
, SENDCHRQ+23, SENDCHRQ+24, SENDCHRQ+25, SENDCHRQ+26, SENDCHRQ+27, SENDCHRQ+28, SENDCHRQ+29, SENDCHRQ+32, SENDCHRQ+34, SENDCHRQ+35
, SENDCHRQ+36, SENDCHRQ+37, SENDCHRQ+38, SENDCHRQ+43, SENDCHRQ+51, SENDCHRQ+52, SENDCHRQ+58, SENDCHRQ+73
HELP EN+2~, EN1+7*, EN1+8
HLP EN+1~, EN1+1*, EN1+5*, EN1+9*, EN1+24*, EN1+32*
HUBID EN+3~, SENDCHRQ+47*, SENDCHRQ+49*, SENDCHRQ+55*, SENDCHRQ+57, SENDCHRQ+67, SENDCHRQ+70
I EN+1~, EN1+7*, EN1+9*, NOTES+2*, NOTES+4*, NOTES+9*, NOTES+10, NOTES+15*, NOTES+20*, NOTES+51*
, SENDCHRQ+17*, SENDCHRQ+50~, SENDCHRQ+51*, SENDCHRQ+52
>> II NOTES+25*, NOTES+26*, NOTES+27*, NOTES+29*, NOTES+30*, NOTES+31*
INDEX EN+1~, EN1+1!, EN1+23!
INDEX( EN1+3*, EN1+14, EN1+15, EN1+28*, EN1+38, EN1+39
INSTNAME EN+3~, EN+15*, SENDCHRQ+41
INSTNPI EN+3~, EN+16*, EN+17*, EN+18, SENDCHRQ+41
>> IOINHI EN+21, EN+28, EN+30, EN+33, EN+40, EN1+13, NOTES+11, NOTES+13, PNCOMM+7, PNCOMM+8
RESENDEC+8
>> IOINORM EN+21, EN+28, EN+30, EN+33, EN+40, EN1+13, NOTES+11, NOTES+13, PNCOMM+7, PNCOMM+8
RESENDEC+8
LINE EN+1~, EN+3~, EN1+24*, EN1+31*, EN1+34*, EN1+35*, NOTES+19*
MED EN+1~, NOTES+21*, NOTES+51*
MEDCNT EN+1~, NOTES+21*, NOTES+23, NOTES+24, NOTES+28, NOTES+39, NOTES+44
MEDTYPE EN+5~, SENDCHRQ+31*, SENDCHRQ+32
MESSID EN+4~, SENDCHRQ+9*
MSGTYPE EN+1~, EN+26*, EN+27, EN+29
NOTE2PRV EN+5~, NOTES+55, NOTES+58*, RESENDEC+23
NPIINST EN+3~, EN+15*, EN+16, EN+17
NPLEN EN+4~, NOTES+5*, NOTES+11*
ORGRXIEN EN+4~, EN+24*, EN+46*, RESENDEC+4*, RESENDEC+33
PNCOMM EN+4~, PNCOMM+1, PNCOMM+4*, RESENDEC+5*, RESENDEC+7!*, RESENDEC+20, SENDCHRQ+71
>> PSNPINST EN+13*
PSOBTDAT RESENDEC+17!
PSOBTDAT("CRMEDS" RESENDEC+22*
PSOBTDAT("EXTRCODE" RESENDEC+18*
PSOBTDAT("EXTSCODE" RESENDEC+19*
PSOBTDAT("NOTE2PRV" RESENDEC+23*
PSOBTDAT("PNCOMM" RESENDEC+20*
PSOBTDAT("REATXT" RESENDEC+21*
>> PSOIEN RESENDEC+4
>> PSOPAR EN+12
PSOQUIT EN+3~, EN1+20*, EN1+21, EN1+37*, NOTES+3*, NOTES+4, NOTES+8*, NOTES+14, NOTES+17, NOTES+19*
NOTES+20, NOTES+33*
>> PSOSITE EN+12, EN+13, EN+15, SENDCHRQ+26, SENDCHRQ+27, SENDCHRQ+28, SENDCHRQ+35
PSSRET EN+3~, SENDCHRQ+43*
PSSRET("errorMessage" SENDCHRQ+46
PSSRET("outboundMsgId" SENDCHRQ+47
PSSRET(0 SENDCHRQ+45
REACODCH EN+4~, EN1+1!, EN1+14*, EN1+22
REACODE EN+1~, EN1+10, EN1+14, EN1+15*, EN1+17, EN1+18
REASCODE EN+1~, EN1+14*, EN1+36, EN1+38, EN1+39*, EN1+40, EN1+42, EN1+43
REASONTXT EN+4~, SENDCHRQ+17*, SENDCHRQ+18*, SENDCHRQ+19
REATXT EN+2~, EN1+14!, EN1+16, EN1+17, EN1+38!, EN1+41, EN1+42, NOTES+15!, PNCOMM+6, RESENDEC+21
REATXT( NOTES+2, NOTES+15*, SENDCHRQ+17
RECARY EN+3~, EN+43
RECARY( EN+38*, EN+46
RECENTRY EN+2~, EN+44*, EN+45, EN+46
RECFOUND EN+4~, EN+24*!, EN+45, EN+46*, EN1+22, RESENDEC+1, RESENDEC+2, RESENDEC+5*
RELERX EN+4~, EN+37*, EN+38
RES SENDCHRQ+50~, SENDCHRQ+57, SENDCHRQ+58, SENDCHRQ+61
>> RESEND EN+24, RESENDEC+1, RESENDEC+33, SENDCHRQ+64, SENDCHRQ+72, EXIT+1
RTHID EN+3~, SENDCHRQ+54*, SENDCHRQ+55
>> RXIEN SENDCHRQ+42*
SELCTREC EN+2~, EN+23*, EN+39, EN+43*, EN+44*, EN+45, RESENDEC+1, RESENDEC+33, SENDCHRQ+64, SENDCHRQ+72
EXIT+1
STATION EN+3~, EN+15*, SENDCHRQ+57
TIUTITLE SENDCHRQ+68~*, SENDCHRQ+69*, SENDCHRQ+71
TMPARR EN+2~, NOTES+51!*
TMPARR( NOTES+51
TMPIEN EN+4~, RESENDEC+4*, SENDCHRQ+72, EXIT+1
U EN+16, SENDCHRQ+45, SENDCHRQ+55, SENDCHRQ+58, SENDCHRQ+61
VADAT EN+3~, SENDCHRQ+53*, SENDCHRQ+57
>> VALMBCK EN+9*
WRPHELP EN+2~, EN1+8!
WRPHELP( EN1+9
X EN+1~, EN+2~, EN1+6*, EN1+18*, EN1+43*, NOTES+10*, NOTES+11, NOTES+12, NOTES+13, NOTES+33
XXL1 SENDCHRQ+50~, SENDCHRQ+52*, SENDCHRQ+57
Y EN+1~, EN1+12, EN1+14, EN1+15, EN1+38, EN1+39, NOTES+35, NOTES+38, NOTES+41, NOTES+42
NOTES+43, NOTES+46, NOTES+49, NOTES+58, PNCOMM+3, PNCOMM+4, RESENDEC+14, RESENDEC+27, EXIT+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All