Posted by Grant Foraker on June 23, 2011 at 14:26:40: Uploaded files: 5
Got a lot of glitchy programs when I took over this customer in 2005 or so. Like ...
8000 INQUIRE (7,0800) KEY = '*BILL', EXCP = 3100
8100 !!!!!IF SEL$ NE "???+}" GOTO 3100
8200 !
8300 ! IF CONTROL RECORD IS FOUND, THEN BILLING IS IN PROGRESS
8400 ! AND RATE TABLE MAINTENANCE IS NOT ALLOWED
8500 !
8600 3050 LET SEL$ = 'B'
8700 PRINT (0,2795)
8800 GOTO 9990
8900 !
9000 3100 IF EXCP EQ 33 GOTO 3050
9100 IF EXCP NE 32 GOTO 9800
The program, in Comet16, produces an E00 when a billing cycle is in progress (there's a *BILL record in the Z1 file).
The REM out of line 8100 is my fix. During the fix and testing I came up with the following discrepancies between old and new ERRLOG.
1) The ErrLog documentaion doesn't mention that the CSV files has been abandoned and that ERRORLOG (multi-key) has taken it's place.
2) The "Comet Error" popup still gives partial info and not much of that is useful for a quick debug. Could the popup show the first entry in the "Last Program Address" instead of the last entry. See ERRORLOG1.JPG.
3) the new ERRORLOG info for this error has many incorrect entries. See ERRORLOG2.JPG
3a) it's not an E11
3b) the LUN is wrong
3c) File, Dir and Key are blank
4) The Error Log list shows some of the same bad info as is in the detail dialog. And, it displays LUN 100 which doesn't match the detail which shows LUN 10. Both are wrong. Only three LUNs were opened in the program (2, 3 and 7). The last file access was on 7 (Z1). See ERRLOG3.JPG.
5) repeated the error in Comet16. All the captured data items, I use, are correct for this error. Except for the File variable. See ERRORLOG4.JPG.
6) If there is no ERRORLOG file, just create one and show me an empty list. Or, ask if I want one created. I spent 30+ minutes trying to figure out why ErrorLog.csv wouldn't open with Errlog or Option #20 :) See ERRLOG.JPG.
Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.