/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ If the call is successful, call the exit programs. \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
Call_Exit_Program(rcv_variable);
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ If the continuation handle field in the receiver variable is \/
/\ not set to blanks, the API has more information to return \/
/\ than what could fit in the receiver variable. \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
rcv_ptr=rcv_variable;
while (memcmp(((Qus_EXTIð2ðð_t \)rcv_ptr)->Continue_Handle,
" ",16)!=ð)
{
memcpy(continuation_hdl,
((Qus_EXTIð2ðð_t \)rcv_ptr)Continue_Handle,16);
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ Call the API to retrieve the exit program information. \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
QusRetrieveExitInformation(continuation_hdl,
&rcv_variable,
len_rcv_variable,
"EXTIð2ðð",
"EXAMPLE_EXIT_POINT ",
"EXMPð1ðð",
exit_pgm_num,
&sel_criteria,
&error_code);
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ Verify that the call to the API is successful. \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
if (error_code.ec_fields.Bytes_Available != ð)
{
printf("RETRIEVE EXIT PROGRAMS FAILED WITH EXCEPTION: %.7s",
error_code.ec_fields.Exception_Id);
exit(1);
}
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ If the call is successful, call the exit programs. \/
/\ The receiver variable offers enough room for a minimum of \/
/\ one exit program entry because the receiver variable was \/
/\ declared as 35ðð bytes. Therefore, this example only \/
/\ checks the number of exit programs returned field. If the \/
/\ receiver variable were not large enough to hold at least \/
/\ one entry, the bytes available field would need to be \/
/\ checked as well as the number of exit programs returned \/
/\ field. If the number of exit programs returned field is \/
/\ set to zero and the bytes available field is greater than \/
/\ the bytes returned field, the API had at least one exit \/
/\ program entry to return but was unable to because the \/
/\ receiver variable was too small. \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
Call_Exit_Program(rcv_variable);
} /\ While continuation handle not set to blanks \/
} /\ Number of exit programs not equal to zero \/
4-18 System API Programming V4R1