Answer Posted / dimpy19
1.The LMPUT service writes one logical record to the data set associated with a given data ID.
2.The first LMPUT writes the first logical record to the data set, and later invocations write succeeding records.
3.The LMINIT service with ENQ(EXCLU), ENQ(SHRW), ENQ(MOD), and the LMOPEN service with the OUTPUT option must be completed before you can use the LMPUT service.
4.In INVAR mode and MULTX mode, the data-location parameter variable contains the data itself.
In MOVE mode, the data-location parameter contains the address of the data to be written.
>>-ISPEXEC--LMPUT--DATAID(data-id)--MODE(-+-INVAR-+-)----------->
+-MOVE--+
'-MULTX-'
>--DATALOC(dataloc-var)--DATALEN(data-length)--+---------+-----><
'-NOBSCAN-'
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records... run a loop from record one to 10 evaluate i/3 if comes even then skip else write to output file
How to override loadlib?
Explain the purpose of dd dummy statement?
What is the function of the dd avgrec keyword in sms datasets?
Immediate Job opening for mainframe professionals in Keane Bangalore. Please find the below details: Organization: Keane India Location: Bangalore Skill: COBOL, JCL,VSAM,DB2,CICS,IMS,REXX,CLIST Exp: 1 to 4 years only Employment Type: Permenant Employee Note: If you have attended keane interview in past 6 months please ignore this job opening. Please respond to email id keanemfjob@gmail.com OR keanemfjob@yahoo.in with your latest resume and following details, We will contact you within 24 hours: Total IT Exp: Exp in Mainframe: Current CTC: Expected CTC: Notice Period:
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
How to read and write a single record into a file. I would like to use it to enter a single 8-character piece of information and use it to put it into a variable for processing in JCL. Thank you
What does a disposition of (new,catlg,keep) for a dsn mean?
What is NOTCAT ?
How do you overcome this limitation ?
what is the use of IEBGENER utility?
Can anybody tell what is tool used to generate the list of PROCS used in JCL to generate a PROCTREE
What is the syntax of JCL statement?
How do you run a COBOL batch program from a JCL? How do you run a COBOL/DB2 program?
what is “Cond= even” and “Cond=only”?