IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

how can i move s9(9) to s9(9) usage comp


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
HARENDRA CHOUDHARY

New User


Joined: 05 Nov 2017
Posts: 1
Location: India

PostPosted: Mon Nov 06, 2017 12:10 am
Reply with quote

Code:
 

10 QUANTITY PIC S9(9)

10 QTY          PIC S9(9) USAGE COMP

ACCEPT QUANTITY
MOVE QUANTITY TO QTY



Quote:

please tell me how to move integer to comp variable.

QUANTITY is accepting from screen, so it cant be comp.
QTY is host variable of DB2 Integer data type

Please let me know i m making a wrong approach and hw to correct it


[/b]
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Mon Nov 06, 2017 12:35 am
Reply with quote

You're on the wrong forum.

Sheesh, doesn't the organisation you work for provide any training?
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Mon Nov 06, 2017 4:08 pm
Reply with quote

a) experiment
b) read the manual
c) move to the beginner's forum
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Mon Nov 06, 2017 7:34 pm
Reply with quote

You need to go to Beginners and Students Forum as this forum is for professionals with experience. Your question indicates you are not a professional with experience, so you should be posting on the other forum.

As far as moving S9(9) to S9(9) COMP, you can use these COBOL verbs to do so: MOVE, COMPUTE, ADD, SUBTRACT, MULTIPLY, DIVIDE -- all of them, appropriately coded, will cause the S9(9) COMP variable value to be set to the S9(9) variable value.

One thing you need to be aware of is that ACCEPT QUANTITY means you need to provide a 9-digit value with the sign overlaid on the last digit and leading zeroes; putting in 123 without the leading zeroes means that QUANTITY will contain 123 left-justified with trailing spaces -- so the results you get will NOT be what you expect. Depending upon what is entered, the MOVE statement may well generate a data exception.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts COBOL - Move S9(11)v9(7) COMP-3 to -(... COBOL Programming 5
No new posts How to move the first field of each r... DFSORT/ICETOOL 5
No new posts STEM usage in REXX CLIST & REXX 14
No new posts Converting ASCII values to COMP-3 (ZD... JCL & VSAM 2
No new posts z/OS Modules Usage report using SMF 42 DFSORT/ICETOOL 2
Search our Forums:

Back to Top