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
 

 

Retrieve system date in COBOL

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

New User


Joined: 25 Oct 2007
Posts: 19
Location: hyderabad

PostPosted: Tue Jan 08, 2008 10:44 am    Post subject: Retrieve system date in COBOL
Reply with quote

hey can anyone tell me how do i retrieve SYSTEM DATE in my COBOL program...?
Back to top
View user's profile Send private message

murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Tue Jan 08, 2008 11:17 am    Post subject:
Reply with quote

Muhammad,

Use COBOL mnemonics.
Back to top
View user's profile Send private message
muhammad

New User


Joined: 25 Oct 2007
Posts: 19
Location: hyderabad

PostPosted: Tue Jan 08, 2008 11:21 am    Post subject: @murali
Reply with quote

is there any command such as CURRENT DATE or something which can help me move date to my variable??
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Tue Jan 08, 2008 11:22 am    Post subject:
Reply with quote

Search manuals, you will find.
Back to top
View user's profile Send private message
ahalyah

New User


Joined: 13 Dec 2007
Posts: 25
Location: india

PostPosted: Tue Jan 08, 2008 12:18 pm    Post subject:
Reply with quote

Yes. Use as FUNCTION CURRENT DATE.
Back to top
View user's profile Send private message
muhammad

New User


Joined: 25 Oct 2007
Posts: 19
Location: hyderabad

PostPosted: Tue Jan 08, 2008 12:30 pm    Post subject: @ ahalya
Reply with quote

hey thanks,

its working well now...
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Wed Jan 09, 2008 1:22 am    Post subject:
Reply with quote

The us of Function Current-Date returns a 21 byte date, you need to
look at the manual for the layout of this 21 bytes.
Back to top
View user's profile Send private message
pamireddy

New User


Joined: 01 Feb 2006
Posts: 1
Location: India

PostPosted: Fri Jan 11, 2008 8:50 pm    Post subject:
Reply with quote

WE CAN USE THE FOLLOWING COMMAND TO RETRIVE THE SYSTME DATE.

ACCEPT SYS-DATE FROM DATE.

NOTE: IN THE WORKING-STORAGE SECTION DEFINE

01 SYS-DATE PIC 9(6).
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 Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm
This topic is locked: you cannot edit posts or make replies. Cobol GUI (like Editor) Kala Mainframe COBOL Programming 14 Wed May 10, 2017 12:30 pm
No new posts IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am
No new posts Cobol upgrade - source code missing f... gthmrj IBM Tools 1 Wed Apr 26, 2017 6:04 pm


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