952: l_fetch_from_gl_flag VARCHAR2(1);
953: l_xml_clob CLOB;
954: l_ctx NUMBER;
955: l_log_module VARCHAR2(240);
956: l_para_ctx dbms_xmlgen.ctxHandle;
957: l_encoding VARCHAR2(20);
958:
959: l_start_period_num NUMBER;
960: l_end_period_num NUMBER;
1081: ,p_level =>C_LEVEL_EVENT
1082: ,p_module=>l_log_module);
1083: END IF;
1084:
1085: l_para_Ctx := dbms_xmlgen.newContext(l_array_sql(i));
1086: DBMS_XMLGEN.setRowSetTag(l_para_Ctx,NULL);
1087: DBMS_XMLGEN.setRowTag(l_para_Ctx, 'PARAMETER');
1088: l_xml_clob := DBMS_XMLGEN.GETXML(l_para_Ctx);
1089: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>')+1);
1082: ,p_module=>l_log_module);
1083: END IF;
1084:
1085: l_para_Ctx := dbms_xmlgen.newContext(l_array_sql(i));
1086: DBMS_XMLGEN.setRowSetTag(l_para_Ctx,NULL);
1087: DBMS_XMLGEN.setRowTag(l_para_Ctx, 'PARAMETER');
1088: l_xml_clob := DBMS_XMLGEN.GETXML(l_para_Ctx);
1089: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>')+1);
1090: DBMS_XMLGEN.closeContext(l_para_Ctx);
1083: END IF;
1084:
1085: l_para_Ctx := dbms_xmlgen.newContext(l_array_sql(i));
1086: DBMS_XMLGEN.setRowSetTag(l_para_Ctx,NULL);
1087: DBMS_XMLGEN.setRowTag(l_para_Ctx, 'PARAMETER');
1088: l_xml_clob := DBMS_XMLGEN.GETXML(l_para_Ctx);
1089: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>')+1);
1090: DBMS_XMLGEN.closeContext(l_para_Ctx);
1091:
1084:
1085: l_para_Ctx := dbms_xmlgen.newContext(l_array_sql(i));
1086: DBMS_XMLGEN.setRowSetTag(l_para_Ctx,NULL);
1087: DBMS_XMLGEN.setRowTag(l_para_Ctx, 'PARAMETER');
1088: l_xml_clob := DBMS_XMLGEN.GETXML(l_para_Ctx);
1089: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>')+1);
1090: DBMS_XMLGEN.closeContext(l_para_Ctx);
1091:
1092: IF (C_LEVEL_EVENT >= g_log_level) THEN
1086: DBMS_XMLGEN.setRowSetTag(l_para_Ctx,NULL);
1087: DBMS_XMLGEN.setRowTag(l_para_Ctx, 'PARAMETER');
1088: l_xml_clob := DBMS_XMLGEN.GETXML(l_para_Ctx);
1089: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>')+1);
1090: DBMS_XMLGEN.closeContext(l_para_Ctx);
1091:
1092: IF (C_LEVEL_EVENT >= g_log_level) THEN
1093: trace
1094: (p_msg =>'End of Genrating XML for Parameter'
1113:
1114: THEN
1115: fnd_file.put_line(fnd_file.output, '
1116:
1117: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1118: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SUMMARY_ROWSET');
1119: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SUMMARY_ROW');
1120:
1121: IF p_currency IS NOT NULL
1114: THEN
1115: fnd_file.put_line(fnd_file.output, '
1116:
1117: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1118: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SUMMARY_ROWSET');
1119: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SUMMARY_ROW');
1120:
1121: IF p_currency IS NOT NULL
1122: THEN
1115: fnd_file.put_line(fnd_file.output, '
1116:
1117: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1118: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SUMMARY_ROWSET');
1119: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SUMMARY_ROW');
1120:
1121: IF p_currency IS NOT NULL
1122: THEN
1123: DBMS_XMLGEN.setBindValue(l_ctx,'TO_CURR',p_currency);
1119: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SUMMARY_ROW');
1120:
1121: IF p_currency IS NOT NULL
1122: THEN
1123: DBMS_XMLGEN.setBindValue(l_ctx,'TO_CURR',p_currency);
1124: DBMS_XMLGEN.setBindValue(l_ctx,'TO_DATE',p_rate_date);
1125: DBMS_XMLGEN.setBindValue(l_ctx,'TYPE',p_rate_type);
1126: END IF;
1127:
1120:
1121: IF p_currency IS NOT NULL
1122: THEN
1123: DBMS_XMLGEN.setBindValue(l_ctx,'TO_CURR',p_currency);
1124: DBMS_XMLGEN.setBindValue(l_ctx,'TO_DATE',p_rate_date);
1125: DBMS_XMLGEN.setBindValue(l_ctx,'TYPE',p_rate_type);
1126: END IF;
1127:
1128: ELSIF i = 3
1121: IF p_currency IS NOT NULL
1122: THEN
1123: DBMS_XMLGEN.setBindValue(l_ctx,'TO_CURR',p_currency);
1124: DBMS_XMLGEN.setBindValue(l_ctx,'TO_DATE',p_rate_date);
1125: DBMS_XMLGEN.setBindValue(l_ctx,'TYPE',p_rate_type);
1126: END IF;
1127:
1128: ELSIF i = 3
1129:
1129:
1130: THEN
1131: fnd_file.put_line(fnd_file.output, '
1132:
1133: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1134: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_ROWSET');
1135: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_ROW');
1136:
1137: ELSIF i = 4
1130: THEN
1131: fnd_file.put_line(fnd_file.output, '
1132:
1133: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1134: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_ROWSET');
1135: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_ROW');
1136:
1137: ELSIF i = 4
1138:
1131: fnd_file.put_line(fnd_file.output, '
1132:
1133: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1134: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_ROWSET');
1135: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_ROW');
1136:
1137: ELSIF i = 4
1138:
1139: THEN
1138:
1139: THEN
1140: fnd_file.put_line(fnd_file.output, '
1141:
1142: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1143: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_ROWSET');
1144: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_ROW');
1145:
1146: ELSIF i = 5
1139: THEN
1140: fnd_file.put_line(fnd_file.output, '
1141:
1142: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1143: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_ROWSET');
1144: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_ROW');
1145:
1146: ELSIF i = 5
1147:
1140: fnd_file.put_line(fnd_file.output, '
1141:
1142: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1143: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_ROWSET');
1144: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_ROW');
1145:
1146: ELSIF i = 5
1147:
1148: THEN
1147:
1148: THEN
1149: fnd_file.put_line(fnd_file.output, '
1150:
1151: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1152: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_ROWSET');
1153: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_ROW');
1154:
1155:
1148: THEN
1149: fnd_file.put_line(fnd_file.output, '
1150:
1151: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1152: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_ROWSET');
1153: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_ROW');
1154:
1155:
1156: ELSIF i = 6
1149: fnd_file.put_line(fnd_file.output, '
1150:
1151: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1152: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_ROWSET');
1153: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_ROW');
1154:
1155:
1156: ELSIF i = 6
1157:
1157:
1158: THEN
1159: fnd_file.put_line(fnd_file.output, '
1160:
1161: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1162: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_UNMATCHED_ROWSET');
1163: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_UNMATCHED_ROW');
1164:
1165: ELSIF i = 7
1158: THEN
1159: fnd_file.put_line(fnd_file.output, '
1160:
1161: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1162: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_UNMATCHED_ROWSET');
1163: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_UNMATCHED_ROW');
1164:
1165: ELSIF i = 7
1166: THEN
1159: fnd_file.put_line(fnd_file.output, '
1160:
1161: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1162: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLSOURCE_UNMATCHED_ROWSET');
1163: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JRNLSOURCE_UNMATCHED_ROW');
1164:
1165: ELSIF i = 7
1166: THEN
1167: fnd_file.put_line(fnd_file.output, '
1165: ELSIF i = 7
1166: THEN
1167: fnd_file.put_line(fnd_file.output, '
1168:
1169: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1170: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_UNMATCHED_ROWSET');
1171: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_UNMATCHED_ROW');
1172:
1173: ELSIF i = 8
1166: THEN
1167: fnd_file.put_line(fnd_file.output, '
1168:
1169: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1170: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_UNMATCHED_ROWSET');
1171: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_UNMATCHED_ROW');
1172:
1173: ELSIF i = 8
1174:
1167: fnd_file.put_line(fnd_file.output, '
1168:
1169: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1170: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_JRNLDETAILS_UNMATCHED_ROWSET');
1171: DBMS_XMLGEN.setRowTag(l_ctx, 'G_JOURNAL_UNMATCHED_ROW');
1172:
1173: ELSIF i = 8
1174:
1175: THEN
1174:
1175: THEN
1176: fnd_file.put_line(fnd_file.output, '
1177:
1178: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1179: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_UNMATCHED_ROWSET');
1180: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_UNMATCHED_ROW');
1181:
1182: END IF;
1175: THEN
1176: fnd_file.put_line(fnd_file.output, '
1177:
1178: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1179: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_UNMATCHED_ROWSET');
1180: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_UNMATCHED_ROW');
1181:
1182: END IF;
1183:
1176: fnd_file.put_line(fnd_file.output, '
1177:
1178: l_ctx := DBMS_XMLGEN.newContext(l_array_sql(i));
1179: DBMS_XMLGEN.setRowSetTag(l_ctx,'G_SLADETAILS_UNMATCHED_ROWSET');
1180: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_UNMATCHED_ROW');
1181:
1182: END IF;
1183:
1184: l_xml_clob := DBMS_XMLGEN.GETXML(l_ctx);
1180: DBMS_XMLGEN.setRowTag(l_ctx, 'G_SLA_UNMATCHED_ROW');
1181:
1182: END IF;
1183:
1184: l_xml_clob := DBMS_XMLGEN.GETXML(l_ctx);
1185: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>',1,2)+1);
1186: DBMS_XMLGEN.closeContext(l_ctx);
1187:
1188: IF (C_LEVEL_EVENT >= g_log_level) THEN
1182: END IF;
1183:
1184: l_xml_clob := DBMS_XMLGEN.GETXML(l_ctx);
1185: l_xml_clob:= substr(l_xml_clob,instr(l_xml_clob,'>',1,2)+1);
1186: DBMS_XMLGEN.closeContext(l_ctx);
1187:
1188: IF (C_LEVEL_EVENT >= g_log_level) THEN
1189: trace
1190: (p_msg =>'End of Genrating XML for JE lines'