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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: INHOU3

Package: IHS Generic Interface System

Routine: INHOU3


Information

INHOU3 ;DP; 27 Jan 98 15:10;List Queued Tansactions.

Source Information

Source file <INHOU3.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
Kernel 5 ^%ZIS  ^%ZISC  $$UPCASE^%ZTF  ($$CDATASC,$$CDATF2H)^%ZTFDT  ^%ZTLOAD  
VA Fileman 4 ^DDS  HLP^DDSUTL  ^DIC  ^DIK  
Uncategorized 3 ^DWC  MESS^DWD  $$DATEFMT^UTDT  
IHS Generic Interface System 2 ERR^INHMS2  $$SC^INHUTIL1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Generic Interface System 1 INHOU  

Entry Points

Name Comments DBIA/ICR reference
HDR ;Print header
TEXT ;Set up status array
HELP1 ;Help text for IHS
1 ;^INLHDEST QUEUE
0 ;^INLHSCH QUEUE
SHDR ;set header
QZTSK ;TaskMan entry point
CR ;
DIPA ;
CLOSE ;Close device
QUE ;Select que
SEL ;Display selection criteria
DTCHK(INBEG1,INEND1,INH) ;check queue entry to see if it's in time range
QTSK ;Display currently queued entries
HELP ;

External References

Name Field # of Occurrence
^%ZIS QTSK+17, QTSK+27
^%ZISC QTSK+28, CLOSE+1, CLOSE+4
$$UPCASE^%ZTF QUE+3
$$CDATASC^%ZTFDT SHDR+1, SHDR+3, SHDR+5
$$CDATF2H^%ZTFDT QZTSK+23, QZTSK+24
^%ZTLOAD QTSK+25
^DDS QTSK+16
HLP^DDSUTL HELP1+3
^DIC QTSK+7
^DIK QTSK+26
^DWC QTSK+12
MESS^DWD QUE+8
ERR^INHMS2 QTSK+8
$$SC^INHUTIL1 QTSK+11, QTSK+13
$$DATEFMT^UTDT DIPA+6, DIPA+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"Unable to find device"
  • Line Location: QTSK+28
Function Call: WRITE
  • Prompt: !
  • Line Location: CLOSE+2
Function Call: WRITE
  • Prompt: ?IOM-$L(X)\2,X
  • Line Location: CLOSE+3
Function Call: WRITE
  • Prompt: ?IOM-$L(X)\2,X,!
  • Line Location: 0+12
Function Call: WRITE
  • Prompt: ?IOM-$L(X)\2,X,!
  • Line Location: 0+13
Function Call: WRITE
  • Prompt: ?IOM-$L(X)\2,X,!
  • Line Location: 1+13
Function Call: WRITE
  • Prompt: ?IOM-$L(X)\2,X,!
  • Line Location: 1+14
Function Call: WRITE
  • Prompt: $$DATEFMT^UTDT($P(DETL,U),"MM/DD@HH:II")
  • Line Location: DIPA+12
Function Call: WRITE
  • Prompt: ?14,$E($P(DETL,U,16),1,4)
  • Line Location: DIPA+14
Function Call: WRITE
  • Prompt: ?19,$S(PC="":PC,$D(INDX(PC)):INDX(PC),1:PC)
  • Line Location: DIPA+17
Function Call: WRITE
  • Prompt: ?24,$E($P(DETL,U,5),1,18)
  • Line Location: DIPA+19
Function Call: WRITE
  • Prompt: ?35,$E(PC,1,35)
  • Line Location: DIPA+23
Function Call: WRITE
  • Prompt: !?35,$P(^INRHT($P(DETL,U,11),0),U)
  • Line Location: DIPA+25
Function Call: WRITE
  • Prompt: !
  • Line Location: DIPA+27
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,INLN(6)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?IOM-$L(X)-1,X,!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?IOM-$L(INLN(I))\2,INLN(I)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,INLN(7),!,INLN,!
  • Line Location: HDR+12
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: CR+2
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to continue. "
  • Line Location: CR+2
Function Call: WRITE
  • Prompt: !,"Selection Criteria: "
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !,"Queue: ",$S(QUE=0:"INLHSCH",QUE=1:"INLHDEST",1:"All")
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !,"Cut Off Priority: ",$S(PRIO?1.N:PRIO,1:"All")
  • Line Location: SEL+3
