Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSSMEDRT

Package: Pharmacy Data Management

Routine: PSSMEDRT


Information

PSSMEDRT ;BIR/RTR-Medication Route Utilities ;06/14/07

Source Information

Source file <PSSMEDRT.m>

Entry Points

Name Comments DBIA/ICR reference
MATCH ;Match File 51.2 Med Routes to Standard Med Routes
UNL ;Unlock Med Route
ONE ;Map one Local Medication Routes to Standard Route
ONEX ;
ONEUL ;Unlock Med route
REP ;Med Route Report
START ;
STARTX ;
END ;
HD ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will find local Medication Routes marked for 'ALL PACKAGES' not",!,"mapped to a Standard Medication Route, and prompt you to map the local route.",!
  • Line Location: MATCH+2
Function Call: WRITE
  • Prompt: "This mapping is necessary to perform Dosage checks.",!!,"Searching for unmapped Med Routes..."
  • Line Location: MATCH+3
Function Call: WRITE
  • Prompt: !!,"Another person is editing this Med Route."
  • Line Location: MATCH+13
Function Call: WRITE
  • Prompt: !!!,"Unable to make this match!!"
  • Line Location: MATCH+26
Function Call: WRITE
  • Prompt: !!!,"Checking for any remaining unmapped Local Med Routes..."
  • Line Location: MATCH+31
Function Call: WRITE
  • Prompt: !!!,"There are still local Med Routes marked for 'ALL PACKAGES' not yet mapped,",!,"see the 'Medication Route Mapping Report' option for more details.",!
  • Line Location: MATCH+38
Function Call: WRITE
  • Prompt: !!!,"All Local Med Routes are mapped!",!
  • Line Location: MATCH+39
Function Call: WRITE
  • Prompt: !
  • Line Location: MATCH+40
Function Call: WRITE
  • Prompt: !
  • Line Location: ONEX+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ONEX+3
Function Call: WRITE
  • Prompt: !!!,$P($G(^PS(51.2,PSSMRB,0)),"^")
  • Line Location: ONEX+7
Function Call: WRITE
  • Prompt: !!,"Another person is editing this Med Route."
  • Line Location: ONEX+15
Function Call: WRITE
  • Prompt: !
  • Line Location: ONEX+17
Function Call: WRITE
  • Prompt: !!,"Mapping remains unchanged.",!
  • Line Location: ONEX+21
Function Call: WRITE
  • Prompt: !!!,"Unable to make this match, Med Route is unmatched",!
  • Line Location: ONEX+26
Function Call: WRITE
  • Prompt: !!!,"Local Route: '"_$P($G(^PS(51.2,PSSMRB,0)),"^")_"' has been "_$S(PSSMRB3:"remapped",1:"mapped")_" to",!,"Stnd Route: '"_$P($G(^PS(51.23,PSSMRBAZ,0)),"^")_"' FDB Route: '"_$P($G(^(0)),"^",2)_"'",!
  • Line Location: ONEX+29
Function Call: WRITE
  • Prompt: !!!,"This report will print Medication Route mapping information for Medication",!,"Routes marked for ALL PACKAGES in the PACKAGE USE (#3) Field of the MEDICATION"
  • Line Location: REP+1
Function Call: WRITE
  • Prompt: !,"ROUTES (#51.2) File.",!
  • Line Location: REP+2
Function Call: WRITE
  • Prompt: !!,"No Action taken.",!
  • Line Location: REP+7
Function Call: WRITE
  • Prompt: !!,"No Action taken.",!
  • Line Location: REP+8
Function Call: WRITE
  • Prompt: !!?3,"This report is designed for 132 column format!",!
  • Line Location: REP+10
Function Call: WRITE
  • Prompt: !!,"No Action taken.",!
  • Line Location: REP+11
Function Call: WRITE
  • Prompt: !!,"Report queued to print.",!
  • Line Location: REP+12
Function Call: WRITE
  • Prompt: !,?4,PSSMTEXP
  • Line Location: STARTX+12
Function Call: WRITE
  • Prompt: !,?4,PSSMTEXP
  • Line Location: STARTX+13
Function Call: WRITE
  • Prompt: !!,"TOTAL UNMAPPED MEDICATION ROUTES = "_$G(PSSMTCTB)
  • Line Location: STARTX+19
Function Call: WRITE
  • Prompt: !!,"TOTAL LOCAL MEDICATION ROUTES = "_$G(PSSMTCTA),!,"TOTAL UNMAPPED LOCAL MEDICATION ROUTES = "_$G(PSSMTCTB)
  • Line Location: STARTX+20
Function Call: WRITE
  • Prompt: !!,"End of Report."
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!,"End of Report."
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !
  • Line Location: END+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !,$S(PSSPTYPE="O":"MEDICATION ROUTES MAPPING EXCEPTION REPORT",1:"MEDICATION ROUTES MAPPING REPORT"),?114,"Page: "_$G(PSSTCT)
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!,"MEDICATION ROUTES (File 51.2)"
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !!,"MEDICATION ROUTES (File 51.2)",?47,"STANDARD ROUTE",?100,"FDB ROUTE"
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !?4,"OUTPATIENT EXPANSION",!,PSSTLINE
  • Line Location: HD+5
Info |  Source |  Entry Points |  Interaction Calls