Pessoal deu certo o resultado final foi seguinte:
declare @arquivo varchar(8000);
declare @caminhocarga varchar(8000);
declare @caminhodiretorio varchar(8000);
DECLARE @CAMPO VARCHAR(8000);
declare @codigo integer;
declare @SQL nvarchar(4000)
set @arquivo = '';
set @caminhocarga = 'dir C:\Pharmacy\dados\1\ /b';
set @caminhodiretorio = 'C:\Pharmacy\dados\1\';
set @CAMPO = '';
set @codigo = '';
DROP TABLE #Lista;
DROP TABLE #FORNECEDORES;
CREATE TABLE #Lista
(DIRETORIO VARCHAR(37));
CREATE TABLE #FORNECEDORES(
TIPO VARCHAR(1),
CODIGO INTEGER,
NOME VARCHAR(53),
CGC VARCHAR(74),
ENDERECO VARCHAR(51),
BAIRRO VARCHAR(20),
CIDADE VARCHAR(32),
CEP VARCHAR(20),
CXPOSTAL VARCHAR(20),
EMAIL VARCHAR(40),
TELEFONE VARCHAR(20),
TELEX VARCHAR(20),
FEDERACAO VARCHAR(03),
NUM_PESSOA VARCHAR(60),
BAIRRO_COBR VARCHAR(20),
CXPOSTAL_COBR VARCHAR(20),
CIDADE_COBR VARCHAR(32),
CEP_COBR VARCHAR(20),
FEDERACAO_COBR VARCHAR(03),
AUX_FORNECEDOR VARCHAR(01),
EMITENTE1 VARCHAR(14),
NOME_ABREV1 VARCHAR(15),
AUX2 VARCHAR(03),
AUX_CLIENTE VARCHAR(01),
EMITENTE2 VARCHAR(09),
NOME_ABREV2 VARCHAR(15),
AUX4 VARCHAR(3),
INSCEST VARCHAR(20),
AUX5 VARCHAR(20),
FEDERACAO3 VARCHAR(20),
ESPACO1 VARCHAR(8),
AUX6 VARCHAR(01));
Insert Into #Lista
EXEC master..xp_cmdshell @caminhocarga;
DELETE FROM #Lista WHERE DIRETORIO IS NULL
DECLARE CAR_FORNECEDORES CURSOR FOR
select diretorio from #Lista where SUBSTRING(diretorio,1,2) = 'EA';
OPEN CAR_FORNECEDORES
FETCH NEXT FROM CAR_FORNECEDORES INTO @CAMPO
WHILE @@FETCH_STATUS = 0
BEGIN
SET @arquivo = @caminhodiretorio + @CAMPO;
SET @SQL = 'bulk insert #FORNECEDORES ' + -- inserir na tabela desejada
'from ''' + @ARQUIVO + ''' ' + -- caminho do arquivo e formato
'with ' +
'( ' +
'CODEPAGE = ''ACP'', '+ -- comando necessário para não ter problemas com caracteres especiais como acentos
'fieldterminator = '';'', ' + -- caractere que separa os campos no arquivo
'rowterminator = ''\n'' ' + -- referencia para fim da linha
') ';
exec sp_executesql @SQL;
set @arquivo = 'del ' + @arquivo;
--apagando o arquivo fisico
--EXEC MASTER..XP_CMDSHELL @arquivo;
FETCH NEXT FROM CAR_FORNECEDORES INTO @CAMPO;
END
UPDATE #FORNECEDORES
SET AUX_FORNECEDOR = 'S'
WHERE #FORNECEDORES.AUX_FORNECEDOR LIKE 'F';
UPDATE #FORNECEDORES
SET AUX_FORNECEDOR = 'N'
WHERE #FORNECEDORES.AUX_FORNECEDOR LIKE ' ';
UPDATE #FORNECEDORES
SET AUX_FORNECEDOR = 'S'
WHERE #FORNECEDORES.AUX_FORNECEDOR LIKE 'C';
UPDATE #FORNECEDORES
SET AUX_FORNECEDOR = 'N'
WHERE #FORNECEDORES.AUX_FORNECEDOR LIKE ' ';
UPDATE FN_FORNECEDORES
SET RAZAO = #FORNECEDORES.NOME,
FANTASIA = #FORNECEDORES.NOME_ABREV1,
CKPESSOA = #FORNECEDORES.TIPO,
ENDERECO = #FORNECEDORES.ENDERECO,
BAIRRO = #FORNECEDORES.BAIRRO,
CIDADE = #FORNECEDORES.CIDADE,
UF = #FORNECEDORES.FEDERACAO,
CEP = #FORNECEDORES.CEP,
COMPLEM = #FORNECEDORES.CXPOSTAL,
COBENDERECO = #FORNECEDORES.ENDERECO,
COBBAIRRO = #FORNECEDORES.BAIRRO_COBR,
COBCIDADE = #FORNECEDORES.CIDADE_COBR,
COBCEP = #FORNECEDORES.CEP_COBR,
COBUF = #FORNECEDORES.FEDERACAO_COBR,
STFORNECEDOR = #FORNECEDORES.AUX_FORNECEDOR,
STCLIENTE = #FORNECEDORES.AUX_FORNECEDOR,
TIPODESPESA = #FORNECEDORES.AUX2,
TIPORECEITA = #FORNECEDORES.AUX2,
NROPESSOA = #FORNECEDORES.NUM_PESSOA,
NROPESSOACOB = #FORNECEDORES.ESPACO1,
INSCEST = #FORNECEDORES.INSCEST,
USUARIO = 'ADMINISTRADOR',
DTATUALIZACAO = GETDATE()
FROM #FORNECEDORES
WHERE CAST(#FORNECEDORES.CODIGO AS FLOAT) = CAST(FN_FORNECEDORES.CODEXTERNO AS FLOAT);
CLOSE CAR_FORNECEDORES ;
DEALLOCATE CAR_FORNECEDORES;
Só tenho uma dúvida básica alem do update preciso fazer um insert nessa tabela caso não exista o registro importado do arquivo txt como eu faço essa comparação entre a tabela #fornecedores e a tabela fn_fornecedores caso não exista insere?
