method LoadUIstate

Description

load UI state

Parameters

omState	output	memptr	State data
oiReturnStatus	output	integer	Return status of the method.

Internal usage

unused

program code (program1/business.p)

for each tUIstate on error undo, throw:
    viLen = viLen + tUIstate.tiSegmentLength.
end.

set-size (omState) = viLen.

for each tUIstate on error undo, throw:
    put-string(omState, viPos, tUIstate.tiSegmentLength) = tUIstate.tcSegmentValue.
    viPos = viPos + tUIstate.tiSegmentLength.
end.