PAM Programming Manual

Link-Level Programming Examples
PAM Programming Manual—142482
B-15
Procedures
else
fprintf(stdout, “Command Code is bad\n”)
exit(Abend_exit)
}
/* ----------------------- Get P/F flag ------------------------ */
if (argc >= 5
P_F_Flag = atoi (argv[4]);
else {
fprintf(stdout, “P F flag is bad\n”);
exit(Abend_exit);
};
/* ---------------------- Get response flag -------------------- */
if (argc >= 6)
Rsp_Flag = atoi (argv[5]);
else {
fprintf(stdout, “Response flag is bad\n”);
exit(Abend_exit);
};
/* --------------------- Look for Loop Count ------------------- */
if (argc >= 7)
Loop_Cnt = atoi (argv[6]);
else {
fprintf(stdout, “Loop count is bad\n”);
exit(Abend_exit);
};
/* --------------------- Look for SDU count -------------------- */
if (argc >= 8)
SDU_Cnt = atoi (argv[7]);
else {
fprintf(stdout, “SDU count is bad\n”);
exit(Abend_exit);
}
/* --------- Look for beginning user data size ( bytes ) ------- */
if (argc >= 9)
Begin_User_Data_Size_B = atoi (argv[8]);
else {
fprintf(stdout, “Begin User Data Size is bad.\n”);
exit(Abend_exit);
};
/* ------------- Grab ending user data size ( bytes ) ---------- */
if (argc >= 10)
End_User_Data_Size_B = atoi (argv[9]);
else {
fprintf(stdout, “End User Data Size is bad.\n”);
exit(Abend_exit);
};
/* --------------------- Grab NoWait depth --------------------- */
if (argc >= 11)
NoWait_Depth = atoi (argv[10]);
else {
fprintf(stdout, “NoWait depth is bad.\n”);
exit(Abend_exit);