Reading magnetic strip card

[Chris Sharman]

>I'm trying to read a magnetic strip containing the student id into a quick
>screen.
>My problem is that the string that I read begins with a ";", the command
>separator.  It causes the entry field to be skipped.  I can't change the
>separator character in the qkgo because users would kill me.  So my
>question is: Is there a way to disable the separator character (or change
>it to something else) for the period of time the input procedure is executed ?

You could use the input procedure to discard the leading null entry:

procedure input studentid
 begin
 if (fieldtext="")
  then error "" ;Skipped semicolon
  else let fieldtext = ";" + fieldtext
 end

Chris
_______________________________________________________________________
Chris.Sharman@CCAgroup.co.uk		http://www.ccagroup.co.uk/
CCA Stationery Ltd, Eastway, Fulwood, Preston, Lancashire, PR2 9WS.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.