>LOCAL lcSQL >PRIVATE pnCount >pnCount = 10 && get top N records >lcSQL = "begin ArticleGetMostPopular.ReturnCursor(nCount=>?pnCount); end;" >lnRetVal = SQLEXEC(lnHandle, lcSQL, 'crsMostPopular')>The Oracle package is:
>CREATE OR REPLACE PACKAGE ArticleGetMostPopular AS > Type RetCursor Is Ref Cursor; > Procedure ReturnCursor( > nCount IN number, > pCursor OUT RetCursor); >END; >/ >show error >CREATE OR REPLACE PACKAGE BODY ArticleGetMostPopular AS > Procedure ReturnCursor( > nCount IN number, > pCursor OUT RetCursor) is > Begin > open pCursor for > select * FROM > (SELECT Article.ID, COUNT(*) AS Count > FROM Article, ArticleKeyPhrase > WHERE ArticleKeyPhrase.ArticleID = Article.ID > GROUP BY Article.ID > ORDER BY Count DESC) > where ROWNUM <= nCount; > End; >END; >/ >show error >-- >>TIA!