Answer / kk

Hi,

Using sort Utilities,
some fields=None,xsum
//STEP010 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=TEST.XSUM.INPUT,DISP=SHR
//SORTOUT DD DSN=TEST.XSUM.OUTPUT,DISP=SHR
//SORTXSUM DD DSN=TEST.XSUM.OUTPUT.XSUM,DISP=SHR
//SYSIN DD *
SORT FIELDS=(2,10,CH,A)
SUM FIELDS=NONE,XSUM

Answer / tv

The question is want to retain duplicates. So sum
fields=none shouldn't be used in SORTing.

Answer / sow

in Sysin dd*

sortfields=copy
sumfields=none,xsum

How can we pass data from cobol to JCl?

7 Answers   ADP, Amdocs, IBM,

---

What is COMP-1? COMP-2?

4 Answers   CitiGroup,

---

study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10

4 Answers   TCS,

---

Discuss about changing dataset name in proc.

0 Answers  

---

COMP?

2 Answers  

---

without performing any operations on a file how can i know whether it contains data or not

2 Answers  

---

If I want to increase the Limit in GDG. What should I do?

1 Answers   IBM,

---

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,

---

what is sysncpoint?

1 Answers   IBM,

---

What are the functions like c or c++ in cobol?

2 Answers  

---

whn do i get soc7 abend while moving alphanumeric to numeric or while moving numeric to aplhanumeric please reply ASAP?

9 Answers  

---

please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?

0 Answers   EDS,

---