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
 

 

use of DATE-COMPILE and TITTLE in IDENTIFICATION DIVISION.

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

New User


Joined: 23 Sep 2006
Posts: 1

PostPosted: Sat Sep 23, 2006 12:36 pm    Post subject: use of DATE-COMPILE and TITTLE in IDENTIFICATION DIVISION.
Reply with quote

HEY GUYS CAN ANYONE PASS ME A SAMPLE PRG USING DATE-COMPILE AND TITTLE COMMAND IN IDENTIFICATION DIVISION WITH ITS ITS ACCEPTED OUTPUT. I READ IT IN MAINFRAME HANDBOOK THAT IT DISPLAYS DATE OF COMPILATION AND THE MVS NAME AND RELEASE...I TRIED BUT COULD NOT GET ANY THING OUT OF IT SO IF ANY ONE CAN GUIDE ME HOW IT WRKS......
Back to top
View user's profile Send private message

UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 755
Location: Germany

PostPosted: Mon Sep 25, 2006 5:46 pm    Post subject:
Reply with quote

Hi !

I only use the WhenCompiled option to display the ProgrammReleaseVersion in the RunTimeProtokoll.

01 COMP-DATUM PIC X(16).

ProtokolLine

...05 FILLER PIC X(25) VALUE 'PROGRAMMVERSION : '.
...05 IZ02DD PIC X(08).

MOVE WHEN-COMPILED TO COMP-DATUM

MOVE COMP-DATUM TO IZ02DD
MOVE COMP-DATUM (4:2) TO IZ02DD (1:2)
MOVE COMP-DATUM (1:2) TO IZ02DD (4:2)
MOVE COMP-DATUM (9:8) TO IZ03UM (1:8)

Regards, UmeySan
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 Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts How to get current date -1 and curren... murali.andaluri DFSORT/ICETOOL 3 Wed Mar 08, 2017 2:09 pm
No new posts Overlay the system date Danielle.Filteau SYNCSORT 4 Fri Mar 03, 2017 1:16 am
No new posts Checking Current date vickey_dw DFSORT/ICETOOL 1 Wed Feb 08, 2017 11:14 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm


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