10. Oktober 2006 09:27
StructureHistory.SETRANGE(Year, buja);
StructureHistory.FIND('+');
ZeilenNr := StructureHistory."Line No.";
StructureHistory.GET("StrNo.",(ZeilenNr));
ReBe1 := StructureHistory."Accounts Statement Liability";
StructureHistory.GET("StrNo.",(ZeilenNr - 1));
ReBe2 := StructureHistory."Accounts Statement Liability";
10. Oktober 2006 09:42
10. Oktober 2006 09:49
10. Oktober 2006 09:53
UNTIL structurhistory.next(-1) = 0;
10. Oktober 2006 09:58
10. Oktober 2006 10:01
IF AnzZeilen > 1 THEN
BEGIN
StructureHistory.SETRANGE(Year, buja);
IF StructureHistory.FIND('+') THEN
ReBePflicht1 := StructureHistory."Accounts Statement Liability";
IF StructureHistory.NEXT(-1) THEN
ReBePflicht2 := StructureHistory."Accounts Statement Liability";
10. Oktober 2006 10:06
StructureHistory.SETRANGE(Year, buja);
IF StructureHistory.FIND('+') THEN
ReBePflicht1 := StructureHistory."Accounts Statement Liability";
IF (StructureHistory.NEXT(-1)<>0) THEN
ReBePflicht2 := StructureHistory."Accounts Statement Liability";
10. Oktober 2006 10:43