[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

use of #if/#endif on DB2/MVS



     We are converting DB2/AS400 to DB2/MVS.  MVS does not like the following
SQC -

!LinePrinter is not supported for this SQC, if not POSTSCRIPT, then
!  HPLASERJET will be used.
#if {PRINTER_TYPE} <> 'POSTSCRIPT'
  #define PRINTER_TYPE HPLASERJET
#endif


#if {PRINTER_TYPE} = 'POSTSCRIPT'
declare-printer PS-definition
  type={PRINTER_TYPE}
  point-size=5
  font=3                                 ! Courier font

!
! add STARTUP-FILE=dir\filename to change the symbol set
!
end-declare
#endif

#if {PRINTER_TYPE} = 'HPLASERJET'
declare-printer HP-definition      <-------- problem begins here

  type=HPLASERJET
  point-size=5
  symbol-set=0U                          ! ASCII symbol set
  pitch=24
  font=3                                 ! Courier font
end-declare
#endif


Here are the error messages -

Error in include file "DDN:SQRINC(ptpsl215)" on line 47:
   (SQR 4702) Line found outside paragraph.
declare-printer HP-definition

Error in include file "DDN:SQRINC(ptpsl215)" on line 48:
   (SQR 4702) Line found outside paragraph.
  type=HPLASERJET

Error in include file "DDN:SQRINC(ptpsl215)" on line 49:
   (SQR 4702) Line found outside paragraph.
  point-size=5

Error in include file "DDN:SQRINC(ptpsl215)" on line 50:
   (SQR 4702) Line found outside paragraph.
  symbol-set=0U


Can anyone tell me what MVS does not like?

     thanks,
     Stev