Answer / dimpy19

1.The LMMLIST service, when used with the LIST or SAVE option, creates a list of the first occurrence of all the members in an ISPF library,
a concatenated set of ISPF libraries, or an MVS� partitioned data set associated with the given data ID
2.You must complete the LMINIT and LMOPEN services before using LMMLIST. Use the LMMLIST FREE option to release the list storage space when it is not needed.
3.LIST|FREE|SAVE - These options determine the action performed by the LMMLIST service.
a.LIST : The first time that you invoke the LMMLIST service with the LIST option, it creates a member list for use by a dialog.
b.FREE : The FREE option specifies that the storage acquired to create the member list is to be freed.
C.SAVE : The SAVE option writes all member names in a list specified by the data ID to a data set.need use Group and Member for this.


>>-ISPEXEC--LMMLIST--DATAID(data-id)--+--------------------+---->
| .-LIST-. |
'-OPTION(-+-FREE-+-)-'
'-SAVE-'

>--+--------------------+--+------------------+----------------->
'-MEMBER(member-var)-' | .-NO--. |
'-STATS(-+-YES-+-)-'

>--+--------------+--+-------------------------+--+------+-----><
'-GROUP(group)-' '-PATTERN(member-pattern)-' '-LONG-'

consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayed after the PERFORM is over? assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above

1 Answers  

---

I have a COBOL program that ACCEPTs some input data. How do you code the JCL statement for this?

0 Answers  

---

What all are the changes to be made in JCL so as to do testing?

2 Answers   TCS,

---

How to run cobol program using jcl?

0 Answers  

---

If the COND parameter is specified in both the JOB and EXEC statements, which one will take precedence? If JOB takes priority and if all the conditions evaluate to false, then will the conditions on the EXEC step be evaluated next?

4 Answers   Wipro,

---

What is concatenating?

0 Answers  

---

01 GROUP-ITEM 05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50 05 AMOUNT-2 PIC 9(4)V99 USAGE COMP MOVE ZERO TO GROUP-ITEM ADD 50 TO AMOUNT-1 what will be the content of AMOUNT-1? a.50 b.100 c.0 d.unpredictable

1 Answers  

---

If i have defined an temperory dataset in step2, how can i call back or use the same dataset in step5 of the same job

4 Answers   UST,

---

How jcl work to handle various input output file operations?

0 Answers  

---

What statement marks the end of an in-stream or catalogued procedure?

1 Answers  

---

What is order of searching of the libraries in a JCL?

4 Answers  

---

WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99 VALUE 123.45. PROCEDURE DIVISION. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. compiler : IGYGR1080-S A "VALUE" clause literal was not compatible with the data category o subject data item. The "VALUE" clause was discarded. WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99. PROCEDURE DIVISION. MOVE 123.45 TO W-B. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. 2375

0 Answers  

---