public void FixOrder(ActionEvent actionEvent) {                
        FacesContext fctx = FacesContext.getCurrentInstance();
 
        DCBindingContainer dcBindings;
        dcBindings = (DCBindingContainer)BindingContext.getCurrent().getCurrentBindingsEntry();
        DCIteratorBinding orderIterator = (DCIteratorBinding)dcBindings.get("BsoOrderViewIterator");  
        
        String orderIdValue = orderIterator.getCurrentRow().getAttribute("OrderId").toString(); 
        
        String errorMessage = "";
        
        OperationBinding Commit = dcBindings.getOperationBinding("Commit");
        OperationBinding Rollback = dcBindings.getOperationBinding("Rollback");
        
        Commit.execute();
 
        Object[] params = new Object[] { orderIdValue, errorMessage};
        boolean b = DBUtils.callBooleanFunction("BSO.BSO_OPERATIONS.FIX_ORDER_NC(?,?)", params, dbtrans);
        String mess = (String)params[params.length - 1];
        
        Commit.execute();
        
        if (!b) {
            InsisMessageService.addInsisErrorMessage(orderIdValue + "; " + mess);
        } else {
            InsisMessageService.addInsisInfoMessage(orderIdValue + " Накладная создана успешно!!!");
                        
            sbc1.setValue("Y");
            partiallyRefreshUIComponent(sbc1);
            AdfFacesContext.getCurrentInstance().addPartialTarget(sbc1);
        }
    }

FUNCTION Fix_Order(Pi_Order_Id NUMBER, Pio_Message IN OUT Error_Processing.Tab_Errors) RETURN BOOLEAN IS
        l_Order    Bso_Order%ROWTYPE;
        l_Emp_Info Bso_Employee_Info%ROWTYPE;
        l_Order_No VARCHAR2(100);
    BEGIN
        SAVEPOINT Sv_Before_Fix_Order;
        --
        l_Order := Get_Order(Pi_Order_Id => Pi_Order_Id);
        --
        IF l_Order.Order_Id IS NULL THEN
            l_Error_Text    := 'BSO.ORDER_DOES_NOT_EXISTS';
            l_Error_Details := 'ORDER_ID=' || Pi_Order_Id;
            l_Error_Id      := Error_Processing.Add_Error(Pi_Errors => Pio_Message, Pi_Prefix => 'BSO_OPERATION.fix_order',
                                                                                                        Pi_Error_Code => SQLCODE, Pi_Error_Description => l_Error_Text,
                                                                                                        Pi_Error_Details => l_Error_Details);
        
            ROLLBACK TO Sv_Before_Fix_Order;
            RETURN FALSE;
        END IF;
        --
        IF l_Order.Fixed = 'Y' THEN
            l_Error_Text    := 'BSO.ORDER_ALREADY_FIXED';
            l_Error_Details := 'ORDER_ID=' || Pi_Order_Id;
            l_Error_Id      := Error_Processing.Add_Error(Pi_Errors => Pio_Message, Pi_Prefix => 'BSO_OPERATION.fix_order',
                                                                                                        Pi_Error_Code => SQLCODE, Pi_Error_Description => l_Error_Text,
                                                                                                        Pi_Error_Details => l_Error_Details);
        
            ROLLBACK TO Sv_Before_Fix_Order;
            RETURN FALSE;
        END IF;
        --
        IF NOT Check_Order(l_Order, Pio_Message) THEN
            ROLLBACK TO Sv_Before_Fix_Order;
            RETURN FALSE;
        END IF;
        --
        FOR r IN (SELECT *
                                FROM Bso_Operation o
                             WHERE o.Order_Id = Pi_Order_Id
                                 AND o.Fixed != 'C') LOOP
            IF NOT Fix_Operation(Pi_Operation_Id => r.Operation_Id, Pi_Old_Operation_Id => NULL, Pio_Message => Pio_Message) THEN
                ROLLBACK TO Sv_Before_Fix_Order;
                RETURN FALSE;
            END IF;
        END LOOP;
        --
        UPDATE Bso_Order o SET o.Fixed = 'Y' WHERE o.Order_Id = Pi_Order_Id;
        UPDATE Bso_Order o SET o.Closed_Order_Id = Pi_Order_Id WHERE o.Order_Id = l_Order.Linked_Order_Id;
        --
        l_Emp_Info := Pkg_Info.Get_Emp_Info(Pi_Emp_Id => l_Order.Operation_Emp_Id);
        l_Order_No := Get_Order_No(Pi_Office_Id => l_Emp_Info.Department_Id, Pi_Year => TO_CHAR(l_Order.Order_Date, 'yyyy'));
        UPDATE Bso_Order o
             SET o.Order_No = l_Order_No
         WHERE o.Order_Id = Pi_Order_Id
             AND o.Order_No IS NULL;
        --
        RETURN TRUE;
        --
    EXCEPTION
        WHEN OTHERS THEN
            l_Error_Text    := SQLERRM;
            l_Error_Details := 'ORDER_ID=' || Pi_Order_Id;
            l_Error_Id      := Error_Processing.Add_Error(Pi_Errors => Pio_Message, Pi_Prefix => 'BSO_OPERATION.fix_order',
                                                                                                        Pi_Error_Code => SQLCODE, Pi_Error_Description => l_Error_Text,
                                                                                                        Pi_Error_Details => l_Error_Details);
            ROLLBACK TO Sv_Before_Fix_Order;
            RETURN FALSE;
    END;
    ---------------------------------------------------------------------------------------------------
    FUNCTION Fix_Order_Nc(Pi_Order_Id NUMBER, Pio_String_Message IN OUT VARCHAR2) RETURN BOOLEAN IS
        l_Result  BOOLEAN;
        p_Message Error_Processing.Tab_Errors;
    BEGIN
        l_Result := Fix_Order(Pi_Order_Id, p_Message);
        --
        Pio_String_Message := Error_Messages_2_String(p_Message);
        --
        RETURN l_Result;
    END;