check existence of one record without using chain or read?
- 1 Answers
- 1342 Views
- IBM, I also Faced
- E-Mail Answers
Answer / amit
Use setll with %equal to check if the record exists or not.
| Is This Answer Correct ? | 0 Yes | 0 No |
how do you use commitment control in rpg?
Can we create 300 logical files based on a single physical file using the CRTLF command only once?.
check existence of one record without using chain or read?
How Chain operation copies the record's data to the input buffer for the program?
how do I play {insert rpg system here}?
is this a rpg channel?
Difference between RESET and CLEAR
Mr.Yallamanda Reddy P thanks for your answer sir,can we use test(D) opcode in RPG/400,if yes please help me by eloborating on that answer by writing a sample code for that sir
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
How to update selected fields from pf without using update opcode. How to read all member in Rpg-3,without using any cl command?
How do you find out whether a record is present in the physical file without reading the file? for Example Employee No: 100 in an Employee master.How do we find out whther 100 is present in Employee master without reading the file?
11 Answers Bank Of America, CSC, IBM,
CAN WE READ RECORDS WITHOUT USING SETLL,READ,CHAIN IN RPG?
RPG400 
