Dave,
To attract this lists' deepest-down-diving-est,
longest-staying-under-est, most-with-mud-coming up-est gurus, try
these:
1. Alter your I-descriptor to replace all system delimiters with a
normal character that you can see:
01: I
02: SUBR( 'PDESC' , @ID , @RECORD ); CONVERT( @IM:@AM:@VM:SM:
@TM:CHAR(250):CHAR(249):CHAR(248), "iavstxyz", @ )
03:
04:
05: 60L
06: S
Does LIST PRINTERS PDESC display expected results?
2. Forget the subr, & check the dict:
Replace line 2 with something easy:
DICT PRINTERS PDESC
01: I
02: "xyz"
Does LIST PRINTERS PDESC display expected results?
3. Replace "xyz" with hardcoded exact results you expect from the
subroutine.
4. Forget the dict item, & check the subr:
Write & run a wrapper:
OPEN 'PRINTERS' TO F ELSE STOP
ID = [something legit]
READ REC FROM F, ID ELSE STOP
CALL PDESC( ANS, ID, REC )
CRT QUOTE( ANS )
END
If those all come out clean, it gets interesting.
Maybe it's time to post source for UHL.WRAP.
Happy digging,
Chuck
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
