Progress
Language Reference


GO-PENDING Function

Interfaces
OS
SpeedScript
All
All
No

Returns a TRUE value if, within an EDITING phrase, an APPLY statement results in a GO action. The GO action is deferred until the end of the EDITING phrase.

SYNTAX

GO-PENDING 

EXAMPLE

The r-gopend.p procedure lets you update some of the fields in each customer record. If you press GO when the value in the current balance field is greater than the balance in the credit-limit field, the UPDATE statement does not end. Instead, it continues prompting you for input until you correct the problem and then press GO.

r-gopend.p
REPEAT:
   PROMPT-FOR customer.cust-num.
   FIND customer USING cust-num.
   UPDATE
      name address city st SKIP
      credit-limit balance WITH 1 COLUMN
      EDITING:
        READKEY.
        APPLY LASTKEY.
        IF GO-PENDING AND INPUT balance > INPUT credit-limit THEN DO:
           MESSAGE "The current unpaid balance exceeds the credit limit.".
        NEXT.
      END.
   END.
END. 

SEE ALSO

APPLY Statement, EDITING Phrase


Copyright © 2004 Progress Software Corporation
www.progress.com
Voice: (781) 280-4000
Fax: (781) 280-4095