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.

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

Answer / aaki

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

IF there 5 to 6 files in a JCL and there is some space abends, how can we identify which file has space abend and what can be done to get off that abend or rectify that abend.

2 Answers   ADNA, CSC,

---

How can i write a comp-3 variable into a sequential file should i declara the field in the file description as comp- 3?

1 Answers  

---

what are the error codes in cobol, db2, cics, vsam , and jcl

2 Answers   TetraSoft,

---

i have a file which contains records like 10,30,90,50,20,40,80,60,70 i want to display these records in reverse order like 70,60,80,40,20,50,90,30,10 please give me the cobol code (do not sort the records)

3 Answers   Cap Gemini, Mind Tree,

---

With in these three which one is the default one Call Reference, Call By Value, Call By Content.-Which one is default?

4 Answers   IBM,

---

Re: 01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.

2 Answers   IBM,

---

can i use multiple when statements in search & search all ? justify ur answer?

2 Answers  

---

IDENTIFICATION DIVISION. PROGRAM-ID. MOVEPGM. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-I PIC 9(2). PROCEDURE DIVISION. A1000-MAIN-PARA. PERFORM PARA-X WITH TEST BEFORE UNTIL WS-I= 5 STOP RUN. PARA-X. DISPLAY "BEST2". I m getting error s722,while executing the program, seems getting in loop, can anybody tell me why

3 Answers  

---

In an EVALUTE statement is the order of the WHEN clauses significant?

4 Answers  

---

what is record label is empty or standard in file description of data division?

2 Answers   HCL,

---

wht is the difference between goto and perform stmts

7 Answers   DELL,

---

how we sort two input files based on a common column and giving one o/p file please send me the coding logic?

0 Answers   Valtech,

---