IBM Mainframe Forum

Hi,

My requirement is to read a value occuring after 'n' commas (say 'n' as 10) in a Variable Block file.

Eg: 20120312,000044,22,,,,,,,,,,,,,,,,,44,,,

Lets assume that i have to retrieve the value '44'. How to accomplish it using ICETOOL/DFSORT. Request your help.

Your description is a bit confusing. You say "after 10 commas" but you show other fields before the 10 commas. Are there always 3 fields before the 10 commas or can there be a different number of fields before the 10 commas? Usually, we would be looking for a specific delimited field, for example, the 10th delimited field. VB records like that might look as follows:



You could use a DFSORT job like the following to extract the 10th field:



Set FIXLEN to the maximum length for the 10th field (it was 2 in your example, but I assumed it could be up to 5).

If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:

http://www.ibm.com/support/docview.wss? ... g3T7000080

Thank you Frank.

I have another query. How to verify the parsed value for a string and include the records that satisfy my condition.

Example: i have to check the retrieved value for the string (say) 'XXXX' (if %01 equates 'XXXX') and only if the check holds fine, i have to include the record in my output.

Input file: VB, LRECL 180
Output file: FB, LRECL 47

I Herewith attach my code to convert vb to fb, as well as to retain the parsed fields i wish in the output.

(attachments deleted)

Please do not post attachments - not everybody can read them and it takes up Frank's and Kolusu's time which could be better spent answering other queries and doing their DFSORT development work. I am going to delete them (the attachments, that is, not Frank and Kolusu).

Eswarbabu wrote:Thank you Frank.

I have another query. How to verify the parsed value for a string and include the records that satisfy my condition.

Example: i have to check the retrieved value for the string (say) 'XXXX' (if %01 equates 'XXXX') and only if the check holds fine, i have to include the record in my output.

Input file: VB, LRECL 180
Output file: FB, LRECL 47

I Herewith attach my code to convert vb to fb, as well as to retain the parsed fields i wish in the output.

(attachments deleted)

Eswarbabu,

Use OUTFIL with INCLUDE/OMIT to write out the desired records. I haven't seen the attachments. So I will go with assuming that you are using Frank's above shown parse controlled cards, the parsed field 10 is at pos 5 for a length of 5 bytes. We check if that value is 'xxxxx' and if it is then we write out and convert the file to FB.

ex: