Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2014
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.70 KB | None | 0 0
  1. CREATE OR REPLACE PROCEDURE LOGINCHECK(SQLQRY IN CLOB)
  2. AS
  3. C INTEGER;
  4. N INTEGER;
  5. RC SYS_REFCURSOR;
  6. stmt clob:= To_Clob('begin ' || sqlqry || '; end;');
  7. BEGIN
  8. C := SYS.DBMS_SQL.OPEN_CURSOR;
  9. SYS.DBMS_SQL.PARSE(C,stmt ,DBMS_SQL.native);
  10. N := SYS.DBMS_SQL.EXECUTE(C);
  11. SYS.DBMS_SQL.GET_NEXT_RESULT(C,RC);
  12. SYS.DBMS_SQL.RETURN_RESULT(RC);
  13. EXCEPTION
  14. WHEN NO_DATA_FOUND THEN
  15. NULL;
  16. when OTHERS then
  17. RAISE;
  18. END LOGINCHECK;
  19.  
  20. declare stmt clob := 'INWARDPKG.MACHINEINWARD_VALIDATING(XMLDOC => XMLTYPE.CREATEXML(paste xml from link))'; --The parameter value is a xml you can download it from above link
  21. begin
  22. LOGINCHECK(SQLQRY => STMT);
  23. end;
  24.  
  25. PLS-00172: string literal too long.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement