/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ extract age of spooled file for report \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
if((((Qus_LSPL_Key_Info_t \)lstptr2)\ .24/.25/
->Key_Field_for_Field_Retd) == 216)
{ memcpy(opndat, " ", 7);
memcpy(opndat, (((var_record_t \)\
lstptr2)->Data_Field),
(((Qus_LSPL_Key_Info_t \)lstptr2)\
->Data_Length));
}
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ bump lstptr2 to next variable length record \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
lstptr2 = lstptr2 +
(((Qus_LSPL_Key_Info_t \)lstptr2)\
->Len_Field_Info_Retd);
}
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ print collected information \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
sprintf(prtlin, "%.1ðs %.1ðd %.7s", .26/
prtfil, pages, opndat);
fwrite(prtlin, 1, 1ðð, record);
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ bump lstptr to next list entry \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
lstptr += (((Qus_Generic_Header_ð1ðð_t \)spcptr)\ .27/
->Size_Each_Entry);
}
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
/\ exit at end of list \/
/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
fclose(record);
exit();
}
}
else
{ printf("List data not valid"); .15/
exit();
}
} .28/
Appendix B. Original Examples in Additional Languages B-37