Wartung / Maintencance - Upgrade Version 8.5.12 - Mittwoch/Wednesday - 2024-08-28 07:30-09:00 a.m.
Funktion
Beschreibung
Zeile 1080 - 2096
Code in WinIBW2 (Makro/VBScript)
Sub ANPSW() '************************************************ On error resume next Dim PersonenSW, PPN Application.ActiveWindow.Title.StartOfField Application.ActiveWindow.Title.WordRight 1 Application.ActiveWindow.Title.EndOfField True PersonenSW = Application.ActiveWindow.Title.GetSelection() PersonenSW = "rec n; f per " & PersonenSW & " and tb s" Application.ActiveWindow.Title.DeleteSelection Application.ActiveWindow.Command PersonenSW, True ' Uebernahme der PPN mit Funktion Hole IDN, deswegen die folgenden Zeilen auskommentiert ' PPN = Application.ActiveWindow.Variable("P3GPP") ' Application.ActiveWindow.CloseWindow ' Application.ActiveWindow.Title.InsertText "!" & PPN & "!" End Sub
Code in WinIBW3 (Javascript)
Erforderliche Änderungen / Ergänzungen
Überblick
Inhalte