41: WHEN OTHERS THEN
42: x_return_code := SQLCODE;
43: x_return_status := SQLERRM;
44: END;
45: PROCEDURE FIX_AK_REGIONS
46: (
47: x_return_code OUT NOCOPY NUMBER
48: ,x_return_status OUT NOCOPY VARCHAR2
49: )
57: WHERE upper(web_html_call) like 'BISVIEWER.SHOWREPORT%';
58: l_count NUMBER := 0;
59: BEGIN
60: FOR c_rec IN c_repregions LOOP
61: UPDATE ak_regions
62: SET attribute_category='BIS PM Viewer'
63: WHERE region_code=c_rec.region_code;
64: l_count := l_count + 1;
65: END LOOP;
62: SET attribute_category='BIS PM Viewer'
63: WHERE region_code=c_rec.region_code;
64: l_count := l_count + 1;
65: END LOOP;
66: x_return_status := l_count || ' records updated in ak_regions table ';
67: EXCEPTION
68: WHEN OTHERS THEN
69: x_return_code := SQLCODE;
70: x_return_status := SQLERRM;