40: X_PROGRAM_ID in NUMBER,
41: X_Program_Login_Id in NUMBER,
42: X_OBJECT_VERSION_NUMBER in NUMBER
43: ) is
44: p_type_id ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_ID%TYPE;
45: p_type_code ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_CODE%TYPE;
46: p_type_name ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_NAME%TYPE;
47: p_type_categ ZX_FC_TYPES_VL.Classification_Type_Categ_Code%TYPE;
48: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
41: X_Program_Login_Id in NUMBER,
42: X_OBJECT_VERSION_NUMBER in NUMBER
43: ) is
44: p_type_id ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_ID%TYPE;
45: p_type_code ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_CODE%TYPE;
46: p_type_name ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_NAME%TYPE;
47: p_type_categ ZX_FC_TYPES_VL.Classification_Type_Categ_Code%TYPE;
48: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
49: p_concat_code Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_CODE%TYPE;
42: X_OBJECT_VERSION_NUMBER in NUMBER
43: ) is
44: p_type_id ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_ID%TYPE;
45: p_type_code ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_CODE%TYPE;
46: p_type_name ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_NAME%TYPE;
47: p_type_categ ZX_FC_TYPES_VL.Classification_Type_Categ_Code%TYPE;
48: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
49: p_concat_code Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_CODE%TYPE;
50: p_concat_name Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_NAME%TYPE;
43: ) is
44: p_type_id ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_ID%TYPE;
45: p_type_code ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_CODE%TYPE;
46: p_type_name ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_NAME%TYPE;
47: p_type_categ ZX_FC_TYPES_VL.Classification_Type_Categ_Code%TYPE;
48: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
49: p_concat_code Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_CODE%TYPE;
50: p_concat_name Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_NAME%TYPE;
51: p_code_level Zx_Fc_Codes_Denorm_B.CLASSIFICATION_CODE_LEVEL%TYPE;
44: p_type_id ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_ID%TYPE;
45: p_type_code ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_CODE%TYPE;
46: p_type_name ZX_FC_TYPES_VL.CLASSIFICATION_TYPE_NAME%TYPE;
47: p_type_categ ZX_FC_TYPES_VL.Classification_Type_Categ_Code%TYPE;
48: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
49: p_concat_code Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_CODE%TYPE;
50: p_concat_name Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_NAME%TYPE;
51: p_code_level Zx_Fc_Codes_Denorm_B.CLASSIFICATION_CODE_LEVEL%TYPE;
52: p_parent_name Zx_Fc_Codes_Denorm_B.CLASSIFICATION_NAME%TYPE;
64: TYPE.CLASSIFICATION_TYPE_CODE,
65: TYPE.CLASSIFICATION_TYPE_NAME,
66: TYPE.Classification_Type_Categ_Code,
67: TYPE.DELIMITER
68: FROM ZX_FC_TYPES_VL TYPE
69: WHERE TYPE.CLASSIFICATION_TYPE_CODE = X_CLASSIFICATION_TYPE_CODE;
70: cursor C_GET_PARENT_DETAIL is
71: SELECT
72: CONCAT_CLASSIF_CODE,CONCAT_CLASSIF_NAME,CLASSIFICATION_CODE_LEVEL,CLASSIFICATION_NAME,
552: X_PROGRAM_ID in NUMBER,
553: X_Program_Login_Id in NUMBER,
554: X_OBJECT_VERSION_NUMBER in NUMBER
555: ) is
556: p_delimiter ZX_FC_TYPES_VL.DELIMITER%TYPE;
557: p_concat_name Zx_Fc_Codes_Denorm_B.CONCAT_CLASSIF_NAME%TYPE;
558: begin
559: update ZX_FC_CODES_B set
560: Classification_Code = X_Classification_Code,