how do u find whether a record is locked or not??
Answers were Sorted based on User's Feedback
Answer / sachin k gupta
Command DSPRCDLCK - Display record lock
Sachin Kr Gupta
|Is This Answer Correct ?||11 Yes||2 No|
Answer / samul
in rpg,*PSSr routine will call
u need to handle *status = 01218.
and while reading the record(If file is in update mode)
Klist Chain(N) Record
N: Extender to avoid the record lock whne file is in
|Is This Answer Correct ?||8 Yes||0 No|
Answer / ravi shankar porwal
One of the way is Use commond - CHKRCDLCK.
|Is This Answer Correct ?||2 Yes||7 No|
3. Given the DOS Specification below and the following information: • Indicator 50 is off • No records have been written to the subfile What will be the result if the EXFMT operation code is performed on the record format CTLR? A R SUBFL A DESCRIP 101 6 1ODSPATR(UL) A DFT(’NOT FOUND’) A R CTLR SFLCTL(SUBFL) A N50 SFLDSP A SFLDSPCTL A SFLINZ A 67 SFIJEND A SFLSIZ(13) A SFLPAG(12) A ACCOUNTNO 100 S 10 a.) Only AccountNo will display b.) SUBFL will be initialized with 13 blank records c.) An I/O exception error will occur d.) The screen will display 12 records with ‘NOT FOUND’
i want to retrieve record b/w 2 dates in as400
i 'm new to as/400.in an interview i was asked this question.give a practical example for passing information or data through local data area. I know only that data area is an object used to store tiny bits of data or it can store one value at a time and it is used to store frequently changing values or datas.thats all i know about data area can any one tell me how local data area and user defined data area are used to pass data between jobs with a example or coding.thanks in advance.
can anybody help me that what is the procedure of debugging the service program?
I know chain keyword retreive records randomly but how chain keyword exactly works internally????
How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?
1. If there are two programs using same file and 2 users are using the file at the same time and what can be done to allow them both to access? 2. How can remove lock from the file for accessing it by both users?
what is the difference between do while and do until?
Hi friends, Can you give the solution for the below mention simple code.and explain.what is output D CHR1 S 4A INZ('PEN') D CHR2 S 10A INZ('MYGET') D CHR3 S 8A INZ('GOOD') D CHR4 S 22A INZ C MOVEL CHR1 CHR4 C MOVE CHR2 CHR4 C EVAL CHR4=CHR3 C MOVE CHR1 CHR4
Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the value of field2 after excuted of CHGVAR command.
1.Coding in cl to send an message? 2..What is turnover and use? What are the different levels?
What is difference between bind by copy and bind by reference?