Bandit76,
What exactly are you trying to do? Are you trying to set up an edited field for output within a program or are you trying to set up Compile & Link JCL using symbols?
Turin
miggyD,
Your confusing Conditions with a Group Item. His code of
01 VALIDATION-RESULTS PIC 99.
88 NON-NUMERIC-SSN VALUE 21.
88 NO-SSN-PRESENT VALUE 22.
is correct. Level 88 represents a condition of Validation-Results, not an elementary item. Hope this helps...
If accepting the system date as-is is OK for you, a simple statement in your "INIT" will do as tupendo noted. If, however, you are printing the date for a report and want something more like MMDDYY, you need to do the following:
Working Storage Section.
01 ws-date.
05 year-in...
As far as I am aware, being fairly new to COBOL II myself, there is not utility that I have come across for auto indenting. However, you can set your Profile to Number-On-Stb-CBL which will start you in column 7. There is also a nifty trick that I heard about. According to Stern & Stern, if...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.