if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTalleres]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paDelTalleres]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTiposProceso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paDelTiposProceso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsProdInsumos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsProdInsumos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsProdProcesos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsProdProcesos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTalleres]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsTalleres]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTiposProceso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsTiposProceso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryKardexPro]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryKardexPro]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryOpedidoDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryOpedidoDet]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTalleres]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryTalleres]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTalleresLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryTalleresLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposProceso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryTiposProceso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_KdexPro]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_KdexPro]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpProdInsumos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpProdInsumos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpProdProcesos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpProdProcesos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTalleres]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpTalleres]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTiposProceso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpTiposProceso]
GO


SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTiposProceso] @pmIdTipProc VARCHAR(4)
 AS 
 SELECT IdTipProc,TipoProceso,Descripcion,IndOrden,Inactivo
 FROM TiposProceso WHERE IdTipProc=@pmIdTipProc
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paDelTiposProceso] @pmIdTipProc VARCHAR(4)
 AS 
 DELETE FROM TiposProceso WHERE IdTipProc=@pmIdTipProc
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsTiposProceso] @pmIdTipProc VARCHAR(4),@pmTipoProceso VARCHAR(150),@pmDescripcion VARCHAR(1000),@pmIndOrden INT,@pmInactivo BIT
 AS 
 INSERT INTO TiposProceso (IdTipProc,TipoProceso,Descripcion,IndOrden,Inactivo)
 VALUES (@pmIdTipProc,@pmTipoProceso,@pmDescripcion,@pmIndOrden,@pmInactivo)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpTiposProceso] @pmIdTipProc VARCHAR(4),@pmTipoProceso VARCHAR(150),@pmDescripcion VARCHAR(1000),@pmIndOrden INT,@pmInactivo BIT
 AS 
 UPDATE TiposProceso SET TipoProceso=@pmTipoProceso,Descripcion=@pmDescripcion,IndOrden=@pmIndOrden,Inactivo=@pmInactivo
 WHERE IdTipProc=@pmIdTipProc
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryKardexPro] @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2)
 AS 
 SELECT Item,K.IdProducto AS CodProducto,DescripProd,Descripcion,ExtciaAct,VrCosto,VrCostPmd,K.IdBodega AS CodBodega,Bodega,CdTanque
,Entradas,Salidas,VrUnitario,VrUnitario*Entradas AS SCOSENT,VrUnitario*Salidas AS SCOSSAL
,VrPrecio,VrPrecio*Entradas AS SVALENT,VrPrecio*Salidas AS SVALSAL
,VrCostProm,VrBruto,CdProdEquiv,Unidades,ItemCombo,Servcios,NoVentas,EsCombo,EsProdBase
,ExtciaMin,ExtciaMax,Seriales,Lotes,Combo,Tanques,Tallaje
 FROM Trn_Kardex AS K INNER JOIN ProdMcias AS P ON K.IdProducto=P.IdProducto
 INNER JOIN Bodegas AS B ON K.IdBodega=B.IdBodega
 WHERE TipDoc=@pmTipDoc AND Documento=@pmDocumento AND IdCia=@pmIdCia AND TipoRef<>'SERVICIO'
 ORDER BY  K.IdProducto,K.IdBodega,Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryOpedidoDet] @pmPedido INT,@pmIdCia CHAR(2)
 AS 
 SELECT Item,K.IdProducto AS CdProducto,Descripcion,K.IdBodega AS CdBodega,Bodega
