Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to insert LOW VALUES/HIGH VALUES in a file.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Jul 19, 2010 10:22 am    Post subject: How to insert LOW VALUES/HIGH VALUES in a file.
Reply with quote

Hi

I have a PS file. I want to insert low-values in some position say 5 to 10.
I tried it by opening the file in edit mode and typing C ALL ' ' 5 10 X'00' . But this puts non-displayable characters in position 5 to 10 . I want to know if these non-displayable characters (which can be searched using F all P'.' ) are same as Low values ? If not then how do i insert low values in a file . Using COBOL pgm we can do it , but is it possible to insert them directly in a file.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Jul 19, 2010 10:29 am    Post subject:
Reply with quote

Hello,

After the C ALL enter HEX ON. You will be able to see the content in hex.

Many values are non-displayable, but they are still valid. X'00' is such a value.
Back to top
View user's profile Send private message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Jul 19, 2010 10:48 am    Post subject:
Reply with quote

So it means to insert low values in a file i should type it as C ALL ' ' 5 10 X'00' ; HEX ON .

But the pgm is not able to indentify field from 5 to 10 as low values ?
I am doing a check in the pgm for low values. It doesn't seem to indentify it . Could you please help me with the syntax ?
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Mon Jul 19, 2010 12:18 pm    Post subject:
Reply with quote

Quote:
So it means to insert low values in a file i should type it as C ALL ' ' 5 10 X'00' ; HEX ON .


No. What you originally did inserted low values. Setting HEX ON simply lets you see those values displayed.

What (language) program are you using to check for low values? Can you show the code?

Garry.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Jul 19, 2010 12:43 pm    Post subject:
Reply with quote

Hello,

Quote:
But the pgm is not able to indentify field from 5 to 10 as low values ?
I am doing a check in the pgm for low values. It doesn't seem to indentify it .
If the program is coded correctly, it will work as you want.

As Garry requested , show the data definition for this part of the file and the code that references the data. Also show a few of the modified records in hex.
Back to top
View user's profile Send private message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Jul 19, 2010 1:53 pm    Post subject:
Reply with quote

I am just trying to insert low values in a file and checking for the same field in cobol code by using the below syntax.

If Field-1 = low-values
display "low values in field"
end-if.


in cobol , we can use move low-values to field-1 . But what i was trying to do is insert low-values directly in a file and see if cobol code recognises it .
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Mon Jul 19, 2010 1:56 pm    Post subject:
Reply with quote

But you haven't show us much to work with. Where is the file definition? and the record structure?

Garry.
Back to top
View user's profile Send private message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Jul 19, 2010 2:09 pm    Post subject:
Reply with quote

the input file is of record length 80.

01 REC1.
02 FLD1 PIC X(3).
02 FLD2 PIC X(3).
02 FLD3 PIC X(3).
02 FILLER PIC X(71).
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Jul 19, 2010 2:14 pm    Post subject:
Reply with quote

since you changed columns 5 thru 10 to low-values,
with which field in REC1 do you expect to make the compare?
Back to top
View user's profile Send private message
Ambili S

Active User


Joined: 06 Sep 2007
Posts: 112
Location: India

PostPosted: Mon Jul 19, 2010 2:20 pm    Post subject:
Reply with quote

Here , based on the layout of REC1 , i am inserting low-values in FLD2 and then checking in cobol pgm if FLD2 has got low-values .
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Jul 19, 2010 2:28 pm    Post subject:
Reply with quote

as you edited the file,

FLD1-COL01 thru COL03
FLD2-COL04 thru COL06
FLD3-COL07 thru COL09

you stated in your first post, col05 thru col10.
which means you missed fld1, 2/3 of FLD2, and all of FLD3.

so I would suggest comparing FLD3 to low-values.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Jul 19, 2010 8:07 pm    Post subject:
Reply with quote

Hello,

Is this working now?

If not, do as asked and post a few of the record in hex. . .
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts High CPU consumption Job using IAM fi... aswinir JCL & VSAM 8 Thu Dec 01, 2016 8:28 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us