× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I keep getting this error and dont know why or what a token is. I gather its
a continuation of a line or end of statement condition, but I cant find it.
After the error is the code ad SQL statement.

Message ID . . . . . . :   SQL0104       Severity . . . . . . . :   30

Message type . . . . . :   Diagnostic

Date sent  . . . . . . :   05/13/03      Time sent  . . . . . . :   10:32:40

 

Message . . . . :   Token , was not valid. Valid tokens: ( + - ? : DAY RRN

  CASE CAST CHAR DAYS HOUR LEFT NULL TRIM USER.


insert into TECHLIB/JOBDPF
    values(&JDN,          
           &JDLN,         
           &UN,           
           &JD,           
           &JS,           
           &JQN,          
           &JQLN,         
           &JQP,          
           &HJQ,          
           &OQN,          
           &OQLN,         
           &OQP,          
           &PDN,          
           &PT,           
           &ES,           
           &MLS,  
           &MLL,  
           &MLT,  
           &LCLP, 
           &IMR,  
           &DRA,  
           &TSEP, 
           &AC,   
           &RDA,  
           &TD,   
           &OILL, 
           &NLILL,
           &ODR,  
           &LRD,  
           &JMQMS,
           &JMQFA)

STRQMQRY QMQRY(TECHLIB/FILLJOBD) SETVAR((JDN     
  '''CACALENDAR''') (JDLN '''CAUNIOBJ  ''') (UN '''CAUNITNG  ''') (JD

  '''*SYSVAL ''') (JS '''00000000''') (JQN '''CAIQ      ''') (JQLN
'''CAUNIOBJ
   ''') (JQP ''' 5''') (HJQ '''*NO       ''') (OQN '''UNIOUT    ''') (OQLN

  '''CAUNIOBJ  ''') (OQP ''' 5''') (PDN '''*USRPRF   ''') (PT '''*SYSVAL

                  ''') (ES '0030') (MLS '0000') (MLL '''4''') (MLT
'''*NOLIST 
   ''') (LCLP '''*YES      ''') (IMR '''*RQD      ''') (DRA '''*SYSVAL

  ''') (TSEP '''*SYSVAL   ''') (AC '''*USRPRF        ''') (RDA '''CACALENDAR

                             ''') (TD '''Unicenter Calendar

              ''') (OILL '0410') (NLILL '0003') (ODR '0443') (LRD '0005')

  (JMQMS X'00000002') (JMQFA '''*WRAP     '''))


Any help would be appreciated

Steven Segars
AS/400 Certified Specialist/Administrator
CSX Technology
Work: 904-633-5650
Fax:   904 633-1051



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.