DBA Data[Home] [Help]

APPS.PON_CLO_RENUMBER_PKG dependencies on DUAL

Line 46: SELECT To_Number(ClinNum) INTO temp FROM dual;

42: BEGIN
43:
44: -- Step 1 : covert the input ClinNum to number
45: begin
46: SELECT To_Number(ClinNum) INTO temp FROM dual;
47: EXCEPTION
48: WHEN Value_Error OR invalid_number THEN
49: RAISE INVALID_CLIN_NUMBER;
50: END;

Line 60: SELECT LPad(To_Char(temp),4,'0') INTO retValue FROM dual;

56: IF temp > 9999 THEN
57: RAISE CLIN_NUMBERS_EXHAUSTED;
58: END IF;
59: -- Step 4 : convert temp to_char, left padding by 0 , with length = 4
60: SELECT LPad(To_Char(temp),4,'0') INTO retValue FROM dual;
61:
62: -- Return the next Clin number
63:
64: RETURN retValue;

Line 85: SELECT ELIN_TO_DECIMAL(ElinNum) INTO temp FROM dual;

81: BEGIN
82:
83: -- Step 1 : covert the input ClinNum to number
84: begin
85: SELECT ELIN_TO_DECIMAL(ElinNum) INTO temp FROM dual;
86: EXCEPTION
87: WHEN Value_Error OR invalid_number THEN
88: RAISE INVALID_ELIN_NUMBER;
89: END;

Line 99: SELECT DECIMAL_TO_ELIN(temp) INTO retValue FROM dual;

95: IF temp > 39303 THEN
96: RAISE ELIN_NUMBERS_EXHAUSTED;
97: END IF;
98: -- Step 4 : convert temp to_char, left padding by 0 , with length = 4
99: SELECT DECIMAL_TO_ELIN(temp) INTO retValue FROM dual;
100:
101: -- Return the next Clin number
102:
103: RETURN retValue;

Line 291: Select LPad(to_char(LEVEL),4,'0') from dual

287: Algorithm (O(n)).
288: 1. Lets call the input array as ASSIGNED_NUM_ARRAY
289: 2. Create a new array ALL_NUMBERS. Initialized as 0001,0002...9999
290: a. This can be done using query :
291: Select LPad(to_char(LEVEL),4,'0') from dual
292: connect by level < 10000
293: 3. Maintain ASSIGNED_NUM_ARRAY_PTR = 0 as pointer to first element of ASSIGNED_NUM_ARRAY
294: 4. Maintain ALL_NUMBERS_PTR = 0 as pointer to the first element of ALL_NUMBERS.
295: 5. While ASSIGNED_NUM_ARRAY_PTR < length(ASSIGNED_NUM_ARRAY_PTR) loop

Line 338: FROM dual

334:
335: --- Step 2 : Initializing the ALL_NUMBERS Array
336: SELECT LPad(To_Char(LEVEL),4,'0')
337: BULK COLLECT INTO ALL_NUMBERS
338: FROM dual
339: CONNECT BY LEVEL <10000;
340:
341: --- Step 3 and 4 : Initializing the pointers to 2 arrays
342: ASSIGNED_NUM_ARRAY_PTR := 1;

Line 1423: ' SELECT LPad(To_Char(LEVEL),4,0) FROM dual '||

1419: setProductContext(p_product_code,lines_tbl_name,doc_id_col,lineid_col,exhibit_col);
1420: line_num_tbl_qry := 'select line_num_display from ' || lines_tbl_name
1421: || ' where group_line_id is null and ' || doc_id_col || ' = ' || p_bid_number
1422: || ' and auction_line_number = -1 ' || ' union ' ||
1423: ' SELECT LPad(To_Char(LEVEL),4,0) FROM dual '||
1424: ' CONNECT BY LEVEL <= (SELECT to_NUMBER(Max(line_num_display)) '||
1425: ' FROM pon_auction_item_prices_all WHERE AUCTION_HEADER_ID = '|| p_auction_id ||
1426: ' AND GROUP_LINE_ID is null and exhibit_number is null)' ;
1427: