Узнать актуальность данных в глобальнике по сети
Материал из wiki.standart-n.ru
Отправьте по g-tasks запрос:
SET TERM ^ ; create or alter procedure PR_GET_LAST_MGN_UPDATE as declare variable CODE_PROFILE DM_ID; declare variable MGN_CONNSTR DM_TEXT; declare variable INSERTDT DM_DATETIME; begin select P.PARAM_VALUE from PARAMS P where P.PARAM_ID = 'CODE_PROFILE' into :CODE_PROFILE; select P.PARAM_VALUE from PARAMS P where P.PARAM_ID = 'MGN_CONNSTR' into :MGN_CONNSTR; if (:CODE_PROFILE is not null) then if (:CODE_PROFILE>0) then begin code_profile=(-1)*(100+:code_profile); execute statement 'select first 1 z.insertdt from zmain_dict z order by z.insertdt desc' on external :MGN_CONNSTR as user 'SYSDBA' password 'masterkey' into :INSERTDT; update or insert into REPORTS (ID, PARENT_ID, STATUS, REPORTTYPE, SORTING, CAPTION, PARAMS) values (:code_profile, 0, -1, -1, 0, 'mgn_last_update', :INSERTDT) matching (ID); suspend; end end^ SET TERM ; ^ /* Following GRANT statetements are generated automatically */ GRANT SELECT ON PARAMS TO PROCEDURE PR_GET_LAST_MGN_UPDATE; GRANT SELECT,INSERT,UPDATE ON REPORTS TO PROCEDURE PR_GET_LAST_MGN_UPDATE; /* Existing privileges on this procedure */ GRANT EXECUTE ON PROCEDURE PR_GET_LAST_MGN_UPDATE TO SYSDBA; execute procedure PR_GET_LAST_MGN_UPDATE; drop procedure PR_GET_LAST_MGN_UPDATE;
После того как он выполнится, выполните запрос на сервере:
select P.ID, P.CAPTION, P.DESCRIPTION, R.PARAMS from G$PROFILES P left join REPORTS R on R.G$PROFILE_ID = P.ID and R.ID between -200 and -100 where 1 = 1 and P.STATUS = 0 and P.RELATIONTYPE = 1 and P.DBSECUREKEY is not null order by R.PARAMS asc