[Stackoverflow] [Progress OpenEdge ABL] Progress Warning: -s stack exceeded during procedure. What does that mean?

[Smokus]

I have encountered a warning that I have never seen before.

Here is the message that I get when running my simple procedure:

My procedure works as following:

1. Read ReferenceNumbers out of a file
2. Use those ReferenceNumbers in a for each
3. Change value of Info field

Here is how it looks like in code:

INPUT FROM VALUE('C:\Users\admin\Desktop\ref\reference.csv').

DEFINE VARIABLE cData AS CHARACTER NO-UNDO.

repeat:
    if keyfunction(lastkey) = "end-error" then leave.
    process events.

    import unformatted cData.

    FOR EACH V_Acct
        WHERE V_Acct.Company = '123'
            AND V_Acct.ReceiptType = 'U'
            AND V_Acct.ReferenceNr = integer(TRIM(ENTRY(1,cData,';')))
            AND V_Acct.xInfo = ''
        EXCLUSIVE-LOCK:
        
        V_Acct.xInfo = 'VGF00000000000000'.

    END. /* for each V_Acct */                                     

END. /* repeat */

ReferenceNumbers are read properly out of the file (confirmed it multiple times). I have also changed certain fileds of that same DB Table in the past, and never encountered this error message.

Can anoyne assist me?

Continue reading...