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

Package: Engineering

Routine: ENEQNX3


Information

ENEQNX3 ;(WIRMFO)/DH-Process Uploaded Equipment Inventory ;3.4.97

Source Information

Source file <ENEQNX3.m>

Entry Points

Name Comments DBIA/ICR reference
NOLBL ;No bar code label scanned
  • ICR #6852
    • Status: Pending
    • Usage: Private
    PMN ;Process PM #
  • ICR #6852
    • Status: Pending
    • Usage: Private
    MATCH ;Equipment unlabelled but present in 6914
    MSG ;Opening message to user
    HOLD
    ERR ;Error message (Forced exit)

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"The system is now ready to update the EQUIPMENT INV. file on the basis of",!,"data acquired from the portable bar code reader."
    • Line Location: MSG+1
    Function Call: WRITE
    • Prompt: !!,"If the system encounters data that cannot be processed in the normal fashion",!,"it will give you written notice in the form of an Exception Message. These"
    • Line Location: MSG+2
    Function Call: WRITE
    • Prompt: !,"messages will provide notification of such things as missing bar code",!,"labels and database inconsistencies."
    • Line Location: MSG+3
    Function Call: WRITE
    • Prompt: !!,"You must now select a hard copy device (printer) to receive Exception",!,"Messages."
    • Line Location: MSG+4
    Function Call: WRITE
    • Prompt: !!,"You may enter the letter 'Q' and then select a device if you wish to",!,"schedule this data processing task for some later time.",!
    • Line Location: MSG+5
    Function Call: WRITE
    • Prompt: !,"Press <RETURN> to continue..."
    • Line Location: HOLD+0
    Function Call: WRITE
    • Prompt: !!,*7,"FATAL ERROR OR USER ABORT.",*7
    • Line Location: ERR+1
    Function Call: WRITE
    • Prompt: !,"Process ID is: ENNX Time stamp is: ",$S($D(ENCTTI):$P(^PRCT(446.4,ENCTID,2,ENCTTI,0),U,1),1:"UNDEFINED.")
    • Line Location: ERR+2
    Function Call: WRITE
    • Prompt: !,"Please make a note of this information, as you will need it to RESTART",!,"processing of the data on file."
    • Line Location: ERR+3
    Info |  Source |  Entry Points |  Interaction Calls