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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BLRLABJD

Package: IHS Changes To Lab

Routine: BLRLABJD


Information

BLRLABJD ;IHS/MSC/MKK - Display Lab Job(s) (including HLZTCP) detail, if running; 17-Oct-2014 09:22 ; MKK

Source Information

Source file <BLRLABJD.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS Changes To Lab 1 (EEP,HEADERDT,PRESSKEY)^BLRGMENU  
Kernel 1 $$TRIM^XLFSTR  

Entry Points

Name Comments DBIA/ICR reference
JOBVBRKS ; EP -- JOB Variables BReaKOut -- System variables
PEP ; EP
EEP ; EP - Ersatz EP
RESTHEAD ; EP - Rest of HEADER array
BLRHLZTL ; EP - Line of Data
BLRHLZTI ; EP -- Initialization
GETSYS(WOTDETAIL) ; EP -- Get System Information
JOBVBRKO ; EP -- JOB Variables BReaKOut
EP ; EP

External References

Name Field # of Occurrence
EEP^BLRGMENU EEP+1
HEADERDT^BLRGMENU BLRHLZTI+16, RESTHEAD+7
PRESSKEY^BLRGMENU PEP+10
$$TRIM^XLFSTR BLRHLZTI+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?4,CNTJOBS," Jobs analyzed."
  • Line Location: PEP+7
Function Call: WRITE
  • Prompt: !!,?9,$S(CNT<1:"No",1:CNT)," Lab Job"_$S(CNT>1:"s.",1:".")
  • Line Location: PEP+8
Function Call: WRITE
  • Prompt: !!,?14,$S(CNTTCP<1:"No HLZTCP Jobs found on the system.",1:CNTTCP_" HLZTCP Job"_$S(CNTTCP>1:"s.",1:"."))
  • Line Location: PEP+9
Function Call: WRITE
  • Prompt: ?4,"Job Analysis"
  • Line Location: BLRHLZTI+17
Function Call: WRITE
  • Prompt: "."
  • Line Location: BLRHLZTL+6
Function Call: WRITE
  • Prompt: !,?4
  • Line Location: BLRHLZTL+6
Function Call: WRITE
  • Prompt: PID
  • Line Location: BLRHLZTL+17
Function Call: WRITE
  • Prompt: ?9,$E(RTN,1,8)
  • Line Location: BLRHLZTL+18
Function Call: WRITE
  • Prompt: ?19,$E($G(PORT),1,6)
  • Line Location: BLRHLZTL+19
Function Call: WRITE
  • Prompt: ?27,$E($G(IPADDR),1,17)
  • Line Location: BLRHLZTL+20
Function Call: WRITE
  • Prompt: ?43,$G(UCI)
  • Line Location: BLRHLZTL+21
Function Call: WRITE
  • Prompt: !
  • Line Location: BLRHLZTL+22

Label References

Name Line Occurrences
$$GETSYS BLRHLZTL+8, JOBVBRKS+1, JOBVBRKS+2, JOBVBRKS+3, JOBVBRKS+4
BLRHLZTI PEP+3
BLRHLZTL PEP+5
JOBVBRKO BLRHLZTL+13
JOBVBRKS JOBVBRKO+1
RESTHEAD BLRHLZTL+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BLRVERN BLRHLZTI+1*
>> CNT PEP+8, BLRHLZTI+19*, BLRHLZTL+6, BLRHLZTL+15, BLRHLZTL+24*
>> CNTJOBS PEP+7, BLRHLZTI+19*, BLRHLZTL+4*
>> CNTTCP PEP+9, BLRHLZTI+19*, BLRHLZTL+11*
>> DEFUCI BLRHLZTI+12*
>> DILOCKTM PEP+1
>> DISYS PEP+1
DT PEP+1
DTIME PEP+1
DUZ PEP+1
>> GETWOT GETSYS+1*, GETSYS+2
>> HEADER(1 BLRHLZTI+14*
>> HEADER(2 BLRHLZTI+15*
>> HEADER(3 RESTHEAD+1*, RESTHEAD+2*, RESTHEAD+3*, RESTHEAD+4*, RESTHEAD+5*
>> HLZTCPCNT JOBVBRKO+7*
IO PEP+1
>> IOBS PEP+1
IOF PEP+1
IOM PEP+1
ION PEP+1
>> IOS PEP+1
IOSL PEP+1
IOST PEP+1
>> IOT PEP+1
>> IOXY PEP+1
>> IPADDR BLRHLZTL+20, JOBVBRKS+2*
>> LINES BLRHLZTL+23*
>> LOOKHERE JOBVBRKO+6*, JOBVBRKO+7*
>> PID BLRHLZTL+1*, BLRHLZTL+2, BLRHLZTL+17
>> PORT BLRHLZTL+19, JOBVBRKO+3*, JOBVBRKO+4*, JOBVBRKS+3*
>> RSET BLRHLZTI+21*
>> RTN BLRHLZTL+8*, BLRHLZTL+9, BLRHLZTL+11, BLRHLZTL+18, JOBVBRKO+7
>> SYSCALL BLRHLZTI+9*, BLRHLZTI+10*, GETSYS+1
U PEP+1
>> UCI BLRHLZTL+21, JOBVBRKS+1*, JOBVBRKS+5
>> USERNAME JOBVBRKS+4*, JOBVBRKS+5*
WOTDETAIL GETSYS~, GETSYS+1
>> WOTSYS BLRHLZTI+7*, BLRHLZTI+9, BLRHLZTI+10
>> XPARSYS PEP+1
>> XQXFLG PEP+1

Marked Items

Name Field # of Occurrence
$T( BLRHLZTI+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  Marked Items |  All