6 51 2 C Example

LANSA Open Guide

6.51.2 C Example

BOOL fOK;

int  iSession;

int  iRecords;

 

fOK = LceSetSelectOptions(iSession, "*BLOCKBYRRN");

fOK = LceRequestSelectWhere(iSession, "EMPNO,SURNAME,SALARY","PSLMST", 

"","(SALARY *GT 50000) AND (SALARY *LT 100000)",FALSE);

 

fOK = LceReceiveSelect(iSession, "PSLMST");

fOK = LceGetRecordCount(iSession, "PSLMST", &iRecords);

for (iCount=0; iCount < iRecords; i++)

{

        fOK = LceGetSelect(iSession, "PSLMST", iCount, "EMPNO,SURNAME,SALARY");

}