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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSORMRXP

Package: Outpatient Pharmacy

Routine: PSORMRXP


Information

PSORMRXP ;BIRM/JAM - REMOTE DATA INTEROPERABILITY REPORT ; 12/05/08

Source Information

Source file <PSORMRXP.m>

Entry Points

Name Comments DBIA/ICR reference
EN(PSODFN) ;- Remote medication entry point
EXIT ; kill variables before existing...
PRINT ;Print remote medication data
GETSIG ;Get SIG for remote sites from ^TMP($J,"PSORDI",
HEADER ; Print report header for remote prescriptions
EOP ; prints to end of page
HDR ; report header
HDR1 ;Print partial header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,SITE,!
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?21,"MEDICATION PROFILE FROM OTHER VAMC(s)"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?68,"Page: ",$G(PAGE,1),!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?28,"Date Printed: "_$$FMTE^XLFDT(DT,"5ZM"),!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"Patient: "_PSONAM,?60,"DOB: ",PSODOB
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: ?3,"RX #",?15,"DRUG",?50,"ST",?54,"QTY",?59,"ISSUED",?68,"LAST FILLED"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,SITE,!
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: $E($P(DATA,"^",4),1,13),?15,$E($P(DATA,"^",2),1,35)," Cont'd",!
  • Line Location: HDR1+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call