Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call