319: -- dbms_output.put_line('JTF_PERZ_PROFILE_PVT Define columns');
320: null;
321: END IF;
322:
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
320: null;
321: END IF;
322:
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
321: END IF;
322:
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
322:
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
330: dbms_sql.define_column(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE, 100);
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
330: dbms_sql.define_column(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE, 100);
331:
324: dbms_sql.define_column(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME, 60);
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
330: dbms_sql.define_column(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE, 100);
331:
332: END Define_Columns_Profile;
325: dbms_sql.define_column(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE, 30);
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
330: dbms_sql.define_column(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE, 100);
331:
332: END Define_Columns_Profile;
333: -- ****************************************************************************
326: dbms_sql.define_column(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION, 240);
327: dbms_sql.define_column(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG, 1);
328: dbms_sql.define_column(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE, 100);
329: dbms_sql.define_column(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE, 100);
330: dbms_sql.define_column(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE, 100);
331:
332: END Define_Columns_Profile;
333: -- ****************************************************************************
334: -- This procedure defines the return columns for the D-SQL
337: p_profile_attrib_rec OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE ) IS
338: BEGIN
339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
338: BEGIN
339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
348: dbms_sql.column_value(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE);
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
348: dbms_sql.column_value(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE);
349:
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
348: dbms_sql.column_value(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE);
349:
350: END Get_Columns_Profile;
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
348: dbms_sql.column_value(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE);
349:
350: END Get_Columns_Profile;
351: -- ****************************************************************************
344: dbms_sql.column_value(p_cur_profile, 4, p_profile_attrib_rec.PROFILE_DESCRIPTION);
345: dbms_sql.column_value(p_cur_profile, 5, p_profile_attrib_rec.ACTIVE_FLAG);
346: dbms_sql.column_value(p_cur_profile, 6, p_profile_attrib_rec.PROFILE_ATTRIBUTE);
347: dbms_sql.column_value(p_cur_profile, 7, p_profile_attrib_rec.ATTRIBUTE_TYPE);
348: dbms_sql.column_value(p_cur_profile, 8, p_profile_attrib_rec.ATTRIBUTE_VALUE);
349:
350: END Get_Columns_Profile;
351: -- ****************************************************************************
352:
371: null;
372: END IF;
373:
374: If (p_profile_name IS NOT NULL) Then
375: dbms_sql.bind_variable(p_cur_profile, 'p_profile_name', p_profile_name);
376: End if;
377:
378: If (p_profile_id IS NOT NULL) Then
379: dbms_sql.bind_variable(p_cur_profile, 'p_profile_id', p_profile_id);
375: dbms_sql.bind_variable(p_cur_profile, 'p_profile_name', p_profile_name);
376: End if;
377:
378: If (p_profile_id IS NOT NULL) Then
379: dbms_sql.bind_variable(p_cur_profile, 'p_profile_id', p_profile_id);
380: End if;
381:
382: If (p_profile_type IS NOT NULL) Then
383: dbms_sql.bind_variable(p_cur_profile, 'p_profile_type', p_profile_type);
379: dbms_sql.bind_variable(p_cur_profile, 'p_profile_id', p_profile_id);
380: End if;
381:
382: If (p_profile_type IS NOT NULL) Then
383: dbms_sql.bind_variable(p_cur_profile, 'p_profile_type', p_profile_type);
384: End if;
385:
386: -- going beyond this only if more than one row
387: IF (p_profile_attrib_tbl.count > 0) THEN
386: -- going beyond this only if more than one row
387: IF (p_profile_attrib_tbl.count > 0) THEN
388:
389: If (p_profile_attrib_tbl(1).profile_attribute IS NOT NULL) Then
390: dbms_sql.bind_variable(p_cur_profile, 'p_profile_attribute', p_profile_attrib_tbl(1).profile_attribute);
391: End if;
392:
393: If (p_profile_attrib_tbl(1).attribute_type IS NOT NULL) Then
394: dbms_sql.bind_variable(p_cur_profile, 'p_attribute_type', p_profile_attrib_tbl(1).attribute_type);
390: dbms_sql.bind_variable(p_cur_profile, 'p_profile_attribute', p_profile_attrib_tbl(1).profile_attribute);
391: End if;
392:
393: If (p_profile_attrib_tbl(1).attribute_type IS NOT NULL) Then
394: dbms_sql.bind_variable(p_cur_profile, 'p_attribute_type', p_profile_attrib_tbl(1).attribute_type);
395: End if;
396:
397: If (p_profile_attrib_tbl(1).attribute_value IS NOT NULL) Then
398: dbms_sql.bind_variable(p_cur_profile, 'p_attribute_value', p_profile_attrib_tbl(1).attribute_value);
394: dbms_sql.bind_variable(p_cur_profile, 'p_attribute_type', p_profile_attrib_tbl(1).attribute_type);
395: End if;
396:
397: If (p_profile_attrib_tbl(1).attribute_value IS NOT NULL) Then
398: dbms_sql.bind_variable(p_cur_profile, 'p_attribute_value', p_profile_attrib_tbl(1).attribute_value);
399: End if;
400:
401: END IF;
402: