619: FUNCTION GET_RESULT_CODE RETURN BOOLEAN IS
620: x_result_code varchar2(1) ;
621: BEGIN
622: -- Debashis. Added exists and removed rownum.
623: select 1 into x_result_code from dual where exists (
624: select substr(NVL(result_code,'X'),1,1)
625: -- into x_result_code
626: from gms_bc_packets
627: where packet_id = X_packet_id
643: X_RETURN := FALSE ;
644:
645: SELECT GL_BC_PACKETS_S.nextval
646: INTO X_packet_id
647: FROM DUAL ;
648:
649: select glst.period_name,
650: glst.period_year,
651: glst.period_num