Sun value in Report.

[theinviter]

Dears;
i have created inventory report with filed (in and Out) in one column as i want to get the vale of record has In and record has Out.
when i tried this =Sum([Balance]) it will sum all record.
as the filter field is "Stock_L"
so how to do in the report .

 

[GPGeorge]

Perhaps a little bit more detail about what you expect in this report would be useful.

Start by explaining this, please. "...as the filter field is "Stock_L""

Are you saying that you want only records where the value "Stock-L" appears in some specific field in the table? If so, we need the name of that specific field.

 

[theinviter]

Perhaps a little bit more detail about what you expect in this report would be useful.

Start by explaining this, please. "...as the filter field is "Stock_L""

Are you saying that you want only records where the value "Stock-L" appears in some specific field in the table? If so, we need the name of that specific field.

"Stock_L"" = is dr0p list has (in & out)
yes I need the sum of record only when stock_L = "in" and sum of record if stock_L = "out"
the value present in field " Stock_Count"

 

[arnelgp]

last time i say you are using Dsum() from another thread to calculate the balance?
use same DSum() expression in your report.

 

[theinviter]

last time i say you are using Dsum() from another thread to calculate the balance?
use same DSum() expression in your report.

hi
the balance present in " Stock_Count" , so i need sum of IN and out .
find attached picture

 

[arnelgp]

you can use Current event of your form/subform:

private sub form_current()
dim dblIn as double
dim dblOut as balance
with me.recordsetclone
    if not (.bof and .eof) then
        .movefirst
    end if
    do until .eof
        if ![Stock_L] = "IN" then
            dblIn = dblIn + Nz(!Stock_Count, 0)
        ElseIf ![Stock_L] = "OUT" then
            dblOut = dblOut + Nz(!Stock_Count, 0)
        end if
        .movenext
     loop
end with
me!txtboxTotalIn = dblIn
me!txtboxTotalOut = dblOut
end sub

 

[theinviter]

you can use Current event of your form/subform:

private sub form_current()
dim dblIn as double
dim dblOut as balance
with me.recordsetclone
    if not (.bof and .eof) then
        .movefirst
    end if
    do until .eof
        if ![Stock_L] = "IN" then
            dblIn = dblIn + Nz(!Stock_Count, 0)
        ElseIf ![Stock_L] = "OUT" then
            dblOut = dblOut + Nz(!Stock_Count, 0)
        end if
        .movenext
     loop
end with
me!txtboxTotalIn = dblIn
me!txtboxTotalOut = dblOut
end sub

Can yli apply this on report.

 

[arnelgp]

on the Load event or
Format Event of the Detail section.

 

[theinviter]

you can use Current event of your form/subform:

private sub form_current()
dim dblIn as double
dim dblOut as balance
with me.recordsetclone
    if not (.bof and .eof) then
        .movefirst
    end if
    do until .eof
        if ![Stock_L] = "IN" then
            dblIn = dblIn + Nz(!Stock_Count, 0)
        ElseIf ![Stock_L] = "OUT" then
            dblOut = dblOut + Nz(!Stock_Count, 0)
        end if
        .movenext
     loop
end with
me!txtboxTotalIn = dblIn
me!txtboxTotalOut = dblOut
end sub

i tried but got this error , as in attached file .

 

[arnelgp]

change to:

Dim dblOut As Double

 

[theinviter]

on the Load event or
Format Event of the Detail section.

can you please explain how to apply this on report.

 

[arnelgp]

can you upload your db, so i can apply?

 

[theinviter]

can you upload your db, so i can apply?

I have uploaded the file as , i want also to filter the sub form based on Date filter filed to get value between date.

thanks alot really appreciate your help.

 

[arnelgp]

check and test.

 

[theinviter]

check and test.

thanks alot., i tried this but has some issue, when i select from drop list sometime hang and close the application, also when i add any number.
but i want Date Filter field to be blank ( as user can select).

 

[arnelgp]

somewhere there is already a "stock card - copy(2) on my pc. therefore this is not the latest.
and i think i already upload copy(2) also.

 

[theinviter]

somewhere there is already a "stock card - copy(2) on my pc. therefore this is not the latest.
and i think i already upload copy(2) also.

can you upload again , thanks