FYI: Just a heads-up. The following code (without the RESET after OPEN
cursor2 and cursor3) worked flawlessly (for at least 5 years) until
yesterday. The first one would correctly retrieve the name, the second
one wouldn't. After I added RESET, everything is working right again.
~Claudine :)
--FETCH CUSTOMER NAME FROM ROLODEX
DECLARE cursor2 CURSOR FOR SELECT co_name FROM rolodex +
WHERE co_code IN (SELECT custcode FROM wsorder)
OPEN cursor2 RESET
FETCH cursor2 INTO vcustnam
UPDATE wsorder SET custname = .vcustnam
--FETCH CARRIER NAME FROM ROLODEX
DECLARE cursor3 CURSOR FOR SELECT co_name FROM rolodex +
WHERE co_code IN (SELECT carcode FROM wsorder)
OPEN cursor3 RESET
FETCH cursor3 INTO vcarname
UPDATE wsorder SET carname = .vcarname
