DBA Data[Home] [Help]

APPS.GMA_GLOBAL_GRP dependencies on SY_DOCS_SEQ

Line 58: ( p_doc_type IN sy_docs_seq.doc_type%TYPE

54: --| |
55: --+==========================================================================+
56: -- Func end of comments
57: FUNCTION Get_Doc_No
58: ( p_doc_type IN sy_docs_seq.doc_type%TYPE
59: , p_orgn_code IN sy_docs_seq.orgn_code%TYPE
60: )
61: RETURN VARCHAR2
62: IS

Line 59: , p_orgn_code IN sy_docs_seq.orgn_code%TYPE

55: --+==========================================================================+
56: -- Func end of comments
57: FUNCTION Get_Doc_No
58: ( p_doc_type IN sy_docs_seq.doc_type%TYPE
59: , p_orgn_code IN sy_docs_seq.orgn_code%TYPE
60: )
61: RETURN VARCHAR2
62: IS
63: l_doc_no VARCHAR2(10);

Line 68: CURSOR sy_docs_seq_c1 IS

64: l_doc_mask VARCHAR2(10);
65: l_last_assigned NUMBER(10);
66: l_format_size NUMBER(5);
67: l_pad_char VARCHAR2(1);
68: CURSOR sy_docs_seq_c1 IS
69: SELECT
70: last_assigned
71: , format_size
72: , pad_char

Line 74: sy_docs_seq

70: last_assigned
71: , format_size
72: , pad_char
73: FROM
74: sy_docs_seq
75: WHERE
76: doc_type = p_doc_type
77: AND orgn_code = p_orgn_code;
78:

Line 81: -- Update sy_docs_seq

77: AND orgn_code = p_orgn_code;
78:
79: BEGIN
80:
81: -- Update sy_docs_seq
82: UPDATE sy_docs_seq
83: SET
84: last_assigned = last_assigned + 1
85: WHERE

Line 82: UPDATE sy_docs_seq

78:
79: BEGIN
80:
81: -- Update sy_docs_seq
82: UPDATE sy_docs_seq
83: SET
84: last_assigned = last_assigned + 1
85: WHERE
86: doc_type = p_doc_type AND

Line 90: OPEN sy_docs_seq_c1;

86: doc_type = p_doc_type AND
87: orgn_code = p_orgn_code;
88:
89: -- Now get new document no
90: OPEN sy_docs_seq_c1;
91:
92: FETCH sy_docs_seq_c1 INTO
93: l_last_assigned
94: , l_format_size

Line 92: FETCH sy_docs_seq_c1 INTO

88:
89: -- Now get new document no
90: OPEN sy_docs_seq_c1;
91:
92: FETCH sy_docs_seq_c1 INTO
93: l_last_assigned
94: , l_format_size
95: , l_pad_char;
96:

Line 97: CLOSE sy_docs_seq_c1;

93: l_last_assigned
94: , l_format_size
95: , l_pad_char;
96:
97: CLOSE sy_docs_seq_c1;
98:
99: -- Sort out format mask
100: l_doc_mask := LTRIM(RPAD(l_pad_char,l_format_size,l_pad_char));
101: l_doc_no := LTRIM(TO_CHAR(l_last_assigned, l_doc_mask));