how can we get current dat and time thru cobol pgm

Question Posted / visu.kanchamreddy

3 Answers
11367 Views
DELL, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

how can we get current dat and time thru cobol pgm..

Answer / vinodquestion

HI friend,

Move function CURRENT-DATE to dt.

Here dt is a working storage variable.

If you want exactly date and time do this

Instead of CURRENT-DATE in above statement write this.

CURRENT-DATE(1:16)

That is using referential modification.

Is This Answer Correct ?

10 Yes

0 No

how can we get current dat and time thru cobol pgm..

Answer / gummadi srinivas

USING REFERENCE MODIFICATION WE GET DATE

1) current date
move function current-date (1:8) to ws-today
here ws-today is w.s.s variable

2) current time
move function current-date (9:6) to ws-time
here ws-time is the w.s.s variable

Is This Answer Correct ?

4 Yes

0 No

how can we get current dat and time thru cobol pgm..

Answer / aaki

You can fetch current date from SysIBM.Sysdummy1 table in a
working storage variable

Is This Answer Correct ?

3 Yes

1 No

Post New Answer

More COBOL Interview Questions

Explain about level numbers?

3 Answers

I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue

0 Answers IBM,

when iam reading a flat file which has 100 records through cobol program when iam reading 50th records it gets abends .. so when i run the program again it should read from 50th record .where it got abened ? how it is possible

1 Answers Patni,

maximum of how many screens we can open in emulator

2 Answers

What is the use of EVALUATE statement?

4 Answers Tesco,

How do u sort the table for Search ALL? Is it only using ASCENDING KEY IS statement in occurs clause? If the data is input in non ascending order, will the ASC KEY IS automatically sort the data? or will it throw compile time error?

1 Answers CTS,

have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..

5 Answers TCS,

How to display the index.(displacement from an array)

4 Answers IBM,

What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?

7 Answers T systems,

What happens in the background of spool when we submit a job for compilation and execution... This is a recent question in ibm...Kindly help me.....

3 Answers IBM,

what will happen if pass values more than 100 using PARM parameter?

1 Answers

i want a program using by if, evaluate , string, unstring, perform, occurs?

1 Answers

For more COBOL Interview Questions Click Here