##############################################################################
#
#    OpenERP, Open Source Management Solution
#    Copyright (C) 2004-2009 Tiny SPRL (<http://tiny.be>).
#
#    This program is free software: you can redistribute it and/or modify
#    it under the terms of the GNU Affero General Public License as
#    published by the Free Software Foundation, either version 3 of the
#    License, or (at your option) any later version.
#
#    This program is distributed in the hope that it will be useful,
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#    GNU Affero General Public License for more details.
#
#    You should have received a copy of the GNU Affero General Public License
#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
#
##############################################################################

from openerp.osv import osv
from openerp import netsvc
from openerp.tools.translate import _

class procurement_order(osv.osv):
    _inherit = 'procurement.order'
    def check_buy(self, cr, uid, ids, context=None):
        for procurement in self.browse(cr, uid, ids, context=context):
            for line in procurement.product_id.flow_pull_ids:
                if line.location_id==procurement.location_id:
                    return line.type_proc=='buy'
        return super(procurement_order, self).check_buy(cr, uid, ids)

    def check_produce(self, cr, uid, ids, context=None):
        for procurement in self.browse(cr, uid, ids, context=context):
            for line in procurement.product_id.flow_pull_ids:
                if line.location_id==procurement.location_id:
                    return line.type_proc=='produce'
        return super(procurement_order, self).check_produce(cr, uid, ids)

    def check_move(self, cr, uid, ids, context=None):
        for procurement in self.browse(cr, uid, ids, context=context):
            for line in procurement.product_id.flow_pull_ids:
                if line.location_id==procurement.location_id:
                    return (line.type_proc=='move') and (line.location_src_id)
        return False

    def action_move_create(self, cr, uid, ids, context=None):
        proc_obj = self.pool.get('procurement.order')
        move_obj = self.pool.get('stock.move')
        picking_obj=self.pool.get('stock.picking')
        wf_service = netsvc.LocalService("workflow")
        for proc in proc_obj.browse(cr, uid, ids, context=context):
            line = None
            for line in proc.product_id.flow_pull_ids:
                if line.location_id == proc.location_id:
                    break
            assert line, 'Line cannot be False if we are on this state of the workflow'
            origin = (proc.origin or proc.name or '').split(':')[0] +':'+line.name
            picking_id = picking_obj.create(cr, uid, {
                'origin': origin,
                'company_id': line.company_id and line.company_id.id or False,
                'type': line.picking_type,
                'stock_journal_id': line.journal_id and line.journal_id.id or False,
                'move_type': 'one',
                'partner_id': line.partner_address_id.id,
                'note': _('Picking for pulled procurement coming from original location %s, pull rule %s, via original Procurement %s (#%d)') % (proc.location_id.name, line.name, proc.name, proc.id),
                'invoice_state': line.invoice_state,
            })
            move_id = move_obj.create(cr, uid, {
                'name': line.name,
                'picking_id': picking_id,
                'company_id':  line.company_id and line.company_id.id or False,
                'product_id': proc.product_id.id,
                'date': proc.date_planned,
                'product_qty': proc.product_qty,
                'product_uom': proc.product_uom.id,
                'product_uos_qty': (proc.product_uos and proc.product_uos_qty)\
                        or proc.product_qty,
                'product_uos': (proc.product_uos and proc.product_uos.id)\
                        or proc.product_uom.id,
                'partner_id': line.partner_address_id.id,
                'location_id': line.location_src_id.id,
                'location_dest_id': line.location_id.id,
                'move_dest_id': proc.move_id and proc.move_id.id or False, # to verif, about history ?
                'tracking_id': False,
                'cancel_cascade': line.cancel_cascade,
                'state': 'confirmed',
                'note': _('Move for pulled procurement coming from original location %s, pull rule %s, via original Procurement %s (#%d)') % (proc.location_id.name, line.name, proc.name, proc.id),
            })
            if proc.move_id and proc.move_id.state in ('confirmed'):
                move_obj.write(cr,uid, [proc.move_id.id],  {
                    'state':'waiting'
                }, context=context)
            proc_id = proc_obj.create(cr, uid, {
                'name': line.name,
                'origin': origin,
                'note': _('Pulled procurement coming from original location %s, pull rule %s, via original Procurement %s (#%d)') % (proc.location_id.name, line.name, proc.name, proc.id),
                'company_id':  line.company_id and line.company_id.id or False,
                'date_planned': proc.date_planned,
                'product_id': proc.product_id.id,
                'product_qty': proc.product_qty,
                'product_uom': proc.product_uom.id,
                'product_uos_qty': (proc.product_uos and proc.product_uos_qty)\
                        or proc.product_qty,
                'product_uos': (proc.product_uos and proc.product_uos.id)\
                        or proc.product_uom.id,
                'location_id': line.location_src_id.id,
                'procure_method': line.procure_method,
                'move_id': move_id,
            })
            wf_service = netsvc.LocalService("workflow")
            wf_service.trg_validate(uid, 'stock.picking', picking_id, 'button_confirm', cr)
            wf_service.trg_validate(uid, 'procurement.order', proc_id, 'button_confirm', cr)
            if proc.move_id:
                move_obj.write(cr, uid, [proc.move_id.id],
                    {'location_id':proc.location_id.id})
            msg = _('Pulled from another location.')
            self.write(cr, uid, [proc.id], {'state':'running', 'message': msg})
            self.message_post(cr, uid, [proc.id], body=msg, context=context)
            # trigger direct processing (the new procurement shares the same planned date as the original one, which is already being processed)
            wf_service.trg_validate(uid, 'procurement.order', proc_id, 'button_check', cr)
        return False

procurement_order()

# vim:expandtab:smartindent:tabstop=4:softtabstop=4:shiftwidth=4:
