Interested to Buy Any Domain ? << Click Here >> for more details...
Some times While checking MSGW for object / member /
record locks ,I have seen it's locked by itself ...? How
it happen and what action we need to perform if job is
updating / writing a record....?
- 6 Answers
- 15593 Views
- HSBC, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / guru
Usually a record lock will happen when you read a file
itself. To avoid file locks, use the following ways
1.Read(N)Read with no lock
2.When your file is in update mode and if you use any chain
function, then use Chain(N)
Cheers...
| Is This Answer Correct ? | 13 Yes | 1 No |
Answer / duvara (duvara.cse@gmail.com)
when the file is opened in update mode, when u chain the
same record two time continuously with out any updation bw
2 chains then u can face this problem. because the record
is locked by the first chain operation, so cannot chain the
same record again.
To relese the record simply update that record befor the
next chain/read.
| Is This Answer Correct ? | 6 Yes | 2 No |
Answer / rakesh roshan
This is true because either it must be updating the File or
Writing the record to the file and it places *EXCL Lock .
To handle such exception it depends upon the
Application ,if we want to handle such lock we can chain(N)
extender but then we need to see whether the File it is
writing or updating is having some constraints associated
or not , if yes
then we can handle the exception by using %Status of PSDS
DS and wait for few seconds and Retry it .
| Is This Answer Correct ? | 2 Yes | 1 No |
Answer / kathan
when u open file in update mode the record is automatic lock
to remove these condition u can use in ipc prompt N in H/N/P
entry
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / roshan.wankar
Before Perform Read operation, use SETLL and check Low
indicator is *ON then record is locked
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / syam
Two user is trying to write or update same record it is
geting lock.
1. Do change in your program all view and report program
open om Read mode only.
2. Do change in your program before update or write check
record is used by another user or not.
| Is This Answer Correct ? | 2 Yes | 6 No |
In a particular program one file is used where override command is applied to a file, now this program calls another program where we want to use the same file but without override.How it can be done?
where we give the MSGSFL in rpg400?
what happens when sflsiz = sflpag? What are the advantages and disadvantages?
what is the necessary keyword needed to scroll subfile records?
When will DUMP & DEBUG be ignored?
How to read data from Nth member of a physical file containing some X number of members in it? "Provided member names are unknown"
Suppose in CL we reach at end of file and again we have to reach from 1 record
ESCAPE message sent by child program can be handled by parent program using which keyword?
i have 6 char field in program, but this field is using in all files i want to chage field size as 10 char , how can i do this except using *like defn...?
What does Implicit Open means with respect to a file ? What about the Explicit Open?..what are the major differences between these two?
Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On
What is the OPEN and CLOSE accesspath?
RPG400 
