예제 #1
0
        private void Export(int Dias)
		{
			this.Dias = 0;

			daoFB = new Dao(DataBaseType.Firebird,FBconnectionString);
			this.Dias = Dias;

            //A Thread com o Delphi não está funcionando
            //Thread thread = new Thread(new ThreadStart(ThreadExporta));
            //thread.IsBackground = true;
            //thread.Start();

            ThreadExporta();
		}        
예제 #2
0
        internal static void Produto(Dao daoDestino, int Empresa, int CNC, int Dias, ProgressBar pb)
		{
            StringBuilder sSQL = new StringBuilder();
            DataTable dtOrigem = new DataTable();
            dtOrigem = Dao.PAF_SelectOleDbSQL(SqlSelect(Tabela.Produto, CNC, Dias).ToString());            

            object sRegistro;
            object sCodigo;

            int novoValor = 0;
            int iTotal = dtOrigem.Rows.Count;

            Funcoes.SetControlPropertyValue(pb, "Maximum", iTotal);
            Funcoes.SetControlPropertyValue(pb, "Step", 1);
            Funcoes.SetControlPropertyValue(pb, "value", 0);

            #region SQL na UF_ICMS
            sSQL.Clear();
            sSQL.AppendLine("SELECT");
            sSQL.AppendLine("  UFI_UF,");
            sSQL.AppendLine("  UFI_ICMS_VENDA");
            sSQL.AppendLine("FROM");
            sSQL.AppendLine("  UF_ICMS");
            sSQL.AppendLine("ORDER BY");
            sSQL.AppendLine("  UFI_UF");
            DataTable dtUF = Dao.PAF_SelectOleDbSQL(sSQL.ToString());
            
            #endregion

            for (int i = 0; i < dtOrigem.Rows.Count; i++)
            {
                sRegistro = daoDestino.ExecuteScalar("SELECT GEN_ID(G_ESTOQUE,1) FROM RDB$DATABASE");
                sCodigo = daoDestino.ExecuteScalar("SELECT GEN_ID(G_CODIGO,1) FROM RDB$DATABASE");            
                DataTable dt;
                string id = "";
                string cod = "";
                string sST = "";
                string sSubGrupo = Funcoes.FormataString(dtOrigem.Rows[i]["SGP_DESCRICAO"].ToString(), 25);
                string sGrupo = Funcoes.FormataString(dtOrigem.Rows[i]["GRP_DESCRICAO"].ToString(), 25);
                string sSitTributaria = Funcoes.FormataString(dtOrigem.Rows[i]["CLF_DESCRICAO"].ToString(), 40);

                if (Empresa == 7)
                    sST = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_ST"].ToString(), 3);
                else
                    sST = "'FFF'";

                string sAliqCE = Funcoes.FormataFloat(dtOrigem.Rows[i]["CLF_ICMS"].ToString());

                object[] array = new object[56];                

                #region SET ARRAY
                array[0] = Funcoes.FormataString(dtOrigem.Rows[i]["CDB_CODIGO_BARRAS"].ToString(), 14);   //REFERENCIA

                //Luciano Ótica utiliza a descrição do subgrupo para imprimir o cupom
                if (Empresa == 7)
                {
                    array[1] = Funcoes.FormataString(dtOrigem.Rows[i]["SGP_DESCRICAO"].ToString(), 45);   //DESCRICAO
                    array[2] = sGrupo;                                                                    //NOME
                }
                else
                {
                    array[1] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_DESCRICAO"].ToString(), 45);   //DESCRICAO
                    array[2] = sSubGrupo;                                                                 //NOME
                }                
                array[3] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_RZ_SOCIAL"].ToString(), 35);       //FORNECEDOR
                array[4] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_UNIDADE"].ToString(), 3);          //MEDIDA
                array[5] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_PRECO_VENDA"].ToString());          //PRECO
                array[6] = Funcoes.FormataString("0", 1);                                                 //INDEXADOR
                array[7] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_CUSTO"].ToString());                //CUSTOCOMPR
                array[8] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_PRECO_MEDIO"].ToString());          //CUSTOMEDIO
                array[9] = dtOrigem.Rows[i]["NULO"].ToString();                                           //QTD_COMPRA
                array[10] = Funcoes.FormataFloat(dtOrigem.Rows[i]["IES_SFISCAL"].ToString());             //QTD_ATUAL
                array[11] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_EST_MINIMO"].ToString());          //QTD_MINIM
                array[12] = dtOrigem.Rows[i]["NULO"].ToString();                                          //QTD_INICIO
                array[13] = dtOrigem.Rows[i]["NULO"].ToString();                                          //DAT_INICIO
                array[14] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ULT_COMPRA
                array[15] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ULT_VENDA
                array[16] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_CODIGO"].ToString(), 30);         //LIVRE1
                array[17] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_DESCRICAO"].ToString(), 30);      //LIVRE2
                array[18] = dtOrigem.Rows[i]["NULO"].ToString();                                          //LIVRE3
                array[19] = Funcoes.FormataString(dtOrigem.Rows[i]["IDENTIFICADOR"].ToString(), 30);      //LIVRE4
                array[20] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_PESO_LIQUIDO"].ToString());        //PESO
                array[21] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_LOCAL"].ToString(),10);           //LOCAL
                array[22] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_NCM"].ToString(), 13);            //CF
                array[23] = dtOrigem.Rows[i]["NULO"].ToString();                                          //IPI                
                array[24] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_CST"].ToString(), 3);             //CST
                array[25] = sST;                                                                          //ST
                array[26] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_COMISSAO"].ToString());            //COMISSAO
                array[27] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_OBSERVACAO"].ToString(), 254);    //OBSERVACAO
                array[28] = dtOrigem.Rows[i]["NULO"].ToString();                                          //QTD_VEND
                array[29] = dtOrigem.Rows[i]["NULO"].ToString();                                          //CUS_VEND
                array[30] = dtOrigem.Rows[i]["NULO"].ToString();                                          //VAL_VEND
                array[31] = dtOrigem.Rows[i]["NULO"].ToString();                                          //LUC_VEND
                array[32] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_SITUACAO"].ToString(),1);         //ATIVO
                array[33] = dtOrigem.Rows[i]["NULO"].ToString();                                          //MARGEMLB
                array[34] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ALTERADO
                array[35] = dtOrigem.Rows[i]["NULO"].ToString();                                          //SERIE
                array[36] = dtOrigem.Rows[i]["NULO"].ToString();                                          //FOTO
                array[37] = Funcoes.FormataString("A", 1);/*Arredondamento*/                              //IAT
                array[38] = Funcoes.FormataString("T", 1);/*Produção por terceiro*/                       //IPPT
                array[39] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ENCRYPTHASH
                array[40] = Funcoes.FormataString(dtOrigem.Rows[i]["PRD_CSOSN"].ToString(), 3);           //CSOSN
                array[41] = Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_PIVA"].ToString());                //PIVA
                array[42] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ONPROMO
                array[43] = dtOrigem.Rows[i]["NULO"].ToString();                                          //OFFPROMO
                array[44] = dtOrigem.Rows[i]["NULO"].ToString();                                          //PROMOINI
                array[45] = dtOrigem.Rows[i]["NULO"].ToString();                                          //PROMOFIM                
                array[46] = dtOrigem.Rows[i]["NULO"].ToString();                                          //CST_IPI
                array[47] = Funcoes.FormataString("00", 2);/*Mercadoria para revenda*/                    //TIPO_ITEM
                array[48] = dtOrigem.Rows[i]["NULO"].ToString();                                          //CST_PIS_COFINS_ENTRADA
                array[49] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ALIQ_PIS_ENTRADA
                array[50] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ALIQ_COFINS_ENTRADA
                array[51] = dtOrigem.Rows[i]["NULO"].ToString();                                          //CST_PIS_COFINS_SAIDA
                array[52] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ALIQ_PIS_SAIDA
                array[53] = dtOrigem.Rows[i]["NULO"].ToString();                                          //ALIQ_COFINS_SAIDA
                #endregion

                #region INSERT GRUPO
                dt = daoDestino.ReturnDataTable("SELECT REGISTRO FROM GRUPO WHERE NOME = " + sSubGrupo);
                if (dt.Rows.Count <= 0)
                {
                    sSQL.Clear();
                    sSQL.AppendLine("INSERT INTO GRUPO (");
                    sSQL.AppendLine("  NOME,");
                    sSQL.AppendLine("  FOTO,");
                    sSQL.AppendLine("  REGISTRO");
                    sSQL.AppendLine(") VALUES (");

                    //Luciano Ótica utiliza a descrição do subgrupo para imprimir o cupom
                    if (Empresa == 7)
                        sSQL.AppendLine("  " + sGrupo + ",");
                    else
                        sSQL.AppendLine("  " + sSubGrupo + ",");

                    sSQL.AppendLine("  NULL,");
                    //Alterado em 12/07/2013 - Máquina do cliente não identificava o comando RIGHT do firebird
                    //sSQL.AppendLine("  RIGHT('0000000000' || (SELECT GEN_ID(G_GRUPO,1) FROM RDB$DATABASE),10))");
                    sSQL.AppendLine("  (SELECT GEN_ID(G_GRUPO,1) FROM RDB$DATABASE))");
                    //TODO
                    daoDestino.ExecuteNonQuery(sSQL.ToString());
                }
                #endregion

                #region INSERT ICM
                dt = daoDestino.ReturnDataTable("SELECT REGISTRO FROM ICM WHERE NOME = " + sSitTributaria); // + " AND CE_ = " + sAliqCE
                if (dt.Rows.Count <= 0)
                {
                    sSQL.Clear();
                    sSQL.AppendLine("INSERT INTO ICM (");
                    sSQL.AppendLine("  NOME,");
                    sSQL.AppendLine("  CFOP,");
                    sSQL.AppendLine("  ST,");
                    sSQL.AppendLine("  BASE,");
                    sSQL.AppendLine("  BASEISS,");
                    sSQL.AppendLine("  INTEGRACAO,");
                    sSQL.AppendLine("  ISS,");
                    sSQL.AppendLine("  AM_,");
                    sSQL.AppendLine("  AC_,");
                    sSQL.AppendLine("  AL_,");
                    sSQL.AppendLine("  AP_,");
                    sSQL.AppendLine("  BA_,");
                    sSQL.AppendLine("  CE_,");
                    sSQL.AppendLine("  DF_,");
                    sSQL.AppendLine("  ES_,");
                    sSQL.AppendLine("  GO_,");
                    sSQL.AppendLine("  MA_,");
                    sSQL.AppendLine("  MG_,");
                    sSQL.AppendLine("  MT_,");
                    sSQL.AppendLine("  MS_,");
                    sSQL.AppendLine("  PA_,");
                    sSQL.AppendLine("  PB_,");
                    sSQL.AppendLine("  PE_,");
                    sSQL.AppendLine("  PI_,");
                    sSQL.AppendLine("  PR_,");
                    sSQL.AppendLine("  RJ_,");
                    sSQL.AppendLine("  RN_,");
                    sSQL.AppendLine("  RO_,");
                    sSQL.AppendLine("  RR_,");
                    sSQL.AppendLine("  RS_,");
                    sSQL.AppendLine("  SC_,");
                    sSQL.AppendLine("  SE_,");
                    sSQL.AppendLine("  SP_,");
                    sSQL.AppendLine("  TO_,");
                    sSQL.AppendLine("  EX_,");
                    sSQL.AppendLine("  OBS,");
                    sSQL.AppendLine("  CONTA,");
                    sSQL.AppendLine("  REGISTRO,");
                    sSQL.AppendLine("  CSOSN,");
                    sSQL.AppendLine("  CST,");
                    sSQL.AppendLine("  CSTPISCOFINS,");
                    sSQL.AppendLine("  BCPIS,");
                    sSQL.AppendLine("  BCCOFINS,");
                    sSQL.AppendLine("  PPIS,");
                    sSQL.AppendLine("  PCOFINS,");
                    sSQL.AppendLine("  SOBREIPI,");
                    sSQL.AppendLine("  SOBREFRETE,");
                    sSQL.AppendLine("  SOBRESEGURO,");
                    sSQL.AppendLine("  SOBREOUTRAS");
                    sSQL.AppendLine(") VALUES (");
                    sSQL.AppendLine("  " + sSitTributaria + ",");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  " + sST + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(dtOrigem.Rows[i]["PRD_BASE_ICMS"].ToString()) + ",");
                    sSQL.AppendLine("  0.00,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  0.00,");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF,"AM")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "AC")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "AL")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "AP")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "BA")) + ",");
                    sSQL.AppendLine("  " + sAliqCE + ",");//CE
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "DF")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "ES")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "GO")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "MA")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "MG")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "MT")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "MS")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "PA")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "PB")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "PE")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "PI")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "PR")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "RJ")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "RN")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "RO")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "RR")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "RS")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "SC")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "SE")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "SP")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "TO")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataFloat(Funcoes.RetornaAliqUF(dtUF, "EX")) + ",");
                    sSQL.AppendLine("  " + Funcoes.FormataString(dtOrigem.Rows[i]["CLF_OBSERVACAO"].ToString(),250) + ",");
                    sSQL.AppendLine("  NULL,");
                    //Alterado em 12/07/2013 - Máquina do cliente não identificava o comando RIGHT do firebird
                    //sSQL.AppendLine("  RIGHT('0000000000' || (SELECT GEN_ID(G_ICM,1) FROM RDB$DATABASE),10),");
                    sSQL.AppendLine("  (SELECT GEN_ID(G_ICM,1) FROM RDB$DATABASE),");
                    //TODO
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL,");
                    sSQL.AppendLine("  NULL)");
                    daoDestino.ExecuteNonQuery(sSQL.ToString());
                }
                #endregion

                if (ExisteRegistro(daoDestino, dtOrigem.Rows[i]["IDENTIFICADOR"].ToString(), Tabela.Produto, out id, out cod))
                {
                    if (id != null)
                    {
                        array[54] = Funcoes.FormataString(cod.ToString(), 5);
                        array[55] = Funcoes.FormataString(id.ToString(), 10);
                        daoDestino.ExecuteNonQuery(SqlUpdate(Tabela.Produto, array).ToString());
                    }
                }
                else
                {
                    array[54] = null;
                    array[55] = null;
                    daoDestino.ExecuteNonQuery(SqlInsert(Tabela.Produto, sRegistro.ToString(), sCodigo.ToString(), array).ToString());
                }

                #region SELECT o registro no FIREBIRD e UPDATE o mesmo no SQL Server
                sSQL.Clear();
                sSQL.AppendLine("SELECT");
                sSQL.AppendLine("  CODIGO");
                sSQL.AppendLine("FROM");
                sSQL.AppendLine("  ESTOQUE");
                sSQL.AppendLine("WHERE");
                sSQL.AppendLine("  LIVRE4 = '" + dtOrigem.Rows[i]["IDENTIFICADOR"].ToString() + "'");
                DataTable dtCod = daoDestino.ReturnDataTable(sSQL.ToString());

                if (dtCod.Rows.Count > 0)
                {
                    sSQL.Clear();
                    sSQL.AppendLine("UPDATE PRODUTO");
                    sSQL.AppendLine("SET PRD_COD_PAF = " + dtCod.Rows[0]["CODIGO"].ToString() + "");
                    sSQL.AppendLine("WHERE");
                    sSQL.AppendLine("  CNC_CODIGO = '" + dtOrigem.Rows[i]["CNC_CODIGO"].ToString() + "'");
                    sSQL.AppendLine("AND");
                    sSQL.AppendLine("  PRD_CODIGO = '" + dtOrigem.Rows[i]["PRD_CODIGO"].ToString() + "'");
                    Dao.PAF_ExecuteNonQueryOleDbSQL(sSQL.ToString());
                }
                #endregion

                novoValor = pb.Value + 1;

                Funcoes.SetControlPropertyValue(pb, "value", novoValor);
            }
            Funcoes.SetControlPropertyValue(pb, "value", 0);
		}
