Still looking for solutuion.

See discussion previously under this topic.

Can someone please come up with the answer.

PRN2FILE.COM is here

Steve

—————————–17862175817833–

Original thread is here

Sorry, Terry, but I'm out of ideas. If I recall we assumed that PDISK was the culprit. You could try PRN2FILE.COM from PC Magazine utilities. It does print redirection from DOS, just like PDISK. (I know that's a pain, but I have no other ideas).

Steve

I'm not that familiar with 'pdisk' function. But I think its handling your printer redirection, isn't it? We went with novell's capture command many.. years ago, before we'd even heard about pdisk. We have a subroutine Set_Printer() that handles the actual parameters for the capture call and keeps track of the current status in common. Don't have a 'file handle' problem, though we do have to do a suspend now when we make the call. If it sounds useful, I can send you a copy.

Here is my test setup:

homebrew computer running amd 233 chip, win95 Orig release (wo any service packs), novell client32 v2.2, config.sys has files=100,

running on a novell 3.12 server.

AREV version 2.11 $SETPTR has a V1 inthe last field of hte compiled code so i suspect this is a really old version (revg?)

I used the following test program:

* test pdisk some more

FOR I=1 TO 999

  X=C:\TEMP\AREVCHK.':I

  AFLAG=1   ;* overwrite

  GOSUB SET.PTR

• CALL SETPTR( X, AFLAG )

  PRINTER ON

  PRINT "HELLO THERE PEOPLE"

  PRINTER OFF

  X=PRN'

  AFLAG=1   ;* need to set again, since this holds error msg from           prev call

  GOSUB SET.PTR

• CALL SETPTR( X, AFLAG )

NEXT I

STOP

!———-

SET.PTR:

* This does the low-level PDISK printer redirection.

* By avoiding the call to PDISK we don't have to mess

* with the user messages, and deleting the file beforehand.

* PRE: X := file name

* POST: Printer output goes to file

*–

ERROR.MSG='

*CALL MSG( "Redirecting printer output to ": X: " …", "T0", , )

X := CHAR(0) ;* null-terminated

CONVERT STR(CHAR(0),2) TO CHAR(0) IN X ;* make sure only single (double nulls should stil be ok)

AFLAG=1 ;* Overwrite prev file.

CALL SETPTR( X, AFLAG )

BEGIN CASE

CASE AFLAG=21

• ok

 AFLAG=1

CASE AFLAG THEN CALL MSG(ERROR.MSG,,,)

RETURN

END

*(end)

Sorry about upper case - i just copied code from other arev programs. Notice: a few lines have wrapped to the next line. I have run this program several times without any problems. It takes about 1.5 minutes to execute and generate the 999 files. I have not tried this to the network however but I will. Also i have not tried to redirect to captured printer queues which is where i have had problems. I will experiment further on that as well.

I don't know if this is a help or not.

ed

View this thread on the forum...