i have a string of 80 chars i want to replace 4th char with "a"?
Answer Posted / mchava
first move string 4th position to one variable
ex: string(4:1)=ws-string
then use inspect and replace words
ex: INSPECT STRING REPLACING WS-STRING BY 'a'
BEFORE SPACE/'.'/(end of the sting).
| Is This Answer Correct ? | 3 Yes | 1 No |
Post New Answer View All Answers
WORKING-STORAGE SECTION. 01 GROSS-PAY. 05 BASIC-PAY PIC 9(5). 05 ALLOWENCES PIC 9(3). PROCEDURE DIVISION. MOVE 1000 TO BASIC-PAY. MOVE 250 TO ALLOWENCES. DISPLAY GROSS-PAY. STOP RUN. 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
List the different jcl statements that are not permitted in the procedures?
Why block size is multiple of lrecl in jcl?
How to pass the parameter in parm using linkage section ? (syntax)?
Explain about ISPF/TSO Commands
How do you submit a job for execution?
What does it mean by Restart and Checkpoint in JCL ? How are checkpoints being taken and what is their usage ? How to use Checkpoint macro on a JOBSTEP ?
What do you understand by the term job time – out and how can you overcome that?
How can a stopped job be started again?
Explain the function of the steplib dd statement?
I have a cobol db2 program(PGM A) where other program (PGM B) will call this program and passes some 50 fields data to PGM A. PGM A has some layout in which it receives the data from PGM B. And this layout has been copied in the linkage section pf PGM A. After getting the data, PGM A writes the data in a flat file in the same layout which it receives from PGM B. PGM B is a simple COBOL pgm. Please provide a JCL to run these programs.
what is use of dsn parameter in dd statement?
What are steplib and joblib?
what is the use of IEBGENER utility?
How do you create a temporary dataset?