[Home] [Help]
5: +---------------------------------------------------------------------------*/
6:
7: G_WEBSERVICES VARCHAR2(80) := 'WEBSERVICES';
8: ----------------------------------------------------------------
9: --Private: sync_dom_file_ext
10: ----------------------------------------------------------------
11: procedure sync_dom_file_ext
12: (
13: p_repository_id IN number
7: G_WEBSERVICES VARCHAR2(80) := 'WEBSERVICES';
8: ----------------------------------------------------------------
9: --Private: sync_dom_file_ext
10: ----------------------------------------------------------------
11: procedure sync_dom_file_ext
12: (
13: p_repository_id IN number
14: ,p_version_id IN number
15: ,p_status IN varchar2
16: )
17: IS
18:
19: BEGIN
20: update dom_file_ext
21: set status =p_status
22: where repository_id=p_repository_id
23: and version_id=p_version_id;
24: IF ( SQL%NOTFOUND ) THEN
21: set status =p_status
22: where repository_id=p_repository_id
23: and version_id=p_version_id;
24: IF ( SQL%NOTFOUND ) THEN
25: insert into dom_file_ext
26: (
27: repository_id
28: ,version_id
29: ,status
35: ,p_status
36: );
37: END IF;
38:
39: END sync_dom_file_ext;
40: ----------------------------------------------------------------------
41:
42:
43: Procedure Attach (
518: CLOSE is_WebServices_document;
519: --dbms_output.put_line('Repos type='||l_repos_type);
520: IF(l_repos_type =G_WEBSERVICES AND p_Document_id is NOT null ) THEN
521:
522: sync_dom_file_ext(p_Repository_id,p_Document_id,p_Status);
523:
524: /*
525: open get_user_name(p_submitted_by);
526: fetch get_user_name into l_user_name;