OSI/MHS Management Programming Manual

Examples
OSI/MHS Management Programming Manual—424824-001
C-51
Example in C
if (ua_osi_address->zpselector.zlength > 0)
memcpy (mspwtabl_row.pselector,
ua_osi_address->zpselector.zstring,
ua_osi_address->zpselector.zlength);
if (ua_osi_address->zsselector.zlength > 0)
memcpy (mspwtabl_row.sselector,
ua_osi_address->zsselector.zstring,
ua_osi_address->zsselector.zlength);
if (ua_osi_address->ztselector.zlength > 0)
memcpy (mspwtabl_row.tselector,
ua_osi_address->ztselector.zstring,
ua_osi_address->ztselector.zlength);
if (ua_osi_address->znsap.zlength > 0)
memcpy (mspwtabl_row.nsap,
ua_osi_address->znsap.zstring,
ua_osi_address->znsap.zlength);
/* Execute the SQL insert statement
*/
exec sql begin work;
exec sql
insert into =mspwtabl
values (
:mspwtabl_row.appl_name,
:mspwtabl_row.password,
:mspwtabl_row.iso_country,
:mspwtabl_row.admd,
:mspwtabl_row.prmd,
:mspwtabl_row.x121_address,
:mspwtabl_row.terminal_id,
:mspwtabl_row.numeric_user_id,
:mspwtabl_row.common_name,
:mspwtabl_row.terminal_type,
:mspwtabl_row.org_name,
:mspwtabl_row.org_unit_1,
:mspwtabl_row.org_unit_2,
:mspwtabl_row.org_unit_3,
:mspwtabl_row.org_unit_4,
:mspwtabl_row.surname,
:mspwtabl_row.given_name,
:mspwtabl_row.initials,
:mspwtabl_row.gen_qualifier,
:mspwtabl_row.dom_defined_type_1,
:mspwtabl_row.dom_defined_value_1,
:mspwtabl_row.dom_defined_type_2,
:mspwtabl_row.dom_defined_value_2,
:mspwtabl_row.dom_defined_type_3,
:mspwtabl_row.dom_defined_value_3,
:mspwtabl_row.dom_defined_type_4,
:mspwtabl_row.dom_defined_value_4,
:mspwtabl_row.pselector,
:mspwtabl_row.sselector,
:mspwtabl_row.tselector,
:mspwtabl_row.nsap);
sql_error = sqlcode;
if (!sql_error)
{
exec sql commit work;
}
else
{
exec sql rollback work;
}