DOAG Top News: Forms 11g

Die DOAG hat als neue Top News einen meiner Forms 11g Abstracts abgedruckt.

Dort schrieb ich über die neuen Features von Forms 11g und den vielfältigen Möglichkeiten, die uns in der künftigen SOA Welt zur Verfügung stehen.

Forms 11g unterwegs in Richtung SOA :

Donnerstag, 6. Dezember 2007 (wta) – Nach über sechs Jahren bringt die neue Forms-Version 11g erstmals wieder Neuerungen im Forms Builder. Die DOAG hat vorab einen Blick darauf geworfen und zwei extrem wichtige Funktionalitäten entdeckt.

Die erste betrifft die Kommunikation mit Advanced Qeueing aus der Datenbank. Es gibt einen neuen Objekttyp "Event", der mit einer Queue zusammenarbeitet. Werden Daten in eine Datenbank-Queue gestellt, startet in der Formsmaske sofort ein Event, der abgearbeitet wird.

Das zweite Highlight bezieht sich auf die Javascript-Integration. HTML-Seiten können nun direkt per Javascript mit Oracle Forms kommunizieren. Früher war dies nur über Umwege oder Java-Applets möglich. Mit der neuen Technik werden in Forms "WHEN CUSTOM JAVASCRIPT EVENT"-Trigger gestartet, die vom Entwickler benutzt werden können. Die Kommunikation verläuft bidirektional. Somit können auch Änderungen in der HTML-Seite direkt von Forms via Javascript vorgenommen werden.

Diese beiden neuen Techniken sind deutliche Anzeichen dafür, dass Oracle Forms mit neuem Schwung in die Zukunft durchstartet. In der neuen Oracle Fusion Middleware 11g ist Forms einer der zentralen SOA-Bestandteile.

Weitere Informationen zu Forms 11g finden Sie bei der Deutschen Forms Community sowie im Blog des Betatesters für die DOAG.


Vielen Dank an die DOAG !

Neues Statement of Direction, Nov. 2007

Im aktuellsten SoD wird Oracle Forms bis mindestens 2013 supported:

Forms 11g New Features: Events

Mein Vortrag auf der DOAG Konferenz 2007 war "Forms 11g: Ein Blick hinter die Kulissen"

Die zwei neuen Features sind: Advanced Queuing und Javascript-API. Hier beschreibe ich nun die AQ-Technik mit den neuen Forms-Events.

Events - Interaktion mit Advanced Queuing

Dies ist die erste grosse Änderung im Forms Builder seit 6 Jahren. Wir können Events erstellen und Queues zuweisen. Sobald neue Daten in einer AQ ankommen, wird der neue Trigger WHEN-EVENT-RAISED gestartet.


Erlaubte Properties für Events

Event Type        : Data Base, User Defined
Subscription Name : AQ-Name (LOV)
Scope             : Application, Form
Auto Subscribe    : Yes, No
Correlation ID    :
View Mode         : Browse, Locked, Removed

formsweb.cfg

maxEventWait=1000

Der neue Parameter maxEventWait ist sehr wichtig. Der Wert gibt in Millisekunden das Zeitintervall an, in dem die AQ's überprüft werden. Ansonsten würde die Formsmaske nur noch Refreshs ausführen, wenn der Anwender in der Maske etwas anklickt.

Code-Beispiel

BEGIN
:CONTROL.TI_Payload := get_event_object_property ('EV_Default', Event_Payload);
IF upper (:CONTROL.TI_Payload) = 'ATTACH DEBUG' THEN
  DEBUG.Attach;
  ...
END IF;
END;

Dieses Beispiel zeigt eine Fernsteuerung für ein Remote Debugging. Auf der Datenbank füllt man einfach in einer Queue einen Datensatz ein, der dem Forms-Event EV_DEFAULT zugeordnet ist. Jedesmal, wenn die Payload den Wert ATTACH DEBUG hat, startet man in der Forms Runtime das Debug.

In meinem Download-Bereich gibt es einen Link zum Vortrag.

DOAG Konferenz 2007

Heute war der letzte Tag der diesjährigen DOAG-Konferenz. Die DOAG (Deutsche Oracle Anwender Gruppe) feierte ihren 20. Geburtstag und feierte diesen gebührend im neuen Conference-Center in Nürnberg. Interessante Vorträge wie z.B. "Oracle 5.0 New Features" gab es :-)

Dies war eine phantastische Präsentation von Dierk Lenz. Er benutzte einfach seine 20 Jahre alten Folien und zeigte uns die neuesten Datenbank-Features aus dem Jahre 1988.

Dies konnte man live miterleben in einer vmWare, in der ein DOS 6.22 mit einem SQL*Forms 2 installiert waren.



In diesem Vortrag waren alleine schon 200 Leute. Einfach nur genial!

Forms Start-Up (Teil 1)

Dies ist der erste Artikel einer kleinen Serie. Ich zeige an dieser Stelle Methoden und Verbesserungen des Forms-Starts. In fast allen Web-Projekten lernte ich in den vergangenen Jahren Techniken kennen, in denen das Browser-HTML verändert wurde um zum Beispiel das versehentliche Schliessen des Browser-Fensters zu verhindern.

Mein erstes Beispiel kommt von Francois Degrelle. Er gab mir den Tipp mit einem automatisch versteckenden Internet Explorer beim Forms Startup. Der einzige Parameter der geändert werden musste ist der HTMLbodyAttrs in der formsweb.cfg:

HTMLbodyAttrs=onLoad='javascript:self.moveTo(2000,2000)'

Nach dem Forms-Start wandert das Browser-Fenster an die X,Y-Position 2000, 2000. Das ist normalerweise ausserhalb des sichtbaren Bereichs. Dies lässt den Anwender glauben, dass der Browser nun geschlossen ist. Das Icon in der Taskbar ist zwar noch sichtbar, aber der Browser ist nicht zu sehen, selbst wenn der Anwender auf das Icon klickt.

Pro:
- Der Anwender glaubt, dass der Browser sich selber versteckt
- Nur die Forms-Anwendung ist sichtbar (bei separateFrame=True)

Contra:
- Die Task des Browsers ist sichtbar und kann nicht aktiviert werden. Sie kann nur geschlossen werden

Das ist zur Zeit meine Lieblingsvariante

Bigger. taller. better :-)

Nachdem ich ein wenig am Template-HTML herumgespielt habe fand ich ein paar sehr wichtige Properties für meinen Blog.

Die ehemalige Breite des Blogs war ein echtes Hindernis und sorgte dafür, dass ich Sourcecodes oft kürzen musste, damit sie in eine Zeile passten. Dieses Problem ist jetzt ein für alle Mal gelöst. Nun habe ich 50% mehr Platz für meine Snippets :-)

Einfaches Logging und Debugging in Forms

Jede Forms-Anwendung braucht eine simple Methode um Fehler wegzuschreiben. Diese Technik kann desweiteren dazu benutzt werden um Forms, Reports und PL/SQL zu debuggen.

Zuerst einmal erstellen wir die Tabelle, Sequence und eine View um die Logging-Information zu speichern:

CREATE TABLE Logging (
  ID                         NUMBER(8,0) NOT NULL,
  SESSION_ID                 NUMBER(8,0),
  INSERT_DATE                DATE NOT NULL,
  TEXT                       VARCHAR2(2000) NOT NULL);

CREATE SEQUENCE Logging_SEQ;

CREATE OR REPLACE VIEW V_Logging_desc 
         (ID, SESSION_ID, INSERT_DATE, TEXT)
AS SELECT ID, SESSION_ID, INSERT_DATE, TEXT
     FROM Logging
ORDER BY SESSION_ID DESC, ID DESC;

