A
Andrei Popa
Guest
The code is being run from a PASOE. It's located in a static method. This would a short version of the method: --------------------------------------------------------------------------------------- Parameters: ... AS CHARACTER ... AS CHARACTER, ... AS CHARACTER, pcTextASCII AS LONGCHAR, pcTextHTML AS LONGCHAR, ... AS CHARACTER --------------------------------------------------------------------------------------- /* define variables */ DEFINE BUFFER lbTxt FOR txt. /* some assignments to the variables */ DO FOR lbTxt TRANSACTION: FIND lbTxt WHERE ... EXCLUSIVE-LOCK NO-ERROR. IF NOT AVAILABLE lbTxt THEN DO: CREATE lbTxt. /* assignment of lbTxt's character fields */ END. ASSIGN lbTxt.txtASCIIx = pcTextASCII lbTxt.txtHTMLx = pcTextHTML /* assignment of another character field */ . /* execution doesn't reach the next statements */ END. --------------------------------------------------------------------------------------- The longchar contains information from a text file, which has 2893 characters Let me know if there is additional information I should provide!
Continue reading...
Continue reading...