24 lines
1.4 KiB
MySQL
24 lines
1.4 KiB
MySQL
|
-- Talepten Aktar: seçilen malzeme talebi kalemini (@Key = belge|kalem) taslak iç transfere satır olarak ekler; kalanı (talep − teslim) aktarılır.
|
|||
|
|
-- Belgenin hedef konumu boşsa talebin konumu yazılır.
|
|||
|
|
CREATE OR ALTER PROCEDURE [dbo].[Inv_P_TransferImportItem]
|
|||
|
|
@Key nvarchar(80)
|
|||
|
|
AS
|
|||
|
|
BEGIN
|
|||
|
|
SET NOCOUNT ON;
|
|||
|
|
DECLARE @Doc uniqueidentifier, @Tenant uniqueidentifier, @Item uniqueidentifier, @ProductId uniqueidentifier, @Description nvarchar(256),
|
|||
|
|
@Quantity decimal(18, 4), @UomId nvarchar(64), @LocationId uniqueidentifier;
|
|||
|
|
|
|||
|
|
SELECT @Doc = BaseId, @Tenant = TenantId, @Item = MaterialRequestItemId, @ProductId = ProductId, @Description = RequestReason,
|
|||
|
|
@Quantity = Quantity, @UomId = UomId, @LocationId = LocationId
|
|||
|
|
FROM Prc_V_MaterialRequestTransferItem
|
|||
|
|
WHERE Id = @Key;
|
|||
|
|
IF @Doc IS NULL
|
|||
|
|
THROW 50319, N'Talep kalemi artık aktarılamaz: belge taslak değil, kalem başka bir transfere aktarılmış ya da talep değişmiş.', 1;
|
|||
|
|
|
|||
|
|
INSERT INTO Inv_T_TransferLine (Id, TenantId, TransferId, ProductId, Description, DemandQuantity, Quantity, UomId, MaterialRequestItemId, CreationTime, IsDeleted)
|
|||
|
|
VALUES (NEWID(), @Tenant, @Doc, @ProductId, @Description, @Quantity, 0, @UomId, @Item, GETUTCDATE(), 0);
|
|||
|
|
|
|||
|
|
UPDATE Inv_T_Transfer SET DestinationLocationId = COALESCE(DestinationLocationId, @LocationId) WHERE Id = @Doc;
|
|||
|
|
EXEC Inv_P_TransferRecalc @Doc;
|
|||
|
|
END
|