Re: Count records in SQL

GET DIAGNOSTICS counts the rows just processed (deleted or inserted, for
example).  It doesn't work on rows just sitting there.



<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
Virus-free.www.avast.com
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
<#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>

On Thu, Feb 12, 2026 at 12:43 PM Jimmy Sansi <[email protected]> wrote:

> What about ...
>
> exec sql GET DIAGNOSTICS :Rows = ROW_COUNT;
>
> https://www.ibm.com/docs/en/i/7.5.0?topic=statements-get-diagnostics
>
> On 2026-02-12 12:15, Jerry Forss wrote:
>
> > I have a SQL
> > SqlSelect = 'SELECT C6DcCd, ' +
> > 'C6CvNb, '+
> > 'C6AcDt, ' +
> > 'C6FnSt,' +
> > 'C6B9Cd  ' +
> > 'From ' + %Trim(PurgeXALib) + '/MBC6REP ' +
> > 'Where C6ACDT <= ' + %EditC(PurgeDateCYMD : 'X');
> >
> > Instead of reading through the cursor, I want the number of records
> > found.
> >
> > How do I do that?
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: [email protected]
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: [email protected]
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact [email protected] for any subscription related
> questions.
>
>
-- 
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact [email protected] for any subscription related questions.