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

Package: Phoenix Devel Center

Routine: AZXRBUG5


Information

AZXRBUG5 ;BUGDRUG2 Report PROGRAM [ 09/23/94 9:52 AM ]

Source Information

Source file <AZXRBUG5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 DD^%DT  ^DIC  
Kernel 1 ^%ZIS  
Phoenix Devel Center 1 ^AZXRBUG7  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Phoenix Devel Center 1 AZXRBUG3  

Entry Points

Name Comments DBIA/ICR reference
INITDRG ;INITIALIZE THE DRUG VARIABLES
CONT ;ASK USER WHETHER TO CONTINUE WITH REPORT PRINT
INCRMNT ;INCREMENT ALL VARIABLES FOR % SENSITIVE, # TESTED
RPTPRT ;ACTUAL PRINTING OF REPORT DATA
EXTORG ;CONVERT Organism_Name TO EXTERNAL FORMAT FOR PRINTING
KILL ;KILL LOCAL VARIABLES AND EXIT ROUTINE AZXRBUG5
REPORT ;SETUP VALUES TO PREPARE FOR REPORT PRINT (RPTPRT)
DTCNVRT ;CONVERT TDATE & FDATE TO EXTERNAL FORMAT (RTDATE, RFDATE)
MAIN ;AZXRBUG5 PROGRAM CONTROL
HEADING ;PRINT OUT THE HEADING FOR EACH NEW PAGE

External References

Name Field # of Occurrence
DD^%DT DTCNVRT+2, DTCNVRT+6
^%ZIS REPORT+8
^AZXRBUG7 MAIN+6, CONT+12
^DIC EXTORG+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"This report must be printed.",!
  • Line Location: REPORT+11
Function Call: WRITE
  • Prompt: ?28,"%|",?30,$J(%AK,3,0),"|",?34,$J(%AM,3,0),"|"
  • Line Location: RPTPRT+32
Function Call: WRITE
  • Prompt: ?38,$J(%AUG,3,0),"|",?42,$J(%C,3,0),"|",?46,$J(%CAX,3,0),"|"
  • Line Location: RPTPRT+33
Function Call: WRITE
  • Prompt: ?50,$J(%CB,3,0),"|",?54,$J(%CC,3,0),"|",?58,$J(%CF,3,0),"|"
  • Line Location: RPTPRT+34
Function Call: WRITE
  • Prompt: ?62,$J(%CFX,3,0),"|",?66,$J(%CP,3,0),"|",?70,$J(%CRM,3,0),"|"
  • Line Location: RPTPRT+35
Function Call: WRITE
  • Prompt: ?74,$J(%DP,3,0),"|",?78,$J(%E1,3,0),"|",?82,$J(%FM,3,0),"|"
  • Line Location: RPTPRT+36
Function Call: WRITE
  • Prompt: ?86,$J(%GM,3,0),"|",?90,$J(%NA,3,0),"|",?94,$J(%P,3,0),"|"
  • Line Location: RPTPRT+37
Function Call: WRITE
  • Prompt: ?98,$J(%PI,3,0),"|",?102,$J(%SxT,3,0),"|",?106,$J(%TE,3,0),"|"
  • Line Location: RPTPRT+38
Function Call: WRITE
  • Prompt: ?110,$J(%TI,3,0),"|",?114,$J(%VA,3,0),"|",!
  • Line Location: RPTPRT+39
Function Call: WRITE
  • Prompt: ?28,"#|",?30,$J(AK,3,0),"|",?34,$J(AM,3,0),"|"
  • Line Location: RPTPRT+42
Function Call: WRITE
  • Prompt: ?38,$J(AUG,3,0),"|",?42,$J(C,3,0),"|",?46,$J(CAX,3,0),"|"
  • Line Location: RPTPRT+43
Function Call: WRITE
  • Prompt: ?50,$J(CB,3,0),"|",?54,$J(CC,3,0),"|",?58,$J(CF,3,0),"|"
  • Line Location: RPTPRT+44
Function Call: WRITE
  • Prompt: ?62,$J(CFX,3,0),"|",?66,$J(CP,3,0),"|",?70,$J(CRM,3,0),"|"
  • Line Location: RPTPRT+45
