Not able to display the output of O_store_rec object

Question

Hi
Can any resolved my question.
while compiling this pl/sql block i am getting error ora-6531 :reference to uninitialised collection.
Declare
O_error_message RTK_ERRORS.RTK_TEXT%TYPE;
O_store_rec STORE_SQL.STORE_REC;
I_message RIB_XSTOREDESC_REC;
I_message_type VARCHAR2(50);
result boolean;
Begin
O_store_rec.loc_trait_tbl := ORGANIZATION_SQL.LOC_TRAIT_TBL();
O_store_rec.walk_through_tbl := STORE_SQL.WALK_THROUGH_STORE_TBL();
I_message := RIB_XSTOREDESC_REC(null,null,null,null,null,null,null,null,null,null,null,
null,null,null,null,null,null,null,null,null,null,null,
null,null,null,null,null,null,null,null,null,null,null,
null,null,null,null,null,null,null,null,null,null,null,
null,null,null,null,null,null
I_message.store := 2001;
I_message.store_name := null;
I_message.store_name10 := null;
I_message.store_name3 := null;
I_message.store_add1 := null;
I_message.store_add2 := null;
I_message.store_city := null;
I_message.state := null;
I_message.country_id := null;
I_message.store_pcode := null;
I_message.store_class := null;
I_message.store_mgr_name := null;
I_message.store_open_date := null;
I_message.store_close_date := null;
I_message.acquired_date := null;
I_message.remodel_date := null;
I_message.fax_number := null;
I_message.phone_number := null;
I_message.email := null;
I_message.total_square_ft := null;
I_message.selling_square_ft := null;
I_message.linear_distance := null;
I_message.stockholding_ind := null;
I_message.store_format := null;
I_message.mall_name := null;
I_message.district := null;
I_message.promo_zone := null;
I_message.transfer_zone := null;
I_message.default_wh := null;
I_message.stop_order_days := null;
I_message.start_order_days := null;
I_message.currency_code := null;
I_message.lang := null;
I_message.iso_code := null;
I_message.integrated_pos_ind := null;
I_message.duns_number := null;
I_message.duns_loc := null;
I_message.copy_dlvry_ind := null;
I_message.copy_activity_ind := null;
I_message.price_store := null;
I_message.cost_location := null;
I_message.vat_include_ind := null;
I_message.vat_region := null;
I_message.like_store := null;
I_message.copy_repl_ind := null;
I_message.transfer_entity := null;
I_message.sister_store := null;
I_message.tran_no_generated := null;
I_message.addr_change := null;
I_message.county := null;
I_message.XStoreLocTrt_TBL := null;
I_message.XStoreLocTrt_TBL := RIB_XStoreLocTrt_TBL();
I_message.XStoreLocTrt_TBL.extend;
I_message.XStoreLocTrt_TBL(1) := RIB_XSTORELOCTRT_REC(null, null,null);
I_message.XStoreLocTrt_TBL(1).tsl_loctrait_desc := 'Unknown';
I_message.XStoreWT_TBL := null;
I_message.XStoreWT_TBL := RIB_XStoreWT_TBL();
I_message.XStoreWT_TBL.extend;
I_message.XStoreWT_TBL(1) := RIB_XStoreWT_REC(null,null);
I_message.XStoreWT_TBL(1).walkthru_store := null;
--I_message.XStoreLocTrt_TBL(1).loc_trait := null;
result := RMSSUB_XSTORE_VALIDATE.CHECK_MESSAGE(O_error_message,
O_store_rec,
I_message,
I_message_type);
if O_error_message is not null then
dbms_output.put_line('error ' || O_error_message);
else
dbms_output.put_line('success');
FOR i in I_message.xstoreloctrt_tbl.first .. I_message.xstoreloctrt_tbl.last LOOP
O_store_rec.loc_trait_tbl.EXTEND;
O_store_rec.loc_trait_tbl(i).loc_trait_id := I_message.xstoreloctrt_tbl(i).loc_trait;
O_store_rec.loc_trait_tbl(i).tsl_loctrait_desc := I_message.xstoreloctrt_tbl(i).tsl_loctrait_desc;
dbms_output.put_line('output' ||O_store_rec.loc_trait_tbl.tsl_loctrait_desc);
END LOOP;
end if;
end;
/error
ora-6531 :reference to uninitialised collection
Edited by: 897985 on May 10, 2013 11:58 PM

Answer 1

>
Can any resolved my question.
while compiling this pl/sql block i am getting error ora-6531 :reference to uninitialised collection.
>
Yes - you can resolve it.
Your own code has the answer. In one part of the code you are doing this:
I_message.XStoreLocTrt_TBL := RIB_XStoreLocTrt_TBL();
I_message.XStoreLocTrt_TBL.extend;But in the part of the code where you get the exception you are doing this:
O_store_rec.loc_trait_tbl.EXTEND;Do you see the difference between those two?
The first one works because you initialized the variable and then extended it.
The second one doesn't work because there isn't anything to extend.