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

Package: Outpatient Pharmacy

Routine: PSOSULOG


Information

PSOSULOG ;BHAM ISC/RTR-Log of prescriptions on suspense by day ; 11/18/92

Source Information

Source file <PSOSULOG.m>

Entry Points

Name Comments DBIA/ICR reference
LOG
DATE
EDATE
SKIP ;
SKIPC ;
EXIT ;
MESS
REP ;
HEAD ;
BIG ;
HEADB ;
HEADND
CHKADDR
FOREIGN
CHKMAIL
CHKBAD ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LOG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EDATE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDATE+2
Function Call: WRITE
  • Prompt: !!?3,"You are logged in under the "_$P($G(^PS(59,+$G(PSOSITE),0)),"^")_" division.",!
  • Line Location: EDATE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIPC+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIPC+2
Function Call: WRITE
  • Prompt: !,"Task queued to print"
  • Line Location: SKIPC+6
Function Call: WRITE
  • Prompt: !!,"No report printed!",!!
  • Line Location: MESS+0
Function Call: WRITE
  • Prompt: !!,"NO RECORDS TO PRINT",!
  • Line Location: REP+13
Function Call: WRITE
  • Prompt: !!?9,"Patient Name: "_$G(PATNAME)
  • Line Location: REP+23
Function Call: WRITE
  • Prompt: ?62,PSOBAD
  • Line Location: REP+37
Function Call: WRITE
  • Prompt: !
  • Line Location: REP+40
Function Call: WRITE
  • Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS"
  • Line Location: REP+41
Function Call: WRITE
  • Prompt: !,"** END OF REPORT **"
  • Line Location: REP+42
Function Call: WRITE
  • Prompt: ?68,"PAGE: ",$G(PAGE)
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"")
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"")
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !!,"NO RECORDS TO PRINT",!
  • Line Location: BIG+2
Function Call: WRITE
  • Prompt: ?103,PSOBAD
  • Line Location: BIG+25
Function Call: WRITE
  • Prompt: !
  • Line Location: BIG+28
Function Call: WRITE
  • Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS"
  • Line Location: BIG+29
Function Call: WRITE
  • Prompt: !,"** END OF REPORT **"
  • Line Location: BIG+30
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADB+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT",?45,"DRUG",?88,"TYPE",?93,"PRINTED B/D/F",?108,$S($G(PSOSCMOP):"CMOP STATUS",1:""),?122,"PAGE ",$G(PAGE)
  • Line Location: HEADB+3
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: HEADB+3

FileMan Files Accessed Via FileMan Db Call

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