Function Call: WRITE
  • Prompt: ?74,$J(DP,3,0),"|",?78,$J(E1,3,0),"|",?82,$J(FM,3,0),"|"
  • Line Location: RPTPRT+46
Function Call: WRITE
  • Prompt: ?86,$J(GM,3,0),"|",?90,$J(NA,3,0),"|",?94,$J(P,3,0),"|"
  • Line Location: RPTPRT+47
Function Call: WRITE
  • Prompt: ?98,$J(PI,3,0),"|",?102,$J(SxT,3,0),"|",?106,$J(TE,3,0),"|"
  • Line Location: RPTPRT+48
Function Call: WRITE
  • Prompt: ?110,$J(TI,3,0),"|",?114,$J(VA,3,0),"|",!
  • Line Location: RPTPRT+49
Function Call: WRITE
  • Prompt: BORDER2,!
  • Line Location: RPTPRT+54
Function Call: WRITE
  • Prompt: !,$E(ORGCHK,1,27)
  • Line Location: EXTORG+13
Function Call: WRITE
  • Prompt: #
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: !,BORDER1,!
  • Line Location: HEADING+5
Function Call: WRITE
  • Prompt: !,"BugDrug2 Antibiotic Sensitivity"
  • Line Location: HEADING+6
Function Call: WRITE
  • Prompt: ?64,"From Date: ",RFDATE,?91,"--",?97,"To Date: ",RTDATE
  • Line Location: HEADING+7
Function Call: WRITE
  • Prompt: !!,"Facility: ",FAC,?100,"Page: ",PG
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: !,BORDER1
  • Line Location: HEADING+9
Function Call: WRITE
  • Prompt: !!,HEADER
  • Line Location: HEADING+10
Function Call: WRITE
  • Prompt: !,BORDER2,!
  • Line Location: HEADING+11
Function Call: WRITE
  • Prompt: !!!!!!!,"Do you want to print another"
  • Line Location: CONT+6
Function Call: WRITE
  • Prompt: !!,"Answer with: Y= Yes, N= No"
  • Line Location: CONT+10
Routine Call
  • DIC
  • Line Location:
    • EXTORG+10
Routine Call
  • %ZIS
  • Line Location:
    • REPORT+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" REPORT+19