예제 #3
0
		private static bool ExisteRegistro(Dao daoDestino, string Identificador, Tabela tabela, out string id, out string cod)
		{
			StringBuilder sb = new StringBuilder();
			if ( tabela == Tabela.Cliente )
			{
				sb.Clear();
				sb.AppendLine("SELECT");
				sb.AppendLine("  REGISTRO,");
				sb.AppendLine("  IDENTIFICADOR5");
				sb.AppendLine("FROM");
				sb.AppendLine("  CLIFOR");
				sb.AppendLine("WHERE");
				sb.AppendLine("  IDENTIFICADOR5 = '" + Identificador.ToString() + "' AND");
				sb.AppendLine("  CLIFOR = 'C'");
			}
			else if ( tabela == Tabela.Fornecedor )
			{
				sb.Clear();
				sb.AppendLine("SELECT");
				sb.AppendLine("  REGISTRO,");
				sb.AppendLine("  IDENTIFICADOR5");
				sb.AppendLine("FROM");
				sb.AppendLine("  CLIFOR");
				sb.AppendLine("WHERE");
				sb.AppendLine("  IDENTIFICADOR5 = '" + Identificador.ToString() + "' AND");
				sb.AppendLine("  CLIFOR = 'F'");
			}
			else if ( tabela == Tabela.Produto )
			{
				sb.Clear();
				sb.AppendLine("SELECT");
				sb.AppendLine("  CODIGO,");
                sb.AppendLine("  REGISTRO,");
				sb.AppendLine("  LIVRE4");
				sb.AppendLine("FROM");
				sb.AppendLine("  ESTOQUE");
				sb.AppendLine("WHERE");
				sb.AppendLine("  LIVRE4 = '" + Identificador.ToString() + "'");
			}
            else if (tabela == Tabela.Vendedor)
            {
                sb.Clear();
                sb.AppendLine("SELECT");
                sb.AppendLine("  NOME,");
                sb.AppendLine("  REGISTRO");
                sb.AppendLine("FROM");
                sb.AppendLine("  VENDEDOR");
                sb.AppendLine("WHERE");
                sb.AppendLine("  NOME = '" + Identificador.ToString() + "'");
            }
			DataTable dtDestino = daoDestino.ReturnDataTable(sb.ToString());
			if ( dtDestino.Rows.Count > 0 )
				id = dtDestino.Rows[0]["REGISTRO"].ToString();
			else
				id = null;

            if (tabela == Tabela.Produto)
            {
                if (dtDestino.Rows.Count > 0)
                    cod = dtDestino.Rows[0]["CODIGO"].ToString();
                else
                    cod = null;
            }
            else
                cod = null;
			return dtDestino.Rows.Count > 0;
		}
