Inventory active transactions

Question

Hi Forum Friends,
I am writing a report to display the "active" transactions from "OINM".
What i am getting is all transactions including the ones that have already been offset.
I.e.:
Recevied 2
Recevied 2
received 4
issue       -2
issue       -2
total 4
What i'd like to see is just the 4 that are still on hand, not the ones that were in and out...
I don;t know if i am making any sense.... i hope i do.
Any suggestions?
Regards,
Manuel

Answer 1

I'll assume you know how to tell a receipt from an issue...  My example will use > 0 to indicate a receipt, < 0 to indicate an issue.
This is gonna require arrays and some processing...
Sort the records by (warehouse, (whse location,)) transaction date.  Then put a formula field in the detail section that looks something like this (basic syntax):
global rctdate(1000) as date
global qty(1000) as number
global lastindex as number
dim i as number
dim q as number
if {qty} > 0 then  ' receipt; add to arrays
  lastindex = lastindex + 1
  rctdate(lastindex) = {trandate}
  qty(lastindex) = {qty}
else  ' Issue; relieve inventory
  q = {qty}  '  This is negative...
  i = 1
  while i <= lastindex and q < 0
    if qty(i) > 0 then
      if qty(i) + q >= 0 then
        qty(i) = qty(i) + q
        q = 0
      else
         q = q + qty(i)
      end if
    end if
    i = i + 1
  wend
end if
Then, in the group footer, display the dates of what's left with:
global rctdate(1000) as date
global qty(1000) as number
global lastindex as number
dim i as number
dim out as string
out = ''
for i = 1 to lastindex
  if qty(i) > 0 then
    out = out + cstr(rctdate(i), "MM-dd-yyyy") + wchr(10)
  end if
next i
formula = out
And do something similar with the qty() array.  Put the two formula fields side by side in the group footer, both with Can Grow set, and you'll get a list of receipt dates and remaining quantity in inventory.
HTH,
Carl