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
 

 

Field data type was changed from S9(7) COMP-3 to X(7).

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
sreehari_04

New User


Joined: 23 Jan 2006
Posts: 7

PostPosted: Wed Sep 27, 2006 12:05 pm    Post subject: Field data type was changed from S9(7) COMP-3 to X(7).
Reply with quote

Hi all,

One field(Commitno) in the copybook data type was changed from S9(7) COMP-3 to X(7).
Because of this chnage i did impact anlysis on COBOL source and identified following scenarios

1) Move <commitno> to <field-as part of key>

The to filed is in the another copybook with data type s9(7) comp-3
and it is part of key.
In this case without changing the key length how i can modify the filed?

2) Move <commitno> to <copy book field>
In this case the copy book does not have filler
In this case without increasing the copybook length is there any way to modify that field

3) move <commit-record> to <another record>
In this case how can i modify the source program

4) move <commitno> to <88 level variable>
In this case 88 level variable data type is S9(7) COMP-3
In this case how can change the 88 level variable?

Please suggest me in above scenarios.

Thanks in advance.
Back to top
View user's profile Send private message

UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 755
Location: Germany

PostPosted: Wed Sep 27, 2006 1:51 pm    Post subject:
Reply with quote

Hi !

First of all, you have to make shure, that in the new X(7) field only numeric data could be entered. Otherwise the receiving to fields with COMP-3 are not correctly packed data. Result will be S0C7.

I think, first off all, you have to figure out the reason, why the field was changed and then have a logical look at the depending programms, which
are working with that field. There can be unpredictiable results.


1.) X(7) fits into S9(7) COMP-3.
2.) Which filler. Is the receiving field smaller, then result is truncation.
3.) Have a look at the data-structure of both records.
4.) The content has to satisfy a level-88 so that this is set tu true.

Regards, UmeySan
Back to top
View user's profile Send private message
sreehari_04

New User


Joined: 23 Jan 2006
Posts: 7

PostPosted: Thu Sep 28, 2006 12:02 pm    Post subject: Hi
Reply with quote

Hi All,

This business requiremnt-Field needs to be changed from S9(7) COMP-3 to
X(7). For this iam identifying various secenarios how the field was used in the programs like in Individual MOVE's, Group MOVE's, Logical Expressions etc.

I found some cases , I could not able find the solutions for above cases

Thanks In Advance.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Group Data based on a key Arun Raj DFSORT/ICETOOL 7 Thu Apr 27, 2017 11:29 pm
No new posts Alter &DATENS field in HEADER1 Angad DFSORT/ICETOOL 4 Mon Apr 24, 2017 11:49 am
No new posts unload data from table with lob columns farhad_evan DB2 0 Sat Apr 22, 2017 1:32 pm


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