C example--recursive queries

#define EMPLOYEE_FORM "Employee"
#define EMPLOYEE_ALIAS "Employee"
#define EMP_EMPLOYEE_NAME 536870913
#define EMP_EMPLOYEE_ID 536870914
#define EMP_MANAGER_ID 536870915
#define EMP_MANAGER_ID 536870915
void queryOnEmployeeForm(ARControlStruct *ctrl, ARStatusList *status)
{
  ARMultiSchemaFieldFuncValueListList msEntryList = {0, NULL};  /**/
  unsigned int numMatches;
  unsigned int *numMatchesPtr;
  int result;
  ARMultiSchemaFuncQueryFromList fromList = {0, NULL};  /**/
  ARMultiSchemaSortList sortList = {0, NULL};
  ARMultiSchemaFieldFuncList getListFields = {0, NULL};  /**/
  ARMultiSchemaFuncQueryFromStruct fromItem = {0,}; /* 0-fill*/ /**/
  ARMultiSchemaRecursiveFuncQueryStruct recursiveQuery = {"",}; /* 0-fill */ /**/
  ARMultiSchemaFuncQueryFromStruct recqueryfromItem = {0,};  /* 0-fill */ /**/
  ARMultiSchemaQualifierStruct qual = {AR_COND_OP_NONE, NULL};
  ARMultiSchemaQualifierStruct newQual = {AR_COND_OP_NONE, NULL};
  ARMultiSchemaQualifierStruct qualifier = {AR_COND_OP_NONE, NULL};
  ARMultiSchemaQualifierStruct startWith = {AR_COND_OP_NONE, NULL};
  ARMultiSchemaQualifierStruct connectBy = {AR_COND_OP_NONE, NULL};
  ARMultiSchemaRelOpStruct swRelop, relop;
  ARMultiSchemaRelOpStruct cbRelop;
  ARMultiSchemaFieldFuncStruct fieldIdRecQuery[4] = {{"",},}; /* 0-fill */ /**/
  ARMultiSchemaFieldFuncStruct fieldIdMain[4] = {{"",},}; /* 0-fill*/ /**/
  /* fill up query struct */
  fromList.numItems = 1;
  fromList.listPtr = &fromItem;
  strcpy(fieldIdMain[0].queryFromAlias, "recquery");
  fieldIdMain[0].fieldId = EMP_EMPLOYEE_NAME; /* employee name */
  fieldIdMain[0].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  strcpy(fieldIdMain[1].queryFromAlias, "recquery");
  fieldIdMain[1].fieldId = EMP_EMPLOYEE_ID; /* employee id */
  fieldIdMain[1].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  strcpy(fieldIdMain[2].queryFromAlias, "recquery");
  fieldIdMain[2].fieldId = EMP_MANAGER_ID; /* manager id */
  fieldIdMain[2].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  getListFields.numItems = 3;
  getListFields.listPtr = fieldIdMain;  /**/
  fromItem.type = AR_MULTI_SCHEMA_RECURSIVE_QUERY;
  fromItem.u.recursiveQuery = &recursiveQuery;
  fromItem.joinType = 0;
  fromItem.joinQual = NULL;
  strcpy(fromItem.queryFromAlias, "recquery");
  /* The following lines specify the form on which the recursive query */
  /* operates. They also specify a recursive schema alias for that form. */
  recursiveQuery.queryFromList.numItems = 1;
  recursiveQuery.queryFromList.listPtr = &recqueryfromItem;
  recursiveQuery.getListFuncs.numItems = 3;
  strcpy(fieldIdRecQuery[0].queryFromAlias, EMPLOYEE_ALIAS);
  fieldIdRecQuery[0].fieldId = EMP_EMPLOYEE_NAME; /* employee name */
  fieldIdRecQuery[0].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  strcpy(fieldIdRecQuery[1].queryFromAlias, EMPLOYEE_ALIAS);
  fieldIdRecQuery[1].fieldId = EMP_EMPLOYEE_ID; /* employee id */
  fieldIdRecQuery[1].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  strcpy(fieldIdRecQuery[2].queryFromAlias, EMPLOYEE_ALIAS);
  fieldIdRecQuery[2].fieldId = EMP_MANAGER_ID; /* manager id */
  fieldIdRecQuery[2].funcId = AR_MULTI_SCHEMA_FUNC_NONE;  /**/
  recursiveQuery.getListFuncs.listPtr = fieldIdRecQuery; /**/
  recursiveQuery.startQual = &startWith;
  recursiveQuery.recursionQual = &connectBy;
  /* The following line specifies the number of levels in the hierarchy to */
  /* retrieve. Specify 3 to retrieve 2 levels below the parent level. (The */
  /* parent level is identified by the startQual parameter.) */
  recursiveQuery.levelsToRetrieve = 3;
  strcpy(recursiveQuery.recursiveSchemaAlias, EMPLOYEE_ALIAS);
  recqueryfromItem.type = AR_MULTI_SCHEMA_SCHEMA_NAME;
  strcpy(recqueryfromItem.u.schemaName, EMPLOYEE_FORM);
  recqueryfromItem.joinType = 0;
  recqueryfromItem.joinQual = NULL;
  strcpy(recqueryfromItem.queryFromAlias, EMPLOYEE_ALIAS);
  startWith.operation = AR_COND_OP_REL_OP;
  startWith.u.relOp = &swRelop;
  swRelop.operation = AR_REL_OP_EQUAL;
  swRelop.operandLeft.tag = AR_FIELD;
  strcpy(swRelop.operandLeft.u.fieldId.queryFromAlias, EMPLOYEE_ALIAS);
  swRelop.operandLeft.u.fieldId.fieldId = EMP_EMPLOYEE_NAME;
  swRelop.operandRight.tag = AR_VALUE;
  swRelop.operandRight.u.value.dataType = AR_DATA_TYPE_CHAR;
  swRelop.operandRight.u.value.u.charVal = "Bob Jones";
  /* The following lines specify the recursion qualifier. */
  connectBy.operation = AR_COND_OP_REL_OP;
  connectBy.u.relOp = &cbRelop;
  cbRelop.operation = AR_REL_OP_EQUAL;
  cbRelop.operandLeft.tag = AR_FIELD;
  strcpy(cbRelop.operandLeft.u.fieldId.queryFromAlias, EMPLOYEE_ALIAS); /* child */
  cbRelop.operandLeft.u.fieldId.fieldId = EMP_MANAGER_ID; /* manager id */
  cbRelop.operandRight.tag = AR_FIELD;
  strcpy(cbRelop.operandRight.u.fieldId.queryFromAlias,
        AR_REC_QRY_PARENT_ALIAS); /* parent */
  cbRelop.operandRight.u.fieldId.fieldId = EMP_EMPLOYEE_ID; /* employee id */
  numMatchesPtr = &numMatches;
  /* Call routine */
  result = ARGetListEntryWithMultiSchemaFields (ctrl, &fromList,
        &getListFields, &qualifier, &sortList, AR_START_WITH_FIRST_ENTRY,
        AR_NO_MAX_LIST_RETRIEVE, FALSE,
        NULL, NULL, /* groupBy, having */ /**/
        &msEntryList, numMatchesPtr, status);
}