5 Passos para Exibir Anexos no Siebel CRM sem Baixar para o Client

				
					function BusComp_ChangeRecord ()
{    
    try
        {	
            TheApplication().SetProfileAttr("AttHtml","");
            
            var vTmshtFileName = this.GetFieldValue("TmshtFileName");
            
            //Parâmetros (Poderia pegar de SysPref? Claro!)
            var vUrl="https://crm-tsit.ddns.net/siebel/files/custom/downloaded/"
            
            //Pra onde vamos copiar os arquivos descompactados no Siebel Server
            //Lembre-se que o path abaixo é montado no:
            //SIEBEL_AI/applicationcontainer_external/siebelwebroot/files/custom/downloaded
            var vPath="/opt/siebel/fs/downloaded/";
            
            //Usamos para delimitar quais as extensões fazem sentido serem renderizadas.
            //Não faz sentido fazer todo o esfoço do script para, no final, o Browser não
            //ser capaz de exibir o anexo. É o caso de arquivos zip, eml, ppt...
    		var vExtToShow = "pdf|jpg|jpeg|gif|png|bmp|svg|txt|html|htm|eml|mp4|mpeg|ogg";
            
            //HTML padrão. Exibido para quaquer extensão que não seja possível renderizar
            var vHtml="
Visualização não disponível
"; 
            
            //CSS padrão. Exibido para todos.
            //Poderia estar no nosso css CUSTOM, mas queria mostrar que é possível, além de css, inserir JS aqui.
            var vCss                = 		"\n";   

            var vExt = "";
            var vTemp = "";
            var vStatus = "";
            var vTempFilePath = ""; 
            var vFileName = "";
            var vNewFile = "";
            
            
            var vCmd = "";
            
            //Inicialmente nós executávamos os comandos que agora estão no shell script move.sh direto do e-Script
            //Mas percebemos que existem alguns bugs relacionados a caracteres especiais que impedem o Clib.system
            //de funcionar adequadamente.
            //a forma que encontramos de resolver isso é restringindo as execuções do Clib.system a comandos simples
            //que basicamente chamam o Shell Script e passam parâmetros
            
            // var vCmd="find '" + vPath + "' -type f -mmin +30 -exec rm {} \\;"; //Apaga qqr coisa com mais de 30 minutos
    		
            //Se tem Anexo
            if (vTmshtFileName.length>0)
            {                                   
                vExt=this.GetFieldValue("TmshtFileExt");
				
                //Se deve Exibir Anexos
                if (vExtToShow.indexOf(vExt)>=0)
                {                    
                    vTemp = this.InvokeMethod("GetFile", "TmshtFileName");
                    vStatus = vTemp.substring(0, vTemp.indexOf(","));
                    
                    //Se conseguiu descompactar o arquivo com sucesso no /temp/
                    if (vStatus=="Success") 
                    {
                        //Path do Arquivo Descompactado
                        vTempFilePath= vTemp.substring(vTemp.indexOf(",") + 1);
                        
                        //Nome do Arquivo Descompactado
                        vFileName = vTempFilePath.substring(vTemp.indexOf("/temp/") + 1);      
                        
                        vTemp = vFileName.split("_");
						
                        //Remove o nome real do arquivo do nome do arquivo no filesystem (evita erros de caracteres especiais na URL)
                        vFileName = vTemp[0]+"_"+vTemp[1]+"_"+vTemp[2]+"_"+vTemp[3]+"."+vExt;
                        
                        vNewFile=vPath+vFileName;
                        
                        vUrl=vUrl+vFileName;                           
                  
                        vTemp = vTempFilePath.split("_");   
                        
                        //Feito script externo ~/scripts/move.sh porque se o arquivo tiver carecter especial no nome, o comando passado via Clib.system falha
                        //Conteúdo do script ~/scripts/move.sh 
                        //   #!/bin/bash
                        //   find "$3" -type f -mmin +30 -exec rm {} \;
                        //   mv "$1" "$2"
                        
                        vCmd = "/home/oracle/scripts/move.sh " + vTemp[0] + "_" + vTemp[1] + "_" + vTemp[2] + "_" + vTemp[3] + "*." + vExt + " " + vNewFile + " " + vPath;
						Clib.system(vCmd);
						
                        //Aqui customizamos o HTML dependendo do conteúdo que será renderizado no Browser
                        if (vExt=="pdf")
                        	vHtml="
";                                                        
                        else if (vExt=="jpg" || vExt=="jpeg" || vExt=="gif" || vExt=="png" || vExt=="bmp" || vExt=="svg")
                        	vHtml=" 
Visualização não disponível
";
                        else  if (vExt=="txt")
                            vHtml="
Visualização não disponível
";
                        else  if (vExt=="html" || vExt=="htm")
                            vHtml="
Visualização não disponível
";
                        else  if (vExt=="mp4" || vExt=="mpeg" || vExt=="ogg")
                            vHtml="
Visualização não disponível" + vUrl + "
";
                       
                    }//Conseguiu descompactar o arquivo      
                      
                }//Deve Mostrar o Arquivo
                
                //O Field é um Campo Calculado com GetProfileAttr("AttHtml");
                //Por isso, atualizamos o Attr com o valor 
                TheApplication().SetProfileAttr("AttHtml",vCss+vHtml); 
                
                //Refresh no BC sem Requery
                this.InvokeMethod("RefreshRecord"); 
            }//Tem Anexo
            
        }
    catch(e)
        {
            throw e;
        }
    finally
    	{
         vTmshtFileName = vUrl = vPath = vExtToShow = vHtml = vCss = vExt = vTemp = vStatus = vTempFilePath = vFileName = vNewFile = vCmd = null;
    	}	
}