Database Program Translation - Information Systems Reengineering, Integration and Normalization - page 207

void
in_info(DB_OBJECT *class_object, DB_VALUE *return_arg,

DB_VALUE *supplier_id, DB_VALUE *supplier_name,

DB_VALUE *supplier_address, DB_VALUE *part_id,

DB_VALUE *part_name, DB_VALUE *unit_price)

{
EXEC SQLX BEGIN DECLARE SECTION;
DB_OBJECT *class_obj = class_object;
const char *supplier_id;
const char *supplier_name;
const char *supplier_address;
const char *part_id;
const char *part_name;
const char *unit_price;
DB_OBJECT *new_instance = NULL;
EXEC SQLX END DECLARE SECTION;
DB_MAKE_NULL(return_arg);

supplier_id = DB_GET_STRING(supplier_id);
supplier_name = DB_GET_STRING(supplier_name);
supplier_address = DB_GET_STRING(supplier_address);
part_id = DB_GET_STRING(part_id);
part_name = DB_GET_STRING(part_name);
unit_price = DB_GET_STRING(unit_price);

if (supplier_id != NULL && part_id != NULL && unit_price !=
NULL)
EXEC SQLX INSERT INTO item(supplier_id, supplier_name,
supplier_address, part_id, part_name, unit_price) VALUES
(::supplier_id, ::suplier_name, ::supplier_address, ::part_id, ::part
_name, ::unit_price) TO :new_instance;

if (new_instance != NULL)
DB_MAKE_OBJECT(return_arg, new_instance);
};

5.10 Transaction Translation from SQL to OSQL

To translate transactions from RDB to OODB, we can apply a symbolic transfor-
mation technique that consists of syntax translation and semantic translation for
SQL. For syntax translation, an SQL statement will be modified. For semantic