Answer / syam

This for Display file
Be4 writing the Subfile record you need to clear first.
A R PCKSFL SFL
A SFLNXTCHG
A LOT 17A O 9 40COLOR(WHT)
A ISSUED TO PROD 9A O 9 40COLOR(WHT)
A LINE GRP 5Y 0O 9 3EDTCDE(Z)
A POINT 4S 0H
A R PCKCTL SFLCTL(PCKSFL)
A OVERLAY
A 80 SFLDSP
A 80 SFLDSPCTL
A N80 SFLCLR
A N81 SFLEND(*MORE)
A SFLSIZ(0008)
A SFLPAG(0007)
Program Part in RPG
FPICKSLD CF E WORKSTN USROPN
F POINT KSFILE PCKSFL

C PROCES BEGSR
C EXSR CLRSFL
C READ PICK01 41
C *IN41 DOWEQ*OFF
C ADD 1 POINT
C WRITEPCKSFL
C ENDIF
C READ PICK01 41
C ENDDO
C WRITEPCKCTL
C ENDDO
C ENDSR
* BE4 LOADING SLF HERE IT IS CLEARING
C CLRSFL BEGSR
C Z-ADD0 POINT
C Z-ADD0 SLNO
C SETOF 80
C WRITEPCKCTL
C SETON 80
C ENDSR

what is library?

1 Answers   IBM,

---

what is elastic and non elastic subrile?

0 Answers   IBM,

---

Q. Soppose one job is running in a batch mode for long time now i want to kill(end)this batch job.How you will achive this?

4 Answers   IBM,

---

What is file access opcodes?

0 Answers   IBM,

---

what is RCLRSC?

2 Answers  

---

What is the difference between a Physical File & a Logical?

28 Answers   Accenture, ACS, IBM,

---

maximum number of subfiles that can be active for a single file is?

1 Answers   IBM,

---

what is a composite key?

1 Answers   IBM,

---

What is the difference between regular logical file and join logical file?

1 Answers  

---

Suppose we have field reference file we were any changes that corresponding Physical file then what will Happen in field reference file??

5 Answers   IBM,

---

if &var='good++++' &var2='day' &var *cat &var2 &var1 *tcat &var2 what is output

2 Answers  

---

How can you check the existence of object in a system?

1 Answers  

---