IBM Version 4 manual 100

{

list_status = 'C';

}

else /\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

/\	Else, call QSYLOBJP reusing the user space to get more	\/
/\	list entries.	\/

/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

{

memcpy(cont_hdl, ((Qsy_OBJP_Input_T \)\ usrspc_ptr)->Continuation_Handle, 2ð); .2/

getlst();

list_status = ((Qus_Generic_Header_ð1ðð_t \)\ usrspc_ptr)->Information_Status;

}

}

}

else /\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/ /\ If there exists an unexpected status, log an error (not sho￿wn) \/

/\ and exit.\/ /\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

{

done();

}

}

} /\ proces1 \/ /\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

/\ Function:	proces	\/
/\		\/
/\ Description:	Processes entries until they are complete.	\/
/\		\/

/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/ void proces()

{

list_status = ((Qus_Generic_Header_ð1ðð_t \)usrspc_ptr)->Inform￿ation_Status;

do

{

proces1();

} while (list_status != 'C');

}/\ proces \/

/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

/\ main\/ /\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/

	main(int argc, char \argv[])
	{
	/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
	/\ Make sure we received the correct number of parameters. T￿he argc \/
	/\ parameter will contain the number of parameters that was￿ passed	\/
	/\ to this program. This number also includes the program it￿self,	\/
	/\ so we need to evaluate argc-1.	\/
	/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
B-100	System API Programming V4R1