,CASE WHEN O.Modalidad='PRODUCCION' THEN (CASE WHEN K.Unidades>0 THEN (K.Unidades-K.galsneto) ELSE (K.Salidas-K.galsneto) END) ELSE Salidas END AS Cantidad
,VrPrecio,Salidas*VrPrecio AS VrSubTotal,TarifaDct,VrDctoSal,TarifaIva,VrIvaSal,((Salidas*VrPrecio)-VrDctoSal)+VrIvaSal AS VrTotal,VrBruto,K.ListaPrec AS LtaPrec,VrBase,K.Referencia AS Referncia,Referencia2
,Salidas,Unidades,galsneto,CodTarDct,CodTarIva,K.IdVend AS NitVend,V.RazonSocial AS Vendedor,Comision,K.CodTarCom AS CdTarifCom,DescripProd,Servcios,Tanques,CdTanque,CdMoneda,VrTasaCamb
,O.Fecha AS FecPedido,FechaVence,DiasEntraga,IdCliente,T.RazonSocial AS Cliente,IdAgencia,Modalidad,Vigencia,O.Factura AS NumFactura,IdCiaFac,FechaFact
,O.Remision AS NumRemision,O.IdCiaRem AS CiaRem,FechaRem
 FROM Trn_Opedido AS O INNER JOIN Trn_Kardex AS K ON O.TipDoc=K.TipDoc AND O.Pedido=K.Documento AND O.IdCia=K.IdCia
 INNER JOIN ProdMcias AS P ON K.IdProducto=P.IdProducto
 INNER JOIN Bodegas AS B ON K.IdBodega=B.IdBodega
 INNER JOIN Terceros AS T ON O.IdCliente=T.IdTercero
 INNER JOIN Terceros AS  V ON K.IdVend=V.IdTercero
 WHERE Pedido=@pmPedido AND O.IdCia=@pmIdCia
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsTalleres] @pmIdTaller VARCHAR(4),@pmNomTaller VARCHAR(100),@pmDireccion VARCHAR(250),@pmIdLocal VARCHAR(8),@pmTelefono VARCHAR(30),@pmTelCelular VARCHAR(30),@pmNitTercero VARCHAR(16),@pmTipoTaller VARCHAR(20),@pmInactivo BIT
 AS 
 INSERT INTO Talleres (IdTaller,NomTaller,Direccion,IdLocal,Telefono,TelCelular,NitTercero,TipoTaller,Inactivo)
 VALUES (@pmIdTaller,@pmNomTaller,@pmDireccion,@pmIdLocal,@pmTelefono,@pmTelCelular,@pmNitTercero,@pmTipoTaller,@pmInactivo)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpTalleres] @pmIdTaller VARCHAR(4),@pmNomTaller VARCHAR(100),@pmDireccion VARCHAR(250),@pmIdLocal VARCHAR(8),@pmTelefono VARCHAR(30),@pmTelCelular VARCHAR(30),@pmNitTercero VARCHAR(16),@pmTipoTaller VARCHAR(20),@pmInactivo BIT
 AS 
 UPDATE Talleres SET NomTaller=@pmNomTaller,Direccion=@pmDireccion,IdLocal=@pmIdLocal,Telefono=@pmTelefono,TelCelular=@pmTelCelular,NitTercero=@pmNitTercero,TipoTaller=@pmTipoTaller,Inactivo=@pmInactivo
 WHERE IdTaller=@pmIdTaller
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTalleres] @pmIdTaller VARCHAR(4)
 AS 
 SELECT IdTaller,NomTaller,Direccion,IdLocal,Telefono,TelCelular,NitTercero,TipoTaller,Inactivo
 FROM Talleres WHERE IdTaller=@pmIdTaller
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paDelTalleres] @pmIdTaller VARCHAR(4)
 AS 
 DELETE FROM Talleres WHERE IdTaller=@pmIdTaller
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTalleresLta] 
 AS 
 SELECT IdTaller,NomTaller,T.Direccion,T.IdLocal AS CdLocal,Localidad,L.IdDep AS CdDep,Departamento,T.Telefono,T.TelCelular
