how to check on which PF , the LF is dependant ?
Answers were Sorted based on User's Feedback
Answer / swetha p rao
DSPFD and Based on file attribute gives the physcial file
name on which logical is based
| Is This Answer Correct ? | 21 Yes | 1 No |
Answer / faina
DSPFD on a logical file and then scan for the word 'Based'.
Will point to a physical file this logical is based on.
| Is This Answer Correct ? | 6 Yes | 0 No |
in rpg could u please tell me errors types and meanings like 3030 that ....
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 use of sflnxtchg and use of MDT(modify data tag).both r same r not and can we use these on dspf and subfile.
how do you use commitment control in rpg?
what is meant by record lock.how records are locked.what is the purpose of record lock.if records are locked what happens.how to find out which record is locked.
How to find d key field of a pf that doesn’t have source physical file?
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
In RPG program one file using as a PRIMARY file while running program some of the records reading twice any body know why its happening
i)What is the command to lock a file in a program ii)2. Can you get a level check error in a CL program
How to sort an array in descending in RPG
how we retrieve records without using key field (ex:name) from Physical File through RPG in as/400?
What is I90(Insure 90)?