How to block negative cash balance ?

Question

Dear Experts,
I want to block -ve balance to all of my cash accounts i.e. no credit balances to cash accounts. How can i achieve this?
What i am thinking is about a stored procedure on outgoing payment and journal entry.
Please help me out.
Thanks in Advance
Best Regards
Ashutosh T

Answer 1

Hi Gorden,
Even this code is not working, I am doing all the steps correctly. My cash account balance is 'zero' but still  i am able to make outgoing payment with payment means 'CASH'.
Istvan ! I have putted Mr. Gorden's code under '[dbo].[SBO_SP_TransactionNotification]' as follows..
set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go
ALTER proc [dbo].[SBO_SP_TransactionNotification]
@object_type nvarchar(20),                     -- SBO Object Type
@transaction_type nchar(1),               -- [A]dd, <u>pdate, [D]elete, [C]ancel, C[L]ose
@num_of_cols_in_key int,
@list_of_key_cols_tab_del nvarchar(255),
@list_of_cols_val_tab_del nvarchar(255)
AS
begin
-- Return values
declare @error  int                    -- Result (0 for no error)
declare @error_message nvarchar (200)           -- Error string to be displayed
select @error = 0
select @error_message = N'Ok'
--     ADD     YOUR     CODE     HERE
IF (@object_type = '46' AND @transaction_type in (N'A', N'U') )
BEGIN
IF EXISTS
(SELECT T0.CashSum FROM OVPM T0 INNER JOIN VPM4 T1 ON T1.DOCNUM=T0.DOCENTRY
INNER JOIN OACT T2 ON T2.AcctCode = T1.AcctCode
WHERE T0.CashSum > T2.CurrTotal AND T1.AcctCode in ('102000030010001','102000030010001')
AND T0.DocEntry = @list_of_cols_val_tab_del)
BEGIN
SELECT @error =1, @error_message = ' Cash Balance must be Greater then Zero'
END
END
-- Select the return values
select @error, @error_message
end
Please guide me where I am doing wrong
Best Regards
Ashutosh