IBR edit program

Posted by Grant Foraker on September 23, 2011 at 12:20:23: Uploaded files: 1

Wrote my own IBR editing program (IBREDIT.IBS) year or so back, and put it aside for a while. Wanted something quick and easy. A few days ago I decided to widen and lengthen the screen. All that works fine.

The print button used to work. Now it's gone weird. Or I'm weird or it's Friday.

PrintCommandFile:
!!!!!LET MESSAGE$ = '[' + FILENAME$ + ']'
!!!!!MSGBOX MESSAGE$
OPEN (2) FILENAME$
OPEN (1) 'LPH' ! OPEN HTML PRINTER
PCF10:
INQUIRE (2,1000), EXCP = PCF80
PRINT (1,1000)
GOTO PCF10
PCF80:
IF EXCP EQ 2 GOTO PCF90
ERROR
PCF90:
CLOSE (2)
RETURN

99% of the time I get an E11 opening the file in Comet in the print routine. I added a MSGBOX, which always displays the correct file name and the OPEN always works. REM out the MSGBOX and the OPEN fails.

Maybe another pair of eyes.

Follow Ups:

• Re: IBR edit program Barbara Brazil 15:01:44 09/23/11 (2)
  • Re: IBR edit program Grant Foraker 14:01:31 09/27/11 (0)
  • Re: IBR edit program Grant Foraker 11:28:41 09/27/11 (0)

Post a Followup

Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.