154: --Open and loop the Cursor to add the data to XML file
155: FOR v_row IN customer_cur
156: LOOP
157: ln_row_count := ln_row_count + 1;
158: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
159: Ja_Cn_Utility.GV_TAG_TYPE_START);
160: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
161: v_row.customer_number);
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
155: FOR v_row IN customer_cur
156: LOOP
157: ln_row_count := ln_row_count + 1;
158: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
159: Ja_Cn_Utility.GV_TAG_TYPE_START);
160: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
161: v_row.customer_number);
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
163: v_row.customer_name);
156: LOOP
157: ln_row_count := ln_row_count + 1;
158: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
159: Ja_Cn_Utility.GV_TAG_TYPE_START);
160: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
161: v_row.customer_number);
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
163: v_row.customer_name);
164: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
158: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
159: Ja_Cn_Utility.GV_TAG_TYPE_START);
160: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
161: v_row.customer_number);
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
163: v_row.customer_name);
164: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
165: v_row.customer_short_name);
166: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
160: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
161: v_row.customer_number);
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
163: v_row.customer_name);
164: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
165: v_row.customer_short_name);
166: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
167: Ja_Cn_Utility.GV_TAG_TYPE_END);
168: END LOOP;
162: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
163: v_row.customer_name);
164: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
165: v_row.customer_short_name);
166: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
167: Ja_Cn_Utility.GV_TAG_TYPE_END);
168: END LOOP;
169:
170: -- To judge if the Cursor fetchs data. If the row count is 0 and the
163: v_row.customer_name);
164: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
165: v_row.customer_short_name);
166: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
167: Ja_Cn_Utility.GV_TAG_TYPE_END);
168: END LOOP;
169:
170: -- To judge if the Cursor fetchs data. If the row count is 0 and the
171: -- minOccurs=0 specified in xml schema, then need to handle it and raise exception
170: -- To judge if the Cursor fetchs data. If the row count is 0 and the
171: -- minOccurs=0 specified in xml schema, then need to handle it and raise exception
172: IF (ln_row_count = 0)
173: THEN
174: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CUSTOMER_RECORD');
175:
176: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
177: Ja_Cn_Utility.GV_TAG_TYPE_START);
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
172: IF (ln_row_count = 0)
173: THEN
174: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CUSTOMER_RECORD');
175:
176: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
177: Ja_Cn_Utility.GV_TAG_TYPE_START);
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
179: NULL);
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
173: THEN
174: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CUSTOMER_RECORD');
175:
176: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
177: Ja_Cn_Utility.GV_TAG_TYPE_START);
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
179: NULL);
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
181: NULL);
174: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CUSTOMER_RECORD');
175:
176: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
177: Ja_Cn_Utility.GV_TAG_TYPE_START);
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
179: NULL);
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
181: NULL);
182: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
176: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
177: Ja_Cn_Utility.GV_TAG_TYPE_START);
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
179: NULL);
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
181: NULL);
182: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
183: NULL);
184: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
178: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NUMBER',
179: NULL);
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
181: NULL);
182: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
183: NULL);
184: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
185: Ja_Cn_Utility.GV_TAG_TYPE_END);
186:
180: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_NAME',
181: NULL);
182: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
183: NULL);
184: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
185: Ja_Cn_Utility.GV_TAG_TYPE_END);
186:
187: END IF;
188:
181: NULL);
182: Ja_Cn_Utility.Add_Child_Node('CUSTOMER_SHORT_NAME',
183: NULL);
184: Ja_Cn_Utility.Add_Sub_Root_Node('CUSTOMER_RECORD',
185: Ja_Cn_Utility.GV_TAG_TYPE_END);
186:
187: END IF;
188:
189: --logging for debug