V+ AceServer Module Documentation CALL sv.read_double(handle, saved.ptr, double.val) CALL sv.read_short(handle, saved.ptr, short.val) CALL sv.read_single(handle, saved.ptr, single.val) CALL sv.read_string(handle, saved.ptr, $string.val) CALL sv.read_trans(handle, saved.ptr, trans.val) .END sv.write_short(value, handle, ptr) Abstract Write a 16-bit integer to the output message at the specified offset. Input Parameters Parameter Description value Value to write handle Index of the message to read from ptr Position in the message buffer to read at Output Parameters Parameter Description ptr Index pointing to the next data item in the message Example .PROGRAM ex1.msg(handle, ptr) ; ABSTRACT:
Demonstrate writing then reading to a message buffer ; ; INPUTS: handle: Index of the message to write into ; ptr:
Position in the message buffer AUTO REAL saved.ptr AUTO REAL bool.val, byte.val, double.val, short.val AUTO REAL single.val AUTO $string.val AUTO LOC trans.val ; Save the original position of the pointer saved.ptr = ptr ; Write some data CALL sv.write_bool(TRUE, handle, ptr) CALL sv.write_byte(8, handle, ptr) CALL sv.write_double(100.1, handle, ptr) CALL sv.write_short(2, handle, ptr) CALL sv.write_single(121.2, handle, ptr) CALL sv.write_string("Text", handle, ptr) CALL sv.write_trans(NULL, handle, ptr) ; Read the data that was written CALL sv.read_bool(handle, saved.ptr, bool.val) CALL sv.read_byte(handle, saved.ptr, byte.val) ACE Reference Guide, 18317-000 Rev A Page 740