ana_mod.~pa

Mosaic ERP大型系统 v6.09.rar

    TTTipidocAdebitoagente: TBooleanField;
    TTArea: TTable;
    TTAreaIdGiornale: TStringField;
    DsArea: TDataSource;
    TTAreaArea: TStringField;
    TTAgentiArea: TStringField;
    TTAgentiCapoarea: TBooleanField;
    TTAgentiAreaLk: TStringField;
    TTAg_Prov_art: TTable;
    DsAg_Prov_art: TDataSource;
    TTAg_Prov_artAgente: TStringField;
    TTAg_Prov_artTiposoggetto: TStringField;
    TTAg_Prov_artArticolo: TStringField;
    TTAg_Prov_artProvvigione: TFloatField;
    TTAg_Prov_artImporto: TCurrencyField;
    TTAg_Prov_artIdGiornale: TStringField;
    TTAg_Prov_artDescrTipoSog: TStringField;
    TTAg_docImporto: TCurrencyField;
    TTAg_provvigioniImporto: TCurrencyField;
    TTAg_Prov_artDescrArt: TStringField;
    TTArea_Doc: TTable;
    TTArea_provvigioni: TTable;
    TTArea_prov_art: TTable;
    DsArea_Doc: TDataSource;
    DsArea_Provvigioni: TDataSource;
    DsArea_prov_art: TDataSource;
    TTArea_DocCodice: TStringField;
    TTArea_DocTipodocumento: TStringField;
    TTArea_DocTipoprovvigione: TStringField;
    TTArea_DocSconto: TStringField;
    TTArea_DocProvvigionegenerale: TFloatField;
    TTArea_DocIdGiornale: TStringField;
    TTArea_DocImporto: TCurrencyField;
    TTArea_provvigioniCodice: TStringField;
    TTArea_provvigioniTiposoggetto: TStringField;
    TTArea_provvigioniTipoarticolo: TStringField;
    TTArea_provvigioniProvvigione: TFloatField;
    TTArea_provvigioniIdGiornale: TStringField;
    TTArea_provvigioniImporto: TCurrencyField;
    TTArea_prov_artCodice: TStringField;
    TTArea_prov_artTiposoggetto: TStringField;
    TTArea_prov_artArticolo: TStringField;
    TTArea_prov_artProvvigione: TFloatField;
    TTArea_prov_artImporto: TCurrencyField;
    TTArea_prov_artIdGiornale: TStringField;
    TTArea_DocCausale: TStringField;
    TTArea_provvigioniDescrTipoSogg: TStringField;
    TTArea_provvigioniDescrTipoArticolo: TStringField;
    TTArea_prov_artDescrTipoSog: TStringField;
    TTArea_prov_artDescrart: TStringField;
    TTArticoliModalitadistintabase: TStringField;
    TTDistintaDescrizione: TStringField;
    TTDistintaRigo: TIntegerField;
    TTDistintaNote: TMemoField;
    TTsoggettiPrimaprovvigione: TBooleanField;
    TTArea_DocPrimaprovv: TFloatField;
    TTArea_DocPrimoimporto: TCurrencyField;
    TTArea_provvigioniPrimaprovv: TFloatField;
    TTArea_provvigioniPrimoimporto: TCurrencyField;
    TTArea_prov_artPrimaprovv: TFloatField;
    TTArea_prov_artPrimoimporto: TCurrencyField;
    TTAg_docPrimaprovv: TFloatField;
    TTAg_docPrimoimporto: TCurrencyField;
    TTAg_provvigioniPrimaprovv: TFloatField;
    TTAg_provvigioniPrimoimporto: TCurrencyField;
    TTAg_Prov_artPrimaprovv: TFloatField;
    TTAg_Prov_artPrimoimporto: TCurrencyField;
    TTOperatori: TTable;
    TTOperatoriOperatore: TStringField;
    TTOperatoriDenominazione: TStringField;
    TTOperatoriPasswd: TStringField;
    TTTipidocPesolordo: TBooleanField;
    TTGru_doc: TTable;
    DsGru_doc: TDataSource;
    TTGru_provvigioni: TTable;
    DsGru_provvigioni: TDataSource;
    TTGru_Prov_art: TTable;
    DsGru_Prov_Art: TDataSource;
    TTGru_docCodice: TStringField;
    TTGru_docTipodocumento: TStringField;
    TTGru_docTipoprovvigione: TStringField;
    TTGru_docSconto: TStringField;
    TTGru_docProvvigionegenerale: TFloatField;
    TTGru_docIdGiornale: TStringField;
    TTGru_docImporto: TCurrencyField;
    TTGru_docPrimaprovv: TFloatField;
    TTGru_docPrimoimporto: TCurrencyField;
    TTGru_provvigioniCodice: TStringField;
    TTGru_provvigioniTiposoggetto: TStringField;
    TTGru_provvigioniTipoarticolo: TStringField;
    TTGru_provvigioniProvvigione: TFloatField;
    TTGru_provvigioniIdGiornale: TStringField;
    TTGru_provvigioniImporto: TCurrencyField;
    TTGru_provvigioniPrimaprovv: TFloatField;
    TTGru_provvigioniPrimoimporto: TCurrencyField;
    TTGru_Prov_artCodice: TStringField;
    TTGru_Prov_artTiposoggetto: TStringField;
    TTGru_Prov_artArticolo: TStringField;
    TTGru_Prov_artProvvigione: TFloatField;
    TTGru_Prov_artImporto: TCurrencyField;
    TTGru_Prov_artIdGiornale: TStringField;
    TTGru_Prov_artDescrart: TStringField;
    TTGru_Prov_artPrimaprovv: TFloatField;
    TTGru_Prov_artPrimoimporto: TCurrencyField;
    TTGru_docCausale: TStringField;
    TTGru_provvigioniDescrTipoSogg: TStringField;
    TTGru_provvigioniDescrTipoArticolo: TStringField;
    TTGru_Prov_artDescrTipoSog: TStringField;
    TTsoggettiCapogruppo: TBooleanField;
    TTFiliali: TTable;
    DsFiliali: TDataSource;
    TTFilialiCodice: TStringField;
    TTFilialiRagioneSociale: TStringField;
    TTFilialiIndirizzo: TStringField;
    TTFilialiCap: TStringField;
    TTFilialiLocalita: TStringField;
    TTFilialiProvincia: TStringField;
    TTFilialiStato: TStringField;
    TTFilialiIdGiornale: TStringField;
    TTFilialiCodicefiliale: TStringField;
    TTArticoliPrezzoconsigliatoL: TCurrencyField;
    TTArticoliPrezzoconsigliatoE: TCurrencyField;
    TTArticoliPrezzoconsigliatoivatoL: TCurrencyField;
    TTArticoliPrezzoconsigliatoivatoE: TCurrencyField;
    TTListinoMarginePrzConsigliato: TCurrencyField;
    TTListinoRicaricoPrzConsigliato: TCurrencyField;
    TTTipidocQta_trasporto: TBooleanField;
    TTTipidocDatascadenza: TBooleanField;
    TTListinoCondizioni: TStringField;
    TTCatMerStagione: TStringField;
    TTCatMerStagioneLookUp: TStringField;
    TTArtBaseMinimomagazzino: TFloatField;
    TTArtBaseSottoscorta: TFloatField;
    TTsoggettiUltimoDocumento: TFloatField;
    TTContattiStampa: TBooleanField;
    TTAg_premio: TTable;
    TTAg_premioAgente: TStringField;
    TTAg_premioTiposoggetto: TStringField;
    TTAg_premioArticolo: TStringField;
    TTAg_premioPremio: TFloatField;
    TTAg_premioImporto: TCurrencyField;
    TTAg_premioIdGiornale: TStringField;
    TTAg_premioDescrart: TStringField;
    TTAg_premioPrimopremio: TFloatField;
    TTAg_premioPrimoimporto: TCurrencyField;
    DsAg_premio: TDataSource;
    TTAg_premioDescrTipoSog: TStringField;
    TTAgentiMandatario: TStringField;
    TTAgentiTotaleimponibile: TCurrencyField;
    TTTipidocCoefficiente: TBooleanField;
    TTTipidocTitolocoefficiente: TStringField;
    TTDepositiEtichette: TBooleanField;
    TTConvDoc_anaSegnodocumento: TStringField;
    TTConvDoc_anaPrefissodocumento: TStringField;
    TTListinoQtapromozionale: TFloatField;
    TTListinoQtapagare: TFloatField;
    TTListinoPromozionedal: TDateField;
    TTListinoPromozioneal: TDateField;
    TTExpImp_doc: TTable;
    TTPar_EI_doc: TTable;
    DsExpImp_doc: TDataSource;
    DsPar_EI_doc: TDataSource;
    TTExpImp_docTipodocumento: TStringField;
    TTExpImp_docNometabella: TStringField;
    TTExpImp_docCampo: TStringField;
    TTExpImp_docPartitaIva: TStringField;
    TTExpImp_docIdpostazione: TStringField;
    TTExpImp_docOrdinamento: TIntegerField;
    TTExpImp_docImpExp: TStringField;
    TTExpImp_docIn: TStringField;
    TTExpImp_docOut: TStringField;
    TTExpImp_docNomecampo: TStringField;
    TTExpImp_docCampoobbligatori: TBooleanField;
    TTPar_EI_docTipodocumento: TStringField;
    TTPar_EI_docNuovisoggetti: TStringField;
    TTPar_EI_docEsportacampi: TStringField;
    TTPar_EI_docNuoviarticoli: TStringField;
    TTPar_EI_docTrascodifica: TBooleanField;
    TTPar_EI_docTiporeport: TStringField;
    TTPar_EI_docModalitaesportazione: TStringField;
    TTTipidocQtapagata: TBooleanField;
    TTTipidocPromozione: TBooleanField;
    procedure DataModuleCreate(Sender: TObject);
    procedure TTsoggettiIndirizzoValidate(Sender: TField);
    procedure TTsoggettiCapValidate(Sender: TField);
    procedure TTsoggettiLocalitaValidate(Sender: TField);
    procedure TTsoggettiProvinciaValidate(Sender: TField);
    procedure TTsoggettiTiporapportoValidate(Sender: TField);
    procedure TTsoggettiAfterInsert(DataSet: TDataSet);
    procedure TTListinoAfterInsert(DataSet: TDataSet);
    procedure TTDvarianti2BeforePost(DataSet: TDataSet);
    procedure TTDVarianti1BeforePost(DataSet: TDataSet);
    procedure TTListiniBeforeEdit(DataSet: TDataSet);
    procedure TTListinoCalcFields(DataSet: TDataSet);
    procedure TTArticoliPrezzoacquistoEChange(Sender: TField);
    procedure TTArticoliPrezzoacquistoLChange(Sender: TField);
    procedure TTArticoliPrezzoacquistoLivatoChange(Sender: TField);
    procedure TTArticoliPrezzoacquistoEivatoChange(Sender: TField);
    procedure TTCatListAfterInsert(DataSet: TDataSet);
    procedure TTArticoliAfterPost(DataSet: TDataSet);
    procedure TTArticoliBeforePost(DataSet: TDataSet);
    procedure TTArticoliPrezzolistinoLChange(Sender: TField);
    procedure TTArticoliPrezzolistinoEChange(Sender: TField);
    procedure TTArticoliPrezzolistinoLivatoChange(Sender: TField);
    procedure TTArticoliPrezzolistinoEivatoChange(Sender: TField);
    procedure TTArticoliArticoloChange(Sender: TField);
    procedure TTArticoliCategoriamerceologicaChange(Sender: TField);
    procedure TTArticoliScontoChange(Sender: TField);
    procedure TTArticoliSconto2Change(Sender: TField);
    procedure TTArticoliAfterInsert(DataSet: TDataSet);
    procedure TTListiniAfterInsert(DataSet: TDataSet);
    procedure TTCatListFormulaChange(Sender: TField);
    procedure TimerTimer(Sender: TObject);
    procedure TTArticoliDescrizioneChange(Sender: TField);
    procedure TTsoggettiIvaChange(Sender: TField);
    procedure TTCatListPunteggioChange(Sender: TField);
    procedure Calcola_prezzi_fornitore(sender:TField);
    procedure TTArtFornPrezzolistinoLChange(Sender: TField);
    procedure TTArtFornPrezzolistinoEChange(Sender: TField);
    procedure TTArtFornScontoChange(Sender: TField);
    procedure TTListinoPrezzoNettoLChange(Sender: TField);
    procedure TTListinoPrezzoNettoEChange(Sender: TField);
    procedure TTListinoPrezzoIvatoLChange(Sender: TField);
    procedure TTListinoPrezzoIvatoEChange(Sender: TField);
    procedure TTListinoPezziperconfezioneChange(Sender: TField);
    procedure TTListiniListinoChange(Sender: TField);
    procedure TTListiniBeforeDelete(DataSet: TDataSet);
    procedure TTPunteggiImportoLChange(Sender: TField);
    procedure TTPunteggiImportoEChange(Sender: TField);
    procedure TTArticoliBeforeDelete(DataSet: TDataSet);
    procedure TTArtFornPrezzoacquistoEChange(Sender: TField);
    procedure TTArtFornPrezzoacquistoLChange(Sender: TField);
    procedure TTsoggettiPartitaIVAChange(Sender: TField);
    procedure TTArticoliStampanellistinoChange(Sender: TField);
    procedure TTTipArtAfterPost(DataSet: TDataSet);
    procedure DSSoggettiUpdateData(Sender: TObject);
    procedure TTTipArtBeforeEdit(DataSet: TDataSet);
    procedure TTTipArtAfterInsert(DataSet: TDataSet);
    procedure TTConvDoc_anaCalcFields(DataSet: TDataSet);
    procedure TTTipidocAfterPost(DataSet: TDataSet);
    procedure TTsoggettiStatoChange(Sender: TField);
    procedure TTBancheAfterInsert(DataSet: TDataSet);
    procedure TTModPagAfterInsert(DataSet: TDataSet);
    procedure TTsoggettiTiporapportoChange(Sender: TField);
    procedure TTsoggettiRagionesocialemerceChange(Sender: TField);
    procedure TTGiacenzaAfterPost(DataSet: TDataSet);
    procedure TTGiacenzaCalcFields(DataSet: TDataSet);
    procedure TTIstatPrezzoLChange(Sender: TField);
    procedure TTIstatPrezzoEChange(Sender: TField);
    procedure TTTipidocBeforeDelete(DataSet: TDataSet);
    procedure TTimballiAfterInsert(DataSet: TDataSet);
    procedure TTimballiAfterPost(DataSet: TDataSet);
    procedure TTimballiBeforeDelete(DataSet: TDataSet);
    procedure TTCatMerAfterInsert(DataSet: TDataSet);
    procedure TTMarcheAfterInsert(DataSet: TDataSet);
    procedure TTIvaAfterInsert(DataSet: TDataSet);
    procedure TTDepositiAfterInsert(DataSet: TDataSet);
    procedure TTArtStatAfterInsert(DataSet: TDataSet);
    procedure TTGruSogCodAfterInsert(DataSet: TDataSet);
    procedure TTarticolilookupAfterInsert(DataSet: TDataSet);
    procedure TTArticoliBancoAfterInsert(DataSet: TDataSet);
    procedure TTImpostatAfterInsert(DataSet: TDataSet);
    procedure TTGiacenzaAfterInsert(DataSet: TDataSet);
    procedure TTGruSogAfterInsert(DataSet: TDataSet);
    procedure TTDModPagAfterInsert(DataSet: TDataSet);
    procedure TTContiAfterInsert(DataSet: TDataSet);
    procedure TTAgentiAfterInsert(DataSet: TDataSet);
    procedure TTTipisogAfterInsert(DataSet: TDataSet);
    procedure TTConvDoc_anaAfterInsert(DataSet: TDataSet);
    procedure TTSogLookAfterInsert(DataSet: TDataSet);
    procedure TTArtFornAfterInsert(DataSet: TDataSet);
    procedure TTDocLookupAfterInsert(DataSet: TDataSet);
    procedure TTCausaliAfterInsert(DataSet: TDataSet);
    procedure TTCaudocAfterInsert(DataSet: TDataSet);
    procedure TTTipidocAfterInsert(DataSet: TDataSet);
    procedure TTConaiAfterInsert(DataSet: TDataSet);
    procedure TTartConaiAfterInsert(DataSet: TDataSet);
    procedure TTCauContabiliAfterInsert(DataSet: TDataSet);
    procedure TTZoneAfterInsert(DataSet: TDataSet);
    procedure TTAgZoneAfterInsert(DataSet: TDataSet);
    procedure TTStatiAfterInsert(DataSet: TDataSet);
    procedure TTformuleAfterInsert(DataSet: TDataSet);
    procedure TTStagioniAfterInsert(DataSet: TDataSet);
    procedure TTPunteggiAfterInsert(DataSet: TDataSet);
    procedure TTDVar1AfterInsert(DataSet: TDataSet);
    procedure TTDvar2AfterInsert(DataSet: TDataSet);
    procedure TTVarianti1AfterInsert(DataSet: TDataSet);
    procedure TTDVarianti1AfterInsert(DataSet: TDataSet);
    procedure TTVarianti2AfterInsert(DataSet: TDataSet);
    procedure TTDvarianti2AfterInsert(DataSet: TDataSet);
    procedure TTArtBaseAfterInsert(DataSet: TDataSet);
    procedure TTVettoriAfterInsert(DataSet: TDataSet);
    procedure TTDistintaAfterInsert(DataSet: TDataSet);
    procedure TTanaCatRitAfterInsert(DataSet: TDataSet);
    procedure TTUbicazioneAfterInsert(DataSet: TDataSet);
    procedure TTCatMerAfterPost(DataSet: TDataSet);
    procedure TTMarcheAfterPost(DataSet: TDataSet);
    procedure TTBancheAfterPost(DataSet: TDataSet);