I will address these items separately.
1. Record Locking.
Are these file lock (status 9/065) or record lock (status 9/068) conditions being returned or both?
I assume that the OPEN OUTPUT statement in your code example is not actually being used because files opened for output are not sharable.
Are these lock conditions valid or are they being reported when indeed no record is locked in the file?
Because of how indexed files work it is possible that a file may be placed into a temporary locked condition by the file handler when the file is being updated.
You can usually get around these types of locks by using the RETRYLOCK directive or the RETRYLOCK configuration option in conjunction with the RETRYTIME option to specify how long to wait for the lock to be released if your program is setup to capture and report on actual record locked conditions.
You can also use RETRYOPEN if you are getting a locked file status on an open of a file.
If this does not solve the problem for you then you should open up a support incident with customer care so that we can investigate further.
2.Forms2
Forms2 was a character based UI design tool that generated enhanced ACCEPT/DISPLAY sources that could be compiled. This tool was actually removed many years ago and was not included in anmy of the Net Express/Server Express products either.
Although the tool itself is gone the code that it generated should be compatible with Visual COBOL so you should still be able to compile your applications.
Any new development would have to be coded manually using ADIS syntax or screen sections or character based Dialog System.
Maybe others could add suggestions here as to what they have used in the past...
3. Clarification?
Sorry, I do not speak French and the Google Translation of this paragraph does not make sense to me.
"3rd item interesting you can make an adaptation of the graphic solutions telque the forms buttons text fields to a fashion character solution"
What is it that you are asking for here?
Thanks.