J
jamesmc
Guest
I am having some trouble trying to determine where all of the errors are coming from that I am seeing. If I run the below code... DEFINE TEMP-TABLE ttList NO-UNDO FIELD tId AS INTEGER INDEX tabix IS PRIMARY UNIQUE tId. MAINBLOCK: DO ON ERROR UNDO, LEAVE: CREATE ttList. ASSIGN ttList.tId = 1. CREATE ttList. ASSIGN ttList.tId = 1. END. /* MAINBLOCK */ I see ** ttList already exists with 1. (132), but I see it 4 times. So if I change the code to add some messages, like the below... DEFINE TEMP-TABLE ttList NO-UNDO FIELD tId AS INTEGER INDEX tabix IS PRIMARY UNIQUE tId. MAINBLOCK: DO ON ERROR UNDO, LEAVE: MESSAGE "1" VIEW-AS ALERT-BOX INFO BUTTONS OK. CREATE ttList. ASSIGN ttList.tId = 1. MESSAGE "2" VIEW-AS ALERT-BOX INFO BUTTONS OK. CREATE ttList. ASSIGN ttList.tId = 1. END. /* MAINBLOCK */ MESSAGE "3" VIEW-AS ALERT-BOX INFO BUTTONS OK. I then see message 1 and 2, then I see the first error 132 (as expected), then I see message 3, but then I see the other 3 error 132's before I return back to the editor. I don't understand why I am getting the additional error 132 messages? OpenEdge 10.2B08 Windows 7 (64 bit)
Continue reading...
Continue reading...