[Home] [Help]
447: FUNCTION get_codeclass (p_class IN VARCHAR2,
448: p_code_id IN NUMBER)
449: RETURN VARCHAR2 -- Returns TRUE/FALSE
450: IS
451: ln_code_id igs_ad_code_classes.code_id%TYPE;
452: lv_name igs_ad_code_classes.name%TYPE;
453: lv_system_status igs_ad_code_classes.system_status%TYPE;
454: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
455: BEGIN
448: p_code_id IN NUMBER)
449: RETURN VARCHAR2 -- Returns TRUE/FALSE
450: IS
451: ln_code_id igs_ad_code_classes.code_id%TYPE;
452: lv_name igs_ad_code_classes.name%TYPE;
453: lv_system_status igs_ad_code_classes.system_status%TYPE;
454: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
455: BEGIN
456: ln_code_id := p_code_id;
449: RETURN VARCHAR2 -- Returns TRUE/FALSE
450: IS
451: ln_code_id igs_ad_code_classes.code_id%TYPE;
452: lv_name igs_ad_code_classes.name%TYPE;
453: lv_system_status igs_ad_code_classes.system_status%TYPE;
454: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
455: BEGIN
456: ln_code_id := p_code_id;
457: lv_closed_ind := 'N';
450: IS
451: ln_code_id igs_ad_code_classes.code_id%TYPE;
452: lv_name igs_ad_code_classes.name%TYPE;
453: lv_system_status igs_ad_code_classes.system_status%TYPE;
454: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
455: BEGIN
456: ln_code_id := p_code_id;
457: lv_closed_ind := 'N';
458: RETURN (get_codeclass (p_class => p_class,
465: FUNCTION get_codeclass (p_class IN VARCHAR2,
466: p_name IN VARCHAR2)
467: RETURN VARCHAR2 -- Returns TRUE/FALSE
468: IS
469: ln_code_id igs_ad_code_classes.code_id%TYPE;
470: lv_name igs_ad_code_classes.name%TYPE;
471: lv_system_status igs_ad_code_classes.system_status%TYPE;
472: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
473: BEGIN
466: p_name IN VARCHAR2)
467: RETURN VARCHAR2 -- Returns TRUE/FALSE
468: IS
469: ln_code_id igs_ad_code_classes.code_id%TYPE;
470: lv_name igs_ad_code_classes.name%TYPE;
471: lv_system_status igs_ad_code_classes.system_status%TYPE;
472: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
473: BEGIN
474: lv_name := p_name;
467: RETURN VARCHAR2 -- Returns TRUE/FALSE
468: IS
469: ln_code_id igs_ad_code_classes.code_id%TYPE;
470: lv_name igs_ad_code_classes.name%TYPE;
471: lv_system_status igs_ad_code_classes.system_status%TYPE;
472: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
473: BEGIN
474: lv_name := p_name;
475: lv_closed_ind := 'N';
468: IS
469: ln_code_id igs_ad_code_classes.code_id%TYPE;
470: lv_name igs_ad_code_classes.name%TYPE;
471: lv_system_status igs_ad_code_classes.system_status%TYPE;
472: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
473: BEGIN
474: lv_name := p_name;
475: lv_closed_ind := 'N';
476: RETURN (get_codeclass (p_class => p_class,
484: p_code_id IN OUT NOCOPY NUMBER,
485: p_name IN OUT NOCOPY VARCHAR2)
486: RETURN VARCHAR2 -- Returns TRUE/FALSE
487: IS
488: lv_system_status igs_ad_code_classes.system_status%TYPE;
489: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
490: BEGIN
491: lv_closed_ind := 'N';
492: RETURN (get_codeclass (p_class => p_class,
485: p_name IN OUT NOCOPY VARCHAR2)
486: RETURN VARCHAR2 -- Returns TRUE/FALSE
487: IS
488: lv_system_status igs_ad_code_classes.system_status%TYPE;
489: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
490: BEGIN
491: lv_closed_ind := 'N';
492: RETURN (get_codeclass (p_class => p_class,
493: p_code_id => p_code_id,
502: p_system_status IN VARCHAR2)
503: RETURN VARCHAR2 -- Returns TRUE/FALSE
504: IS
505: lv_ret_success VARCHAR2(5);
506: ln_code_id igs_ad_code_classes.code_id%TYPE;
507: lv_name igs_ad_code_classes.name%TYPE;
508: lv_system_status igs_ad_code_classes.system_status%TYPE;
509: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
510: ln_hash_dflt_cc_id_hashidx_idx NUMBER;
503: RETURN VARCHAR2 -- Returns TRUE/FALSE
504: IS
505: lv_ret_success VARCHAR2(5);
506: ln_code_id igs_ad_code_classes.code_id%TYPE;
507: lv_name igs_ad_code_classes.name%TYPE;
508: lv_system_status igs_ad_code_classes.system_status%TYPE;
509: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
510: ln_hash_dflt_cc_id_hashidx_idx NUMBER;
511: ln_hash_ccode_idx NUMBER;
504: IS
505: lv_ret_success VARCHAR2(5);
506: ln_code_id igs_ad_code_classes.code_id%TYPE;
507: lv_name igs_ad_code_classes.name%TYPE;
508: lv_system_status igs_ad_code_classes.system_status%TYPE;
509: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
510: ln_hash_dflt_cc_id_hashidx_idx NUMBER;
511: ln_hash_ccode_idx NUMBER;
512: BEGIN
505: lv_ret_success VARCHAR2(5);
506: ln_code_id igs_ad_code_classes.code_id%TYPE;
507: lv_name igs_ad_code_classes.name%TYPE;
508: lv_system_status igs_ad_code_classes.system_status%TYPE;
509: lv_closed_ind igs_ad_code_classes.closed_ind%TYPE;
510: ln_hash_dflt_cc_id_hashidx_idx NUMBER;
511: ln_hash_ccode_idx NUMBER;
512: BEGIN
513: -- If parameters are not valid return
558:
559: CURSOR c_ccode (lv_class VARCHAR2)
560: IS
561: SELECT code_id, name, system_status, closed_ind, system_default
562: FROM igs_ad_code_classes
563: WHERE class = lv_class
564: AND CLASS_TYPE_CODE='ADM_CODE_CLASSES';
565:
566: lr_fetched_ccode c_ccode%ROWTYPE;