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

Package: Engineering

Routine: ENWONEW3


Information

ENWONEW3 ;WIRMFO/SAB-Incoming Inspection Work Order ;12.18.97

Source Information

Source file <ENWONEW3.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Engineering 4 DEV^ENLIB  PRT1^ENWOD  HOLD^ENWOD2  (WOFILL,WONUM,WOPRNT)^ENWONEW  
VA FileMan 4 ^DIC  (,UPDATE,WP)^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  

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

Package Total Caller Graph
Engineering 2 ENEQ1  ENEQ3  

Entry Points

Name Comments DBIA/ICR reference
IIWO(ENEQ) ; Generate Incoming Inspection Work Order
; called from ENEQ1, ENEQ3
; In
; ENEQ - equipment entry #
; ENMA("IIWO") - (optional) flag; true when multi equip entry
; ENMA("IIWO","DA") - (optional) w.o. ien generated for 1st equip
; ENMA("IIWO","ION") - (optional) device ion used with 1st equip w.o.
; ENMA("IIWO","QDT") - (optional) queued date/time of 1st w.o. print
; Out
; ENDA - work order ien
; ENWO - work order number
; also when $G(ENMA("IIWO")) true and device selected for output
; ENION - device ion used for (auto)print
; ENQDT - queued date/time when output queued
PRT ; print work order?
PRTX ;
; unlock work order
EXIT ;
PRTL ; Print W.O. Long Format
; determine required variables

External References

Name Field # of Occurrence
^%ZIS PRT+11
HOME^%ZIS PRT+15, PRTL+17
^%ZTLOAD PRTL+14
^DIC IIWO+33
^DIE IIWO+57, IIWO+64, IIWO+89
UPDATE^DIE IIWO+59
WP^DIE IIWO+70
$$GET1^DIQ IIWO+63, PRT+3
^DIR PRT+14
DEV^ENLIB PRT+15
PRT1^ENWOD PRTL+19
HOLD^ENWOD2 PRTL+20
WOFILL^ENWONEW IIWO+50
WONUM^ENWONEW IIWO+40
WOPRNT^ENWONEW PRT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Shop required. Enter '^' if you don't want to create a W.O.",!
  • Line Location: IIWO+36
Function Call: WRITE
  • Prompt: !,"Unspecified Shop. Work Order was NOT created."
  • Line Location: IIWO+37
Function Call: WRITE
  • Prompt: $C(7),!,"Can't seem to add to Work Order File."
  • Line Location: IIWO+41
Function Call: WRITE
  • Prompt: !,"You will need to manually create the incoming inspection W.O."
  • Line Location: IIWO+42
Function Call: WRITE
  • Prompt: !,"WORK ORDER #: ",NUMBER
  • Line Location: IIWO+44
Function Call: WRITE
  • Prompt: $C(7),!,"Can't lock the new work order. Please contact IRM."
  • Line Location: IIWO+47
Routine Call
  • %ZIS
  • Line Location:
    • PRT+11
Routine Call
  • %ZIS
  • Line Location:
    • PRT+15
    • PRTL+17
Routine Call
  • DIC
  • Line Location:
    • IIWO+33
Routine Call
  • DIE
  • Line Location:
    • IIWO+57
    • IIWO+64
    • IIWO+89
Routine Call
  • DIE
  • Line Location:
    • IIWO+59
Routine Call
  • DIE
  • Line Location:
    • IIWO+70
Routine Call
  • DIR
  • Line Location:
    • PRT+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] GET1^DIQ
^ENG(6920 - [#6920] Classic Fileman Calls,  WP^DIE
^DIC(6922 - [#6922] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] IIWO+23, IIWO+27
^DIC(6922 - [#6922] IIWO+31
^ENG("EMP" - [#6929] IIWO+83
^ENG(6910.2 - [#6910.2] PRT+1, PRT+2, PRTL+4, PRTL+5
^ENG(6914 - [#6914] IIWO+25, IIWO+26, IIWO+81, IIWO+82
^ENG(6920 - [#6920] IIWO+21, IIWO+46, IIWO+69, IIWO+72, IIWO+74, IIWO+76, PRTX+2, PRTL+6
^XUSEC("ENEDPM" IIWO+19

Label References

Name Line Occurrences
EXIT IIWO+37, IIWO+40, IIWO+46
PRTL PRT+11, PRT+17
PRTX PRT+5, PRT+7, PRT+9, PRT+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS PRT+11*
AUTOPRT IIWO+15~, PRT+2*, PRT+5
DA IIWO+15~, IIWO+43, IIWO+46, IIWO+58, IIWO+70, PRTX+2, PRTL+6
DIC IIWO+15~, IIWO+30*, IIWO+33!
DIC("B" IIWO+31*
DIC("S" IIWO+32*
DIC(0 IIWO+30*
DIE IIWO+15~, IIWO+52*, IIWO+61*, IIWO+66*
DIR PRT+14!
DIR("A" PRT+13*
DIR("B" PRT+13*
DIR(0 PRT+13*
DR IIWO+15~, IIWO+53*, IIWO+54*, IIWO+55*, IIWO+56*, IIWO+62*, IIWO+63*, IIWO+66*, IIWO+73*, IIWO+75*
, IIWO+77*, IIWO+85*, IIWO+86*, IIWO+87*, IIWO+88*
>> DTOUT IIWO+34
>> DUOUT IIWO+34
DUZ IIWO+19
ENBARCD PRTL+2~, PRTL+3*, PRTL+5*
>> ENDA IIWO+17*, IIWO+43*
ENDSTAT PRTL+21!
ENEDPM IIWO+15~, IIWO+19*, IIWO+29, IIWO+32, IIWO+84, IIWO+86
ENEQ IIWO~, IIWO+25, IIWO+26, IIWO+62, IIWO+63, IIWO+81, IIWO+82
ENFDA IIWO+58!
ENFDA( IIWO+58*
ENI IIWO+15~, IIWO+25*, IIWO+26, IIWO+81*, IIWO+82, PRT+1*, PRT+2, PRTL+4*, PRTL+5
ENINV PRTL+21!
ENION IIWO+17!, PRT+16*, PRTL+16
ENJ IIWO+15~, IIWO+82*, IIWO+83
>> ENMA("IIWO" IIWO+21, IIWO+67, IIWO+69, IIWO+72, IIWO+74, IIWO+76, IIWO+78, PRT+9, PRT+10, PRT+16
PRTL+12, PRTL+16
ENQDT IIWO+17!, PRTL+16*
ENTEC IIWO+15~, IIWO+83*, IIWO+84, IIWO+86
ENWO IIWO+17*, IIWO+43*, PRTL+2~, PRTL+6*
ENX IIWO+15~, IIWO+63*, IIWO+72*, IIWO+73, IIWO+74*, IIWO+75, IIWO+76*, IIWO+77, PRTL+13*, PRTL+21!
IO("Q" PRT+16, PRTL+8
ION PRT+16, PRTL+10
>> IOP PRT+10*, PRT+11
IOST PRTL+20
NUMBER IIWO+16~, IIWO+40, IIWO+43, IIWO+44
>> POP PRT+11, PRT+15
SHOPDEV IIWO+16~, PRT+3*, PRT+5
SHOPKEY IIWO+16~, IIWO+21*, IIWO+23*, IIWO+24, IIWO+26*, IIWO+27*, IIWO+29, IIWO+31, IIWO+34*, IIWO+35*
, IIWO+37, IIWO+55, IIWO+56, PRT+3, PRT+7
U IIWO+21, IIWO+23, IIWO+26, IIWO+27, IIWO+31, IIWO+72, IIWO+74, IIWO+76, IIWO+82, IIWO+83
PRT+2, PRT+5, PRTL+5, PRTL+6
WARD IIWO+16~, IIWO+50*, PRT+5*
>> Y IIWO+35, PRT+14
>> ZTDESC PRTL+9*
>> ZTDTH PRTL+12*
>> ZTIO PRTL+10*
>> ZTRTN PRTL+9*
>> ZTSAVE( PRTL+13*
ZTSK PRTL+17!
ZTSK("D" PRTL+16
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 |  Local Variables  | All