Hello!

Please tell me what is wrong in this Code:

the RecordNo exit in Form Fahrdienst . But my button starts, the file opens Fahrdienst only in Add Mode?


var vTmp as Int
var vRecordNo as String
var vRS as Int

vRecordNo = @Str(@Date) + @UserID

GlobalValue("RecordNo",vRecordNo)



vRS = @XResultSetSearch(@FN,"FAHRTDIENST", 1, 2,"RecordNo=" + vRecordNo)
If @XResultSetTotal(vRS) > 0



                       {
                             XResultSetOpenForm(vRS, "FAHRDIENST")
                             XResultSetClose(vRS)
                       }

else

{

       vTmp = @SelectTreeItem(@Application + "!Forms!Add Data!FAHRDIENST!FAHRDIENST")            
}

     

Hello Erika!

Sorry it still not working!

writeln(vRS)
writeLn(vRecordNo)

I get:

-1
2008/06/19c


I muss say that i can ´t  Trim a Form in This Application?  is the hole Application damaged?


Thanks.

Hello Ray!

On Vista Trimming that Database (Sorry not a Form)  does nothing happen and i thank  without Error message.
On XP - machine the Trimming in the DB it´s OK!  but @XResultSetSearch is still does not work!

No other X commands work in this Application

I ´m  running in the DB and  DSR

Please what my mean with :
Have you double checked that FAHRTDIENST is the name of the DATABASE you wish to search into?

Thank.

Yes, Ray!

Ray!

this is my mistake.
It works fine now!

Thanks for the explanation!