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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSXNOCMP

Package: CMOP

Routine: PSXNOCMP


Information

PSXNOCMP ;BIR/WRT,HTW-Outpatient drugs not marked to send to CMOP ;[ 10/19/98 8:50 AM ]

Source Information

Source file <PSXNOCMP.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
National Drug File 1 $$PROD2^PSNAPIS  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
CMOP 1 PSXX NOCMOP  

Entry Points

Name Comments DBIA/ICR reference
WRITE
STAT
STAT1
TITLE
LOOPA
DVC
QUEUE
ENQ ;Called by Taskman to print all drugs marked for OP but not CMOP
DONE
LOOP2
LOOP

External References

Name Field # of Occurrence
^%DT TITLE+2
^%ZIS DVC
^%ZISC QUEUE, DONE
^%ZTLOAD QUEUE
$$PROD2^PSNAPIS LOOP2+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report will print all drugs marked for Outpatient use which are non-",!,"controlled substances and are not marked to transmit to CMOP.",!
  • Line Location: PSXNOCMP+3
Function Call: WRITE
  • Prompt: "This report requires 132 columns."
  • Line Location: PSXNOCMP+4
Function Call: WRITE
  • Prompt: !,"You may queue the report to print, if you wish.",!!
  • Line Location: PSXNOCMP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE+0
Function Call: WRITE
  • Prompt: !,?33,"OUTPATIENT DRUGS NOT MARKED TO SEND TO CMOP"
  • Line Location: TITLE+1
Function Call: WRITE
  • Prompt: !,?100,"Date printed: ",Y,!?100,"Page: ",PSXPGCT,!
  • Line Location: TITLE+2
Function Call: WRITE
  • Prompt: !,"LOCAL DRUG NAME",?54,"STATUS",?75,"VA PRINT NAME",!
  • Line Location: TITLE+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: TITLE+4
Function Call: WRITE
  • Prompt: !,PSXAM,?54,PSXSTAT,?75,PSXVAP,!
  • Line Location: WRITE+1
Routine Call
  • %ZIS
  • Line Location:
    • DVC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" TITLE+2
^PSDRUG - [#50] LOOP, LOOP2, LOOP2+1, STAT1, STAT1+1, STAT1+2
^PSDRUG("AQ" STAT
^PSDRUG("B" LOOPA, LOOP

Label References

Name Line Occurrences
DONE DVC
DVC DVC
LOOP LOOPA
LOOP2 LOOP
LOOPA ENQ+2
STAT LOOP2+3
STAT1 STAT
TITLE ENQ+2, WRITE
WRITE STAT1, STAT1+1, STAT1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DVC!*, QUEUE!
%ZIS("B" DVC*
CS LOOP2!*
IO ENQ+1
IO("Q" DVC!, QUEUE!, DONE!
IOF DONE, TITLE
IOP DVC!, QUEUE!, DONE!
IOSL ENQ+2
IOST DVC
MJLT QUEUE!, DONE!
MJT QUEUE!, DONE!, TITLE+4*
POP DVC!, QUEUE!, DONE!
PSXAM DONE!, LOOPA*, LOOP, WRITE+1
PSXB DONE!, LOOP*, LOOP2, LOOP2+1, STAT, STAT1, STAT1+1, STAT1+2
PSXCMOP DONE!, LOOP2+2*, LOOP2+3
PSXDN DONE!, LOOP2+1*
PSXGN DONE!, LOOP2+1*, LOOP2+2
PSXPGCT ENQ+2*, DONE!, TITLE*, TITLE+2
PSXPGLNG ENQ+2*, DONE!, WRITE
PSXSTAT DONE!, STAT1*, STAT1+1*, STAT1+2*, WRITE+1
PSXVAP DONE!, LOOP2+3*, WRITE+1
PSXVP DONE!, LOOP2+1*, LOOP2+2
X DONE!, TITLE+2*
Y DONE!, TITLE+2
>> ZTDESC QUEUE*
>> ZTDTH QUEUE*
>> ZTQUEUED DONE
>> ZTREQ DONE*
>> ZTRTN QUEUE*
ZTSK QUEUE!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All