예제 #4
0
        internal static void Fornecedor(Dao daoDestino, int Dias, ProgressBar pb)
		{
			DataTable dtOrigem = new DataTable();
            dtOrigem = Dao.PAF_SelectOleDbSQL(SqlSelect(Tabela.Fornecedor, 0, Dias).ToString());            

            object sRegistro;
			
			int novoValor = 0;
			int iTotal = dtOrigem.Rows.Count;
			
			Funcoes.SetControlPropertyValue(pb,"Maximum",iTotal);
	        Funcoes.SetControlPropertyValue(pb,"Step",1);
            Funcoes.SetControlPropertyValue(pb,"value",0);

			for (int i = 0; i < dtOrigem.Rows.Count; i++)
			{
                sRegistro = daoDestino.ExecuteScalar("SELECT GEN_ID(G_CLIFOR,1) FROM RDB$DATABASE");
				string id = "";
                string cod = "";
				object[] array = new object[33];

                #region SET ARRAY
                array[0] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_RZ_SOCIAL"].ToString(),35);
				array[1] = dtOrigem.Rows[i]["NULO"].ToString();
				array[2] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_IE"].ToString(),16);
				array[3] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_CGC"].ToString(),19);
				array[4] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_ENDERECO"].ToString(),40);
				array[5] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_BAIRRO"].ToString(),35);
				array[6] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_CIDADE"].ToString(),40);
				array[7] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_UF"].ToString(),2);
				array[8] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_CEP"].ToString(),9);
				array[9] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_FONE"].ToString(),16);
				array[10] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_FAX"].ToString(),16);
				array[11] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_EMAIL"].ToString(),80);
				array[12] = Funcoes.FormataString(dtOrigem.Rows[i]["FOR_OBSERVACAO1"].ToString(),254);
				array[13] = dtOrigem.Rows[i]["NULO"].ToString();
				array[14] = dtOrigem.Rows[i]["NULO"].ToString();
				array[15] = dtOrigem.Rows[i]["NULO"].ToString();
				array[16] = dtOrigem.Rows[i]["NULO"].ToString();
				array[17] = dtOrigem.Rows[i]["NULO"].ToString();
				array[18] = dtOrigem.Rows[i]["NULO"].ToString();
				array[19] = dtOrigem.Rows[i]["NULO"].ToString();
				array[20] = Funcoes.FormataString(dtOrigem.Rows[i]["IDENTIFICADOR"].ToString(),30);
				array[21] = dtOrigem.Rows[i]["NULO"].ToString();
				array[22] = Funcoes.FormataDateFB(dtOrigem.Rows[i]["FOR_DT_CADASTRO"].ToString());
				array[23] = dtOrigem.Rows[i]["NULO"].ToString();
				array[24] = dtOrigem.Rows[i]["NULO"].ToString();
				array[25] = dtOrigem.Rows[i]["NULO"].ToString();
				array[26] = dtOrigem.Rows[i]["NULO"].ToString();
				array[27] = dtOrigem.Rows[i]["NULO"].ToString();
				array[28] = dtOrigem.Rows[i]["NULO"].ToString();
				array[29] = Funcoes.FormataString("F",1);
				array[30] = dtOrigem.Rows[i]["NULO"].ToString();
				array[31] = dtOrigem.Rows[i]["NULO"].ToString();
                #endregion

                if (ExisteRegistro(daoDestino, dtOrigem.Rows[i]["IDENTIFICADOR"].ToString(), Tabela.Cliente, out id, out cod))
				{
					if ( id != null )
					{
						array[32] = Funcoes.FormataString(id.ToString(),10);
						daoDestino.ExecuteNonQuery(SqlUpdate(Tabela.Fornecedor,array).ToString());
					}
				}
				else
				{
					array[32] = null;
                    daoDestino.ExecuteNonQuery(SqlInsert(Tabela.Fornecedor, sRegistro.ToString(), "", array).ToString());
				}
				novoValor = pb.Value + 1;
				
				Funcoes.SetControlPropertyValue(pb,"value",novoValor);
			} 
			Funcoes.SetControlPropertyValue(pb,"value",0);
		}
