pcsoft.us.windevCopyright 2026, PC SOFT1 Mar 2017 15:41:56 Z28 Feb 2017 23:09:28 ZI have been working on this all day and cannot find a way to solve it, although it seems it should be easy. For historical reasons I would like to use my own unique ID's for a filed in one file rather than AutoID's. The problem is that I can't seem to perform any operations on a file while it is in use in an edit window although I experimented with HSavePosition/HRestorePosition unsuccessfully. So... i created a LOCAL Procedure and used an alias PROCEDURE New_Comp_ID() sID is string dsCompAlias is Data Source IF HAlias(RBL_COMP,dsCompAlias) THEN sID = Upper(Left(EDT_CompNAME,3)) sExt is string i is int IF HReadSeek(dsCompAlias,"COMP_ID",sID) THEN // BUT THIS LINE DOESN'T WORK! WHILE dsCompAlias.COMP_ID [= sID HReadNext() END HReadPrevious() sExt = Right(dsCompAlias.COMP_ID,3) i = Val(sExt) +1 sID = sID +NumToString(i, "03d") ELSE sID += "001" END END RESULT sID I have probably been working on this too long and I need some help. Surely someone else has dealt with this problem! -- Garry30WEBDEVen_UShttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem/read.awpmoderateur@pcsoft.fr (El moderador)webmaster@pcsoft.fr (El webmaster)gallen.dbmcpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60668/read.awp1 Mar 2017 15:41:56 ZPerhaps I am solving the wrong problem. First: I am doing no locking. The code for opening my edit window is: PROCEDURE MyW…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60668/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60668/read.awpNew Unique ID problemfromwebpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60667/read.awp1 Mar 2017 10:40:55 ZHi Garry, > The problem is that I can't seem to perform any operations on a file > while it is in use in an edit window alth…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60667/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/60666-new-unique-problem-60667/read.awpNew Unique ID problem