10. Januar 2023 15:37
GetRelationTableID(TableID : Integer;FieldID : Integer) : Integer
RecRef.OPEN(TableID);
IF RecRef.FIELDEXIST(FieldID) THEN BEGIN
FieldRef := RecRef.FIELD(FieldID);
EXIT(FieldRef.RELATION); //Fehler
END;
IF (Insp. Object Type=CONST(Item)) Item ELSE IF (Insp. Object Type=CONST(Inspection Equipment)) "QA Inspection Equipment" ELSE IF (Insp. Object Type=CONST(Object)) "QA Object"
IF (Insp. Object Type=CONST(Item)) Item ELSE IF (Insp. Object Type=CONST(Inspection) "QA Inspection Equipment" ELSE IF (Insp. Object Type=CONST(Object)) "QA Object"
10. Januar 2023 16:59
10. Januar 2023 18:10
sweikelt hat geschrieben:das sind Tabellen im individuellen Bereich, sprich also vermutlich für euch programmiert.
Wenn der Entwickler nicht hier im Forum ist, wirst du wohl keine Antwort erhalten --> PS: welche Antwort erwartest du eigentlich^^
10. Januar 2023 18:20
10. Januar 2023 19:22
10. Januar 2023 19:27
10. Januar 2023 19:48
10. Januar 2023 20:23