/* HELIOS iNuvio | NTB-T.Rootvin | 2024-09-18 09:28:15 */

DECLARE @GUID BINARY(16),@Id INT,@Popis NVARCHAR(255),@UP NVARCHAR(255),@Parametry NVARCHAR(255),@IdBrowse INT,@Poznamka NVARCHAR(MAX),@Autor NVARCHAR(255),@DatPorizeni DATETIME,@Zmenil NVARCHAR(255),@DatZmeny DATETIME,@ParamHe INT,@Typ INT,@BidNavBrowse INT,@TextNavBrowse INT,@ZobrUkonceni BIT,@VerejnaAkce BIT,@ObnovitPoUkonceni BIT,@eServer BIT, @ZobrazitEditorPar BIT, @ObsluznyPlugin NVARCHAR(255),
@BlokovaniEditoru SMALLINT,@TextBrowse INT,@CyklickyEditor BIT,@SelectoTvurceVlastnikId BIT,@VstupneID NVARCHAR(255),@PosunPoZaznamech INT,@TechnickyPopis NVARCHAR(MAX),@Napoveda NVARCHAR(255),@Hotkey INT,@NavaznaAkce INT,@NavaznaAkceGUID BINARY(16),@Skupina NVARCHAR(255),@NazevPodmenu NVARCHAR(255),@PoradiVPodmenu INT,@err NVARCHAR(2047),@IdExtKom INT,@GUIDFiltr BINARY(16),@IDFiltr INT,@ErrStr NVARCHAR(2047),@SkriptPredSpustenim NVARCHAR(MAX),@Automatizace BIT

SELECT @Id=6,@Popis=N'Spec - realizace výdejky (po)',@UP=N'dbo.ep_V01',@Parametry=N'',@IdBrowse=990990,@Poznamka=N'CREATE PROCEDURE dbo.ep_V01
   @IDDoklad INT
AS

SET NOCOUNT ON

-- doplněk realizace skladových výdejů. Volá se na konci procesu realizace výdejů. Vstupní parametr ID dokladu, výstup není.



DECLARE
 @rada NVARCHAR(3),
 @idSklad NVARCHAR(30)


SELECT @rada=RadaDokladu, @idSklad=IDSklad
 FROM dbo.TabDokladyZbozi WHERE ID=@IDDoklad



-- pro reseni HDC Strakonice, moznost dalsi slepe procedury
IF OBJECT_ID(N''dbo.ep_V01_HDC1'', N''P'') IS NOT NULL
 EXEC sp_executesql N''EXEC dbo.ep_V01_HDC1 @IDDoklad'', N''@IDDoklad INT'', @IDDoklad

',@Autor=N'Import HDC',@DatPorizeni='20240918 09:23:37.193',@Zmenil=NULL,@DatZmeny=NULL,@ParamHe=0,@Typ=0,@BidNavBrowse=NULL,@TextNavBrowse=NULL,@ZobrUkonceni=0,@VerejnaAkce=0,@NavaznaAkceGUID=CAST(NULL AS UNIQUEIDENTIFIER),@BlokovaniEditoru=NULL,@TextBrowse=990990,@CyklickyEditor=0,@SelectoTvurceVlastnikId=0,@VstupneID=NULL,@TechnickyPopis=NULL,@Napoveda=NULL,@Hotkey=0,@GUID=CAST(N'5C642FF2-6E25-4FD8-AB32-F27EC5B249A3' AS UNIQUEIDENTIFIER),@Skupina=N'',@NazevPodmenu=N'',@PoradiVPodmenu=0,@GUIDFiltr=CAST(NULL AS UNIQUEIDENTIFIER),@eServer=0,@ZobrazitEditorPar=1,@ObsluznyPlugin=N'',@PosunPoZaznamech=0,@ObnovitPoUkonceni=0,@SkriptPredSpustenim=NULL,@Automatizace=0
IF @NavaznaAkceGUID IS NULL 
SET @NavaznaAkce = NULL 
ELSE 
BEGIN 
SET @NavaznaAkce=(SELECT Id FROM dbo.TabExtKom WHERE GUID=@NavaznaAkceGUID) 
IF @NavaznaAkce IS NULL 
BEGIN 
SET @err=CAST(CAST(@NavaznaAkceGUID AS UNIQUEIDENTIFIER)AS NVARCHAR(36))
SET @ErrStr = dbo.hf_FormatError(75037, @err)
RAISERROR(@ErrStr, 16, 1)
RETURN 
END 
END
IF @GUIDFiltr IS NULL
SET @IDFiltr = NULL
ELSE
SELECT @IDFiltr = ID FROM TabFiltr WHERE GUID = @GUIDFiltr

IF NOT EXISTS(SELECT * FROM dbo.TabExtKom WHERE [UP]=N'dbo.ep_V01')
INSERT dbo.TabExtKom (GUID,Popis,UP,Parametry,IdBrowse,Poznamka,Autor,
DatPorizeni,Zmenil,DatZmeny,ParamHe,Typ,BidNavBrowse,TextNavBrowse,
ZobrUkonceni,VerejnaAkce,BlokovaniEditoru,TextBrowse,CyklickyEditor,
SelectoTvurceVlastnikId,VstupneID,TechnickyPopis,Napoveda,Hotkey,
NavaznaAkce,Skupina,NazevPodmenu,PoradiVPodmenu,IDFiltr,
eServer, ZobrazitEditorPar, ObsluznyPlugin, PosunPoZaznamech,
ObnovitPoUkonceni,SkriptPredSpustenim,Automatizace)
VALUES (@GUID,@Popis,@UP,@Parametry,@IdBrowse,@Poznamka,@Autor,@DatPorizeni,
@Zmenil,@DatZmeny,@ParamHe,@Typ,@BidNavBrowse,@TextNavBrowse,@ZobrUkonceni,
@VerejnaAkce,@BlokovaniEditoru,@TextBrowse,@CyklickyEditor,@SelectoTvurceVlastnikId,
@VstupneID,@TechnickyPopis,@Napoveda,@Hotkey,@NavaznaAkce,@Skupina,@NazevPodmenu,
@PoradiVPodmenu,@IDFiltr,@eServer,@ZobrazitEditorPar,@ObsluznyPlugin,@PosunPoZaznamech,
@ObnovitPoUkonceni,@SkriptPredSpustenim,@Automatizace)

SET @IdExtKom=(SELECT Id FROM dbo.TabExtKom WHERE GUID=@GUID) 
DELETE dbo.TabExtKomPar WHERE IdExtKom=@IdExtKom

IF OBJECT_ID(N'dbo.ep_V01', N'P') IS NULL
 EXEC sp_executesql @Poznamka