Advertisement
Guest User

Untitled

a guest
Jun 25th, 2018
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. DECLARE  v#res NUMBER(12); v#agr_policy NUMBER(12); v#agr NUMBER(12);
  2.   --v#CURSOR   tcom.ref_cursor;
  3. BEGIN
  4.   --rsyst.sys_sp_logical_login_csharp (v#CURSOR,'full' , 'AGENTMAGNUM', '1', 'TwoWay', '1', '1', 't');
  5.  tcom.BeginTransaction;
  6.  v#agr_policy := RSYST.DOG_SP_POLICY_CREATE_NS_US
  7. (9697904,NULL,NULL,NULL,'аыв','аыв','авыа',NULL,NULL,NULL,NULL,NULL,NULL,'1',2353,TO_DATE('19801111 00:00:00','yyyymmdd HH24:mi:ss'),300,'1',1182);
  8.  :I := v#agr_policy;
  9.  tcom.CommitTransaction;
  10. EXCEPTION
  11.   WHEN OTHERS THEN tcom.RollbackTransaction;
  12.  RAISE;
  13. END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement