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 |  Entry Points |  External References |  Interaction Calls |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECXDRUG

Package: DSS Extracts

Routine: ECXDRUG


Information

ECXDRUG ;BIR/DMA-Report of Drugs Missing Class or NDC ; 6/7/05 1:42pm

Source Information

Source file <ECXDRUG.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Pharmacy Data Management 1 DATA^PSS50  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
OUT
HEAD

External References

Name Field # of Occurrence
^%ZIS ECXDRUG+3
^%ZISC ECXDRUG+4, OUT
^%ZTLOAD ECXDRUG+4
^DIR HEAD
DATA^PSS50 EN+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"This routine will generate a list of drugs missing either VA Class or NDC.",!,"These two elements make up the feeder key for your drug products,",!,"and should be entered.",!!,"Note - supply items may not have an NDC",!!
  • Line Location: ECXDRUG+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,?25,"DRUG NAME",?48,"MISSING",?58,"MISSING",?68,"SUPPLY",!,?49,"CLASS",?60,"NDC",?69,"ITEM",!
  • Line Location: HEAD+1
Routine Call
  • %ZIS
  • Line Location:
    • ECXDRUG+3
Routine Call
  • DIR
  • Line Location:
    • HEAD

Label References

Name Line Occurrences
HEAD EN+6, EN+10

Naked Globals

Name Field # of Occurrence
^(2 EN+9
^(3 EN+9
^(31 EN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ECXDRUG+3*!
A EN+1~, EN+9*, EN+10, EN+11
A1 EN+1~
ARRAY EN+1~, EN+2*, EN+3, EN+7, EN+8, EN+9, EN+12
B EN+1~, EN+9*, EN+10, EN+11
DIR EN+1~
DIR(0 HEAD*
DIRUT EN+1~
DR EN+1~, EN+7*, EN+8
DT EN+5
ECQ EN+1~, EN+7, EN+8, HEAD*
IO("Q" ECXDRUG+4
IOF ECXDRUG+2, HEAD+1
IOSL EN+10
IOST HEAD
J EN+1~, EN+8*, EN+9
>> POP ECXDRUG+3
U EN+9, EN+10, EN+11
>> Y HEAD
>> ZTDESC ECXDRUG+4*
>> ZTQUEUED OUT
>> ZTREQ OUT*
>> ZTRTN ECXDRUG+4*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Naked Globals |  Local Variables  | All