Datei nummeriert speichern

[Dragon27]

Zitat von Robert_G:

DupeString('Hallo', n) wiederholt einen String ('Hallo') n-mal.

#32 ist der ASCII-Code für ein Leerzeichen, ich verwende selten ' ' in meinem Code(außer bei SQL-Statements), da man beim schnellen Durchscrollen nicht sofort sieht ob da nicht jemand einen Tab (#9) reingesetzt hat.

succ(Zahl) liefert den Nachfolger
pred(Zahl) -"- Vorgänger

inc(Zah) entspricht: Zahl := Zahl + 1;
dec(Zah) entspricht: Zahl := Zahl - 1;

Length(IntToStr(Zahl)) gibt dir die Länge von "Zahl"


DupeString(#32, 7 - Length(IntToStr(succ(Zahl)))) gibt dir deshalb: 7 - "Länge von Zahl" Leerzeichen.
Das meinte ich mit einrücken:
Im SynMemo:

Code:

CREATE OR REPLACE TRIGGER ctsdd.rule_change
before update or delete of object_id on ctsdd.rule
for each row
BEGIN

  IF updating THEN
    UPDATE ctsdd.extended_rule

in der Datei

Code:

15646  CREATE OR REPLACE TRIGGER ctsdd.rule_change
15647  before update or delete of object_id on ctsdd.rule
15648  for each row
15649  BEGIN
15650  
15651   IF updating THEN
15652     UPDATE ctsdd.extended_rule

Hallo,

also hab jetzt mal a bisserl hin und her probiert und jetzt funzt diese Procedur oben schon recht gut nur sollten jetzt keine einrückungen mehr beachtet werden also aus dem:

Code:

15647  before update or delete of object_id on ctsdd.rule
15648  for each row
15649  BEGIN
15650  
15651   IF updating THEN
15652     UPDATE ctsdd.extended_rule

soll das werden:

Code:

15647  before update or delete of object_id on ctsdd.rule
15648  for each row
15649  BEGIN
15650  
15651  IF updating THEN
15652  UPDATE ctsdd.extended_rule

nun ist die frage, geht das mit diesem misteriösen "-7" oder wie soll ich das anfangem? Ich habe da echt null peil

Danke für eure Hilfe


Gruß

Andy