Answer / vaibhav gupta

For 2) If a file is declared in Cl pgm we can get a level
check error in the CL pgm.

Answer / naveen chandra joshi

The questions asked are:
i)What is the command to lock a file in a program?

ii)Can you get a level check error in a CL program?

Answers:
1) ALCOBJ,

2) Yes,if the file is declared in CL program then we can get Level Check error in case of record level identifier mismatched. I have tried this in the system and then only posting over here.

Regards,
Naveen Chandra Joshi.
+91.9891501280.

Answer / avinash

1) ALCOBJ
2) No,not in CLP

Answer / saravan

1) We can lock by using ALCOBJ command. To know about
object locks, use WRKOBJLCK file_name.
2) As every thing (File name, variable) will be taken as
parameter and path will be created each time in CL, we
won't get any level check error.
In RPG/LE, the level Id will be mapped to the program and
so we will get level check error.

Answer / ss

in CL , level check is not handle

Answer / rakesh

1.wenever u use a keyword USROPN in rpg pgm ,ten u r locking
tat file......
2. we wont get level check errors in clle..

What is significance of a file designated as a Primary file in Rpg400 program....also what's use of secoundry file

1 Answers  

HI,1: What is the function of 'SETON LR' AND '*INLR=*ON ? 2:Can we used "seton lr" OR "*INLR = *ON" in between the program code ? 3:if yes then according to there function the code which is written acter seton lr/ *inlr should not be execute . Can any one tell me why those code get executed ?

2 Answers  

what is EXCEPT command in rpg and use

1 Answers   Active Brains,

can i use unique key in LF

3 Answers   TCS,

What is the purpose of record level identifier?

0 Answers  

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?

6 Answers   Hexaware,

How to create a key field for a logical file inside RPG?

4 Answers   HSBC,

Hi, I am getting the error in RPG (All Record Formats for externally-described file ABCD ignored or dropped due to error; file ignored.) Please suggest any

2 Answers   Satyam,

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

0 Answers   IBM,

how do I preserve and clean the array?

0 Answers   IBM,

Why there is invention of RPG if we can do insert update delete in CL through SQL.Why the rise of RPG?

1 Answers   Infogain,

How can we call CL program to RPG? How many number of parameter we can pass

2 Answers   TCS,