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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSXRESUB

Package: CMOP

Routine: PSXRESUB


Information

PSXRESUB ;BIR/HTW-Resubmit an Rx to the CMOP ;03/11/99 1:14 PM

Source Information

Source file <PSXRESUB.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 NOW^%DTC  ^DIR  
Outpatient Pharmacy 1 TEST^PSOCMOP  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
CMOP 1 PSXR RESUBMIT  

Entry Points

Name Comments DBIA/ICR reference
TOP
END

External References

Name Field # of Occurrence
NOW^%DTC TOP+30
^DIR TOP+3, TOP+27
TEST^PSOCMOP TOP+31

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You are not authorized to use this option."
  • Line Location: PSXRESUB+4
Function Call: WRITE
  • Prompt: !!,"CMOP Prescription Resubmission Utility",!!
  • Line Location: PSXRESUB+5
Function Call: WRITE
  • Prompt: !,"Rx # "_RX_" either does not exist or is an invalid #."
  • Line Location: TOP+5
Function Call: WRITE
  • Prompt: !,"There have been no CMOP transmissions for this Rx. You can not Resubmit it!",!
  • Line Location: TOP+7
Function Call: WRITE
  • Prompt: !!,"This Rx cannot be resubmitted. A later fill has already been entered."
  • Line Location: TOP+17
Function Call: WRITE
  • Prompt: !!,"This Rx cannot be resubmitted. A later fill has already been transmitted to the CMOP."
  • Line Location: TOP+18
Function Call: WRITE
  • Prompt: !!,"This prescription has expired. You cannot resubmit it."
  • Line Location: TOP+19
Function Call: WRITE
  • Prompt: !!,"This Rx has already been resubmitted the maximum allowable times. You cannot resubmit it."
  • Line Location: TOP+20
Function Call: WRITE
  • Prompt: !!,"This Rx is not eligible for resubmission.",!,"The last fill must have a status of 'NOT DISPENSED'.",!
  • Line Location: TOP+21
Function Call: WRITE
  • Prompt: !!,"This Rx is not eligible for resubmission.",!,"The last fill has been returned as a duplicate.",!
  • Line Location: TOP+22
Function Call: WRITE
  • Prompt: !!,"This RX is not eligible for resubmission.",!,"The fill # "_LAST_" appears to have been canceled.",!
  • Line Location: TOP+23
Function Call: WRITE
  • Prompt: !!,"You have chosen Rx # "_RX_" to be resubmitted to the CMOP."
  • Line Location: TOP+24
Function Call: WRITE
  • Prompt: !!,"This is not a CMOP Rx. Make sure the last fill has a Mail routing, the drug is marked for CMOP, etc...",!!
  • Line Location: TOP+33
Routine Call
  • DIR
  • Line Location:
    • TOP+3
    • TOP+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSRX - [#52] TOP+7, TOP+9, TOP+11, TOP+12, TOP+19, TOP+22, TOP+23, TOP+29, TOP+32*
^PSRX("B" TOP+5
^XUSEC("PSXRESUB" PSXRESUB+4

Label References

Name Line Occurrences
END TOP+3, TOP+5, TOP+7, TOP+17, TOP+18, TOP+19, TOP+20, TOP+21, TOP+22, TOP+23
, TOP+27, TOP+35
PSXRESUB TOP+5, TOP+7
TOP TOP+17, TOP+18, TOP+19, TOP+20, TOP+21, TOP+22, TOP+23, TOP+27, TOP+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% TOP+31, END!
CHECK TOP+13*, TOP+18, END!
CT TOP+11*, TOP+12, TOP+15, END!
DIR TOP+3!, TOP+27!, END!
DIR("?" TOP+2*, TOP+26*
DIR("A" TOP+1*, TOP+25*
DIR("B" TOP+25*
DIR(0 TOP+1*, TOP+26*
DIROUT END!
DIRUT TOP+3, TOP+27, END!
DT TOP+19
DUZ PSXRESUB+4
>> I TOP+9*
I52 TOP+5*, TOP+7, TOP+9, TOP+11, TOP+12, TOP+19, TOP+22, TOP+23, TOP+29, TOP+31
, TOP+32, END!
LAST TOP*, TOP+15*, TOP+17, TOP+18, TOP+20, TOP+21, TOP+22, TOP+23, TOP+29, TOP+32
, END!
NODE TOP+12*, TOP+13, TOP+15, END!
PPL TOP+31*, TOP+32, TOP+33, END!
>> PSOSITE TOP+28, TOP+29*, TOP+34*
PSX END!
PSX( TOP+15*, TOP+20, TOP+21, TOP+22, TOP+32
PSXPPL END!
PSXSITEA TOP+28*, TOP+34, END+1!
RF TOP+9*, TOP+17, END!
RX TOP+4*, TOP+5, TOP+24, END!
X END!
Y TOP+4!, TOP+27, END!
ZD TOP+30~, END!
ZD( TOP+31*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All