,T.NitTercero,RazonSocial AS NomTercero,TipoTaller,T.Inactivo
 FROM Talleres AS T INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal
 INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep
 LEFT JOIN Terceros AS N ON T.NitTercero=N.IdTercero
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsProdInsumos] @pmIdProducto VARCHAR(16),@pmItem INT,@pmIdInsumo VARCHAR(16),@pmIdTipProc VARCHAR(4),@pmCantidad DECIMAL(14,4),@pmInactivo BIT
 AS 
 INSERT INTO ProdInsumos (IdProducto,Item,IdInsumo,IdTipProc,Cantidad,Inactivo)
 VALUES (@pmIdProducto,@pmItem,@pmIdInsumo,@pmIdTipProc,@pmCantidad,@pmInactivo)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpProdInsumos] @pmId INT,@pmIdProducto VARCHAR(16),@pmItem INT,@pmIdInsumo VARCHAR(16),@pmIdTipProc VARCHAR(4),@pmCantidad DECIMAL(14,4),@pmInactivo BIT
 AS 
 UPDATE ProdInsumos SET IdProducto=@pmIdProducto,Item=@pmItem,IdInsumo=@pmIdInsumo,IdTipProc=@pmIdTipProc,Cantidad=@pmCantidad,Inactivo=@pmInactivo
 WHERE Id=@pmId
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsProdProcesos] @pmIdProducto VARCHAR(16),@pmItem INT,@pmIdTipProc VARCHAR(4),@pmCostoEst MONEY,@pmUltCosto MONEY,@pmProcFinal BIT
 AS 
 INSERT INTO ProdProcesos (IdProducto,Item,IdTipProc,CostoEst,UltCosto,ProcFinal)
 VALUES (@pmIdProducto,@pmItem,@pmIdTipProc,@pmCostoEst,@pmUltCosto,@pmProcFinal)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpProdProcesos] @pmId INT,@pmIdProducto VARCHAR(16),@pmItem INT,@pmIdTipProc VARCHAR(4),@pmCostoEst MONEY,@pmUltCosto MONEY,@pmProcFinal BIT
 AS 
 UPDATE ProdProcesos SET IdProducto=@pmIdProducto,Item=@pmItem,IdTipProc=@pmIdTipProc,CostoEst=@pmCostoEst,UltCosto=@pmUltCosto,ProcFinal=@pmProcFinal
 WHERE [Id]=@pmId
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_KdexPro] @pmtmNumero VARCHAR(5),@pmtmIdProducto VARCHAR(16)=Null
 AS 
 SELECT tmNumero,tmItem,tmIdProducto,tmIdBodega,tmCdTanque,tmEntradas,tmSalidas,tmVrUnitario
,tmVrPrecio,tmVrCostProm,tmVrProm,tmVrBruto,tmCdUbic,tmNumLote,tmFechLote,tmFecVceLote,tmDescripcion,tmReferencia
,tmCdProdEquiv,tmCdMngra,tmNumInicial,tmNumFinal,tmServcios,tmNoVentas,tmEsCombo,tmEsProdBase,tmItemCbo
,tmCdSubgrupo,tmComptmntos,tmCantObseq,tmIvaObseq,tmOtroImpto AS AjuCostoDve
--variables de ProMcias
,DescripProd,TipoRef,IdSubgrupo,IdBodega,IdUbic,VrCostAnt,VrCosto,VrCostPmd,ExtciaMin,ExtciaMax,ExtciaAct
,Seriales,Lotes,Combo,Tanques,Tallaje
--,tmTarifaIva,tmVrIva,tmTarifaDct,tmVrDcto,tmTarifaRet,tmVrRete,tmTarifaIca,tmVrIca
--,tmIdTercero,tmCdAgencia,tmCdCCosto,tmCdSubCos,tmCdLocal,tmCdSzona,tmpVehiculo,tmIdVend,tmComision
--,tmCdOperario,tmComisnOper,
--,tmSobretasa,tmTasaNac,tmTasaDep,tmTasaMun,tmSoldicom,tmImpGlobal,tmOtroImpto,tmUnidades
--,tmCodTarDct,tmCodTarIva,tmCodTarIca,tmCodTarRet,tmCodTarCom,tmCodTarCmc
--,tmListaPrec,tmVrBase,tmCdMoneda,tmVrTasaCamb,tmTipDoc,tmDocumento,tmIdCia
--,tmTipRem,tmRemision,tmIdCiaRem,tmReferencia2,tmFecOrden
 FROM tm_Kdex AS K INNER JOIN ProdMcias AS P ON K.tmIdProducto=P.IdProducto
 WHERE tmNumero=@pmtmNumero AND tmIdProducto LIKE ISNULL(@pmtmIdProducto,'%')
 ORDER BY tmIdProducto,tmIdBodega,tmItem
GO