V+ AceServer Module Documentation 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) 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.read_trans(handle, ptr, trans) Abstract Read a transform from the message buffer.
The message pointer is incremented after the read. Input Parameters Parameter Description 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 trans Value of the parameter read from the message stream 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) ACE Reference Guide, 18317-000 Rev A Page 733