RE: CCSID question

["Kurt Anderson" <kjanderson@xxxxxxxxxxxxx>]

Now that you ask the question, I took another look and the OPNQRYF is
successful, but the SETLL to the file is where I'm failing.  I was
thinking CCSID because I previously had an OPNQRYF fail because of that,
and didn't realize I wasn't failing on that command.

These are the error messages I'm getting:

InqVCTSS.EXE Mon Jun 11 15:02:35 2007 CPF5035: Data mapping error on
member CTSPHDR.
InqVCTSS.EXE Mon Jun 11 15:02:35 2007 CPF5097: Key mapping error on
member CTSLHDR3. 
The fail is with a SETLL, error code of 1299.

     FCTSLHdr3  IF   E           K Disk    Remote Rename( CBRec: CBRec3
)
     F                                     UsrOpn

     D cmd_OVRDBF1     C                   'OVRDBF FILE('
     D cmd_OVRDBF2     C                   ') OPNSCOPE(*JOB)
OVRSCOPE(*JOB) -
     D                                     SHARE(*YES)'

     D cmd_QryBeg      C                   'OpnQryF File(('
     D QRY_Sel1        C                   ')) Option(*All) QrySlt('''
     D QRY_Sel2        C                   'CBType *Eq "'
     D QRY_Sel3        C                   '"'
     D QRY_Sel4        C                   ' *Or '
     D QRY_Sel5        C                   ''') KeyFld((*File))
CCSID(1252) -
     D                                     OPNSCOPE(*JOB)'

That's the makeup of the commands.  OVRDBF simply missing the filename.
Query select missing the filename and selection criteria.  Listed to
show the keywords used.


Kurt Anderson
Application Developer
Highsmith Inc

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Scott Klement
Sent: Monday, June 11, 2007 2:52 PM
To: Midrange Systems Technical Discussion
Subject: Re: CCSID question

Hi Kurt,

> I have a Visual Age RPG app using OPNQRYF running on Windows 2000.  
> The CCSID I've been using is 1252.  It's been working great.  But, I 
> seem to have a problem when the key field is a date field.

I'm a bit confused.  Why do you think it's a CCSID error?   AFIAK, all 
of the possible characters in a date field are invariant.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.