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
 
Manual for understanding the USAGE Clauses

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Suggestions & Feedback
View previous topic :: :: View next topic  
Author Message
prabhucs01
Warnings : 1

New User


Joined: 07 Mar 2005
Posts: 43

PostPosted: Fri Apr 15, 2005 5:29 pm    Post subject: Manual for understanding the USAGE Clauses
Reply with quote

can any body send or suggest a good manual for understanding the

usage clause concepts(comp,comp1,comp3)..
Back to top
View user's profile Send private message

parul

New User


Joined: 08 Apr 2005
Posts: 11
Location: mumbai

PostPosted: Sat Apr 16, 2005 12:47 pm    Post subject:
Reply with quote

Hi
COMP is binary data. COMP items are native binary items (rough equivalent to an int in C). Arithmetic with this kind of data is normally very fast. Use COMP for subscripts and line counters. Use COMP for items that are calculated frequently and moved to DISPLAY-NUMERIC items infrequently (because to move a COMP item to a display numeric one, COBOL generally converts it to packed then to display). For binary data, the field will be 2 bytes long if the picture is S9(01) - S9(04). It will be 4 bytes long if S9(05) - S9(09). And 8 bytes long if S9(10) - S9(18) COMP-1 and COMP-2 are floating point. COMP-3 is packed. COMP-3 is a good choice for running totals, sub-totals and similar data items. Arithmetic is reasonably fast and conversion to display is fairly fast as well. Like COMP items, these should not be in external files that may need to be shared on another platform. COMP-3 fields should always be signed and have an odd number of digits for best performance. (e.g. S9(3) COMP-3 requires 2 bytes; 3 nibbles for the digits and one for the sign. S9(4) requires 3 bytes; 4 nibbles for the digits, one for the sign, and one extra that the compiler must clear whenever the field is changed) SYNC is an abbreviation for SYNCHRONIZED. It is used with binary data to align it on a proper address.

Use of SYNC gives faster access at the cost of storage.

Parul..
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 -> Suggestions & Feedback All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts )SEL and )ENDSEL usage cvnlynn TSO/ISPF 4 Thu Jun 15, 2017 1:15 am
No new posts Need inputs on Space requirement and... ashek15 IMS DB/DC 0 Sat Apr 01, 2017 8:26 am
No new posts Need Help in understanding what is th... mainakdalal PL/I & Assembler 9 Mon Oct 03, 2016 8:03 pm
No new posts Query on CICS startup manual roy.x.hu CICS 2 Fri Jul 22, 2016 8:57 pm
No new posts How can amount of the Storage Usage b... esduman61 CICS 6 Wed Mar 09, 2016 1:19 pm


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