Desweiteren brauchen wir ein Package mit den Funktionen und Prozeduren, die für`s Logging benötigt werden.

CREATE OR REPLACE PACKAGE PK_DEBUG IS
  FUNCTION Debug_allowed RETURN BOOLEAN;
  FUNCTION Next_ID       RETURN NUMBER;

  PROCEDURE Disable;
  PROCEDURE Enable;
  PROCEDURE Destroy;
  PROCEDURE Init  (P_Debug_allowed IN BOOLEAN DEFAULT TRUE);
  PROCEDURE Write (P_Text IN VARCHAR2,
                   P_Session_ID IN NUMBER DEFAULT NULL);

  G_Debug_allowed BOOLEAN := TRUE;
  G_Session_ID    NUMBER;
END;
/
CREATE OR REPLACE PACKAGE BODY PK_DEBUG IS
FUNCTION Debug_allowed RETURN BOOLEAN IS
BEGIN
  RETURN (G_Debug_allowed);
END;

FUNCTION Next_ID RETURN NUMBER IS
  V_ID NUMBER;
BEGIN
  SELECT Logging_SEQ.nextval
    INTO V_ID
    FROM DUAL;
  RETURN (V_ID);
END;

PROCEDURE Disable IS
BEGIN
  G_Debug_allowed := FALSE;
END;

PROCEDURE Enable IS
BEGIN
  G_Debug_allowed := TRUE;
END;

PROCEDURE Destroy IS
BEGIN
  Write ('----------------------stopp '
    || to_char (G_Session_ID) || '--');
  G_Session_ID := NULL;
END;

PROCEDURE Init (
  P_Debug_allowed IN BOOLEAN DEFAULT TRUE) IS
BEGIN
  G_Debug_allowed := P_Debug_allowed;
  G_Session_ID := Next_ID;
  Write ('--start ' || to_char (G_Session_ID)
    || '----------------------');
END;

PROCEDURE Write (
  P_Text       IN VARCHAR2,
  P_Session_ID IN NUMBER DEFAULT NULL) IS
  PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
  IF Debug_allowed THEN
    IF G_Session_ID IS NULL THEN
      Init;
    END IF;
    INSERT INTO Logging (ID,
      Session_ID, Insert_Date, Text)
    VALUES (Next_ID,
      NVL (P_Session_ID, G_Session_ID),
      Sysdate, P_Text);
    COMMIT;
  END IF;
END;
END;
/

Das Debugging wird mit INIT gestartet und endet mit DESTROY. Fehlermeldungen werden in die Tabelle festgeschrieben mit WRITE. Zum Beispiel:

pk_Debug.Write ('Hello World - ' || V_Test);

Teile des Debuggings können deaktiviert werden mit DISABLE, so dass von dieser Zeile Code an keine Logging-Informationen mehr geschrieben werden, bis man ENABLE startet.

Die View V_Logging_desc zeigt die Logging-Daten, gruppiert nach der neuesten Session-ID.

ID Session Insert-Date     Text
============================================
24    21   10.09.-12:38:48 -------stopp 21--
23    21   10.09.-12:38:48 Hello World - 42
22    21   10.09.-12:38:48 --start 21-------

Viel Spass damit
Gerd

San Francisco Impressionen

Hier sind einige Fotos von San Francisco, aufgenommen in der Zeit nach dem Test-Event

Lombard Street Richtung Coit Tower

17 Miles Drive

Muir Woods

Der Beweis: Second Life existiert doch in der Realität

Steinkunst in Sausalito

Die Golden Gate

Oracle Fusion Middleware 11g Beta Test - Letzter Tag

Heute war der letzte Tag des Beta-Tests. Nach den letzten Tests startete die grosse Feedback-Runde im Oracle Conference Center.

Alle Kunden und 50 Oracle Experten trafen sich, desweiteren waren Dutzende Oracle Mitarbeiter per Web-Konferenz zugeschaltet. In den folgenden 3 Stunden wurden nacheinander alle Produkte des Fusion Middleware-Stacks angehört und wir gaben unser Feedback ab. Der einzige Forms-Tester (myself) gab folgendes Statement an Oracle:

Zuerst einmal: Forms ist eine sehr grosse Plattform in Deutschland und dieses Beta 2 Programm zeigte uns in den letzten Tagen das erste Oracle Forms, das nach vielen Jahren mit neuer Funktionalität im Forms Builder aufwartete.

Danach beschrieb ich die neuen Features und wie wichtig sie in der Forms Community sind.

Am Ende erklärte ich noch, welche Funktionalität ich persönlich gerne noch im Forms Builder sähe:

* ein Object namens Web-Service auf Form-Ebene
* die Integration von BI-Beans
* und am wichtigsten: einen neuen PL/SQL-Editor

Das war mein Statement und nun möchte ich mich vielmals bedanken bei Oracle für die Einladung zu diesem Event, Duncan und seiner Gruppe für einen phantastischen Support in der Woche. Es war klasse, solch eine Chance zu bekommen und mit diesen Profis arbeiten zu können.

Vielen Dank auch an Rolf (meinen Boss) der diesen Trip finanzierte, an Manuela (die mich gehen liess) und an Andreas, der eine wichtige Schulung beim Kunden übernahm, während der Testwoche. Vielen Dank euch allen!

Und hier ist der Beweis, dass Duncan seine Karriere in der NBA gestartet hat, bevor er zu Oracle kam (Ich bin 1,97):

PS: Falls sich jemand wundert, warum ich die neuen Features samt Funktionalität nicht beschreibe, dem sei gesagt, dass ich bis zur DOAG Konferenz Stillschweigen halten muss.

Forms Beta-Test, Tag 4

Duncan und ich erfanden ein neues Feature vor ein paar Tagen. Heute war es soweit und ich konnte es in Forms 11g einbauen und testen:

Remote Debugging-Start mittels AQ

Die Idee ist einfach: Ein Entwickler stellt eine Information in eine Forms-AQ ein, auf der alle Formsmasken horchen. Diese Payload wird nun in den einzelnen Masken ausgelesen und startet einen neuartigen AQ-Trigger. Der Anwender wird nun zur Laufzeit gefragt, ob er seine Maske debuggen lassen möchte. Wenn er dies bestätigt startet die Maske ein debug.attach und der Entwickler kann seinen Forms Builder nutzen um die Client-Runtime zu debuggen.

Dies ist eine neuartige Form des Remote Debuggings das nur mit Forms 11g integriert werden kann.

Forms Beta-Test, Tag 3

Heute haben Duncan und Phil Kuhn an einigen neuen Forms Features gearbeitet. Es ist grossartig zu sehen, wie sie und das Team im Hintergrund arbeiten.

Dies ist die erste Oracle Forms Version seit ca. sieben Jahren, in der neue Funktionalität (neue Objekte und Trigger) im Forms Builder integriert wurde!

All jene, die das Ende von Oracle Forms propagieren werden eines besseren belehrt, wenn das neue Release herauskommt.

Forms Beta-Test, Tag 2

Der zweite Tag des Beta-Tests startete mit einem Überblick des neuen Oracle Application Servers. Vier Sessions wurden diesbezüglich heute präsentiert. Die restliche Zeit blieb zum Betatesten von Oracle Forms 11g.

Am Ende des Tages lud Oracle uns in ein nettes Restaurant nahe des Headquarters ein.

Einladung zum Oracle Forms Beta-Test

Oracle HQ in Redwood Shores lud mich zum diesjährigen Beta-Test der Fusion Middleware ein.

Heute starteten wir im Headquarter zusammen mit 16 anderen eingeladenen Firmen. Zusätzlich zu uns Testern unterstützte Oracle diese Veranstaltung noch mit nahezu 50 Oracle Cracks. Zum Beispiel den Oracle Forms Chefentwickler Duncan Mills.

Oracle entwickelte umfangreiche Test-Szenarien für die kommenden 5 Tage. Somit werden wir in der Lage sein, tief in all die neuen Produkte reinzuschauen.

Die Stimmung in der Mannschaft ist grossartig!

Setze Record-Status auf Query nach dem POST-QUERY

In Blöcken mit einem POST-QUERY-trigger hat man oft das Problem, dass der Record-Status auf CHANGED wechselt, wenn Non-Basetable-Items verändert wurden im POST-QUERY.

Wenn man nun den Record-Status zurück auf QUERY setzt, ist das auf jeden Fall schon mal eine gute Vorgehensweise. Dazu erstellen wir eine Prozedur zum Setzen des Record-Status auf QUERY:

PROCEDURE Set_Record_Query_Status IS 
BEGIN
  Set_Record_Property (NAME_IN ('SYSTEM.TRIGGER_RECORD'), 
                       NAME_IN ('SYSTEM.TRIGGER_BLOCK'), 
                       STATUS, 
                       QUERY_STATUS);
END; 

dieser wird dann im POST-QUERY-Trigger aufgerufen:

BEGIN
  SELECT someColumns
    INTO :myBlock.nonBasetable_Item
    FROM myTable
   WHERE someFilter;

  Set_Record_Query_Status;
END;

Nachdem nun jeder Datensatz auf QUERY-Status gesetzt wurde hat man mit den Daten des Blockes auch kein Problem mehr.

Wichtig: Wenn der POST-QUERY Basetable-Items im Datensatz verändert muss man die erzeugten Datensatz-Sperren zurücksetzen, falls der Block-Locking-Modus auf Immediate gesetzt ist. Dieses Problem kann folgendermassen gefixt werden:

BEGIN
  Set_Block_Property ('myBlock', LOCKING_MODE, Delayed);

  SELECT someColumns
    INTO :myBlock.nonBasetable_Item
    FROM myTable
   WHERE someFilter;

  Set_Block_Property ('myBlock', LOCKING_MODE, Immediate);

  Set_Record_Query_Status;
END;

try it
Gerd

Oracle Certified Trainer

Seit Freitag bin ich nun auch Oracle Certified Trainer. Dies ist die Voraussetzung dafür, in der Oracle University arbeiten zu dürfen.