Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSNCLS

Package: National Drug File

Routine: PSNCLS


Information

PSNCLS ;BIR/WRT-VA Drug Class Report ;01/12/98 5:18 PM

Source Information

Source file <PSNCLS.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
National Drug File 1 CLS^PSNHELP1  
VA Fileman 1 EN1^DIP  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
National Drug File 1 PSNCLS  

Entry Points

Name Comments DBIA/ICR reference
SORT
PRINT
DONE

External References

Name Field # of Occurrence
EN1^DIP SORT
CLS^PSNHELP1 PSNCLS+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report will display the VA Drug Classification code and class name.",!
  • Line Location: PSNCLS+2
Function Call: READ
  • Prompt: "Would you also like to see the class descriptions? N// "
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: PSNCLS+3
Function Call: WRITE
  • Prompt: !,$S($P(^PS(50.605,D0,0),"^",4)=0:$P(^(0),"^"),$P(^PS(50.605,D0,0),"^",4)=1:" "_$P(^(0),"^"),$P(^PS(50.605,D0,0),"^",4)=2:" "_$P(^(0),"^"),1:$P(^PS(50.605,D0,0),"^")),?14,$P(^(0),"^",2)
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: !,$P(^PS(50.605,D0,1,NOD,0),"^",1)
  • Line Location: PRINT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.605 - [#50.605] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.605 - [#50.605] PRINT, PRINT+1

Label References

Name Line Occurrences
DONE PSNCLS+3, PSNCLS+5
PSNCLS PSNCLS+3, PSNCLS+4

Naked Globals

Name Field # of Occurrence
^(0 PRINT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS PSNCLS+3*!, PSNCLS+4!, PSNCLS+5, DONE!, PRINT+1
>> BY SORT*
>> D0 PRINT, PRINT+1
>> DHD SORT*
>> DIC SORT*
DTIME PSNCLS+3
>> FLDS SORT*
>> FR SORT*
>> L SORT*
NOD DONE!, PRINT+1*
>> TO SORT*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All