USE [HCITools]
GO

IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[get_Labels_List]') AND type in (N'P', N'PC'))
DROP PROCEDURE [dbo].[get_Labels_List]
GO

USE [HCITools]
GO

SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO





CREATE PROCEDURE [dbo].[get_Labels_List] 
                 @in_debug  int = null
                  
AS 
/*============================================================================= 

  Explication du traitement realise par la SP
  -------------------------------------------
    Cette SP sert à récuperer la liste des labels contenus dans le répertoire de la centrale
 
  Contexte d'utilisation
  ----------------------
    Cette SP est appelée par le job D92080 - Backup Labels List
 
  Parametres  
  ----------  
    @in_debug : affiche la liste des labels dans le répertoire
 
  Creation : 01.11.16 / FLA
   
  Modifications : 
  
=============================================================================*/ 
 
set nocount on;

/*------------------- Declaration des variables --------------------*/
declare @path varchar (4000)
 
/*------------ Affectation des parametres aux variables ------------*/
SELECT @path = HCIP_value FROM HCI_PARAMS WHERE HCIP_key = 'LBLPATH'

/*-------------------------- Traitement ---------------------------*/
BEGIN TRY
    
    insert into dbo.LabelsList 
         SELECT DirectoryName as [labels]
           FROM [HCITools].[dbo].[aps_Directory_Get_Directories] (@path,null) dn
          WHERE LEN(DirectoryName) = 17
            AND DirectoryName LIKE '20%'
AND NOT EXISTS (select LL_name from dbo.LabelsList ll WHERE ll.LL_Name = dn.DirectoryName)

/*---------------------- Traitement des erreurs ----------------------*/ 
END TRY
BEGIN CATCH

    /* Traitement des erreurs (avec RaiseError) */
    EXEC dbo.get_Error_Info @in_RaiseError = 1

END CATCH 



GO