Error 37000
SQ074: Line 32 (line 324 of "virt://WS.WS.SYS_DAV_RES.RES_FULL_PATH.RES_CONTENT:/DAV/VAD/conductor/uddi_serv_create.vspx", line 13091 of "/DAV/VAD/conductor/uddi_serv_create.vspx-sql"):
while executing the following statement:
#line 13032 "/DAV/VAD/conductor/uddi_serv_create.vspx-sql"
create method vc_user_post_service_create_form (inout control vspx_form, inout e vspx_event) for "DB"."dba".page_9434fec4600170fa8460c6cd261eab70nductor_uddi__serv__create_vspx
{
--no_c_escapes-
declare path, params, lines any;
path := e.ve_path;
params := e.ve_params;
lines := e.ve_lines;
if (udt_instance_of (control, fix_identifier_case ('vspx_field')) and
0 = control.vc_parent.vc_focus or not e.ve_is_post)
{
return;
}
{
declare form vspx_form;
form := null;
if(udt_instance_of (control, fix_identifier_case ('vspx_field'))
and not udt_instance_of (control, fix_identifier_case ('vspx_button'))) {
form := control.vc_find_parent_form (control);
}
if(control.vc_focus or (form is not null and form.vc_focus)) {
--no_c_escapes-
{
#line push
#line 321 "virt://WS.WS.SYS_DAV_RES.RES_FULL_PATH.RES_CONTENT:/DAV/VAD/conductor/uddi_serv_create.vspx"
declare uuid_value, stmt varchar;
get_keyword('business_key', params),
get_keyword('service_name', params),
get_keyword('service_owner', params)
);
if (get_keyword('service_save', params) is not null) {
if ( get_keyword('mode', params) ='edit' and get_keyword('service_key', params) is not null) {
uuid_value := get_keyword('service_key', params);
update UDDI..BUSINESS_SERVICE set
BS_NAME = get_keyword('service_name', params),
BS_OWNER =get_keyword('service_owner', params)
where BS_SERVICE_KEY = uuid_value;
} else if ( get_keyword('mode', params) ='create' ) {
uuid_value := uuid();
insert into UDDI..BUSINESS_SERVICE ( BS_BUSINESS_KEY, BS_SERVICE_KEY, BS_NAME, BS_OWNER , BS_CREATED, BS_CHANGED)
values (
get_keyword('business_key', params), uuid_value, get_keyword('service_name', params), get_keyword('service_owner', params),
now(), now() );
}
}
http_request_status ('HTTP/1.1 302 Found');
http_header (sprintf('Location: uddi_serv_browse.vspx?page=2&sid=%s&realm=%s\r\n', self.sid ,self.realm));
#line pop
}
}
}
}