obliqrt/derived/ObValue_RemObj_v1.i3


INTERFACE ObValue_RemObj_v1;

IMPORT Rd, SharedObj, Wr, StubLib, ObValue, Thread, NetObj;
TYPE Surrogate_ObValue_RemObj = ObValue.RemObj OBJECT
      OVERRIDES
        Who := Surrogate_Who;
        Select := Surrogate_Select;
        Invoke := Surrogate_Invoke;
        Update := Surrogate_Update;
        Redirect := Surrogate_Redirect;
        Has := Surrogate_Has;
        Obtain := Surrogate_Obtain;
      END;

PROCEDURE Surrogate_Who(
    self: ObValue.RemObj;
    VAR protected: BOOLEAN;
    VAR serialized: BOOLEAN): TEXT RAISES {NetObj.Error, Thread.Alerted};

PROCEDURE Surrogate_Select(
    self: ObValue.RemObj;
    label: TEXT;
    internal: BOOLEAN;
    VAR hint: INTEGER): ObValue.Val RAISES {ObValue.Error,
    ObValue.Exception, ObValue.ServerError, SharedObj.Error, NetObj.Error,
    Thread.Alerted};

PROCEDURE Surrogate_Invoke(
    self: ObValue.RemObj;
    label: TEXT;
    argNo: INTEGER;
    READONLY args: ObValue.Vals;
    internal: BOOLEAN;
    VAR hint: INTEGER): ObValue.Val RAISES {ObValue.Error,
    ObValue.Exception, ObValue.ServerError, SharedObj.Error, NetObj.Error,
    Thread.Alerted};

PROCEDURE Surrogate_Update(
    self: ObValue.RemObj;
    label: TEXT;
    val: ObValue.Val;
    internal: BOOLEAN;
    VAR hint: INTEGER) RAISES {ObValue.ServerError, SharedObj.Error,
    NetObj.Error, Thread.Alerted};

PROCEDURE Surrogate_Redirect(
    self: ObValue.RemObj;
    val: ObValue.Val;
    internal: BOOLEAN) RAISES {ObValue.ServerError, SharedObj.Error,
    NetObj.Error, Thread.Alerted};

PROCEDURE Surrogate_Has(
    self: ObValue.RemObj;
    label: TEXT;
    VAR hint: INTEGER): BOOLEAN RAISES {NetObj.Error, Thread.Alerted};

PROCEDURE Surrogate_Obtain(self: ObValue.RemObj; internal: BOOLEAN)
    : REF ObValue.ObjFields RAISES {ObValue.ServerError, NetObj.Error,
    Thread.Alerted};

PROCEDURE Stub_Who(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted};

PROCEDURE Stub_Select(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted, ObValue.Error, ObValue.Exception, ObValue.ServerError,
    SharedObj.Error};

PROCEDURE Stub_Invoke(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted, ObValue.Error, ObValue.Exception, ObValue.ServerError,
    SharedObj.Error};

PROCEDURE Stub_Update(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted, ObValue.ServerError, SharedObj.Error};

PROCEDURE Stub_Redirect(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted, ObValue.ServerError, SharedObj.Error};

PROCEDURE Stub_Has(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted};

PROCEDURE Stub_Obtain(
    self: ObValue.RemObj;
    c: StubLib.Conn;
    rep: StubLib.DataRep) RAISES {NetObj.Error, Rd.Failure, Wr.Failure,
    Thread.Alerted, ObValue.ServerError};

END ObValue_RemObj_v1.