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: PSOEXRST

Package: Outpatient Pharmacy

Routine: PSOEXRST


Information

PSOEXRST ;BIR/RTR-Reprint/View HL7 Interface batch ;1/1/96

Source Information

Source file <PSOEXRST.m>

Entry Points

Name Comments DBIA/ICR reference
VW
START
BEG
YLOOP
VWPASS
QUE
END
LIST
HEAD
HEADONE
GETN
ZZNAME
VIEW ;
STAT ;
RACT ;Set activity log

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Enter a date/time range to see all batches sent to the External Interface."
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+3
Function Call: WRITE
  • Prompt: !!,"Gathering batches, please wait...",!
  • Line Location: BEG+6
Function Call: WRITE
  • Prompt: $C(7),!!,"There are no printed batches found for that date/time range!",!
  • Line Location: BEG+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BEG+12
Function Call: WRITE
  • Prompt: !?1,"BATCH",?10,"QUEUED TO PRINT ON:",?40,"PRINTED BY:",?56,$E($P($G(^PS(59,PSOSITE,0)),"^"),1,23),!
  • Line Location: BEG+12
Function Call: WRITE
  • Prompt: AA,!
  • Line Location: BEG+13
Function Call: WRITE
  • Prompt: !?2,AAA,?10,PSODATE,?40,PSOUSER
  • Line Location: BEG+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BEG+19
Function Call: WRITE
  • Prompt: !?1,"BATCH",?10,"QUEUED TO PRINT ON:",?40,"PRINTED BY:",?56,$E($P($G(^PS(59,PSOSITE,0)),"^"),1,23),!,AA
  • Line Location: BEG+19
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+22
Function Call: WRITE
  • Prompt: !!?3,"Nothing chosen to "_$S($G(PSOEXVW):"view",1:"reprint"),!
  • Line Location: BEG+24
Function Call: WRITE
  • Prompt: !!,"Batches selected for "_$S($G(PSOEXVW):"Viewing",1:"Reprint")_" are:",!
  • Line Location: YLOOP+3
Function Call: WRITE
  • Prompt: !,"Batch ",ZZZ," Queued for ",PSODATE," by ",PSOUSER
  • Line Location: YLOOP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: YLOOP+9
Function Call: WRITE
  • Prompt: !
  • Line Location: YLOOP+15
Function Call: WRITE
  • Prompt: !!?3,"Nothing queued to reprint!",!
  • Line Location: YLOOP+15
Function Call: WRITE
  • Prompt: !
  • Line Location: VWPASS+0
Function Call: WRITE
  • Prompt: !!?3,"Nothing queued to print!",!
  • Line Location: VWPASS+0
Function Call: WRITE
  • Prompt: !!,"Nothing queued to Reprint!",!
  • Line Location: VWPASS+3
Function Call: WRITE
  • Prompt: !!,"No Active Labels to Reprint!",!
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !!,"LABEL(S) QUEUED TO PRINT!",!
  • Line Location: QUE+9
Function Call: WRITE
  • Prompt: !!?3,"Nothing queued to reprint!",!
  • Line Location: QUE+10
Function Call: WRITE
  • Prompt: ?44,$G(HLZZDRUG)
  • Line Location: LIST+7
Function Call: WRITE
  • Prompt: !,"END OF LIST"
  • Line Location: LIST+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT NAME",?44,"BATCH ",LLL,!
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT NAME",?44,"BATCH ",LLL,!
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADONE+1
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT NAME",?44,"BATCH ",LLL,!
  • Line Location: HEADONE+1
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT NAME",?44,"BATCH ",LLL,!
  • Line Location: HEADONE+1

FileMan Files Accessed Via FileMan Db Call

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