^DIZ(1991018 EXTORG+11
^DIZ(1991020 REPORT+15, INCRMNT+1

Label References

Name Line Occurrences
CONT MAIN+14, CONT+10, CONT+12
DTCNVRT REPORT+12
EXTORG RPTPRT+5
HEADING REPORT+12, RPTPRT+3
INCRMNT REPORT+15
INITDRG MAIN+4, RPTPRT+52, CONT+4
KILL MAIN+15
REPORT MAIN+13, REPORT+11, CONT+12
RPTPRT REPORT+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%AK RPTPRT+8*, RPTPRT+32, INCRMNT+4*, INITDRG+1*, KILL+2!
%AM RPTPRT+9*, RPTPRT+32, INCRMNT+6*, INITDRG+1*, KILL+2!
%AUG RPTPRT+10*, RPTPRT+33, INCRMNT+8*, INITDRG+1*, KILL+2!
%C RPTPRT+11*, RPTPRT+33, INCRMNT+10*, INITDRG+1*, KILL+3!
%CAX RPTPRT+12*, RPTPRT+33, INCRMNT+12*, INITDRG+1*, KILL+3!
%CB RPTPRT+13*, RPTPRT+34, INCRMNT+14*, INITDRG+1*, KILL+3!
%CC RPTPRT+14*, RPTPRT+34, INCRMNT+16*, INITDRG+1*, KILL+3!
%CF RPTPRT+15*, RPTPRT+34, INCRMNT+18*, INITDRG+1*, KILL+3!
%CFX RPTPRT+16*, RPTPRT+35, INCRMNT+20*, INITDRG+1*, KILL+4!
%CP RPTPRT+17*, RPTPRT+35, INCRMNT+22*, INITDRG+2*, KILL+4!
%CRM RPTPRT+18*, RPTPRT+35, INCRMNT+24*, INITDRG+2*, KILL+4!
%DP RPTPRT+19*, RPTPRT+36, INCRMNT+26*, INITDRG+2*, KILL+4!
%E1 RPTPRT+20*, RPTPRT+36, INCRMNT+28*, INITDRG+2*, KILL+4!
%FM RPTPRT+21*, RPTPRT+36, INCRMNT+30*, INITDRG+2*, KILL+5!
%GM RPTPRT+22*, RPTPRT+37, INCRMNT+32*, INITDRG+2*, KILL+5!
%NA RPTPRT+23*, RPTPRT+37, INCRMNT+34*, INITDRG+2*, KILL+5!
%P RPTPRT+24*, RPTPRT+37, INCRMNT+36*, INITDRG+2*, KILL+5!
%PI RPTPRT+25*, RPTPRT+38, INCRMNT+38*, INITDRG+2*, KILL+5!
%SxT RPTPRT+26*, RPTPRT+38, INCRMNT+40*, INITDRG+3*, KILL+6!
%TE RPTPRT+27*, RPTPRT+38, INCRMNT+42*, INITDRG+3*, KILL+6!
%TI RPTPRT+28*, RPTPRT+39, INCRMNT+44*, INITDRG+3*, KILL+6!
%VA RPTPRT+29*, RPTPRT+39, INCRMNT+46*, INITDRG+3*, KILL+6!
%ZIS KILL+1!
%ZIS("B" REPORT+5*
AK RPTPRT+8, RPTPRT+42, INCRMNT+4*, INCRMNT+5*, INITDRG+4*, KILL+2!
AM RPTPRT+9, RPTPRT+42, INCRMNT+6*, INCRMNT+7*, INITDRG+4*, KILL+2!
AUG RPTPRT+10, RPTPRT+43, INCRMNT+8*, INCRMNT+9*, INITDRG+4*, KILL+2!
BORDER1 REPORT+2*, HEADING+5, HEADING+9, KILL+1!
BORDER2 REPORT+3*, RPTPRT+54, HEADING+11, KILL+1!
C RPTPRT+11, RPTPRT+43, INCRMNT+10*, INCRMNT+11*, INITDRG+4*, KILL+3!
CAX RPTPRT+12, RPTPRT+43, INCRMNT+12*, INCRMNT+13*, INITDRG+4*, KILL+3!
CB RPTPRT+13, RPTPRT+44, INCRMNT+14*, INCRMNT+15*, INITDRG+4*, KILL+3!
CC RPTPRT+14, RPTPRT+44, INCRMNT+16*, INCRMNT+17*, INITDRG+4*, KILL+3!
CF RPTPRT+15, RPTPRT+44, INCRMNT+18*, INCRMNT+19*, INITDRG+4*, KILL+3!
CFX RPTPRT+16, RPTPRT+45, INCRMNT+20*, INCRMNT+21*, INITDRG+4*, KILL+4!
CP RPTPRT+17, RPTPRT+45, INCRMNT+22*, INCRMNT+23*, INITDRG+5*, KILL+4!
CRM RPTPRT+18, RPTPRT+45, INCRMNT+24*, INCRMNT+25*, INITDRG+5*, KILL+4!
DA REPORT+15*, INCRMNT+1, KILL+2!
DIC EXTORG+8*, KILL+7!
DIC(0 EXTORG+2*
DP RPTPRT+19, RPTPRT+46, INCRMNT+26*, INCRMNT+27*, INITDRG+5*, KILL+4!
E1 RPTPRT+20, RPTPRT+46, INCRMNT+28*, INCRMNT+29*, INITDRG+5*, KILL+4!
FAC HEADING+8, KILL+7!
FACBKUP MAIN+9, CONT+12, KILL+1!
FCLTY REPORT+15, KILL+2!
FDATE REPORT+15, DTCNVRT+1, KILL+6!
FM RPTPRT+21, RPTPRT+46, INCRMNT+30*, INCRMNT+31*, INITDRG+5*, KILL+5!
GM RPTPRT+22, RPTPRT+47, INCRMNT+32*, INCRMNT+33*, INITDRG+5*, KILL+5!
HEADER REPORT+4*, HEADING+10, KILL+1!
IO REPORT+8, REPORT+10, REPORT+11
IO(0 REPORT+11
IOSL RPTPRT+3
LDATE REPORT+15*, KILL+2!
LN MAIN+3*, RPTPRT+3, RPTPRT+55*, HEADING+13*, CONT+3*, KILL+1!
NA RPTPRT+23, RPTPRT+47, INCRMNT+34*, INCRMNT+35*, INITDRG+5*, KILL+5!
ORG REPORT+14*, REPORT+15*, EXTORG+1, KILL+2!
ORGCHK EXTORG+1*, EXTORG+9, EXTORG+11*, EXTORG+13, KILL+7!
P RPTPRT+24, RPTPRT+47, INCRMNT+36*, INCRMNT+37*, INITDRG+5*, KILL+5!
PG MAIN+2*, HEADING+2, HEADING+3*, HEADING+8, CONT+2*, KILL+1!
PI RPTPRT+25, RPTPRT+48, INCRMNT+38*, INCRMNT+39*, INITDRG+5*, KILL+5!
RFDATE DTCNVRT+3*, HEADING+7, KILL+7!
>> RTDATE DTCNVRT+7*, HEADING+7
SxT RPTPRT+26, RPTPRT+48, INCRMNT+40*, INCRMNT+41*, INITDRG+6*, KILL+6!
TDATE REPORT+15, DTCNVRT+5, KILL+6!
TE RPTPRT+27, RPTPRT+48, INCRMNT+42*, INCRMNT+43*, INITDRG+6*, KILL+6!
TI RPTPRT+28, RPTPRT+49, INCRMNT+44*, INCRMNT+45*, INITDRG+6*, KILL+6!
U EXTORG+11, INCRMNT+4, INCRMNT+5, INCRMNT+6, INCRMNT+7, INCRMNT+8, INCRMNT+9, INCRMNT+10, INCRMNT+11, INCRMNT+12
, INCRMNT+13, INCRMNT+14, INCRMNT+15, INCRMNT+16, INCRMNT+17, INCRMNT+18, INCRMNT+19, INCRMNT+20, INCRMNT+21, INCRMNT+22
, INCRMNT+23, INCRMNT+24, INCRMNT+25, INCRMNT+26, INCRMNT+27, INCRMNT+28, INCRMNT+29, INCRMNT+30, INCRMNT+31, INCRMNT+32
, INCRMNT+33, INCRMNT+34, INCRMNT+35, INCRMNT+36, INCRMNT+37, INCRMNT+38, INCRMNT+39, INCRMNT+40, INCRMNT+41, INCRMNT+42
, INCRMNT+43, INCRMNT+44, INCRMNT+45, INCRMNT+46, INCRMNT+47
VA RPTPRT+29, RPTPRT+49, INCRMNT+46*, INCRMNT+47*, INITDRG+6*, KILL+6!
>> X EXTORG+9*
Y DTCNVRT+1*, DTCNVRT+3, DTCNVRT+5*, DTCNVRT+7, EXTORG+11, KILL+6!
YN CONT+7*, CONT+10, CONT+12, KILL+7!
ZERONODE INCRMNT+1*, INCRMNT+4, INCRMNT+5, INCRMNT+6, INCRMNT+7, INCRMNT+8, INCRMNT+9, INCRMNT+10, INCRMNT+11, INCRMNT+12
, INCRMNT+13, INCRMNT+14, INCRMNT+15, INCRMNT+16, INCRMNT+17, INCRMNT+18, INCRMNT+19, INCRMNT+20, INCRMNT+21, INCRMNT+22
, INCRMNT+23, INCRMNT+24, INCRMNT+25, INCRMNT+26, INCRMNT+27, INCRMNT+28, INCRMNT+29, INCRMNT+30, INCRMNT+31, INCRMNT+32
, INCRMNT+33, INCRMNT+34, INCRMNT+35, INCRMNT+36, INCRMNT+37, INCRMNT+38, INCRMNT+39, INCRMNT+40, INCRMNT+41, INCRMNT+42
, INCRMNT+43, INCRMNT+44, INCRMNT+45, INCRMNT+46, INCRMNT+47, KILL+7!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All