예제 #5
0
        internal static void Vendedor(Dao daoDestino, int Dias, ProgressBar pb)
        {
            DataTable dtOrigem = new DataTable();
            dtOrigem = Dao.PAF_SelectOleDbSQL(SqlSelect(Tabela.Vendedor, 0, Dias).ToString());

            object sRegistro;

            int novoValor = 0;
            int iTotal = dtOrigem.Rows.Count;

            Funcoes.SetControlPropertyValue(pb, "Maximum", iTotal);
            Funcoes.SetControlPropertyValue(pb, "Step", 1);
            Funcoes.SetControlPropertyValue(pb, "value", 0);

            for (int i = 0; i < dtOrigem.Rows.Count; i++)
            {
                sRegistro = daoDestino.ExecuteScalar("SELECT GEN_ID(G_VENDEDOR,1) FROM RDB$DATABASE");
                string id = "";
                string cod = "";
                object[] array = new object[6];

                #region SET ARRAY
                array[0] = Funcoes.FormataString(dtOrigem.Rows[i]["FUN_NOME"].ToString(), 35);
                array[1] = Funcoes.FormataFloat("0");
                array[2] = Funcoes.FormataFloat("0");
                array[3] = dtOrigem.Rows[i]["NULO"].ToString();
                array[4] = Funcoes.FormataString(dtOrigem.Rows[i]["PAR_DESCRICAO"].ToString(), 10);
                array[5] = dtOrigem.Rows[i]["NULO"].ToString();
                #endregion

                if (!ExisteRegistro(daoDestino, dtOrigem.Rows[i]["IDENTIFICADOR"].ToString(), Tabela.Vendedor, out id, out cod))
                    daoDestino.ExecuteNonQuery(SqlInsert(Tabela.Vendedor, sRegistro.ToString(), "", array).ToString());

                novoValor = pb.Value + 1;

                Funcoes.SetControlPropertyValue(pb, "value", novoValor);
            }
            Funcoes.SetControlPropertyValue(pb, "value", 0);
        }