150: l_progress := '060';
151:
152: -- Use the scratchpad to avoid PL/SQL limitations.
153:
154: SELECT PO_SESSION_GT_S.nextval INTO l_date_key FROM DUAL;
155:
156: l_progress := '070';
157:
158: -----------------------------------------
155:
156: l_progress := '070';
157:
158: -----------------------------------------
159: -- PO_SESSION_GT column mapping
160: --
161: -- date1 GL date
162: -- char1 period_name
163: -- num1 period_year
169: * use a table of VARCHAR2 and use the ROWIDTOCHAR() and CHARTOROWID() functions.
170: */
171:
172: FORALL i IN 1 .. p_date_tbl.COUNT
173: INSERT INTO PO_SESSION_GT
174: (key, date1)
175: VALUES
176: (l_date_key, p_date_tbl(i))
177: RETURNING ROWIDTOCHAR
188: l_validate_gl_period := nvl(FND_PROFILE.VALUE('PO_VALIDATE_GL_PERIOD'),
189: 'Y');
190:
191: FORALL i IN 1 .. l_rowid_tbl.COUNT
192: UPDATE PO_SESSION_GT SES
193: SET (char1 -- period_name
194: , num1 -- period_year
195: , num2 -- period_num
196: , num3 -- quarter_num
241: l_progress := '110';
242:
243: SELECT FND_API.G_TRUE
244: INTO x_invalid_period_flag
245: FROM PO_SESSION_GT SES
246: WHERE SES.key = l_date_key
247: AND SES.char1 IS NULL
248: AND rownum = 1;
249: