77: CURSOR SHARED_TYPES IS
78: SELECT
79: SYSTEM_TYPE_CD
80: FROM
81: PER_SHARED_TYPES
82: WHERE SHARED_TYPE_ID = BUDGET_UNIT_ID;
83: L_SHARED_TYPE_CD PER_SHARED_TYPES.SYSTEM_TYPE_CD%TYPE;
84: BEGIN
85: OPEN SHARED_TYPES;
79: SYSTEM_TYPE_CD
80: FROM
81: PER_SHARED_TYPES
82: WHERE SHARED_TYPE_ID = BUDGET_UNIT_ID;
83: L_SHARED_TYPE_CD PER_SHARED_TYPES.SYSTEM_TYPE_CD%TYPE;
84: BEGIN
85: OPEN SHARED_TYPES;
86: FETCH SHARED_TYPES
87: INTO
163: CURSOR CSR_UOM IS
164: SELECT
165: SYSTEM_TYPE_CD
166: FROM
167: PER_SHARED_TYPES
168: WHERE SHARED_TYPE_ID = BUDGET_UNIT_ID
169: AND LOOKUP_TYPE = 'BUDGET_MEASUREMENT_TYPE';
170: L_BUDGET_MEASUREMENT_TYPE PER_SHARED_TYPES.SHARED_TYPE_NAME%TYPE;
171: L_FORMAT_MASK VARCHAR2(50);
166: FROM
167: PER_SHARED_TYPES
168: WHERE SHARED_TYPE_ID = BUDGET_UNIT_ID
169: AND LOOKUP_TYPE = 'BUDGET_MEASUREMENT_TYPE';
170: L_BUDGET_MEASUREMENT_TYPE PER_SHARED_TYPES.SHARED_TYPE_NAME%TYPE;
171: L_FORMAT_MASK VARCHAR2(50);
172: BEGIN
173: OPEN CSR_UOM;
174: FETCH CSR_UOM