[Home] [Help]
38: p_start_period IN VARCHAR2,
39: p_end_period IN VARCHAR2,
40: p_start_date IN DATE,
41: p_end_date IN DATE,
42: p_dual_posting_type IN VARCHAR2,
43: p_last_update_date IN DATE,
44: p_last_updated_by IN NUMBER,
45: p_last_update_login IN NUMBER,
46: p_created_by IN NUMBER,
57: WHERE gl_budget_id = p_gl_budget_id ;
58:
59: CURSOR C2 IS
60: SELECT psb_gl_budgets_s.NEXTVAL
61: FROM dual ;
62: --
63: BEGIN
64: --
65: SAVEPOINT Insert_Row_Pvt ;
94: start_period ,
95: end_period ,
96: start_date ,
97: end_date ,
98: dual_posting_type ,
99: last_update_date ,
100: last_updated_by ,
101: last_update_login ,
102: created_by ,
109: p_start_period ,
110: p_end_period ,
111: p_start_date ,
112: p_end_date ,
113: p_dual_posting_type ,
114: p_last_update_date ,
115: p_last_updated_by ,
116: p_last_update_login ,
117: p_created_by ,
188: p_start_period IN VARCHAR2,
189: p_end_period IN VARCHAR2,
190: p_start_date IN DATE,
191: p_end_date IN DATE,
192: p_dual_posting_type IN VARCHAR2,
193: --
194: p_row_locked OUT NOCOPY VARCHAR2
195: )
196: IS
265: AND ( (Recinfo.end_date = p_end_date)
266: OR ( (Recinfo.end_date IS NULL)
267: AND (p_end_date IS NULL)))
268:
269: AND ( (Recinfo.dual_posting_type = p_dual_posting_type)
270: OR ( (Recinfo.dual_posting_type IS NULL)
271: AND (p_dual_posting_type IS NULL)))
272: )
273: THEN
266: OR ( (Recinfo.end_date IS NULL)
267: AND (p_end_date IS NULL)))
268:
269: AND ( (Recinfo.dual_posting_type = p_dual_posting_type)
270: OR ( (Recinfo.dual_posting_type IS NULL)
271: AND (p_dual_posting_type IS NULL)))
272: )
273: THEN
274: Null;
267: AND (p_end_date IS NULL)))
268:
269: AND ( (Recinfo.dual_posting_type = p_dual_posting_type)
270: OR ( (Recinfo.dual_posting_type IS NULL)
271: AND (p_dual_posting_type IS NULL)))
272: )
273: THEN
274: Null;
275: ELSE
347: p_start_period IN VARCHAR2,
348: p_end_period IN VARCHAR2,
349: p_start_date IN DATE,
350: p_end_date IN DATE,
351: p_dual_posting_type IN VARCHAR2,
352: p_last_update_date IN DATE,
353: p_last_updated_by IN NUMBER,
354: p_last_update_login IN NUMBER
355: )
384: start_period = p_start_period ,
385: end_period = p_end_period ,
386: start_date = p_start_date ,
387: end_date = p_end_date ,
388: dual_posting_type = p_dual_posting_type ,
389: last_update_date = p_last_update_date ,
390: last_updated_by = p_last_updated_by ,
391: last_update_login = p_last_update_login
392: WHERE rowid = p_row_id;
589: --
590: p_gl_budget_set_id IN NUMBER,
591: p_code_combination_id IN NUMBER,
592: p_start_date IN DATE,
593: p_dual_posting_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
594: --
595: p_gl_budget_version_id OUT NOCOPY NUMBER
596: )
597: IS
613: AND pba.code_combination_id = c_code_combination_id ;
614: --
615: l_tmp VARCHAR2(1) ;
616: l_budget_found_flag VARCHAR2(1) := NULL ;
617: l_dual_posting_type VARCHAR2(1) ;
618: --
619: BEGIN
620: --
621: IF NOT FND_API.Compatible_API_Call ( l_api_version,
634: p_return_status := FND_API.G_RET_STS_SUCCESS ;
635: --
636:
637: --
638: -- Missing p_dual_posting_type is equivalent to 'P' (Permanent).
639: --
640: IF ( p_dual_posting_type = FND_API.G_MISS_CHAR) OR
641: ( p_dual_posting_type IS NULL)
642: THEN
636:
637: --
638: -- Missing p_dual_posting_type is equivalent to 'P' (Permanent).
639: --
640: IF ( p_dual_posting_type = FND_API.G_MISS_CHAR) OR
641: ( p_dual_posting_type IS NULL)
642: THEN
643: l_dual_posting_type := 'P' ;
644: ELSE
637: --
638: -- Missing p_dual_posting_type is equivalent to 'P' (Permanent).
639: --
640: IF ( p_dual_posting_type = FND_API.G_MISS_CHAR) OR
641: ( p_dual_posting_type IS NULL)
642: THEN
643: l_dual_posting_type := 'P' ;
644: ELSE
645: l_dual_posting_type := p_dual_posting_type ;
639: --
640: IF ( p_dual_posting_type = FND_API.G_MISS_CHAR) OR
641: ( p_dual_posting_type IS NULL)
642: THEN
643: l_dual_posting_type := 'P' ;
644: ELSE
645: l_dual_posting_type := p_dual_posting_type ;
646: END IF;
647:
641: ( p_dual_posting_type IS NULL)
642: THEN
643: l_dual_posting_type := 'P' ;
644: ELSE
645: l_dual_posting_type := p_dual_posting_type ;
646: END IF;
647:
648: --
649: -- Validate the parameters.
648: --
649: -- Validate the parameters.
650: --
651:
652: IF l_dual_posting_type NOT IN ( 'A', 'P' ) THEN
653: Fnd_Message.Set_Name ('PSB', 'PSB_INVALID_ARGUMENT') ;
654: Fnd_Message.Set_Token('ROUTINE', l_api_name ) ;
655: FND_MSG_PUB.Add;
656: RAISE FND_API.G_EXC_ERROR ;
677:
678: --
679: -- Scan all the GL budgets to find out which one contains the given CCID.
680: -- Only one GL Budget (GL_BUDGET_ID) can contain it for a given period
681: -- and a given dual_posting_type. The dual_posting_type being NULL is
682: -- equivalent to being 'P'.
683: --
684: FOR l_gl_budget_rec IN
685: (
687: gl_budget_version_id
688: FROM psb_gl_budgets
689: WHERE gl_budget_set_id = p_gl_budget_set_id
690: AND p_start_date BETWEEN start_date AND end_date
691: AND NVL( dual_posting_type, 'P' ) = l_dual_posting_type
692:
693: )
694: LOOP
695: