if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS242, (ErrVal)ret, "SAddPreMsg() failed");
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SPkS8 */
\f
/*
*
-* Fun: SPkU8
+* Fun: oduUnpackUInt8
*
* Desc: This function packs an unsigned 8 bit value into a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SPkU8
+PUBLIC S16 oduUnpackUInt8
(
U8 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkU8(val, mBuf)
+PUBLIC S16 oduUnpackUInt8(val, mBuf)
U8 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
{
S16 ret; /* return code */
- TRC1(SPkU8)
+ TRC1(oduUnpackUInt8)
ret = SAddPreMsg((Data) val, mBuf);
#if (ERRCLASS & ERRCLS_ADD_RES)
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS243, (ErrVal)ret, "SAddPreMsg() failed");
#endif
- RETVALUE(ret);
-} /* end of SPkU8 */
+ return (ret);
+} /* end of oduUnpackUInt8 */
\f
/*
*
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS244, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SPkS16 */
\f
/*
*
-* Fun: SPkU16
+* Fun: oduUnpackUInt16
*
* Desc: This function packs an unsigned 16 bit value into a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SPkU16
+PUBLIC S16 oduUnpackUInt16
(
U16 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkU16(val, mBuf)
+PUBLIC S16 oduUnpackUInt16(val, mBuf)
U16 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[2]; /* array for packing */
S16 ret; /* return code */
- TRC1(SPkU16)
+ TRC1(oduUnpackUInt16)
#ifndef FCSPKINT /* backward compatibility, packing order */
pkArray[0] = (Data) GetHiByte(val);
pkArray[1] = (Data) GetLoByte(val);
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS245, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
-} /* end of SPkU16 */
+ return (ret);
+} /* end of oduUnpackUInt16 */
\f
/*
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS246, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SPkS32 */
\f
/*
*
-* Fun: SPkU32
+* Fun: oduUnpackUInt32
*
* Desc: This function packs an unsigned 32 bit value into a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SPkU32
+PUBLIC S16 oduUnpackUInt32
(
U32 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkU32(val, mBuf)
+PUBLIC S16 oduUnpackUInt32(val, mBuf)
U32 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[4]; /* packing array */
S16 ret; /* return code */
- TRC1(SPkU32)
+ TRC1(oduUnpackUInt32)
#ifndef FCSPKINT /* backward compatibility, packing order */
tmp = (U16) GetHiWord(val);
pkArray[0] = (Data) GetHiByte(tmp);
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS247, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
-} /* end of SPkU32 */
+ return (ret);
+} /* end of oduUnpackUInt32 */
/*ss038.103 1. Added Floating point support*/
#ifdef SS_FLOAT
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS248, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SPkF32 */
/*
if (ret != ROK)
SSLOGERROR(ERRCLS_ADD_RES, ESS249, (ErrVal)ret, "SAddPreMsgMult() failed");
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SPkF64 */
#endif /* SS_FLOAT */
if (!val)
{
SSLOGERROR(ERRCLS_INT_PAR, ESS250, ERRZERO, "SUnpkS8 : Null value");
- RETVALUE(RFAILED);
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
SSLOGERROR(ERRCLS_DEBUG, ESS251, (ErrVal)ret, "SRemPreMsg() failed");
#endif
*val = (S8) tmp;
- RETVALUE(ret);
+ return (ret);
} /* end of SUnpkS8 */
\f
/*
*
-* Fun: SUnpkU8
+* Fun: oduPackUInt8
*
* Desc: This function unpacks an unsigned 8 bit value from a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SUnpkU8
+PUBLIC S16 oduPackUInt8
(
U8 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkU8(val, mBuf)
+PUBLIC S16 oduPackUInt8(val, mBuf)
U8 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
{
Data tmp; /* temporary value */
S16 ret; /* return code */
- TRC1(SUnpkU8)
+ TRC1(oduPackUInt8)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
/* check data pointer */
if (!val)
{
- SSLOGERROR(ERRCLS_INT_PAR, ESS252, ERRZERO, "SUnpkU8 : Null value");
- RETVALUE(RFAILED);
+ SSLOGERROR(ERRCLS_INT_PAR, ESS252, ERRZERO, "oduPackUInt8 : Null value");
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
SSLOGERROR(ERRCLS_DEBUG, ESS253, (ErrVal)ret, "SRemPreMsg() failed");
#endif
*val = (U8) tmp;
- RETVALUE(ret);
-} /* end of SUnpkU8 */
+ return (ret);
+} /* end of oduPackUInt8 */
\f
/*
*
if (!val)
{
SSLOGERROR(ERRCLS_INT_PAR, ESS254, ERRZERO, "SUnpkS16 : Null value");
- RETVALUE(RFAILED);
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
tmp16 = (U16) PutLoByte(tmp16, (U8) unpkArray[1]);
#endif
*val = (S16) tmp16;
- RETVALUE(ret);
+ return (ret);
} /* end of SUnpkS16 */
\f
/*
*
-* Fun: SUnpkU16
+* Fun: oduPackUInt16
*
* Desc: This function unpacks an unsigned 16 bit value from a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SUnpkU16
+PUBLIC S16 oduPackUInt16
(
U16 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkU16(val, mBuf)
+PUBLIC S16 oduPackUInt16(val, mBuf)
U16 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
U16 tmp16; /* temporary value */
Data unpkArray[2]; /* unpacking array */
S16 ret; /* return code */
- TRC1(SUnpkU16)
+ TRC1(oduPackUInt16)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
/* check data pointer */
if (!val)
{
- SSLOGERROR(ERRCLS_INT_PAR, ESS256, ERRZERO, "SUnpkU16 : Null value");
- RETVALUE(RFAILED);
+ SSLOGERROR(ERRCLS_INT_PAR, ESS256, ERRZERO, "oduPackUInt16 : Null value");
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
tmp16 = (U16) PutLoByte(tmp16, (U8) unpkArray[1]);
#endif
*val = tmp16;
- RETVALUE(ret);
-} /* end of SUnpkU16 */
+ return (ret);
+} /* end of oduPackUInt16 */
\f
/*
if (!val)
{
SSLOGERROR(ERRCLS_INT_PAR, ESS258, ERRZERO, "SUnpkS32 : Null value");
- RETVALUE(RFAILED);
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
tmp32 = (U32) PutLoWord(tmp32, (U16) tmp16);
#endif
*val = (S32) tmp32;
- RETVALUE(ret);
+ return (ret);
} /* end of SUnpkS32 */
\f
/*
*
-* Fun: SUnpkU32
+* Fun: oduPackUInt32
*
* Desc: This function unpacks an unsigned 32 bit value from a message.
*
*/
#ifdef ANSI
-PUBLIC S16 SUnpkU32
+PUBLIC S16 oduPackUInt32
(
U32 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkU32(val, mBuf)
+PUBLIC S16 oduPackUInt32(val, mBuf)
U32 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
#ifdef ERRCLASS
S16 ret; /* return code */
#endif /* ERRCLASS */
- TRC1(SUnpkU32)
+ TRC1(oduPackUInt32)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
/* check data pointer */
if (!val)
{
- SSLOGERROR(ERRCLS_INT_PAR, ESS260, ERRZERO, "SUnpkU32 : Null value");
- RETVALUE(RFAILED);
+ SSLOGERROR(ERRCLS_INT_PAR, ESS260, ERRZERO, "oduPackUInt32 : Null value");
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
tmp32 = (U32) PutLoWord(tmp32, (U16) tmp16);
#endif
*val = tmp32;
- RETVALUE(ret);
-} /* end of SUnpkU32 */
+ return (ret);
+} /* end of oduPackUInt32 */
/*ss038.103 1. Added Floating point support*/
#ifdef SS_FLOAT
if (!val)
{
SSLOGERROR(ERRCLS_INT_PAR, ESS262, ERRZERO, "SUnpkF32 : Null value");
- RETVALUE(RFAILED);
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
sscanf(tmpArray, "%f", val);
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SUnpkF32 */
if (!val)
{
SSLOGERROR(ERRCLS_INT_PAR, ESS264, ERRZERO, "SUnpkF64 : Null value");
- RETVALUE(RFAILED);
+ return RFAILED;
}
#endif /* ERRCLASS & ERRCLS_INT_PAR */
sscanf(tmpArray, "%lf", val);
#endif
- RETVALUE(ret);
+ return (ret);
} /* end of SUnpkF64 */
#endif /* SS_FLOAT */