Lhep: 1 revision imported

2015-03-18T07:49:25Z

1 revision imported

← Older revision	Revision as of 09:49, 18 March 2015
(No difference)

Lhep: New page:

 Dear Friends and Colleagues,  the publication procedure for bricks that is running on most DBs is wrong, because it does not propagate ZEROX, ZEROY, ZEROZ. Please implement the attac...

2008-07-11T17:10:32Z

New page: <pre> Dear Friends and Colleagues, the publication procedure for bricks that is running on most DBs is wrong, because it does not propagate ZEROX, ZEROY, ZEROZ. Please implement the attac...

New page

<pre>
Dear Friends and Colleagues,

the publication procedure for bricks that is running on most DBs is wrong,
because it does not propagate ZEROX, ZEROY, ZEROZ.
Please implement the attached version as soon as possible.
Best regards

Cristiano

create or replace procedure PP_PUBLISH_BRICK(x_id number, dbx
varchar2, jid number)
AS
logid number;
s_start timestamp;
r_chk number;
r_token varchar2(64);
s_rows integer;
BEGIN
logid := NULL;
PP_LOG(logid, dbx, jid, 'Entering PP_PUBLISH_BRICK with x_id = ' ||
TO_CHAR(x_id) || ' DBLINK = ' || dbx);
select count(*) into r_chk from pt_objects where type = 'BRICK' and objid
= x_id;
if r_chk = 0 then
pp_register_object('BRICK', x_id);
end if;
select token into r_token from pt_objects where type = 'BRICK' and objid =
x_id;
execute immediate 'call operapub.pp_begin_writing_object@' || dbx ||
'(''BRICK'', ' || x_id || ', ''' || r_token || ''')';
PP_LOG(logid, dbx, jid, 'Inserting into TB_EVENTBRICKS with x_id = ' ||
TO_CHAR(x_id) || ' DBLINK = ' || dbx);
s_start := systimestamp;
EXECUTE IMMEDIATE 'INSERT INTO PV_EVENTBRICKS@' || dbx || ' (ID, MINX,
MAXX, MINY, MAXY, MINZ, MAXZ, ID_BRICK, ID_SET, ZEROX, ZEROY, ZEROZ) (SELECT
ID, MINX, MAXX, MINY, MAXY, MINZ, MAXZ, ID_BRICK, ID_SET, ZEROX, ZEROY,
ZEROZ FROM TB_EVENTBRICKS WHERE ID = ' || x_id || ')';
s_rows := SQL%ROWCOUNT;
pp_add_jobstats(jid, 'Bricks', s_start, systimestamp, s_rows);
PP_LOG(logid, dbx, jid, 'Inserting into TB_PLATES with x_id = ' ||
TO_CHAR(x_id) || ' DBLINK = ' || dbx);
s_start := systimestamp;
EXECUTE IMMEDIATE 'INSERT INTO PV_PLATES@' || dbx || ' (ID_EVENTBRICK, ID,
Z) (SELECT ID_EVENTBRICK, ID, Z FROM TB_PLATES WHERE ID_EVENTBRICK = ' ||
x_id || ')';
s_rows := SQL%ROWCOUNT;
pp_add_jobstats(jid, 'Plates', s_start, systimestamp, s_rows);
PP_LOG(logid, dbx, jid, 'Inserting into TB_TEMPLATEMARKSETS with x_id = '
|| TO_CHAR(x_id) || ' DBLINK = ' || dbx);
s_start := systimestamp;
EXECUTE IMMEDIATE 'INSERT INTO PV_TEMPLATEMARKSETS@' || dbx || ' (ID,
ID_EVENTBRICK, ID_MARK, POSX, POSY, MARKROW, MARKCOL, SHAPE, SIDE) (SELECT
ID, ID_EVENTBRICK, ID_MARK, POSX, POSY, MARKROW, MARKCOL, SHAPE, SIDE FROM
TB_TEMPLATEMARKSETS WHERE ID_EVENTBRICK = ' || x_id || ')';
s_rows := SQL%ROWCOUNT;
pp_add_jobstats(jid, 'TemplateMarks', s_start, systimestamp, s_rows);
PP_LOG(logid, dbx, jid, 'Committing changes in PC_PUBLISH_BRICK with x_id
= ' || TO_CHAR(x_id) || ' DBLINK = ' || dbx);
COMMIT;
execute immediate 'call operapub.pp_finish_writing_object@' || dbx ||
'(''BRICK'', ' || x_id || ')';
PP_LOG(logid, dbx, jid, 'Completed PP_PUBLISH_BRICK with x_id = ' ||
TO_CHAR(x_id) || ' DBLINK = ' || dbx);
END;
</pre>

Importand DB Upgrade to be done !! - Revision history

Lhep: 1 revision imported

Lhep: New page:
Dear Friends and Colleagues, the publication procedure for bricks that is running on most DBs is wrong, because it does not propagate ZEROX, ZEROY, ZEROZ. Please implement the attac...