Find record query loop in Siebel eScript

 

var EngBO, EngBC, EngId, RecordCount, withRecord, UserName, UserId;

EngBO = TheApplication().GetBusObject("My Business Object");

EngBC = EngBO.GetBusComp("My Business Component");
    
    with (EngBC)
    {
        ActivateField("Parent Id");

        SetViewMode(AllView);
        ClearToQuery();
        SetSearchSpec ("Parent Id", ServiceId);
        ExecuteQuery(ForwardOnly);
        RecordCount = CountRecords();
        withRecord = FirstRecord();
        
        while(withRecord)
        {
            EngId = GetFieldValue("Id");
            UserName = GetFieldValue("User Id");
            UserId = GetFieldValue("Employee Id");
            //Operation
            withRecord = NextRecord();
            
        }
        
    }