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
Print Page as PDF
Routine: ENEQNX1

Package: Engineering

Routine: ENEQNX1


Information

ENEQNX1 ;(WASH ISC)/DH-Process Uploaded Equipment Inventory ;1/9/2001

Source Information

Source file <ENEQNX1.m>

Entry Points

Name Comments DBIA/ICR reference
RES ;Restart an aborted process
EN ;Main entry point. Expects ENCTID and ENCTTI.
CONT ;Physical processing of uploaded data
NEWLOC ;Beginning of a specific location
NEWNX ;Process a piece of equipment
XCPTN ;Print Exception Messages
HDR ;New page for exception printing
ZTSK ;Queue processing for later time
HOLD
DONE ;Delete DATE/TIME OF DATA UPLOAD

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RES+1
Function Call: WRITE
  • Prompt: !!,"Enter PROCESS ID: "
  • Line Location: RES+1
Function Call: WRITE
  • Prompt: !!,*7,"Wrong application. Aborting..."
  • Line Location: RES+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"Enter TIME STAMP of process to be restarted: "
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"NO DATA. Aborting..."
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"Can't seem to find your STATION NUMBER. Please check File 6910.",!,"Your IRM staff may need to assist you.",*7
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: *7,!!,"No data to process."
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: *7,!!,"No data to process."
  • Line Location: CONT+4
Function Call: WRITE
  • Prompt: !!,ENMSG,!
  • Line Location: XCPTN+1
Function Call: WRITE
  • Prompt: " Label scanned as: ",ENLBL
  • Condition for execution: $D(ENLBL)
  • Line Location: XCPTN+1
Function Call: WRITE
  • Prompt: " Location: ",ENLOC
  • Condition for execution: $D(ENLOC)
  • Line Location: XCPTN+1
Function Call: WRITE
  • Prompt: !,ENMSG(0,I)
  • Line Location: XCPTN+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "NON-EXPENDABLE INVENTORY EXCEPTION MESSAGES",?(IOM-15),ENDATE
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !," Global Reference: ^PRCT(446.4,"_ENCTID_",2,"_ENCTTI_",1,",?(IOM-15),"Page ",ENPG
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,%
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to continue..."
  • Line Location: HOLD+0
Info |  Source |  Entry Points |  Interaction Calls