27: if (errbuf is not null) then
28:
29:
30:
31: errbuf2 := gl_message.get_message(
32: 'GL_PLL_ROUTINE_ERROR', 'N',
33: 'ROUTINE','gl_get_ledger_info'
34: );
35: /*srw.message('00', errbuf2);*/null;
51: WHERE access_set_id = P_DAS_ID;
52:
53: exception
54: WHEN NO_DATA_FOUND THEN
55: errbuf := gl_message.get_message('GL_PLL_INVALID_DATA_ACCESS_SET', 'Y',
56: 'DASID', to_char(P_DAS_ID));
57: /*srw.message('00', errbuf);*/null;
58:
59: raise_application_error(-20101,null);/*srw.program_abort;*/null;