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

Package: CMOP

Routine: PSXCSUTL


Information

PSXCSUTL ;BIR/JMB-Utilities for Cost Routines ;[ 04/09/98 9:41 AM ]

Source Information

Source file <PSXCSUTL.m>

Entry Points

Name Comments DBIA/ICR reference
NAME ;Gets drug name by looking up drug ID #
MN ;Gets month & yr
IDYN
ID
BEG
EN
FACYN ;Gets facility
FAC
DV
NODATA ;No data in file
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: IDYN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !!,"Future dates are not allowed!",!
  • Line Location: BEG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FACYN+2
Function Call: WRITE
  • Prompt: !,"There is no data for "_XSITE
  • Line Location: FAC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FAC+6
Function Call: WRITE
  • Prompt: !!?4,"** There is no CMOP cost data between "_PSXSDATE_" and "_PSXEDATE_". **"
  • Line Location: NODATA+1
Function Call: WRITE
  • Prompt: !!?4,"Use the Date Range Compile/Recompile Cost Data option to compile the",!?4,"cost data for this date range."
  • Line Location: NODATA+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls
4.9999 GET1^DIQ
^PSDRUG - [#50] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call