13. Januar 2009 13:44
13. Januar 2009 14:00
13. Januar 2009 14:22
himi81 hat geschrieben:Hab ne ganz blöde Frage, ist es irgendwie möglich, in einer Tabelle mehrere Datensätze mit dem gleichen Primärschlüssel zu schreiben?
13. Januar 2009 14:39
IF NOT temp.GET('PRIMÄRSCHLÜSSEL') THEN BEGIN
temp.INIT;
temp.primarykey := 'PRIMÄRSCHLÜSSEL';
temp.INSERT(TRUE);
END;
temp.field := temp.field + 'ZUSÄTZLICHER WERT';
temp.MODIFY(TRUE);
13. Januar 2009 14:49
Sebastian Pfliegel hat geschrieben:Das ist in etwa die Logik, die auch Natalie verwendet.
13. Januar 2009 15:20
13. Januar 2009 15:52
Bilanz_1.RESET;
Bilanz_1.SETCURRENTKEY(Bilanz_1."Document No.");
Bilanz_1.SETRANGE(Bilanz_1."Entry Type",(Bilanz_1."Entry Type"::Consumption));
Bilanz_1.SETFILTER(Bilanz_1."Posting Date",GETFILTER("Date Filter"));
Bilanz_1.SETFILTER(Bilanz_1."Routing No.",GETFILTER(Arbeitsplanfilter));
Bilanz_1.SETFILTER(Bilanz_1."Document No.",(FAFilter));
IF Bilanz_1.FINDFIRST THEN
REPEAT;
Bilanz_Temp.RESET;
Bilanz_Temp.SETRANGE(Bilanz_Temp.Artikelummer,Bilanz_1."Item No.");
Bilanz_Temp.SETFILTER(Bilanz_Temp.Charge,'%1',(Bilanz_1."Lot No."));
IF NOT Bilanz_Temp.FINDFIRST THEN
Bilanz_Temp.INIT;
Bilanz_Temp.Artikelummer:= Bilanz_1."Item No.";
Bilanz_Temp.Artikelbezeichung:= Bilanz_1.Description;
Bilanz_Temp.Charge:=Bilanz_1."Lot No.";
IF Bilanz_Temp.INSERT(TRUE) THEN BEGIN
Testbool := TRUE;
END;
Bilanz_Temp.RESET;
Bilanz_Temp.SETFILTER(Bilanz_Temp.Artikelummer,'%1',(Bilanz_1."Item No."));
IF NOT Bilanz_Temp.FINDFIRST THEN BEGIN;
Bilanz_Temp.INIT;
Bilanz_Temp.Artikelummer:= Bilanz_1."Item No.";
Bilanz_Temp.Artikelbezeichung:= Bilanz_1.Description;
Bilanz_Temp.Charge:=Bilanz_1."Lot No.";
IF Bilanz_Temp.INSERT(TRUE) THEN
Testbool := TRUE;
END;
UNTIL Bilanz_1.NEXT = 0;
13. Januar 2009 15:56
Sebastian Pfliegel hat geschrieben:So würde das Ganze dann aussehen, wenn du ein Feld summieren möchtest. Das ist in etwa die Logik, die auch Natalie verwendet.
- Code:
IF NOT temp.GET('PRIMÄRSCHLÜSSEL') THEN BEGIN
temp.INIT;
temp.primarykey := 'PRIMÄRSCHLÜSSEL';
temp.INSERT(TRUE);
END;
temp.field := temp.field + 'ZUSÄTZLICHER WERT';
temp.MODIFY(TRUE);
13. Januar 2009 16:30
13. Januar 2009 16:40
13. Januar 2009 16:43
13. Januar 2009 16:48
himi81 hat geschrieben:1. Wo kann ich mir die Attribute des Primärschlüssels ansehen?
2. Wie setzte ich einen GET Befehl auf 2 Felder gkleichzeitig?
Record.GET("Feld 1", "Feld 2", ...);
13. Januar 2009 16:53
himi81 hat geschrieben:1. Wo kann ich mir die Attribute des Primärschlüssels ansehen?
13. Januar 2009 17:08
Bilanz_1.RESET;
Bilanz_1.SETCURRENTKEY(Bilanz_1."Document No.");
Bilanz_1.SETRANGE(Bilanz_1."Entry Type",(Bilanz_1."Entry Type"::Consumption));
Bilanz_1.SETFILTER(Bilanz_1."Posting Date",GETFILTER("Date Filter"));
Bilanz_1.SETFILTER(Bilanz_1."Routing No.",GETFILTER(Arbeitsplanfilter));
Bilanz_1.SETFILTER(Bilanz_1."Document No.",(FAFilter));
IF Bilanz_1.FINDFIRST THEN
REPEAT;
Bilanz_Temp.RESET;
IF NOT Bilanz_Temp.GET(Bilanz_1."Item No.",Bilanz_1."Lot No.") THEN BEGIN;
Bilanz_Temp.INIT;
Bilanz_Temp.Artikelummer:= Bilanz_1."Item No.";
Bilanz_Temp.Artikelbezeichung:= Bilanz_1.Description;
Bilanz_Temp.Charge:=Bilanz_1."Lot No.";
IF Bilanz_Temp.INSERT(TRUE) THEN BEGIN
Testbool := TRUE;
END;
END;
UNTIL Bilanz_1.NEXT = 0;