Thanks gagan for your answer,i'm new to as400,i don't know
embedded sql in rpg.can you send me the coding for the below
mentioned question in embedded sql rpg.
how to retrieve particular field records from a physical
file,say i have a physical file called 'employee' in it i
have to retrieve the records of a field 'admin' present in
pf 'employee' using rpg,but i should not use logical file
or openquery file.
Answer Posted / harshad r suryawaunshi
1. Declare cursor first - It will select all the record
available in the filed 'ADMIN'
c/exec sql
c+ declare cr1 cursor for
c+ select ADMIN from EMPLOYEE
c/end-exec
2. Open the cursor - its like seting the pointer on the
first record
c/exec sql
c+ open cr1
c/end-exec
3. Fetch the cursor - its like reading the records in the
cursor. NAME is the field defined in the program which
attributs are same as per field ADMIN.
c/exec sql
c+ fetch cr1 into :name
c/end-exec
This code u can execute in Do loop to read all the records.
The complete coding would look like this
c/exec sql
c+ fetch cr1 into :name
c/end-exec
C dow sqlcod <>100
C
C name dsply
c/exec sql
c+ fetch cr1 into :name
c/end-exec
C enddo
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
How to select highest score of each subject or how to select highest income of every month?
what is a rpg?
can anybody help me to solve this problem. the program that i m checking display error message saying "Record format for file AJDSPFFD does not match model file and decimal error. how to solve this problem. The AJDSPFFD is snapshot the AJTLOG that is the audit trail list.
We have job which is running as batch. It takes atleast 06 hours to complete tht job. But I wanna do tht job with in 3 hours?
How to write record if no field or the field are different in physical file in rpgle ?
Interviewer asked me write down DDS for load all subfile .can anybody write dds
Q:Hi all,i want accurate answer with code using in built functions.please sent me code as soon as posible. I have program nmed PGM1 which '' RETRIEVE Current production date''should correctly default the production date for the user who is issuing raw materials to the manufacturing.The production date can be different from the celendra date. However, the program does not make the correct adjustment for all manufacturing plants. there is a parameter which determines the production start time e.g. 07:00 if the system time precedes this,the program subtracts one from the celendra day.This work fine when the celendar day starts after production day as it does in England,the system should be adding one to the celendar day during the overlap. unfortunately the program was desined to assumed the celendar day always starts before the production day. Change required in the program: Change the PROGRAM PGM1 to use the new parrameter to decide whether to add or subtract 1 from the celendar day when determining the production date.
how can you display specific subfile page on the screen in unequal subfile?
Suppose we have one database file and it is used by 5 programs and in 3 program we have to add some records in datbase file s what is the impact on other program?
what was the robotech rpg?
Program to read marks of 10 students for 4 subjects and compute and display total marks and status of each student in rpg
How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique
What is difference between bind by copy and bind by reference?
can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com
do you use message subfiles? What are the necessary keywords required coding a message subfile?