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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ENETRAN1

Package: Engineering

Routine: ENETRAN1


Information

ENETRAN1 ;(WASH ISC)/DH-Display Pending Work Orders ;12.12.97

Source Information

Source file <ENETRAN1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Engineering 1 EN^ENETRAN2  
VA FileMan 1 $$EXTERNAL^DILFD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Engineering 1 ENETRAN  

Entry Points

Name Comments DBIA/ICR reference
EN
SCRN
SCRN1
WAIT
LNDSP
MULT
RANGE
ALL
BLDARAY ;Build global array
HDR ;Screen header
EQUIP
CATEGRY
HLD
EXIT ;Return to ENETRAN

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD BLDARAY+5
EN^ENETRAN2 WAIT+4, MULT, RANGE, ALL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Nothing to process in ",ENSHOP
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,"TRANSFER NUMBERS? (Separate with ;)(Use : for Range)('ALL' for all ",ENCNT,")",!,?18,"('^' to EXIT)(RETURN to Continue) "
  • Line Location: WAIT+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: WAIT+1
Function Call: WRITE
  • Prompt: " ?",*7,"?",*7
  • Line Location: WAIT+7
Function Call: WRITE
  • Prompt: IOINHI
  • Line Location: LNDSP+0
Function Call: WRITE
  • Prompt: !,I," =>",?5,$P(ENEWO,U,2),?19,$P(ENEWO,U,3),?32,$P(ENEWO,U,4),?49,$P(ENEWO,U,5),?61,$P(ENEWO,U,6)
  • Line Location: LNDSP+1
Function Call: WRITE
  • Prompt: ?73,$S($O(^ENG(6920,DA,6,0))]"":"YES",1:"NO")
  • Line Location: LNDSP+1
Function Call: WRITE
  • Prompt: !,?2,$E($P(ENEWO,U,7),1,42),?45,$E($P(ENEWO,U,8),1,15),?61,$E($P(ENEWO,U,9),1,15)
  • Line Location: LNDSP+2
Function Call: WRITE
  • Prompt: !,?2,"Name: ",$E(ENMAN,1,30),?45,"Cat: "
  • Line Location: LNDSP+3
Function Call: WRITE
  • Prompt: !,IOINLOW
  • Line Location: LNDSP+4
Function Call: WRITE
  • Prompt: @IOF,"Pending Elect Work Orders ("_ENCNT_" in "_$E(ENSHOP,1,18)_") "_ENDATE_" Page "_ENPG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?5,"Work Order #",?19,"Req Date",?32,"Location",?49,"Equip ID",?61,"Priority",?73,"Cmnts"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?5,"Task Description",?45,"Contact Person",?61,"Entered by"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,X
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: $S($D(^ENG(6911,ENCAT,0)):$P(^(0),U,1),1:ENCAT)
  • Line Location: CATEGRY+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HLD+0
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue, '^' to escape..."
  • Line Location: HLD+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6920 - [#6920] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" BLDARAY+2
^ENG("SP" - [#6928] BLDARAY+3
^ENG(6911 - [#6911] CATEGRY
^ENG(6914 - [#6914] LNDSP+3, EQUIP
^ENG(6920 - [#6920] LNDSP+1, BLDARAY+1
^TMP($J EN+1, SCRN, SCRN1, SCRN1+2, WAIT+4, WAIT+6, LNDSP, MULT, RANGE, ALL
, BLDARAY+6*
^VA(200 - [#200] BLDARAY+4

Label References

Name Line Occurrences
ALL WAIT+3
BLDARAY EN+1
CATEGRY LNDSP+3
EQUIP SCRN
EXIT EN, SCRN, WAIT+2, WAIT+3, WAIT+4
HDR SCRN1+2
HLD EN
LNDSP SCRN1+2
MULT WAIT+5
RANGE WAIT+6
SCRN SCRN1+1, WAIT+1
SCRN1 WAIT+4, WAIT+5, WAIT+6, WAIT+8

Naked Globals

Name Field # of Occurrence
^( RANGE
^(0 LNDSP+3, BLDARAY+3, BLDARAY+4, EQUIP, CATEGRY
^(1 LNDSP+3, BLDARAY+1, EQUIP
^(2 BLDARAY+1
^(3 BLDARAY+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA EN+1*, WAIT+4*, LNDSP+1*, MULT*, RANGE*, ALL*, BLDARAY+1, BLDARAY+6
DTIME WAIT+1, HLD
>> EN(0 BLDARAY+1*, BLDARAY+2, BLDARAY+3, BLDARAY+6
>> EN(1 BLDARAY+1*, BLDARAY+4, BLDARAY+6
>> EN(2 BLDARAY+1*, BLDARAY+5
>> EN(3 BLDARAY+1*, BLDARAY+6
>> ENBY BLDARAY+4*, BLDARAY+6
>> ENCAT LNDSP+3*, EQUIP*, CATEGRY
>> ENCNT EN, EN+3, WAIT, HDR+1
>> ENCNT(0 EN+3*, SCRN
>> ENDA SCRN*, LNDSP+3*, EQUIP
>> ENDATE HDR+1
>> ENERN WAIT+4*, MULT*, RANGE*, ALL*
>> ENEWO LNDSP*, LNDSP+1, LNDSP+2, LNDSP+3
>> ENEX WAIT+5*, WAIT+6*, MULT, RANGE
>> ENEX1 MULT*
>> ENEX2 RANGE*
>> ENEX3 RANGE*
>> ENEX4 SCRN1*, WAIT+4, MULT, RANGE, ALL
>> ENFR EN+3*, SCRN, SCRN+1, SCRN1, SCRN1+1*, SCRN1+2, WAIT+1*, WAIT+4, MULT, RANGE
>> ENLOC BLDARAY+3*, BLDARAY+6
>> ENMAN LNDSP+3*, EQUIP*
>> ENPG EN*, SCRN1+1*, WAIT+1*, HDR+1
>> ENPRI LNDSP*, BLDARAY+5*, BLDARAY+6
>> ENRDT BLDARAY+2*, BLDARAY+6
>> ENSHOP EN, HDR+1
>> ENTO SCRN*, SCRN+1*, SCRN1, SCRN1+1, SCRN1+2, WAIT+1
>> ENTO(0 SCRN+1*, MULT
>> ENY SCRN*, EQUIP*
>> I EN+1*, SCRN1*, SCRN1+1, SCRN1+2*, WAIT+4, LNDSP+1, BLDARAY+6
IOF HDR+1
>> IOINHI LNDSP
>> IOINLOW LNDSP+4
IOSL SCRN
>> K SCRN*, SCRN1*, SCRN1+2*, LNDSP
U SCRN, WAIT+4, LNDSP, LNDSP+1, LNDSP+2, LNDSP+3, MULT, RANGE, BLDARAY+2, BLDARAY+3
, BLDARAY+4, BLDARAY+5, BLDARAY+6, EQUIP, CATEGRY
X WAIT*, WAIT+1*, WAIT+2, WAIT+3, WAIT+4, WAIT+5, WAIT+6, MULT*, HDR+4!*, HLD*
>> Y BLDARAY+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All