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

Package: Drug Accountability

Routine: PSALND


Information

PSALND ;BIR/LTL-Report Potential NDC Matches ;7/23/97

Source Information

Source file <PSALND.m>

Entry Points

Name Comments DBIA/ICR reference
DEV ;asks device and queueing info
START ;compiles and prints data for report
LOOP
QUIT
HEADER ;prints header info

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: ?40,$G(^PRC(441,+PSAIT,1,1,0))
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: QUIT+1
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: !?2,"Unlinked DRUG/ITEM MASTER file entries by common NDC",?55,PSARPDT,?70,"PAGE: "_PSAPG,!,PSALN,!,"DRUG file",?40,"ITEM MASTER file"
  • Line Location: HEADER+3
Info |  Source |  Entry Points |  Interaction Calls