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

Package: Controlled Substances

Routine: PSDADJD


Information

PSDADJD ;BIR/LTL-Review Adjustment Transactions for a Drug; 2 Nov 94 [ 11/02/94 3:53 PM ]

Source Information

Source file <PSDADJD.m>

Entry Points

Name Comments DBIA/ICR reference
LOOK
CHKD
DEV ;asks device and queueing info
START ;compiles and prints output
LOOP
END
HEADER ;prints header info
CHK ;(DAVE B 26OCT99)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOK+3
Function Call: WRITE
  • Prompt: !!,"You may select one, several, or ^ALL drugs."
  • Line Location: LOOK+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKD+0
Function Call: WRITE
  • Prompt: !!,"There have been no adjustments for this drug.",!!
  • Line Location: CHKD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKD+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKD+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR OUTPUT PRINTED!"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"Getting ready to browse...",!!
  • Line Location: DEV+8
Function Call: WRITE
  • Prompt: !,Y," "," -> "
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: !!,"Task #",$G(ZTSK),", ",$G(ZTDESC)," was stopped by ",$P($G(^VA(200,+$G(DUZ),0)),U),"."
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"Adjustments from ",PSDTB(2)," to ",PSDTB(3),?70,"PAGE: ",PG,!,LN
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,PSDU," (continued)",!
  • Condition for execution: $G(PSDT(1))
  • Line Location: HEADER+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSD(58.8 - [#58.8] Classic Fileman Calls
^DIC(9.4 - [#9.4] Classic Fileman Calls,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call