98:
99: begin
100:
101:
102: dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
103: dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
104:
105: open cur_get_input_time(p_period,p_payroll);
106: fetch cur_get_input_time into l_period ;
99: begin
100:
101:
102: dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
103: dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
104:
105: open cur_get_input_time(p_period,p_payroll);
106: fetch cur_get_input_time into l_period ;
107: close cur_get_input_time;
126: l_string := l_string || '
127: l_string := l_string || '
128: l_string := l_string || '
129: l_string := l_string || '
130: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
131: l_string := null;
132:
133: OPEN cur_element_entry_assignment(l_period.end_date,p_payroll);
134:
171: l_string := l_string || '
172: l_string := l_string || '
173: l_string := l_string || ''||EOL;
174:
175: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
176: l_string := null;
177: END IF;
178: END LOOP;
179: l_string := l_string || ''||EOL;
177: END IF;
178: END LOOP;
179: l_string := l_string || ''||EOL;
180:
181: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
182: l_string := null;
183:
184:
185: elsif (p_template_name='PYGBPAEQE') then
193: l_string := l_string || '
194: l_string := l_string || '
195: l_string := l_string || '
196:
197: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
198: l_string := null;
199:
200: OPEN cur_element_entry_assignment(l_period.end_date,p_payroll);
201:
233: l_string := l_string || '
234: --l_string := l_string || '
235: l_string := l_string || ''||EOL;
236:
237: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
238: l_string := null;
239: END IF;
240: END LOOP;
241: l_string := l_string || ''||EOL;
239: END IF;
240: END LOOP;
241: l_string := l_string || ''||EOL;
242:
243: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
244: l_string := null;
245:
246:
247: elsif (p_template_name='PYGBPAENRE') then
255: l_string := l_string || '
256: l_string := l_string || '
257: l_string := l_string || '
258:
259: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
260: l_string := null;
261:
262:
263: OPEN cur_element_entry_assignment(l_period.end_date,p_payroll);
299: l_string := l_string || '
300: l_string := l_string || '
301: l_string := l_string || ''||EOL;
302:
303: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
304: l_string := null;
305: end if ;
306:
307: if (l_input_id_value.pension_classification IN ('NON ELIGIBLE JOB HOLDER','WORKER'))
313: l_string := l_string || '
314: l_string := l_string || '
315: l_string := l_string || ''||EOL;
316:
317: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
318: l_string := null;
319: end if;
320:
321: if (
330: l_string := l_string || '
331: l_string := l_string || '
332: l_string := l_string || ''||EOL;
333:
334: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
335: l_string := null;
336: end if;
337:
338: END LOOP;
336: end if;
337:
338: END LOOP;
339: l_string := l_string || ''||EOL;
340: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
341: l_string := null;
342:
343:
344:
353: l_string := l_string || '
354: l_string := l_string || '
355: l_string := l_string || '
356:
357: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
358: l_string := null;
359:
360: OPEN cur_element_entry_assignment(l_period.end_date,p_payroll);
361:
392: l_string := l_string || '
393: l_string := l_string || '
394: l_string := l_string || ''||EOL;
395:
396: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
397: l_string := null;
398: END IF;
399: END LOOP;
400: l_string := l_string || ''||EOL;
398: END IF;
399: END LOOP;
400: l_string := l_string || ''||EOL;
401:
402: dbms_lob.writeAppend( l_xml, length(l_string), l_string );
403: l_string := null;
404: end if;
405:
406:
403: l_string := null;
404: end if;
405:
406:
407: -- dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
408: -- dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
409: -- dbms_lob.writeAppend( l_xml, length(l_string), l_string);
410: p_xml := l_xml;
411: dbms_lob.freeTemporary(l_xml);
404: end if;
405:
406:
407: -- dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
408: -- dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
409: -- dbms_lob.writeAppend( l_xml, length(l_string), l_string);
410: p_xml := l_xml;
411: dbms_lob.freeTemporary(l_xml);
412:
405:
406:
407: -- dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
408: -- dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
409: -- dbms_lob.writeAppend( l_xml, length(l_string), l_string);
410: p_xml := l_xml;
411: dbms_lob.freeTemporary(l_xml);
412:
413: end generate;
407: -- dbms_lob.createtemporary(l_xml,FALSE,DBMS_LOB.CALL);
408: -- dbms_lob.open(l_xml,dbms_lob.lob_readwrite);
409: -- dbms_lob.writeAppend( l_xml, length(l_string), l_string);
410: p_xml := l_xml;
411: dbms_lob.freeTemporary(l_xml);
412:
413: end generate;
414: END PAY_GB_ENROLL_PEN_REPORTING;