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

Package: IFCAP

Routine: PRCTREAD


Information

PRCTREAD ;WISC@ALTOONA/RGY,RFJ-READ DATA FROM BAR CODE READER ;6.29.98

Source Information

Source file <PRCTREAD.m>

Entry Points

Name Comments DBIA/ICR reference
READ ; upload from portable bar code reader
READ1
Q1
Q11
TASK ;Tasks an appropriate barcode processor to taskman, needs PRCTID and PRCTTI
  • ICR #6587
    • Status: Active
    • Usage: Private
    Q3
    DEV ;
    OFF ;
    ON ;

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,">>> Use the TRANSMIT option on the barcode reader to start sending the data:"
    • Line Location: READ+7
    Function Call: READ
    • Variable: X
    • Timeout: 30
    • Line Location: READ1+0
    Function Call: WRITE
    • Prompt: !," *** Error, NO data received from bar code reader within 30 seconds ***",!!
    • Line Location: READ1+0
    Function Call: WRITE
    • Prompt: !," Thank You ! Data is being received ..."
    • Line Location: READ1+2
    Function Call: WRITE
    • Prompt: !," *** Error, an identifier was not entered ***",!!
    • Line Location: READ1+6
    Function Call: WRITE
    • Prompt: !," *** Error, bar code data identifier '",X,"' is non-existent ***",!!
    • Line Location: READ1+7
    Function Call: WRITE
    • Prompt: !!,"<<< Reading records for ",$P(^PRCT(446.4,PRCTID,0),"^"),",",!?14,"logged on ",Y," ..."
    • Line Location: READ1+10
    Function Call: READ
    • Variable: X
    • Timeout: 10
    • Line Location: READ1+11
    Function Call: WRITE
    • Prompt: !," Data transmission complete, number of records read: ",Y
    • Line Location: READ1+16
    Function Call: WRITE
    • Prompt: !!,"Upload time: "_($P($H,",",2)-TIME)_" sec."
    • Line Location: READ1+17
    Function Call: WRITE
    • Prompt: *7
    • Line Location: READ1+18
    Function Call: WRITE
    • Prompt: !!,"<<< Transmission of data successful! >>>",!," You can purge the files on the bar code reader if you wish.",!
    • Line Location: READ1+21
    Function Call: WRITE
    • Prompt: *7
    • Line Location: TASK+3
    Function Call: WRITE
    • Prompt: *7
    • Line Location: TASK+4
    Function Call: WRITE
    • Prompt: !,"* Data will NOT be processed *",!
    • Line Location: TASK+9
    Function Call: WRITE
    • Prompt: !!,"OK, the data collected on "
    • Line Location: TASK+10
    Function Call: WRITE
    • Prompt: Y,!,"for ",$P(^PRCT(446.4,PRCTID,0),"^")," will be processed on "
    • Line Location: TASK+10
    Function Call: WRITE
    • Prompt: Y,!
    • Line Location: TASK+11
    Function Call: WRITE
    • Prompt: *7
    • Line Location: DEV+2
    Info |  Source |  Entry Points |  Interaction Calls