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

Package: Engineering

Routine: ENWOD


Information

ENWOD ;(WIRMFO)/DLM/DH/SAB-Formatted Work Order Display ;5/11/2000

Source Information

Source file <ENWOD.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Engineering 8 (COUNT,UNPOST)^ENBCPM8  KILLHS^ENEQHS  PMHRS^ENEQPMR4  DEV^ENLIB  TEST^ENWOCOMP  ST^ENWOD1  TOP^ENWOD2  WO^ENWOUTL  
Kernel 4 HOME^%ZIS  ^%ZISC  (PKILL,PSET)^%ZISP  ^%ZTLOAD  
VA FileMan 2 ^DIE  ^DIR  
IFCAP 1 ^PRCSP13  

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

Package Total Caller Graph
Engineering 8 ENETRAN2  ENWO1  ENWOME  ENWOME2  ENWONEW  ENWONEW3  ENWOP  ENWOREP  

Entry Points

Name Comments DBIA/ICR reference
EDIT ; Work order display/edit (screen) option
EDIT1 ; display/edit one work order
; input DA (ien of work order), DUZ (user number)
READ ;User interaction
ACTION ;Edit or display
D ;Display WO to CRT
A ;Display Accounting Data
P ;Print work order
PRT1
BAR ; print barcode of w.o. #
EXIT ;

External References

Name Field # of Occurrence
HOME^%ZIS READ+1, P+2
^%ZISC PRT1+7
PKILL^%ZISP PRT1+4
PSET^%ZISP PRT1+1
^%ZTLOAD P+2
^DIE EDIT1+10, EDIT1+15, ACTION+29, ACTION+35
^DIR ACTION+9
COUNT^ENBCPM8 EDIT1+23
UNPOST^ENBCPM8 ACTION+20
KILLHS^ENEQHS ACTION+10
PMHRS^ENEQPMR4 EDIT1+19, ACTION+16
DEV^ENLIB P+2
TEST^ENWOCOMP ACTION+12
ST^ENWOD1 D+1, PRT1+2
TOP^ENWOD2 D+1, PRT1+2
WO^ENWOUTL EDIT+1
^PRCSP13 A+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ENTER/EDIT (1-33), D(DISPLAY), AC(ACCOUNT), P(PRINT)): EXIT// "
  • Line Location: READ+1
Function Call: WRITE
  • Prompt: !,"Uneditable field.",*7
  • Line Location: READ+2
Function Call: WRITE
  • Prompt: !,"A transfer option must be used to change SHOP.",*7
  • Line Location: READ+3
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: READ+5
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: READ+6
Function Call: WRITE
  • Prompt: !,"This work order is being edited by another user. Please try again later."
  • Line Location: ACTION+4
Function Call: WRITE
  • Prompt: $C(7),!,"NOTE: This work order has been closed."
  • Line Location: ACTION+6
Function Call: WRITE
  • Prompt: !,"Security key ENEDCLWO is needed to edit closed work orders."
  • Line Location: ACTION+7
Function Call: WRITE
  • Prompt: $C(7),!,"Another user is editing this equipment. Try editing the condition later."
  • Line Location: ACTION+28
Function Call: WRITE
  • Prompt: !!,"Entry of a date will close this work order. Do this last."
  • Line Location: ACTION+33
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT1+4
Function Call: WRITE
  • Prompt: !,@IOBARON
  • Line Location: BAR+1
Function Call: WRITE
  • Prompt: ENWO
  • Line Location: BAR+1
Function Call: WRITE
  • Prompt: ENWO
  • Line Location: BAR+1
Function Call: WRITE
  • Prompt: ENWO
  • Line Location: BAR+1
Routine Call
  • %ZIS
  • Line Location:
    • READ+1
    • P+2
Routine Call
  • DIE
  • Line Location:
    • EDIT1+10
    • EDIT1+15
    • ACTION+29
    • ACTION+35
