Hey!
Ganz vorne weg: Ich nutze Oracle 10g als Datenbank und den Oracle Forms
Developer zur Programmierung.
Also in der Datenbank stehen verschiedenen Datensätze zu einem Ablauf.
Diese Datensätze haben die gleiche ID.
(Das kommt daher das in einer anderen Tabelle Kunden dazu drin stehen.
Die Idee des Kunden ist dann auch die ID der einzelnen Schritte in dem
Ablauf.)
Nun erstellt der Nutzer einen solchen Ablauf mit HIlfe von input
Textfelder, Die Daten werden in der Tabelle gespeichert.
Nun soller diese auch bearbeiten können.
Leider funktioniert das bei mir nicht.
PROCEDURE KBEARBEITEN(B9 VARCHAR2 DEFAULT 'nicht Speichern',
IN_ABLAUF VARCHAR2 DEFAULT NULL,
IN_DATUM VARCHAR2 DEFAULT NULL,
IN_DAUER VARCHAR2 DEFAULT NULL,
IN_BEARBEITER VARCHAR2 DEFAULT NULL,
ID_IN VARCHAR2 DEFAULT NULL,
KUNDENID VARCHAR2 DEFAULT NULL)
IS
CURSOR TEN
IS
SELECT
P.*
FROM
T_ABLAUFPLAN P
WHERE
(p.KID =3D KUNDENID);
BEGIN
--STARTE;
HTP.P ('<tr><td>');
HTP.P('<table border=3D0>');
HTP.P('<tr>');
HTP.P('<td width=3D500><font face=3D"Arial">Ablauf</td><td
width=3D90><font face=3D"Arial">Datum</td><td width=3D50><font
face=3D"Arial">Dauer</td><td width=3D200><font
face=3D"Arial">Bearbeiter</td><td><td width=3D120><font
face=3D"Arial">Angelegt am:</td></tr>');
HTP.P('</table>');
HTP.P('<form action=3D"/pls/dev/anke.C_T_SCHEDULE.KBEARBEITEN">');
FOR R IN TEN LOOP
HTP.P('<table border=3D0>');
HTP.P('<input name=3D"KUNDENID" type=3D"hidden" value=3D"'||KUNDENID||=
'"
size=3D"30" maxlength=3D"30">');
HTP.P('<input name=3D"ID" type=3D"hidden" value=3D"'||ID_IN||'">');
HTP.P('<td width=3D500><font
face=3D"Arial">'||R.ABLAUF||'</td></td>');
HTP.P('<td width=3D100><input name=3D"IN_DATUM" type=3D"text"
value=3D"'||IN_DATUM||'" size=3D"30" maxlength=3D"30"></td>');
HTP.P('<td width=3D50><input name=3D"IN_DAUER" type=3D"text"
value=3D"'||IN_DAUER||'" size=3D"30" maxlength=3D"30"></td>');
HTP.P('<td width=3D200><input name=3D"IN_BEARBEITER" type=3D"text"
value=3D"'||IN_BEARBEITER||'" size=3D"30" maxlength=3D"30"></td>');
HTP.P('<td width=3D100><font
face=3D"Arial">'||R.ANGELEGTDATUM||'</td>');
HTP.P('</tr>');
HTP.P ('</table>');
END LOOP;
IF (B9 =3D 'Speichern') THEN
UPDATE
T_ABLAUFPLAN P
SET
P.ABLAUF =3D IN_ABLAUF,
P.DATUM =3D IN_DATUM,
P.DAUER =3D IN_DAUER,
P.BEARBEITER =3D IN_BEARBEITER
WHERE
(P.ID=3DID_IN);
END IF;
HTP.P ('<input type=3D"submit" name=3D"B9" value=3D"Speichern" >');
HTP.P('</form>');
HTP.P ('</td></tr>');
END KBEARBEITEN;
Wenn ich das so löse, werden mir die einzelnen Schritte angezeigt.
Schreibe ich dann in ein input Feld z.B. einen Namen wird dieser
automatisch überall gespeichert.
Was ja auch klar ist, da alle Datensätze die gleich ID haben.
Wie kann ich das sonst noch lösen?
Hat jemand vielleicht eine ganz andere Idee oder kann mir bei meiner
weiterhelfen?
Würde mich echt freuen, da ich an dem Problem schon 3 Tage sitzte und
einfach nich weiterkomme.
Vielen Dank
Anke
