× 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.



--

--
From: Kmh0421@aol.com
Full-name: Kmh0421
Date: Fri, 21 Sep 2001 14:57:00 EDT
Subject: OCL
To: RPG400-L@midrange.com
X-Plaintext: Picked text/plain from multipart/alternative

--
[ Picked text/plain from multipart/alternative ]
Hi again...
Does anyone know OCL?
Do I have to somehow define the length of the key to a logical in the OCL?
I am almost finished with all of these programs, about 4 left.... then back
to the future!
Thanks....Again!
Kathie


I did a BLDINDEX and created a logical over my physical, keyed by the last 13
bytes of my flat file, positions 52 to 64. (U2 is the logical) My OCL now
looks like this:
 *************** Beginning of data ***************************
 // LOCAL OFFSET-102,DATA-'?WS?'
 // OVRDBF FILE(IC935U) TOFILE(KMHFILES/IC935U)
 // OVRDBF FILE(IC935U2) TOFILE(KMHFILES/IC935U2)
 // OVRDBF FILE(DE400A) TOFILE(KMHFILES/DE400A)
 // OVRDBF FILE(IC052A) TOFILE(KMHFILES/IC052A)
 // OVRDBF FILE(IC040A) TOFILE(KMHFILES/IC040A)
 // LOAD IC935U
 // FILE NAME-IC935U,DISP-SHR,RECORDS-500,EXTEND-10
 // FILE NAME-IC935U2,DISP-SHR,RECORDS-500,EXTEND-10
 // FILE NAME-DE400A,DISP-SHR
 // FILE NAME-IC052A,DISP-SHR
 // FILE NAME-IC040A,DISP-SHR
 // RUN
When I call it... I get an error:

 SYS2206 Options (  23)
 IC935U2. This file accessed with wrong key length.

 Cause . . . . . :   In referencing the file identified in the message, the
   program running is using the wrong key length value.  If you are running
   a procedure, you incorrectly entered a procedure name or parameter.
 Recovery  . . . :   Enter option 2 or 3 and give the programmer the message
   ID (SYS2206) and the file name identified in the message.
 Possible choices for replying to message . . . . . . . . . . . . . . . :


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.