public void Inizializza(string server, string database, string utentesql, string password, string applicationName, string applicationUser, string applicationPwd, long ditta)
{
try
{
Codditta = ditta;
Server = server;
Database = database;
Utentesql = utentesql;
Password = password;
SqlConnectionString = "SERVER=" + server + ";UID=" + utentesql + "; PWD=" + password + ";DATABASE=" + database;
wrapper = COMWrapper.CreateInstance <IVB6ComWrapper>();
wrapper.Initialize(server, database, utentesql, password, "GammaEnterprise", applicationUser, applicationPwd, Codditta);
wrapper.CreateCOMObject(AVANZPROD_PROGID, AVANZPROD_INSTANCE_KEY);
ComObject = wrapper.GetCOMObject(AVANZPROD_INSTANCE_KEY);
avanzprod = COMWrapper.Wrap <CLSPD_AVANZPROD>(ComObject);
avanzprod.TipoAvanzamentoOrdiniProduzione = tsEnumTipoAvanzamentoProduzione.tsAvanzamentoProduzioneQuantita;
avanzprod.TipologiaOrdiniProduzione = tsEnumTipologiaOrdiniProduzione.tsOrdiniProduzioneMonoLivello;
Inizialize(server, database, utentesql, password, applicationName, applicationUser, applicationPwd, ditta);
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
}
}
static ModernUI()
{
try {
// Only try to instanciate when Windows 8 or later.
if (Environment.OSVersion.Version.Major >= 6 && Environment.OSVersion.Version.Minor >= 2)
{
appVisibility = COMWrapper.CreateInstance <IAppVisibility>();
}
} catch {
}
}
public void Inizializza(string server, string database, string utentesql, string password, string applicationName, string applicationUser, string applicationPwd, long ditta)
{
codditta = ditta;
wrapper = COMWrapper.CreateInstance <IVB6ComWrapper>();
wrapper.Initialize(server, database, utentesql, password, "GammaEnterprise", applicationUser, applicationPwd, codditta);
wrapper.CreateCOMObject(REGDOC_PROGID, REGDOC_INSTANCE_KEY);
wrapper.AssignSessionObject(REGDOC_INSTANCE_KEY, SessionObjectNames.ActiveInterface, "RegDocIn.ActiveInterface");
wrapper.AssignSessionObject(REGDOC_INSTANCE_KEY, SessionObjectNames.Connection, "RegDocIn.Connection");
wrapper.AssignSessionProperty(REGDOC_INSTANCE_KEY, SessionPropertyNames.ConnectionString, "RegDocIn.ConnectionString");
comObject = wrapper.GetCOMObject(REGDOC_INSTANCE_KEY);
regdoc = COMWrapper.Wrap <CLSMG_REGDOC>(comObject);
RegDocIn = COMWrapper.Wrap <CLSMG_REGDOCIN>(regdoc.RegDocIn);
}
public void Test()
{
const int numeroDocumenti = 1;
const int numeroRighe = 10;
Stopwatch stopWatch = new Stopwatch();
stopWatch.Start();
// INIZIALIZZO L'OGGETTO COM WRAPPER
using (IVB6ComWrapper wrapper = COMWrapper.CreateInstance <IVB6ComWrapper>())
{
// ISTANZIO IL MOTORE DOCUMENTALE
wrapper.Initialize("GAMMA", "GAMMANEXT8", "sa", "teamsystem", "GammaEnterprise", "TeamSa", "TeamSa", 1);
wrapper.CreateCOMObject(REGDOC_PROGID, REGDOC_INSTANCE_KEY);
wrapper.AssignSessionObject(REGDOC_INSTANCE_KEY, SessionObjectNames.ActiveInterface, "RegDocIn.ActiveInterface");
wrapper.AssignSessionObject(REGDOC_INSTANCE_KEY, SessionObjectNames.Connection, "RegDocIn.Connection");
wrapper.AssignSessionProperty(REGDOC_INSTANCE_KEY, SessionPropertyNames.ConnectionString, "RegDocIn.ConnectionString");
object comObject = wrapper.GetCOMObject(REGDOC_INSTANCE_KEY);
CLSMG_REGDOC regdoc = COMWrapper.Wrap <CLSMG_REGDOC>(comObject);
Console.WriteLine("Wrapper inizializzato in {0}", stopWatch.Elapsed);
stopWatch.Restart();
// INIZIALIZZA
using (CLSMG_REGDOCIN regdocin = COMWrapper.Wrap <CLSMG_REGDOCIN>(regdoc.RegDocIn))
{
regdocin.Ditta = 1;
regdocin.Documento = "CLI-DDT";
regdocin.Avanzamento = true;
regdocin.GestDocTestata = true;
regdocin.GestDocTestaRif = true;
regdocin.GestDocTotali = true;
regdocin.GestDocDatiAcc = true;
regdocin.GestDocCorpo = true;
regdocin.GestDocCorpoOrd = true;
regdocin.Transaction = true;
// parametri per non far uscire le message box
regdocin.VuotiModalitaBatch = true;
regdocin.GestioneAssociazioneNotaCredito = true;
regdocin.BatchMode = false;
}
regdoc.Initialize();
Console.WriteLine("RegDoc inizializzato in {0}", stopWatch.Elapsed);
BeforeBeginTransactionEventHandler beforeBeginTransaction = REGDOC_BeforeBeginTransaction;
AfterBeginTransactionEventHandler afterBeginTransaction = REGDOC_AfterBeginTransaction;
BeforeCommitTransactionEventHandler beforeCommitTransaction = REGDOC_BeforeCommitTransaction;
AfterCommitTransactionEventHandler afterCommitTransaction = REGDOC_AfterCommitTransaction;
AvanzamentoEventHandler avanzamento = REGDOC_Avanzamento;
ErrorsOccurredEventHandler errors = REGDOC_ErrorsOccurred;
WarningOccurredEventHandler warnings = REGDOC_WarningOccurred;
regdoc.BeforeBeginTransaction += beforeBeginTransaction;
regdoc.AfterBeginTransaction += afterBeginTransaction;
regdoc.BeforeCommitTransaction += beforeCommitTransaction;
regdoc.AfterCommitTransaction += afterCommitTransaction;
regdoc.Avanzamento += avanzamento;
regdoc.ErrorsOccurred += errors;
regdoc.WarningOccurred += warnings;
for (int indexTestata = 1; indexTestata <= numeroDocumenti; indexTestata++)
{
Console.WriteLine("{0} - INIZIO SCRITTURA DOCUMENTI NR. {1}", DateTime.Now, indexTestata);
// APRO TUTTI I RECORDSET VUOTI
regdoc.OpenAllEmptyRecordsets();
// AGGIUNGO LA TESTATA CON TUTTI I DATI
regdoc.AddNewDocTestata(false, false, true);
regdoc.AddNewDocTestaRif();
regdoc.AddNewDocTotali();
regdoc.AddNewDocDatiAcc();
regdoc.CambiaDocTestataDataDoc(DateTime.Now.Date);
regdoc.CambiaDocTestataCliFor(1);
// CICLO PER AGGIUNGERE 10 RIGHE DI CORPO
for (int indexRighe = 1; indexRighe <= numeroRighe; indexRighe++)
{
regdoc.AddNewDocCorpo();
regdoc.CambiaDocCorpoCodart("A1", "", true, false, false);
regdoc.CambiaDocCorpoQta1(indexRighe);
regdoc.UpdateDocCorpo(false, true, false, false, true, true, false);
}
// CALCOLO I TOTALI DEL DOCUMENTO
//regdoc.RicalcolaTotaliDaRigheCorpo(true, true, true, true, false, false);
regdoc.UpdateDocTestata();
Console.WriteLine("{0} - FINE SCRITTURA DOCUMENTI NR. {1}", DateTime.Now, indexTestata);
}
regdoc.BeforeBeginTransaction -= beforeBeginTransaction;
regdoc.AfterBeginTransaction -= afterBeginTransaction;
regdoc.BeforeCommitTransaction -= beforeCommitTransaction;
regdoc.AfterCommitTransaction -= afterCommitTransaction;
regdoc.Avanzamento -= avanzamento;
regdoc.ErrorsOccurred -= errors;
regdoc.WarningOccurred -= warnings;
wrapper.SetNothingInCOMObject(REGDOC_INSTANCE_KEY, "RegDocIn.ActiveInterface");
wrapper.SetNothingInCOMObject(REGDOC_INSTANCE_KEY, "RegDocIn.Connection");
wrapper.SetNothingInCOMObject(REGDOC_INSTANCE_KEY, "RegDocIn");
regdoc.Terminate();
regdoc.Dispose();
regdoc = null;
comObject = null;
wrapper.ReleaseCOMObject(REGDOC_INSTANCE_KEY);
wrapper.Terminate();
}
}
