[RBG7-L] - RE: Select Max question

[Bill Downall]

Bernie,

As David pointed out, you cannot use SQLCODE in this case.

Try this:

SELEXT MAX(PaymentNo), COUNT (*) +
  INTO maxPaymentNo IND iv1, numPayments +
FROM Payments +
WHERE OrderNo = 9596097

IF numpayments = 0 THEN
  SET VAR vNextPayment = 1
ELSE
  SET VAR vNextPayment = (.vMaxPaymentNo + 1)
ENDIF



Bernard Lis wrote:
> set var MaxPaymentNo int=null
> 
> SELECT MAX(PaymentNo) INTO MaxPaymentNo IND iv1  FROM PAYMENTS WHERE
> 
> OrderNo
> 
> = 9596096
> 
> 
>