/ᑍ ᑍ/
/ᑍ and the Qus_Vlen_Rec_4_t structure is defined in ᑍ/
/ᑍ qus.h (included by qusrgfa1) as: ᑍ/
/ᑍ ᑍ/
/ᑍ typedef _Packed struct Qus_Vlen_Rec_4 { ᑍ/
/ᑍ int Length_Vlen_Record; ᑍ/
/ᑍ int Control_Key; ᑍ/
/ᑍ int Length_Data; ᑍ/
/ᑍ ᑍᑍchar Data[];-> this field is supplied by ᑍ/
/ᑍ the user ᑍ/
/ᑍ } Qus_Vlen_Rec_4_t; ᑍ/
/ᑍ ᑍ/
/ᑍ This structure is mapped in bytes as follows: ᑍ/
/ᑍ { ᑍ/
/ᑍ BIN(4) - num_rec ᑍ/
/ᑍ BIN(4) - length variable length record for replace key ᑍ/
/ᑍ BIN(4) - replace key ᑍ/
/ᑍ BIN(4) - length replace data ᑍ/
/ᑍ CHAR(1) - replace data ᑍ/
/ᑍ BIN(4) - length variable length record for CCSID key ᑍ/
/ᑍ BIN(4) - CCSID key ᑍ/
/ᑍ BIN(4) - length CCSID data ᑍ/
/ᑍ BIN(4) - CCSID data ᑍ/
/ᑍ BIN(4) - length variable length record for description ᑍ/
/ᑍ key ᑍ/
/ᑍ BIN(4) - description key ᑍ/
/ᑍ BIN(4) - length description key ᑍ/
/ᑍ CHAR(5) - description data ᑍ/
/ᑍ } ᑍ/
/ᑍ ᑍ/
/ᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ/
attrib_keys.replace_rec.Length_Vlen_Record=13; 15
attrib_keys.replace_rec.Control_Key=4;
attrib_keys.replace_rec.Length_Data=1;
attrib_keys.replace='1';
attrib_keys.CCSID_rec.Length_Vlen_Record=16;
attrib_keys.CCSID_rec.Control_Key=3;
attrib_keys.CCSID_rec.Length_Data=4;
attrib_keys.CCSID=37;
attrib_keys.desc_rec.Length_Vlen_Record=39;
attrib_keys.desc_rec.Control_Key=2;
attrib_keys.desc_rec.Length_Data=27;
memcpy(&attrib_keys.desc,
"THIS IS A TEST EXIT PROGRAM",27);
/ᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ/
/ᑍ Call the API to add the exit program. ᑍ/
/ᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ/
QusAddExitProgram("EXAMPLE_EXIT_POINT ",
"EXMP1",
1,
"EXAMPLEPGMEXAMPLELIB",
"EXAMPLE EXIT PROGRAM DATA",
25,
&attrib_keys,
&error_code);
9-24 System API Programming V4R1