16.04.1 Seriendruck über Microsoft Word
Aus dem Kundenstamm ("411 Kundenstamm bearbeiten") wird über die Symbolleiste ein Seriendruck mit Microsoft Word gestartet. Voraussetzung für diese Funktion ist die Installation von Microsoft Word und die Einträge in die GUI-Dateien der jeweiligen Benutzer aus der SERIENBRIEF.GUI, die sich im Verzeichnis ...\GRAFIK\PROT befindet. Die KND_SERIENBRIEF.DOC aus dem Verzeichnis \INFRA\GRAFIK\EXTERN\WORD enthält ein Makro, das automatisch nach dem Öffnen des Word-Serienbrief-Dokuments ausgeführt wird. Bitte beachten Sie, dass für die Ausführung von Makros in Microsoft Word die Sicherheitsstufe auf "mittel" zu setzen ist.
Der Ablauf stellt sich wie folgt dar:
  • Durch folgende Einträge in die Datei SIBPPS.INI erscheint im Kundenstamm die Funktion "Selektion für Serienbriefe in der Symbolleiste":
    [ToolBitmaps]
    TB_WFL_WORD=MSWord
    [ToolBar]
    AUF411= TB_WFL_WORD,"Selektion für Serienbriefe", SEL_04101001.IMA, CBpProcessMakroFile
  • Durch einen Klick auf das Symbol wird die SEL_04101001.IMA gestartet.
    // Variablen definieren
    GWCore obj      = NULL;
    GWCore dialog = NULL;
    // Dialog suchen
    dialog = infra_wait_frame("AUF411","AUF411_1",10,1);
    if ( !dialog )
    return 0;
    // Kundennummer in String 'knd' schreiben
    obj = infra_wait_child(dialog,"AUF411","AUF411_1_3",5,1);
    string knd = text(obj);
    // Auskunft starten
    execute_callback(this,"CBsINFRAQueryStart","QUERY:04101001");
  • // auf Dialog der Auskunft warten
    dialog = infra_wait_frame("IQUERY_SEL","IQUERY_SEL: Kunde nach Kundennummer",5,1);
    if ( !dialog)
    return 0;
    // Kundennummer VON versorgen
    obj = infra_wait_child(dialog,"IQUERY","IQUERY_SEL_EB_FROM_01",5,1);
    infra_set_text(obj,knd);
    // Kundennummer BIS versorgen
    obj = infra_find_child(dialog,"IQUERY","IQUERY_SEL_EB_TO_01");
    infra_set_text(obj,knd);
    // Suche starten (Schaltfläche  [ Ok ])
    obj = infra_find_child(dialog,"IQUERY","IQUERY_SEL_PB_OK");
    activate_control(obj);
  • Nun hat der Benutzer noch die Möglichkeit, die Selektion zu verändern.
  • Durch folgende Einträge in die Datei SIBPPS.INI erscheint in der Auskunft die Funktion "Serienbriefe mit Microsoft Word erstellen" in der Symbolleiste:
    [ToolBitmaps]
    TB_WFL_WORD=MSWord
    [ToolBar]
    IQEURY_SELKundennachKundennummer=TB_WFL_WORD,"Serienbriefe mit Microsoft Word erstellen",EX_04101001.IMA,CBpProcessMakroFile
  • Durch einen Klick auf das Symbol wird die EX_04101001.IMA gestartet:
    // Variablen definieren:
    GWCore obj      = NULL;
    GWCore dialog = NULL
    // auf Dialog der Auskunft warten
    dialog = infra_wait_frame("IQUERY_SEL","IQUERY_SEL: Kunde nach Kundennummer",5,1);
    if ( !dialog)
    return 0;
    // Exportfenster aufrufen
    obj = infra_find_child(dialog,"IQUERY","IQUERY_MU_EXPORT");
    activate_control(obj);
    // auf Dialog der Auskunft warten
    dialog = infra_wait_frame("IQUERY","IQUERY_EXPORTSEL",5,1);
    if ( !dialog)
    return 0;
    // Exportdefinition auswählen
    obj = infra_wait_child(dialog,"IQUERY","IQUERY_EXPORTSEL_CB_NAME",5,1);
    ifnra_select_text(obj,"Word-Serienbrief");
    activate_control(obj);
    //Export starten
    obj = infra_find_child(dialog,"IQUERY","IQUERY_EXPORTSEL_PB_OK");
    activate_control(obj);
    // auf Dialog der Auskunft warten
    dialog = infra_wait_frame("IQUERY","IQUERY_SEL: Kunde nach Kundennummer",5,1);
    if ( !dialog)
    return 0;
    // Abbrechen
    obj = infra_wait_child(dialog,"IQUERY","IQUERY_SEL_PB_ABBRECHEN",5,1);
    activate_control(obj);
    //Microsoft Word aufrufen
    execute_callback(this,"CBgLaunchProcess","INI(EXTERN,TEXT INI(PATH,Word)\\knd_serienbrief.doc /mSeriendruck");
  • Nachdem der Inhalt der SERIENBRIEF.GUI in die GUI-Dateien der jeweiligen Benutzer kopiert wurde, ist die Exportdefinition "Word-Serienbrief",
    die von der EX_04101001.IMA verwendet wird, verfügbar.
  • Die IMA-Datei öffnet nun die KND_SERIENBIREF.DOC im Verzeichnis \INFRA\GRAFIK\EXTERN\WORD.
    Dieses Dokument enthält ein automatisch startendes Makro,
    das die Texte aus der Exportdatei mit dem Word-Serienbrief-Dokument zusammenführt.
Der Ablauf des Seriendrucks aus dem Lieferantenstamm verhält sich analog zu der obigen Beschreibung.