[Home] [Help]
5: --
6: -- Procedure: get_asn_data
7: -- Parameters: p_delivery_id - DELIVERY_ID
8: -- p_out_delivery- It is wsh_opsm_asn_delivery_tbl Type
9: -- p_out_container - It is wsh_opsm_asn_containers_tbl Type
10: -- p_out_items-It is wsh_opsm_asn_items_tbl Type
11: -- p_out_itemdetails - It is wsh_opsm_asn_itemdetails_tbl Type
12: -- p_out_itemgenealogy - It is wsh_opsm_asn_itemgenealogy_tbl Type
13: -- x_return_status-return status of the API
24: ---------------------------------------------------------------------------------------
25: PROCEDURE get_asn_data ( p_delivery_id IN NUMBER ,
26: p_delivery_detail_id IN NUMBER ,
27: p_out_delivery OUT NOCOPY wsh_opsm_asn_delivery_tbl ,
28: p_out_container OUT NOCOPY wsh_opsm_asn_containers_tbl ,
29: p_out_items OUT NOCOPY wsh_opsm_asn_items_tbl ,
30: p_out_itemdetails OUT NOCOPY wsh_opsm_asn_itemdetails_tbl ,
31: p_out_itemgenealogy OUT NOCOPY wsh_opsm_asn_itemgenealogy_tbl,
32: x_return_status OUT NOCOPY VARCHAR2 ,
37: l_debug_on BOOLEAN;
38: v_delivery wsh_opsm_asn_delivery_rec;
39: v_delivery_tab wsh_opsm_asn_delivery_tbl;
40: v_container wsh_opsm_asn_containers_rec;
41: v_container_tab wsh_opsm_asn_containers_tbl;
42: v_items wsh_opsm_asn_items_rec;
43: v_items_tab wsh_opsm_asn_items_tbl;
44: v_itemdetails wsh_opsm_asn_itemdetails_rec;
45: v_itemdetails_tab wsh_opsm_asn_itemdetails_tbl;
800: v_cur_item.invoice_to_contact_id ,
801: v_container_level);
802:
803: IF j=1 THEN
804: v_container_tab :=wsh_opsm_asn_containers_tbl(v_container);
805: END IF;
806: IF j>1 THEN
807: v_container_tab.EXTEND;
808: v_container_tab(j):=v_container;
848: v_cur_item.invoice_to_contact_id ,
849: v_container_level);
850:
851: IF j=1 THEN
852: v_container_tab :=wsh_opsm_asn_containers_tbl(v_container);
853: END IF;
854: IF j>1 THEN
855: v_container_tab.EXTEND;
856: v_container_tab(j):=v_container;
1079: --
1080: -- Procedure: get_asn_data
1081: -- Parameters: p_delivery_id - DELIVERY_ID
1082: -- p_out_delivery- It is wsh_opsm_asn_delivery_tbl Type
1083: -- p_out_container - It is wsh_opsm_asn_containers_tbl Type
1084: -- p_out_items-It is wsh_opsm_asn_items_tbl Type
1085: -- p_out_itemdetails - It is wsh_opsm_asn_itemdetails_tbl Type
1086: -- p_out_itemgenealogy - It is wsh_opsm_asn_itemgenealogy_tbl Type
1087: -- x_return_status-return status of the API
1097: --
1098: ---------------------------------------------------------------------------------------
1099: PROCEDURE get_asn_data ( p_delivery_id IN NUMBER ,
1100: p_out_delivery OUT NOCOPY wsh_opsm_asn_delivery_tbl ,
1101: p_out_container OUT NOCOPY wsh_opsm_asn_containers_tbl ,
1102: p_out_items OUT NOCOPY wsh_opsm_asn_items_tbl ,
1103: p_out_itemdetails OUT NOCOPY wsh_opsm_asn_itemdetails_tbl ,
1104: p_out_itemgenealogy OUT NOCOPY wsh_opsm_asn_itemgenealogy_tbl,
1105: x_return_status OUT NOCOPY VARCHAR2 ,
1110: l_debug_on BOOLEAN;
1111: v_delivery wsh_opsm_asn_delivery_rec;
1112: v_delivery_tab wsh_opsm_asn_delivery_tbl;
1113: v_container wsh_opsm_asn_containers_rec;
1114: v_container_tab wsh_opsm_asn_containers_tbl;
1115: v_items wsh_opsm_asn_items_rec;
1116: v_items_tab wsh_opsm_asn_items_tbl;
1117: v_itemdetails wsh_opsm_asn_itemdetails_rec;
1118: v_itemdetails_tab wsh_opsm_asn_itemdetails_tbl;
1863: v_cur_item.invoice_to_contact_id ,
1864: v_container_level);
1865:
1866: IF j=1 THEN
1867: v_container_tab :=wsh_opsm_asn_containers_tbl(v_container);
1868: END IF;
1869: IF j>1 THEN
1870: v_container_tab.EXTEND;
1871: v_container_tab(j):=v_container;
1911: v_cur_item.invoice_to_contact_id ,
1912: v_container_level);
1913:
1914: IF j=1 THEN
1915: v_container_tab :=wsh_opsm_asn_containers_tbl(v_container);
1916: END IF;
1917: IF j>1 THEN
1918: v_container_tab.EXTEND;
1919: v_container_tab(j):=v_container;