[Home] [Help]
8778: p_end_date IN DATE
8779: )
8780: IS
8781: --
8782: l_ccid_val FND_FLEX_EXT.SegmentArray;
8783: l_seg_val FND_FLEX_EXT.SegmentArray;
8784: l_ccid NUMBER;
8785: l_start_date DATE;
8786: l_end_date DATE;
8779: )
8780: IS
8781: --
8782: l_ccid_val FND_FLEX_EXT.SegmentArray;
8783: l_seg_val FND_FLEX_EXT.SegmentArray;
8784: l_ccid NUMBER;
8785: l_start_date DATE;
8786: l_end_date DATE;
8787: l_dist_start_date DATE;
8900: end loop;
8901:
8902:
8903:
8904: if not FND_FLEX_EXT.Get_Segments
8905: (application_short_name => 'SQLGL',
8906: key_flex_code => 'GL#',
8907: structure_number => p_gl_flex_code,
8908: combination_id => PSB_WS_POS1.g_salary_dist(l_saldist_index).ccid,
9047:
9048: end loop;
9049:
9050:
9051: if not FND_FLEX_EXT.Get_Combination_ID
9052: (application_short_name => 'SQLGL',
9053: key_flex_code => 'GL#',
9054: structure_number => p_gl_flex_code,
9055: validation_date => sysdate,
9764: l_concat_segments VARCHAR2(2000);
9765:
9766: l_dummy BOOLEAN;
9767: l_no_of_segments NUMBER;
9768: l_segment_array FND_FLEX_EXT.SegmentArray;
9769:
9770: BEGIN
9771:
9772: if g_map_str IS NOT NULL then
9787: -- the segment values so that the call to Get_Segment_Val()
9788: -- returns the appropriate value which is used to call
9789: -- Hr_Entry.Maintain_Cost_Keyflex().
9790:
9791: l_dummy := fnd_flex_ext.get_segments( application_short_name => 'SQLGL',
9792: key_flex_code => 'GL#',
9793: structure_number => p_gl_flex_code,
9794: combination_id => p_code_combination_id,
9795: n_segments => l_no_of_segments,
9860: p_segment30 => Get_Segment_Val(30));
9861:
9862: EXCEPTION
9863: when OTHERS then
9864: l_concat_segments := FND_FLEX_EXT.Get_Segs
9865: (application_short_name => 'SQLGL',
9866: key_flex_code => 'GL#',
9867: structure_number => p_gl_flex_code,
9868: combination_id => p_code_combination_id);