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

Package: Engineering

Routine: ENETRAN2


Information

ENETRAN2 ;(WIRMFO)/DH-Transfer Electronic Work Orders ;5/8/1998

Source Information

Source file <ENETRAN2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^%DT  ^DIC  YN^DICN  ^DIE  
Engineering 3 EN1^ENWO2  D^ENWOD  WOPRNT^ENWONEW  

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 ENETRAN1  

Entry Points

Name Comments DBIA/ICR reference
EN
LOCK
GETNO
EDIT
PRINT
DISAP
ABORT
EXIT ;Return to ENETRAN1

External References

Name Field # of Occurrence
^%DT GETNO
^DIC LOCK+7
YN^DICN EDIT
^DIE GETNO+6, EDIT+1, EDIT+2
EN1^ENWO2 DISAP
D^ENWOD EN
WOPRNT^ENWONEW PRINT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Ready to transfer ",$P(^ENG(6920,DA,0),U,1)
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: ?35,$P(^(1),U,2)
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,*7,"Sorry, this Work Order is being edited by another user. Try later."
  • Line Location: LOCK+0
Function Call: WRITE
  • Prompt: !!,*7,"Can't get a new number."
  • Line Location: GETNO+3
Function Call: WRITE
  • Prompt: !!,"Edit this work order"
  • Line Location: EDIT+0
Function Call: WRITE
  • Prompt: !,*7,"Transfer aborted."
  • Line Location: ABORT+0
Function Call: WRITE
  • Prompt: !!,"Press <RETURN> to continue, '^' to escape... "
  • Line Location: ABORT+1
Routine Call
  • DIC
  • Line Location:
    • LOCK+7
Routine Call
  • DIE
  • Line Location:
    • GETNO+6
    • EDIT+1
    • EDIT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6920 - [#6920] Classic Fileman Calls
^DIC(6922 - [#6922] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6922 - [#6922] GETNO+2
^DIE("B" GETNO+9
^ENG(6920 - [#6920] EN, LOCK, LOCK+6, GETNO+3, GETNO+4, GETNO+7, EDIT+2, EXIT+1
^TMP($J GETNO+8!, DISAP!

Label References

Name Line Occurrences
ABORT LOCK, LOCK+8, GETNO+3
DISAP LOCK+8
EDIT EDIT
EXIT PRINT+2, DISAP+1

Naked Globals

Name Field # of Occurrence
^(1 EN

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EDIT*, EDIT+1
>> %DT GETNO*
CODE GETNO+1~, GETNO+2*, GETNO+4
>> DA EN, LOCK, LOCK+6, GETNO+8, EDIT+2, DISAP, EXIT+1
>> DIC LOCK+1*
>> DIC("A" LOCK+2*, LOCK+7!
>> DIC("B" LOCK+4*, LOCK+7!
>> DIC("S" LOCK+6*, LOCK+7!
>> DIC("W" LOCK+3*
>> DIC(0 LOCK+1*
>> DIE GETNO+5*, DISAP*
>> DR GETNO+5*, GETNO+9*, EDIT+2*
DT GETNO*, GETNO+2
DTIME ABORT+1
>> ENCNT GETNO+8*, DISAP*
>> ENERN GETNO+8, DISAP
>> ENEWKEY LOCK+4, LOCK+8*, GETNO+2, GETNO+5, PRINT
>> ENEX4 ABORT+2*
ENXP EN*!
>> I GETNO+4*
NUMBER GETNO+1~, GETNO+4*, GETNO+5
SHOPKEY PRINT~*
U EN, LOCK+6, GETNO+2, EDIT+2
WARD PRINT~*
>> X LOCK+8, GETNO*, GETNO+4*, ABORT+1*, ABORT+2
>> Y LOCK+8, GETNO
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