B
Brian K. Maher
Guest
Here is a variation of your code that works. I expect your real issue is that the RUN statement has a NO-ERROR phrase on it there by suppressing the 4052 error you are getting. define variable hTable as handle. define variable hBuffer as handle. CREATE TEMP-TABLE hTable. hTable:ADD-NEW-FIELD("kk","logical"). hTable:TEMP-TABLE-PREPARE("ttkfacilities"). hBuffer = hTable:default-buffer-handle. hBuffer:BUFFER-CREATE(). hBuffer:BUFFER-FIELD ("kk"):BUFFER-VALUE = TRUE. hBuffer:BUFFER-RELEASE(). def var x as longchar. hTable:write-json("longchar",x). message string(x) view-as alert-box.
Continue reading...
Continue reading...