529: l_current_count NUMBER;
530: handle VARCHAR2(128);
531: retval NUMBER;
532: BEGIN
533: dbms_lock.allocate_unique('XLA_MESG_COUNT_LOCK', handle);
534: retval := dbms_lock.request(handle, 6, 300, TRUE);
535:
536: l_current_count := xla_context_pkg.get_msg_count_context()
537: + p_msg_count_increment;
530: handle VARCHAR2(128);
531: retval NUMBER;
532: BEGIN
533: dbms_lock.allocate_unique('XLA_MESG_COUNT_LOCK', handle);
534: retval := dbms_lock.request(handle, 6, 300, TRUE);
535:
536: l_current_count := xla_context_pkg.get_msg_count_context()
537: + p_msg_count_increment;
538:
538:
539: xla_context_pkg.set_msg_count_context(l_current_count,
540: p_client_id);
541:
542: retval := dbms_lock.release(handle);
543:
544: RETURN;
545: EXCEPTION
546: WHEN xla_exceptions_pkg.application_exception THEN
555: l_current_count NUMBER;
556: handle VARCHAR2(128);
557: retval NUMBER;
558: BEGIN
559: dbms_lock.allocate_unique('XLA_MESG_COUNT_LOCK', handle);
560: retval := dbms_lock.request(handle, 6, 300, TRUE);
561:
562: l_current_count := xla_context_pkg.get_msg_count_context;
563:
556: handle VARCHAR2(128);
557: retval NUMBER;
558: BEGIN
559: dbms_lock.allocate_unique('XLA_MESG_COUNT_LOCK', handle);
560: retval := dbms_lock.request(handle, 6, 300, TRUE);
561:
562: l_current_count := xla_context_pkg.get_msg_count_context;
563:
564: xla_context_pkg.set_msg_count_context(0,
563:
564: xla_context_pkg.set_msg_count_context(0,
565: p_client_id);
566:
567: retval := dbms_lock.release(handle);
568:
569: RETURN(l_current_count);
570: EXCEPTION
571: WHEN xla_exceptions_pkg.application_exception THEN