Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Move SIGN NUM to UNSIGN NUM warning message

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

New User


Joined: 07 May 2006
Posts: 35

PostPosted: Tue Apr 15, 2014 7:47 am    Post subject: Move SIGN NUM to UNSIGN NUM warning message
Reply with quote

hello all,

CODE:

01 SIGN-VAR PIC S9(03) VALUE +001.
01 UNSIGN-VAR PIC 9(03) VALUE 0.

MAIN-PROCDURE.
MOVE SIGN-VAR TO UNSIGN-VAR.

WHAT I WANT TO KNOW:
HOW CAN I GET A WARING MSG DURING COMPIILE?

THANKS ALL AHEAD.
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue Apr 15, 2014 1:32 pm    Post subject: Reply to: MOVE SIGN NUM TO UNSIGN NUM,HOW CAN I GET A WARNIN
Reply with quote

CAPS LOCK OFF PLEASE.

It does nothing but get people to ignore your post, probably the opposite of what you want.

Since what you have shown is a perfectly normal and acceptable thing to do in COBOL, why would you expect a compiler warning for it?
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: Tue Apr 15, 2014 6:47 pm    Post subject:
Reply with quote

Hello,

Did you get a warning? Are you trhyjg to force a warning?

Your question is not clear.

If you clarify, possible someone can help. . .
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 Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm
No new posts display the sign only if the value is... useit DFSORT/ICETOOL 3 Wed Oct 04, 2017 5:53 pm
No new posts Hardcoded negative sign value in output scdinesh SYNCSORT 8 Fri Sep 08, 2017 5:28 am
No new posts Move from Comp3 variable to Edited Va... sreekusr COBOL Programming 8 Thu Aug 10, 2017 4:20 pm
No new posts Default Message in Rexx cvnlynn CLIST & REXX 9 Wed Aug 02, 2017 12:38 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us