Code:
PAU.COMPENSATION(J)+=I 'THIS LINE CAUSES A COMPILER GPF ' PAU.COMPENSATION(J)=PAU.COMPENSATION(J)+I 'THIS LINE WORKS
PAU.COMPENSATION(J)+=I 'THIS LINE CAUSES A COMPILER GPF ' PAU.COMPENSATION(J)=PAU.COMPENSATION(J)+I 'THIS LINE WORKS
#COMPILE EXE #DIM ALL TYPE PAMatrix Compensation (1 TO 2) AS CURRENCY SickPay (1 TO 2) AS CURRENCY Interest (1 TO 2) AS CURRENCY Dividends (1 TO 2) AS CURRENCY EstateTrust (1 TO 2) AS CURRENCY END TYPE FUNCTION PBMAIN () AS LONG LOCAL A1 AS CURRENCY LOCAL I, J AS LONG DIM PAU AS PAMATRIX FOR J=1 TO 2 FOR I=1 TO 100 PAU.COMPENSATION(J)+=I 'THIS LINE CAUSES A COMPILER GPF ' PAU.COMPENSATION(J)=PAU.COMPENSATION(J)+I 'THIS LINE WORKS NEXT NEXT ? "PAU.COMPENSATION(1)="+STR$(PAU.COMPENSATION(1)) ? "PAU.COMPENSATION(2)="+STR$(PAU.COMPENSATION(2)) END FUNCTION
We process personal data about users of our site, through the use of cookies and other technologies, to deliver our services, and to analyze site activity. For additional details, refer to our Privacy Policy.
By clicking "I AGREE" below, you agree to our Privacy Policy and our personal data processing and cookie practices as described therein. You also acknowledge that this forum may be hosted outside your country and you consent to the collection, storage, and processing of your data in the country where this forum is hosted.
Leave a comment: