Hi friends i have i question please reply me asap.
what would be coding in DDS and programing part for this
condition suppose that i have three fields in the display
file(subfile)which has 7 record format.
Condition is ''The supplier LOT, ISSUED TO PROD and LINE
GRP fields in display file(Subfile) will not be shown if
their respective fields are blank/zero in the record formats
WIM311FM and Record format WIM311FM.
I want coding part in DDS and Programing.
Please reply me as soon as posible.
Answer Posted / 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
| Is This Answer Correct ? | 0 Yes | 1 No |
Post New Answer View All Answers
Can you summarize the steps I have to go through in writing my first cgi?
what are the three types of keywords associated with printer file ?
different type of cursor?
what is the syntax for plist?
the maximum number of subfiles that can be active for a single file is ____ .
can you specify a display file to be used in the following modes input,output, or combined modes ?
any one have give AS400 study material? pls pass it to gopalsai789@gmail.com
what opcode will be used to test the zone of a character field?
what is a spool file?
what are the limitations of cl (compare to rpg) ?
what is a primary file?
why do we use readc? What is sflnxtchg?
What is the Difference between command attention key and command function key ?
Why we are not able to perform insert delete and update operation in Join logical file?
what is the difference between udate and the system date?