89:
90:
91: IF p_group_id IS NULL THEN
92: select wip_indicators_temp_s.nextval into x_main_group_id
93: from sys.dual ;
94: ELSE
95: x_main_group_id := p_group_id ;
96: END IF;
97:
106:
107: -- Generate the new Sequence for this
108: begin
109: select wip_indicators_temp_s.nextval into x_temp_group_id
110: from sys.dual ;
111: exception
112: when others then
113: x_phase := 'IV';
114: p_errnum := -1 ;
206:
207:
208: IF p_group_id IS NULL THEN
209: select wip_indicators_temp_s.nextval into x_main_group_id
210: from sys.dual ;
211: ELSE
212: x_main_group_id := p_group_id ;
213: END IF;
214:
224:
225: -- Generate the new Sequence for this
226: begin
227: select wip_indicators_temp_s.nextval into x_temp_group_id
228: from sys.dual ;
229: exception
230: when others then
231: x_phase := 'IV';
232: p_errnum := -1 ;
327:
328:
329: IF p_group_id IS NULL THEN
330: select wip_indicators_temp_s.nextval into x_main_group_id
331: from sys.dual ;
332: ELSE
333: x_main_group_id := p_group_id ;
334: END IF;
335:
344:
345: -- Generate the new Sequence for this
346: begin
347: select wip_indicators_temp_s.nextval into x_temp_group_id
348: from sys.dual ;
349: exception
350: when others then
351: x_phase := 'IV';
352: p_errnum := -1 ;
456:
457:
458: IF p_group_id IS NULL THEN
459: select wip_indicators_temp_s.nextval into x_main_group_id
460: from sys.dual ;
461: ELSE
462: x_main_group_id := p_group_id ;
463: END IF;
464:
473:
474: -- Generate the new Sequence for this
475: begin
476: select wip_indicators_temp_s.nextval into x_temp_group_id
477: from sys.dual ;
478: exception
479: when others then
480: x_phase := 'IV';
481: p_errnum := -1 ;
855: ***********************************************/
856:
857: IF p_group_id IS NULL THEN
858: select wip_indicators_temp_s.nextval into x_group_id
859: from sys.dual ;
860: ELSE
861: x_group_id := p_group_id ;
862: END IF;
863:
1304: ***********************************************/
1305:
1306: IF p_group_id IS NULL THEN
1307: select wip_indicators_temp_s.nextval into x_group_id
1308: from sys.dual ;
1309: ELSE
1310: x_group_id := p_group_id ;
1311: END IF;
1312:
1982: BEGIN
1983: BEGIN
1984: select to_date(p_date, fnd_date.output_mask)
1985: into t_date
1986: from dual;
1987: EXCEPTION WHEN OTHERS THEN
1988: ret := FND_API.G_FALSE;
1989: END;
1990: return ret;
1998: BEGIN
1999: BEGIN
2000: select to_date(p_date, fnd_date.outputdt_mask)
2001: into t_date
2002: from dual;
2003: EXCEPTION WHEN OTHERS THEN
2004: ret := FND_API.G_FALSE;
2005: END;
2006: return ret;
2029: BEGIN
2030: BEGIN
2031: select to_date(p_to_dt,fnd_date.outputdt_mask) - to_date(p_from_dt,fnd_date.outputdt_mask)
2032: into diff
2033: from dual;
2034: EXCEPTION WHEN OTHERS THEN
2035: return FND_API.G_RET_STS_ERROR;
2036: END;
2037: return to_char(diff * 24); -- return in hours