ALLBASE/SQL Reference Manual (36216-90216)

Chapter 10 321
SQL Statements A - D
CLOSE
Statements for displaying a row to a user and accepting a new QtyOnHand value go here.
The new value is stored in :NewQty.
UPDATE PurchDB.Inventory
SET QtyOnHand = :NewQty
WHERE CURRENT OF NewQtyCursor
.
.
.
CLOSE NewQtyCursor USING sqldaout