Answer / dimpy19

1.The LMINIT service allows the dialog to associate a data ID for ISPF library or PS or PDS
2. The data ID is generated by LMINIT and can be used to identify the data set for processing by other library access services or the BROWSE or EDIT service
3.If LMINIT is issued with an enqueue (ENQ) of SHRW and LMOPEN is issued with the OUTPUT option, it is essential that an LMCLOSE is issued when the dialog has finished processing the data set,
since the DASD volume is reserved until LMCLOSE is invoked.
4. LMQUERY service to find out how the LMINIT parameters are set
5.The requirements for enqueuing (ENQ) the data within ISPF so that the dialog can use it in the desired manner.
a.SHR shows that the existing data can be shared; default for INPUT in LMOPEN service
b.EXCLU shows that exclusive use of the data is required; for example, when you want to change the data no one else can have access to it.
c.SHRW permits a shared write for the data. This option is used by ISPF Edit. It is used only for a partitioned data set.
In this way, more than one user can read from the data, but members can be rewritten when necessary through an enqueue or dequeue used by Edit.
Edit can now have the data ID open for INPUT and OUTPUT at the same time.
A data set that is allocated with an enqueue of SHRW can be opened for either INPUT or OUTPUT using the LMOPEN service.
d.MOD shows that more records are to be added to the end of a sequential data set. MOD is used with the OUTPUT option of the LMOPEN service.



>>-ISPEXEC--LMINIT--DATAID(data-id-var)------------------------->

>--+-| PROJECT options |-+--+----------------+------------------>
+-DATASET(dsname)-----+ '-VOLUME(serial)-'
'-DDNAME(ddname)------'

>--+--------------------+--+------------------+----------------->
'-PASSWORD(password)-' | .-SHR---. |
'-ENQ(-+-EXCLU-+-)-'
+-SHRW--+
'-MOD---'

>--+--------------+--------------------------------------------><

What happens if both JOBLIB and STEPLIB is specified ?

8 Answers  

---

In My job I have 15 procs.and in each proc i have 3 steps. i want to execute 3 step in proc 10.is it possible? if possible how?

2 Answers   HP,

---

What is the meaning of the EXEC statement keyword, COND? What is its syntax?

2 Answers  

---

How to overide the symbol parameter in the jcl ?

3 Answers   UST,

---

Hi, can we call catalog( say myproc } proc n times in jcl if so how please explain Thanks in advance

2 Answers   Cap Gemini,

---

---

If I update one or more members in a pds in the step 1, how can I reach these new contents to be used in the step 2 of the same job? To start a new job via intrdr is not satisfactory, because I must solve this problem in one job.

2 Answers   IBM,

---

What is the function of the dd dcb keyword?

0 Answers  

---

what is static and dynamic call with examples?

4 Answers   IBM,

---

My JCL contains four steps //STP1 A(+1), DISP = NEW //STP2 A(+2), DISP = NEW //STP3 A(+3), DISP = NEW //STP4 A(+1), DISP = OLD STP3 was abended and I want restart my JCL from STP3 onwards & what are the precaution I want to take & what are the changes I need to make. Pls let me know.

4 Answers   CTS,

---

how to run JCL thru COBOL.

1 Answers   Patni,

---

One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.

3 Answers   Cognizant,

---

how to resolve the soc4 error?

5 Answers   ITC Infotech,

---