Esempio n. 1
0
        private void PAF_Preenche_E()
        {
            #region E1
            var registroE1Rec = new ACBrPAFInterop.RegistroHD2Rec
            {
                RAZAOSOCIAL      = ToUTF8(PafE.RegistroE1.RazaoSocial),
                CNPJ             = ToUTF8(PafE.RegistroE1.CNPJ),
                UF               = ToUTF8(PafE.RegistroE1.UF),
                IE               = ToUTF8(PafE.RegistroE1.IE),
                IM               = ToUTF8(PafE.RegistroE1.IM),
                TIPO_ECF         = ToUTF8(PafE.RegistroE1.TIPO_ECF),
                MARCA_ECF        = ToUTF8(PafE.RegistroE1.MARCA_ECF),
                MODELO_ECF       = ToUTF8(PafE.RegistroE1.MODELO_ECF),
                NUM_FAB          = ToUTF8(PafE.RegistroE1.NUM_FAB),
                MF_ADICIONAL     = ToUTF8(PafE.RegistroE1.MF_ADICIONAL),
                DT_EST           = PafE.RegistroE1.DT_EST.ToOADate(),
                RegistroValido   = PafE.RegistroE1.RegistroValido,
                InclusaoExclusao = PafE.RegistroE1.InclusaoExclusao
            };
            #endregion

            #region E2
            var registrosE2Rec = (from x in PafE.RegistroE2
                                  select new ACBrPAFInterop.RegistroE2Rec
            {
                COD_MERC = ToUTF8(x.COD_MERC),
                DESC_MERC = ToUTF8(x.DESC_MERC),
                UN_MED = ToUTF8(x.UN_MED),
                QTDE_EST = Convert.ToDouble(x.QTDE_EST),
                RegistroValido = x.RegistroValido,
            }).ToArray();
            #endregion

            #region E3
            var registroE3Rec = new ACBrPAFInterop.RegistroE3Rec
            {
                DataEstoque      = PafE.RegistroE3.DataEstoque.ToOADate(),
                MarcaECF         = PafE.RegistroE3.MarcaECF,
                MFAdicional      = PafE.RegistroE3.MFAdicional,
                ModeloECF        = PafE.RegistroE3.ModeloECF,
                NumeroFabricacao = PafE.RegistroE3.NumeroFabricacao,
                RegistroValido   = PafE.RegistroE3.RegistroValido,
                TipoECF          = PafE.RegistroE3.TipoECF,
            };
            #endregion

            var ret = ACBrPAFInterop.PAF_Preenche_E(Handle, registroE1Rec, registrosE2Rec, registroE3Rec, PafE.RegistroE2.Count);
            CheckResult(ret);
        }
Esempio n. 2
0
	    private void PAF_Preenche_E()
        {
            #region E1
            var registroE1Rec = new ACBrPAFInterop.RegistroHD2Rec
            {
                RAZAOSOCIAL = ToUTF8(PafE.RegistroE1.RazaoSocial),
                CNPJ = ToUTF8(PafE.RegistroE1.CNPJ),
                UF = ToUTF8(PafE.RegistroE1.UF),
                IE = ToUTF8(PafE.RegistroE1.IE),
                IM = ToUTF8(PafE.RegistroE1.IM),
                TIPO_ECF = ToUTF8(PafE.RegistroE1.TIPO_ECF),
                MARCA_ECF = ToUTF8(PafE.RegistroE1.MARCA_ECF),
                MODELO_ECF = ToUTF8(PafE.RegistroE1.MODELO_ECF),
                NUM_FAB = ToUTF8(PafE.RegistroE1.NUM_FAB),
                MF_ADICIONAL = ToUTF8(PafE.RegistroE1.MF_ADICIONAL),
                DT_EST = PafE.RegistroE1.DT_EST.ToOADate(),
                RegistroValido = PafE.RegistroE1.RegistroValido,
                InclusaoExclusao = PafE.RegistroE1.InclusaoExclusao
            };
            #endregion

            #region E2
            var registrosE2Rec = (from x in PafE.RegistroE2
                                                             select new ACBrPAFInterop.RegistroE2Rec
                                                             {
                                                                 COD_MERC = ToUTF8(x.COD_MERC),
                                                                 DESC_MERC = ToUTF8(x.DESC_MERC),
                                                                 UN_MED = ToUTF8(x.UN_MED),
                                                                 QTDE_EST = Convert.ToDouble(x.QTDE_EST),
                                                                 RegistroValido = x.RegistroValido,
                                                             }).ToArray();
            #endregion

            #region E3
            var registroE3Rec = new ACBrPAFInterop.RegistroE3Rec
            {
                DataEstoque = PafE.RegistroE3.DataEstoque.ToOADate(),
                MarcaECF = PafE.RegistroE3.MarcaECF,
                MFAdicional = PafE.RegistroE3.MFAdicional,
                ModeloECF = PafE.RegistroE3.ModeloECF,
                NumeroFabricacao = PafE.RegistroE3.NumeroFabricacao,
                RegistroValido = PafE.RegistroE3.RegistroValido,
                TipoECF = PafE.RegistroE3.TipoECF,
            };
            #endregion

            var ret = ACBrPAFInterop.PAF_Preenche_E(Handle, registroE1Rec, registrosE2Rec, registroE3Rec, PafE.RegistroE2.Count);
            CheckResult(ret);
        }