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



We have a file which our application uses to store reference information
which can be maintained by users rather than hard-coding in programs.
The file has a key and a generic field of 256 characters which can be
mapped into any format required.  Each key will have its own layout.

 

The mapping is achieved by having another file which holds the layout of
this field, with one record for every field defining it's start and end
position within the 256 bytes.

 

The 256 byte field also has a DS declared which provides an object
reference to this layout. This is used extensively in RPG programs to
enable the reference information to be mapped to individual fields.

 

I am writing some software to e-mail the reference information for
specific keys. 

 

I am using SQL to create the extract file as follows for our postcode
reference data (=US Zip Code):

 

create table qtemp/ed971 as (select * from $postcode) with no data

 

This works fine. This new table is now defined as having the same
structure as the $POSTCODE DS.

 

My problem now is, how do I get the 256 byte field into the individual
table fields? In RPG a simple move to the DS would map the values, but
I'm at a loss to work out how to achieve the same thing in SQL. Using
SELECT with substrings is no good because that requires knowledge of the
individual field posisions.

 

The INSERT INTO qtemp/ed971 statement seems to require data to be
referenced at the field level. 

 

Any advice gratefully acknowledged.  

   


*********************************************************************************************************
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity to whom they are addressed. If 
you are not the intended recipient, any use, disclosure or copying of this 
message is unauthorised. If you have received this message in error, please 
reply using the sender's email address. 

This footnote confirms that this email message has been scanned for computer 
viruses. EIG-Ansvar Limited does not accept liability for any loss or damage, 
whether caused by our own negligence or not, that results from a computer virus 
or defect in the transmission of this email or any attached file. 

EIG-Ansvar Limited - Australia (A.B.N. 21 007 216 506)
Email : insure@xxxxxxxxxxxxxxxx

Eig-Ansvar Limited - New Zealand
Email : insure@xxxxxxxxxxxxxxxx

*********************************************************************************************************

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.