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: -----------------------------------------
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: