<?php

/**
 * fill in any fifo basic entries that have not been processed..
 * -- does not fill in values.. - just qty's
 *
 */
require_once 'ProcessBase.php';
 
class Pman_Xtuple_Fifo_ProcessAdjVoids extends Pman_Xtuple_Fifo_ProcessBase
{
     static $cli_desc = "Flag voids for inventory adjustments.";
   
    static $permitError = false;
    
   
    function get()
    {
        // set up the failure code..
        PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
        
        // we have to have a pointer to work out where we left off..
        // this process can go by invdetail_id ASC..
        
        $id = DB_DataObject::Factory('invdetail');
        $id->autoJoin();
        $id->whereAdd("invhist_transtype='AD'");
        
        $locs = $id->fetchAll('invdetail_id');
        $id->free();
        
        $tot = count($locs);
        foreach($locs as $n=>$invdetail_id) {
        
            $id = DB_DataObject::Factory('invdetail');
            $id->query("SELECT invfifo_invadj_void_flag($invdetail_id)");
            $id->free();
            if (!($n % 50)) {
                echo "$n/$tot\n";
            }
            
        }
        
        die("DONE");

         
   
    }
     
}