Can you help me with the following:
 
Try to print 2 copies duplex to a network printer.
 
The printer share name is "ricoh_sp8100"
 
The network name is RICOH Aficio SP 8100DN PCL6
 
The network server is RDS01
 
Command file below 
 
-- new_INVPRINT.RMD
-- Print invoices for a specified billing date
-- This prints all invoices for all customers for the specified date,
--   in invoice number order based on parmets set up in process 1, +
--   Run_CDIInvoice.rmd
 
OUTPUT SCREEN
SET MESSAGE OFF
SET ERROR MESSAGES OFF
 
DROP CURSOR c1
DECLARE c1 CURSOR FOR SELECT pon FROM attinv_master_cust ORDER BY +
cdiinv pon
OPEN c1
 
WHILE (1=1) THEN
 
  FETCH c1 INTO vpon IND i1
  IF SQLCODE <> 0 THEN
    BREAK
  ENDIF
 
  OPTION PRINTER +
  |DUPLEX
  |COPIES 2 +
  |ORIENTATION PORTRAIT +
  |PRINTER_NAME  <file://\\rsd01\RICOH> \\rsd01\RICOH Aficio SP 8100DN PCL6

  PRINT invoice1 WHERE pon = .vpon
 
ENDWHILE
 
LABEL finish
 
DROP CURSOR c1
RETURN
 
 
 
Stephen Breen
CDI Services, Inc.
Road Support Division
 

Reply via email to