18. Dezember 2006 14:01
IF (GETFILTER("Comment Type") <> '') AND (GETFILTER("No.") <> '') THEN BEGIN
lFilterStr := GETFILTER("Comment Type");
lNo := GETFILTER("No.");
SETRANGE("Comment Type");
SETRANGE("No.");
FILTERGROUP(2);
SETFILTER("Comment Type",lFilterStr);
SETFILTER("No.",lNo);
FILTERGROUP(0);
END;
18. Dezember 2006 14:09
18. Dezember 2006 14:31
18. Dezember 2006 15:05
18. Dezember 2006 15:11
18. Dezember 2006 21:56
1. Eine Tabelle mit den Feldern erstellt:
1. "Comment Type" vom Typ "Option"
2. "No." vom Typ "Code (10)"
3. "Line No." vom Typ "Integer"
4. "Date" vom Typ "Date"
5. "Comment" vom Typ "Text (50)"
Key: Comment Type,No.,Line No.
2. Eine weitere Tabelle mit den folgenden Feldern erstellt:
1. "Type" vom Typ "Option" (identischer OptionString mit Tabelle oben)
2. "No." vom Typ "Code (10)"
3. "Name" vom Typ "Text (30)"
Key: Type,No.
3. Eine neue Form mit einer TableBox zur Darstellung der 1. Tabelle.
4. Eine neue Form mit einer Kartenansicht zur Darstellung der 2. Tabelle. Zusätzliche habe ich auf der Form einen Button hinzugefügt mit den folgenden Eigenschaften:
1. "PushAction" auf "RunObject"
2. "RunObject" auf "Form Comments" (1. Form)
3. "RunFormLink" auf "Comment Type=FIELD(Type),No.=FIELD(No.)"
5. Den von dir genannten Code habe ich - wie bei dir auch - in den OnOpenForm-Trigger gepackt.
19. Dezember 2006 09:34
19. Dezember 2006 10:35
19. Dezember 2006 11:27
19. Dezember 2006 11:40
21. Dezember 2006 16:00
21. Dezember 2006 17:35