Routine: PRCSDIC

Information

PRCSDIC ;WISC/CTB/KMB-INTERCEPT FOR DIC LOOKUP INTO FILE 410 ;3-19-91/17:13

Source file <PRCSDIC.m>

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: V+8
Function Call: WRITE	Prompt: !,"Please enter number using an alpha character",!,"and 2-16 alphanumerics,as in 'A1234B'",!! Line Location: CHECK+1
Function Call: WRITE	Prompt: !!,"Incorrect format - please re-enter number",!! Line Location: CHECK+2
Function Call: READ	Variable: X Timeout: 3 Line Location: CHECK+14
Function Call: WRITE	Prompt: !! Line Location: CHECK+14
Function Call: WRITE	Prompt: !!,"Please enter a number using an alpha character",!,"and 2-16 alphanumerics, as in 'ADP1'.",! Line Location: ER+2
Function Call: WRITE	Prompt: ! Line Location: ER+3
Function Call: WRITE	Prompt: $P($T(TEXT+I),";",3) Line Location: ER+3
Function Call: WRITE	Prompt: !!,"Attempting lookup in transaction file.",$C(7) Line Location: QM+0
Function Call: WRITE	Prompt: !!,"Attempting lookup using "_X_" "_$S($D(X2):X2,1:""),! Line Location: X+1
Function Call: READ	Variable: X Timeout: 3 Line Location: STA+0
Function Call: WRITE	Prompt: ! Line Location: STA+0