XLSXGEN error handling issue

Looking for some help here again...

The new version of XLSXGEN can easily get stuck in an endless loop after an error condition. I verified this in debug.

An error occurs when writing a "formula" cell where the formula is blank (yes, I've fixed that).

monitor;
ss_formula(row:rowcellNbr:peFormula:cellstyle); // theRow:theRowcellNbr ????
on-error;
exsr Failed;
endmon;

Eventually, the Exit subroutine is called. This is where the endless loop starts.

Withing Exit (pssrInd is *on):
// If coming from *PSSR, ...
if pssrInd=*on;
ss_freeLocalRef(outfile);
ss_freeLocalRef(tempstr);
ss_end_object_group(); //Remove space for object references in the object group

ss_freeLocalRef(outfile) calls subroutine *PSSR:
Begsr *PSSR;

statCodeSave=PSDSSTSCD; //save the Error Status Code: type of error

if pssrInd=*on; //*PSSR already entered
exsr Exit;
endif;

Which calls the Exit subroutine... and round and round we go.

I don't understand why procedure ss_freeLocalRef() is calling *PSSR subroutine since the error occurred inside a monitor expression?

I have fixed the REASON for the error, but what happens next time I get an error? It just keeps running and posting the same message to the joblog.

TIA,
Greg
[Logo]<https://www.totalbizfulfillment.com/> Greg Wilburn
Director of IT
301.895.3792 ext. 1231
301.895.3895 direct
gwilburn@xxxxxxxxxxxxxxxxxxxxxxx<mailto:gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>
1 Corporate Dr
Grantsville, MD 21536
www.totalbizfulfillment.com<http://www.totalbizfulfillment.com>