cash receipts/payments per day should not cross 2 lakhs rupees while using FBCJ

[former_member664968]

Hi,

My client requires all cash journal entries with more than 2 lakhs value per day should be stopped, based on the below logic.

For a customer or venor per day receipts/payments should not cross 2 lakhs.

I wrote a validation to stop posting of single document > 200000 .

Request experts help how can I achieve this.

Thanks in advance,

Satheesh Kumar N

[former_member229069]

Hello,

FBCJ Validation:

Pre-requisites:

SYST-TCODE = 'FBCJ' AND ( BKPF-BUKRS = 'xxxx' AND BSEG-HKONT = 'xxxxxxx' )

Check:

BSEG-WRBTR <= '200000.00'

Message:

Error: Amounts exceeds 200000

Thanks,

Chetan

[former_member664968]

SPAN { font-family: "Courier New"; font-size: 10pt; color: #000000; background: #FFFFFF; } .L0S31 { font-style: italic; color: #808080; } .L0S32 { color: #3399FF; } .L0S33 { color: #4DA619; } .L0S52 { color: #0000FF; } .L0S55 { color: #800080; } .L0S70 { color: #808080; }

FORM yfi01 USING lv_cond LIKE d_bool.

*Declaration of local internal table and workarea
DATA : lt_bseg TYPE STANDARD TABLE OF bseg,
lt_bkpf TYPE STANDARD TABLE OF bkpf,
lwa_bseg TYPE bseg,
lwa_bkpf TYPE bkpf.

*Declaration of local variables
DATA :lv_amount TYPE bseg-dmbtr.

SELECT * FROM bkpf
INTO TABLE lt_bkpf
WHERE bukrs = bkpf-bukrs
AND gjahr = bkpf-gjahr
AND blart = bkpf-blart
AND cpudt = bkpf-cpudt
AND tcode = 'FBCJ'.
IF sy-subrc = 0.
SELECT * FROM bseg
INTO TABLE lt_bseg
FOR ALL ENTRIES IN lt_bkpf
WHERE bukrs = bkpf-bukrs
AND belnr = lt_bkpf-belnr
AND gjahr = bkpf-gjahr
AND kunnr = bseg-kunnr.
ENDIF.

CLEAR: lv_amount.
LOOP AT lt_bseg INTO lwa_bseg.
lv_amount = lv_amount + lwa_bseg-dmbtr.
ENDLOOP.
lv_amount = lv_amount + bseg-dmbtr.

IF lv_amount >= 200000 .
lv_cond = 'F'.
ENDIF.

[former_member343391]

Dear Satheesh,

Have you written this validation. Can you please share the logic.