Function Call: WRITE
  • Prompt: !,"Direction: ",$S(DIRC="I":"In",DIRC="O":"Out",1:"All")
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !,"Destination: ",$S(DEST="":"All",$D(^INRHD(DEST,0))#2:$P(^(0),U),1:" "_DEST)
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: !,"Detailed: ",$S(INDET=0:"No",1:"Yes"),!
  • Line Location: SEL+6
Function Call: WRITE
  • Prompt: " ",QUE1
  • Line Location: QUE+7
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: QUE+8
Function Call: WRITE
  • Prompt: ?10,QUE1_" is empty",!,?10,"Press <RETURN> to continue. "
  • Line Location: QUE+8
Function Call: WRITE
  • Prompt: !,"Select Queue: 0=INLHSCH"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !," 1=INLHDEST"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"Press 'Enter' to select all queues"
  • Line Location: HELP+3
Routine Call
  • DDS
  • Line Location:
    • QTSK+16
Routine Call
  • DIC
  • Line Location:
    • QTSK+7
Routine Call
  • %ZIS
  • Line Location:
    • QTSK+17
    • QTSK+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("SITE" SHDR+8
^DIC(4 - [#4] SHDR+8
^DIZ(4001.1 - [#4001.1] QTSK+19
^INLHDEST( 1+3, 1+7, 1+10, 1+12
^INLHDEST("" QTSK+4
^INLHSCH 0+2, 0+5, 0+7
^INLHSCH("" QTSK+4
^INRHD - [#4005] 1+6, DIPA+9, DIPA+22, SEL+5
^INRHT - [#4000] DIPA+25
^INTHU - [#4001] 0+8, DIPA+2, DIPA+3
^INTHU("B" QZTSK+16
^UTILITY($J QTSK+1!

Label References

Name Line Occurrences
$$DTCHK 0+5, 1+10
@( QZTSK+26, QZTSK+27
CLOSE QZTSK+25
CR 0+14, 1+15, HDR+2
DIPA QZTSK+26, QZTSK+27, 0+11, 1+12
HDR 0+1, 1+2, 1+4, DIPA+11, DIPA+26
SEL HDR+11
SHDR QZTSK+21
TEXT SHDR+13

Naked Globals

Name Field # of Occurrence
^(0 DIPA+9, DIPA+22, SHDR+8, SEL+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QZTSK+1~
>> %ZIS QTSK+17*, QTSK+27*
>> CNT 0+1*, 0+11*, 0+12, 0+13, 1+2*, 1+12*, 1+13, 1+14
COUNT QZTSK+2~
D0 QZTSK+1~, 0+4*, 0+7*, 0+8, 1+9*, 1+12*, DIPA+1
DA QTSK+2~, QTSK+9*, QTSK+26*, QZTSK+2~
DDSFILE QTSK+3~, QTSK+15*
DDSPAGE QTSK+3~, QTSK+15*
DDSPARM QTSK+3~, QTSK+15*
DDSSAVE QTSK+3~, QTSK+13
DES QZTSK+2~, 1+2*, 1+3*, 1+5, 1+6, 1+7, 1+10, 1+12
DEST QZTSK+2~, QZTSK+13*, 0+10, 1+5, SEL+5
DETL QZTSK+2~, 0+8*, 0+9, 0+10, DIPA+3*, DIPA+5, DIPA+7, DIPA+8, DIPA+9, DIPA+12
, DIPA+14, DIPA+16, DIPA+19, DIPA+21, DIPA+25
DIC QTSK+2~, QTSK+6*, QTSK+14~*, QTSK+26
DIC(0 QTSK+6*
DIE QTSK+2~, QTSK+9*, QTSK+15
DIK QTSK+2~, QTSK+26*
DIOUT QZTSK+1~
DIP DIPA+12!
DIRC QZTSK+2~, QZTSK+11*, 0+9, 1+1, SEL+4
DIZ QTSK+19~
DIZ( QTSK+19*, QZTSK+5, QZTSK+7, QZTSK+9, QZTSK+11, QZTSK+13, QZTSK+15, QZTSK+19
>> DLAYGO QTSK+6*
DR QTSK+3~, QTSK+15*
DT QZTSK+20
DTIME CR+2, QUE+8
DUOUT QZTSK+1~
DUZ QTSK+6
>> DWASK QTSK+12*
>> DWFILE QTSK+11
>> DWN QTSK+9*, QTSK+15
>> I CLOSE+2*, HDR+7*
INBEG QZTSK+2~, QZTSK+15*, QZTSK+16*, QZTSK+17*, QZTSK+23, SHDR+3
INBEG1 QZTSK+2~, QZTSK+23*, 0+4, 0+5, 0+6, 1+9, 1+10, 1+11, DTCHK~, DTCHK+7
, DTCHK+8
>> INDA QTSK+7*, QTSK+9, QTSK+19, QTSK+25, QTSK+26, QZTSK+5, QZTSK+7, QZTSK+9, QZTSK+11, QZTSK+13
, QZTSK+15, QZTSK+19
INDET QZTSK+2~, QZTSK+5*, DIPA+4, SHDR+12, SEL+6
INDIC QTSK+14~*
INDX QZTSK+1~
INDX( DIPA+17
INDX("A" TEXT+1*
INDX("C" TEXT+2*
INDX("E" TEXT+3*
INDX("K" TEXT+4*
INDX("N" TEXT+5*
INDX("P" TEXT+6*
INDX("S" TEXT+7*
INE QZTSK+2~, DIPA+1*, DIPA+2, DIPA+3
INEND QZTSK+2~, QZTSK+19*, QZTSK+20*, QZTSK+24, SHDR+4, SHDR+5
INEND1 QZTSK+2~, QZTSK+24*, 0+5, 1+10, DTCHK~, DTCHK+7, DTCHK+9
INH QZTSK+1~, 0+4*, 0+5*, 0+6, 0+7, 1+9*, 1+10*, 1+11, 1+12, DTCHK~
, DTCHK+7, DTCHK+8, DTCHK+9
INH1 QZTSK+2~, DIPA+5*, DIPA+6
INLN QZTSK+2~, SHDR+1!, SHDR+10*, HDR+12
INLN( HDR+7
INLN(0 SHDR+1*, HDR+5
INLN(1 SHDR+2*
INLN(2 SHDR+6*
INLN(6 SHDR+8*, SHDR+9*, HDR+4
INLN(7 SHDR+11*, SHDR+12*, HDR+12
INLOOP QZTSK+1~
INMSG HELP1+1~, HELP1+2*, HELP1+3
INQUE QZTSK+2~, QZTSK+26*
INSEL QZTSK+2~, HDR+11, SEL+7*
INX QUE+2~*, QUE+7
IO QTSK+20, HDR+2, CR+1
IO(0 QTSK+20, HDR+2, CR+1
IOF HDR+3
IOM QTSK+18, CLOSE+3, 0+12, 0+13, 1+13, 1+14, SHDR+10, HDR+6, HDR+7, HDR+11
ION QTSK+18
IOP QTSK+17!, QTSK+18*, QTSK+20
IOSL QTSK+18, CLOSE+2, 1+4, DIPA+11, DIPA+26, HDR+2
IOST QTSK+18, HDR+2, HDR+3, CR+1
PAG QZTSK+2~, SHDR+1*, HDR+3, HDR+5*
PC QZTSK+2~, DIPA+9*, DIPA+10, DIPA+16~*, DIPA+17, DIPA+21*, DIPA+22*, DIPA+23
>> POP QTSK+17, QTSK+28, QZTSK+21*, CLOSE+1, 0+1*, 0+2, 0+5, 0+7, 1+1, 1+2*
, 1+3, 1+4, 1+7, 1+10, 1+12, HDR+2*, CR+2*, QUE+1*
PRI QZTSK+2~, 0+1*, 0+2*, 0+3, 0+5, 0+7, 1+7*, 1+8, 1+10, 1+12
PRIO QZTSK+2~, QZTSK+9*, 0+3, 1+8, SEL+3
QUE QZTSK+2~, QZTSK+7*, QZTSK+25, QZTSK+27, SEL+2
QUE1 QZTSK+2~, 0+1*, 1+2*, HDR+10, QUE+2~, QUE+6*, QUE+7, QUE+8
U QZTSK+5, QZTSK+9, 0+9, 0+10, 1+6, DIPA+5, DIPA+7, DIPA+8, DIPA+9, DIPA+12
, DIPA+14, DIPA+16, DIPA+19, DIPA+21, DIPA+22, DIPA+25, SHDR+9, CR+2, SEL+5, QUE+1
X QTSK+6*, QZTSK+1~, CLOSE+3*, 0+12*, 0+13*, 1+13*, 1+14*, SHDR+1*, SHDR+3*, SHDR+5*
, SHDR+6, HDR+5*, HDR+6, HDR+10*, HDR+11, CR+2*, QUE+1, QUE+2, QUE+3*, QUE+4*
, QUE+5!, QUE+6, QUE+8*!
Y QTSK+7, QTSK+8, QZTSK+1~
>> ZTDESC QTSK+22*
>> ZTIO QTSK+20*
>> ZTRTN QTSK+21*
>> ZTSAVE("DIZ(" QTSK+24*
>> ZTSAVE("INDA" QTSK+25*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All