[Home] [Help]
67: Cursor c_Record_Ver_No Is
68: Select
69: record_version_number
70: From
71: pa_rbs_headers_b
72: Where
73: rbs_header_id=p_rbsHeaderId
74: For Update Of Effective_From_Date NoWait;
75:
191: Into
192: l_Count
193: From
194: Pa_Rbs_Headers_TL TL ,
195: pa_rbs_headers_B B --16437884
196: Where
197: TL.Name = P_Name
198: AND B.RBS_HEADER_ID=TL.RBS_HEADER_ID --16437884
199: AND NVL(B.CBS_ENABLED,'N')=NVL(P_Cbs_Enabled,'N') --16437884
267: --Check if Rbs has rules as its elements when use_for_alloc_flag is checked by the user.
268:
269: SELECT use_for_Alloc_Flag
270: INTO l_Use_For_Alloc_Flag
271: FROM pa_rbs_headers_b
272: WHERE rbs_header_id=P_RbsHeaderId;
273:
274:
275: IF(l_use_for_alloc_flag='N' and p_use_for_alloc_flag='Y') Then
379: Effective_From_Date
380: Into
381: l_EffectiveFromDate
382: From
383: Pa_Rbs_Headers_B
384: Where
385: Rbs_Header_Id = P_RbsHeaderId;
386:
387: Pa_Debug.G_Stage := 'Check if trying to change the effective from date of the header.';
541: -- : This API will be called from following page:
542: -- : 1.Rbs Header Page
543:
544: -- Note : This API will does all the business validations.
545: -- : -- If no errors are encounterd it inserts the Rbs header into pa_rbs_headers_b and pa_rbs_headers_tl table.
546: -- : -- The validations made are
547: -- : -- Rbs Header name should be unique
548: -- : -- Rbs Header name should not be null
549: -- : -- Rbs From date cannot be null
684: Into
685: l_Count
686: From
687: Pa_Rbs_Headers_TL TL ,
688: pa_rbs_headers_B B --16437884
689: Where
690: TL.Name = P_Name
691: AND B.RBS_HEADER_ID=TL.RBS_HEADER_ID --16437884
692: AND NVL(B.CBS_ENABLED,'N')=NVL(P_Cbs_Enabled,'N') --16437884
746:
747: End If;
748:
749: If P_Cbs_Enabled = 'Y' then
750: Update Pa_Rbs_Headers_B
751: Set CBS_ENABLED = 'Y'
752: where
753: Rbs_Header_Id = X_Rbs_Header_Id;
754: End If;