BUS-10101

SELECT MAX (ext.extsysobjclass)
,MAX (ext.ourobjclass)
,MAX (ext.ourobject)
,MAX (o.obj_aliase)
FROM resman.tbl_extsystemobject ext, resman.r_objects o
WHERE UPPER (o.obj_base_table) = UPPER (ext.ourtable)
AND ext.extsystem = 'XYZ'
AND ext.extsysobject = 'DP';

declare
errtxt VARCHAR2(2000);
evnclass NUMBER;
evobjtype VARCHAR2(255);
evdealtype VARCHAR2(255);
evextid NUMBER;
evobjaliase VARCHAR2(255);
begin
RESMAN.PKG_BUS.sp_getextobjinfo(
aextsystem=>'XYZ'-- IN VARCHAR2
,aextobject=> 'DP'-- IN VARCHAR2
-- ,vnclass OUT NUMBER
-- ,vobjtype OUT VARCHAR2
-- ,vdealtype OUT VARCHAR2
-- ,vextid OUT NUMBER
-- ,vobjaliase OUT VARCHAR2
,verrtext=>errtxt--OUT VARCHAR2
);
resman.zzz_ex(errtxt);
end;