Routine Call
  • DIR
  • Line Location:
    • ACTION+9

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" A+1
^ENG(6910.2 - [#6910.2] P+1
^ENG(6914 - [#6914] ACTION+28, ACTION+30
^ENG(6920 - [#6920] EDIT1+5, EDIT1+10, EDIT1+11, EDIT1+13, EDIT1+16, EDIT1+20, EDIT1+25, ACTION+3, ACTION+4, ACTION+5
ACTION+10, ACTION+11, ACTION+12*, ACTION+13, ACTION+17, ACTION+26, A+2, A+3
^PRCS(410 - [#410] A+4
^XUSEC("ENEDCLWO" ACTION+7

Label References

Name Line Occurrences
@( ACTION+1
ACTION EDIT1+5
BAR PRT1+3
D EDIT1+5
EDIT EDIT+3
EDIT1 EDIT+2
EXIT EDIT+1
READ EDIT1+5, READ+2, READ+3, READ+5, READ+6

Naked Globals

Name Field # of Occurrence
^("PRINT BAR CODES ON W.O." P+1
^(4 A+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT+1*, EDIT1+5, EDIT1+10, EDIT1+11, EDIT1+13, EDIT1+16, EDIT1+20, EDIT1+25, ACTION+3, ACTION+4
ACTION+5, ACTION+10, ACTION+11, ACTION+12, ACTION+13, ACTION+17, ACTION+25*, ACTION+26*, ACTION+27, ACTION+28
ACTION+30, A+2, A+3, A+5*, A+7*, PRT1+5~
DIE EDIT1+8~, EDIT1+9*, ACTION+23~, ACTION+26*, ACTION+31*
DIR ACTION+9!
DIR("A" ACTION+8*
DIR("B" ACTION+8*
DIR(0 ACTION+8*
DR EDIT1+8~, EDIT1+10*, EDIT1+15*, ACTION+23~, ACTION+24*, ACTION+25, ACTION+26*, ACTION+32, ACTION+34*
DTIME READ+1
DUZ ACTION+7
ENBARCD EDIT1+2~, P+1*, PRT1+3
ENDA ACTION+23~, ACTION+25*
ENDSTAT EDIT1+2~, ACTION+24
ENEDIT EDIT1+2~, EDIT1+3*, EDIT1+5, EDIT1+6, ACTION+3, ACTION+22*
ENFLG A+2*, A+3*, A+9, A+10!
ENINV EDIT1+2~
ENJ EDIT1+2~
ENPMDT EDIT1+18~, EDIT1+21*, EDIT1+22*, ACTION+15~, ACTION+18*, ACTION+19*
ENREOPEN EDIT1+2~, EDIT1+4*, EDIT1+10, ACTION+5, ACTION+21*
ENWO EDIT1+2~, BAR+1
ENWOACN A+3*, A+4, A+5, A+8!
ENWOCLOD EDIT1+2~, ACTION+11*, ACTION+34
ENWOOR A+5*, A+7!
ENX EDIT1+2~, EDIT1+5, READ+1*, READ+2, READ+3, READ+4*, READ+5*, READ+6*, ACTION+1, ACTION+24
>> I EDIT1+21*, ACTION+18*, P+1*
IO PRT1
IO("Q" P+2
>> IOBAROFF BAR+1
>> IOBARON BAR+1
IOF D+1, PRT1PRT1+4
IOST D+1, PRT1PRT1+1, PRT1+4
PMTOT EDIT1+18~, EDIT1+19, ACTION+15~, ACTION+16
>> POP P+2
>> R ACTION+10
TAG ACTION+1~*
U EDIT1+5, EDIT1+10, EDIT1+11, EDIT1+13, EDIT1+16, EDIT1+20, ACTION+5, ACTION+10, ACTION+11, ACTION+12
ACTION+13, ACTION+17, ACTION+24, ACTION+26, A+2, A+3, P+1
X EDIT1+18~, EDIT1+20*, EDIT1+21, ACTION+15~, ACTION+17*, ACTION+18, A+1*, P+2~
>> Y EDIT+1, ACTION+9
>> ZTDESC P+2*
>> ZTQUEUED PRT1+7
>> ZTRTN P+2*
>> ZTSAVE("DA" P+2*
>> ZTSAVE("EN*" P+2*
ZTSK P+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