promptok

[Terry Pickering]

I have a quick screen where the temporary item T-QTY-REMAINING is used to allow the user to "skip" entering a value into the field PO-QTY as long as T-QTY-REMAINING is greater than zero. When it's zero, then the user must enter something into the field. This part works just fine. However when T-QTY-REMAINING is less than or equal to zero, it issues the error message and reprompts for the PO-QTY value. After now entering a value, it still issues the error message. 


In debug, it shows that after the error is issued AND you re-enter a value --- the predefined condition PROMPTOK is still FALSE. I would expect it to now be TRUE since it executed the accept verb again and a value was entered. This is not happening though.


Our platform is VAX 710.F4




PROCEDURE INPUT PO-QTY

BEGIN

  IF NOT PROMPTOK AND T-QTY-REMAINING > 0

     THEN LET FIELDTEXT = ASCII(T-QTY-REMAINING)

  ELSE

     ERROR "YOU MUST ENTER A QUANTITY"

END



<color><param>0000,0000,8080</param>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

<bold>Terry Pickering        Consultant Extraordinare

</bold>Monday and Friday        Tuesday - Thursday

Portland                 Eugene

(503) 245-7178           (541) 687-3416

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~</color>
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.