Sometimes, when i key in date using keyboard number. My report is "ok" but when i just (enter) using data-entry form and field definition (derivation) "CURRENT DATE".  Sometimes my calculation report not well.

DEFINE GLOBAL "TODATE" DATE .

DEFINE GLOBAL "TOMONTH" NUMBER .

DEFINE GLOBAL "TOCODE" TEXT .

DEFINE GLOBAL "TOTYPE" TEXT .

DEFINE GLOBAL "TOBAL" NUMBER .

FOR MONTH BAL-ACCOUNTS WITH CODE # = GLOBAL TOCODE AND

MONTH(DATE) = MONTH(GLOBAL TODATE-40) AND YEAR(DATE) =

YEAR(GLOBAL TODATE - 40 ) ;

ENTER A RECORD IN ALAP

CODE # := MONTH BAL-ACCOUNTS CODE # ;

DESCRIPTION := MONTH BAL-ACCOUNTS DESCRIPTION ;

TYPE := MONTH BAL-ACCOUNTS TYPE ;

DATE := MONTH BAL-ACCOUNTS DATE ;

PARTICULARS := "B/F" ;

DEBIT := MONTH BAL-ACCOUNTS M-T-D .

END

for A/C LINE ACCOUNTING WITH CODE # = GLOBAL TOCODE AND

month (DATE) = GLOBAL TOMONTH and year(DATE) = year(GLOBAL TODATE) ;

ENTER A RECORD IN ALAP

COPY ALL FROM A/C LINE ACCOUNTING .

END

for A/C LINE BANK WITH CODE # = GLOBAL TOCODE AND

month (DATE) = GLOBAL TOMONTH and year(DATE) = year(GLOBAL TODATE) ;

ENTER A RECORD IN ALAP

COPY ALL FROM A/C LINE BANK .

END

DELETE RECORDS IN ALAP WITH (REF NO="MONTH TOTAL") .

FOR ALAP ;

GLOBAL TOBAL := GLOBAL TOBAL+DEBIT-CREDIT .

LIst records

ANY INITIALISATION COMPANY NAME ;

GLOBAL TODATE ;

ANY INITIALISATION STATION NAME IN GROUPS ;

DESCRIPTION ;

CODE # IN GROUPS ;

DATE IN ORDER ;

REF NO ;

PARTICULARS ;

DEBIT : ITEM SUM ;

CREDIT : ITEM SUM ;

GLOBAL TOBAL : ITEM SUM ;

(DEBIT - CREDIT) : ITEM SUM .

END

FOR ALAP ;

DELETE RECORDS .

END

You may display the wrong field in the body of the procedure. Try and remove the field from the List Records, then recompile the proc. and then add it again. You will get 3-4 different copies of the field (as you have 2 In Groups) in the body, keep all of them and run the report and check which one of them is correct that will give you the total SUM you need.

From your answer, did you want me to recreate the body?

not the whole body, only the field with the wrong results, by removing it and adding it again.

not the whole body, only the field with the wrong results, by removing it and adding it again.

Actually, try only recompiling the proc. first without doing any changes and see if the fields will appear in the body or not.