Skip to main content
Announcements
Have questions about Qlik Connect? Join us live on April 10th, at 11 AM ET: SIGN UP NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
Anonymous
Not applicable

Deletar qvds através do script

Boa tarde amigos do fórum. Gostaria de tirar uma dúvida com vocês, se é possível deletar qvds externos através do load script, utilizando como data para  exclusão, a data de criação do arquivo d-2.

Muito Obrigado pela ajuda.

Labels (1)
  • Macro

11 Replies
Anonymous
Not applicable
Author

Oi Luciano, estou tentando fazer, mas não esta dando certo.  POr gentileza, consegue me ajudar? Segue abaixo o código que estou utilizando, lembrando que tenho que salvar na váriavel, o conteudo que esta na coluna name do resultado do último dia.

sub DoDir (Root)

   for each Ext in 'qvd'

      for each File in filelist (Root&'\Tb_Fato_Rematricula*.' &Ext)

         trace Lendo o arquivo $(Dir)/$(File) ;

         

         Let vData = floor(FileTime( '$(File)' )) - floor(Today());

        

        

         if '$(vData)' <-3 then

          ArquivosLidos:

          LOAD

             '$(File)'             as Name,

             FileSize( '$(File)' ) as Size,

                'Sim'                 as Apagado,

             FileTime( '$(File)' ) as FileTime

          autogenerate 1;

          

            // EXECUTE cmd.exe /c del '$(File)';

             EXECUTE cmd.exe /C DEL "$(File)";

            

         ELSE

          ArquivosLidos:

          LOAD

             '$(File)'             as Name,

             FileSize( '$(File)' ) as Size,

                'Nao'                 as Apagado,

                FileTime( '$(File)' ) as FileTime        

               

               

            

          autogenerate 1;

           

         endif  

      next File

   next Ext

  

   for each Dir in dirlist (Root&'\*' )

      call DoDir (Dir)

   next Dir

  

end sub

call DoDir ('\\172.16.140.49\QV_Producao\Dropbox (SIGA)\BI SIGA\4 - Bases Diárias\Marketing BI - 2 - QVDs Corporativo\2 - Retencao\2016_1');

ArquivosLidos2:

Load

date(max(FileTime), 'DD_MM_YYYY_hh_mm_ss') as teste

resident ArquivosLidos;

LET vm = '[\Tb_Fato_Rematricula_'& peek('ArquivosLidos2',2,'ArquivosLidos2')&'.qvd]';

exit script

lucianosv
Specialist
Specialist

O peek está errado.

Vc têm o residente ArquivosLidos2 mas não têm o campo ArquivosLidos2