1)how to do date validation in rpg?
2)how to delete dUPLICATE RECORDS?




Answers were Sorted based on User's Feedback



1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / anonymus

TO VALIDATE DATE IN RPG .GO FOR "TEST" OPCODE
TO DELETE DUPLICATE RECORDS IN RPG GO FOR READE &DELETE
OPCODES

Is This Answer Correct ?    13 Yes 6 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / madhusudhan

1. Date Validation you can do with TESTD

2. Duplicate Records. There are two ways to delete this
a. Through SQL, after selecting the RRN numbers, you can
use the delete statement in SQL to delete the unwanted
record based on the RRN
b. Through RPG, but if you use the SETLL and READE, all
the records along with the duplicates will get deleted , so
you need to use one variable for count, once it reaches 1 ,
stop doing the delete.

Is This Answer Correct ?    5 Yes 0 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / riyaz

Hi Sumathi, How can u delete duplicate records using RRN?

Is This Answer Correct ?    4 Yes 1 No




1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / swetha p rao

TEST works in RPG400 not in RPG.

Is This Answer Correct ?    3 Yes 2 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / raghav

1. TESTD

2. Delete from File1 F1 where RRN(f1) > (select MIN(RRN(F2)) from File1 F2 where F2.Field1 = F1.Field1)

Is This Answer Correct ?    1 Yes 0 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / chandu

We can delete duplicate records by using this:
factor1 opcode factor2 result eq
key setll pf
reade pf 50
dow *in50=*off
delete rec1
reade pf 50
enddo

Is This Answer Correct ?    4 Yes 4 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / vivek kumar dwivedi

FPF#4 UF E K DISK
C 'ABC ' SETLLR1 44 25
C *IN55 DOWEQ*OFF
C READER1 55
C *IN55 IFEQ *ON
C LEAVE
C ENDIF
C DELETR1
C ENDDO
C SETON LR

Is This Answer Correct ?    0 Yes 0 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / sekhar

For Date validation we can use TESTD Opcode
Duplicate records can be deleted using RRN

Is This Answer Correct ?    3 Yes 4 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / zhang

Hi Riyaz, Sorry I'm not Sumathi,
I guess maybe we can use SQL to do that.
Select RRN(tableA) from tableA ;
Delete from tableA where RRN(tableA) =? ;

Is This Answer Correct ?    4 Yes 6 No

1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?..

Answer / sekhar

1: FOR DATE VALIDATION

/FREE
TESTD(E) *ISO(WHAT EVER) DATE VARIABLE ;
IF %ERROR ;
DO SOME THING ;
ENDIF ;
/END-FREE
2: CREATE A LOGICAL ON THAT FILE WITH KEY SAY FILE1
IN RPG

FFILE1 IP E K DISK
D X S 9S 0
D
I RECORDFORMAT-FILE1
I KEYFIELD L1 (CONTROL INDICATOR)

/FREE
X += 1 ;
IF X <> 1 ;
DELETE RECORDFORMAT ;
ENDIF ;

/END-FREE
CL1 RESET X

Is This Answer Correct ?    0 Yes 2 No

Post New Answer



More RPG400 Interview Questions

program to find the number of objects used in a given program through a display.

2 Answers   IBM,


What is the compilation option that has to he specified while compiling an RPC program which uses a file having date data type field?

3 Answers   HSBC, IBM,


How can we search particular records from the database file in RPG. For example, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular 'NAME' field. How can we do the above using SEARCH criteria other than using the IF cond?

3 Answers   CTS,


while i am using the dspmsg command on comman line in Mocha am getting error like Not authorized to message queue message my messagequeue Name? can anybody help me how to change my message queue Am anable to see my messages in message queue

1 Answers  


The PGMA calls PGMB.PGMB generates a report.The report should contain the called program name(PGMA).How do i get the called program name in PGMB to print it on the spool file?(calling program name should NOT be hard coded or passed as parameter to called program?

6 Answers  






what is kids-rpg?

0 Answers   IBM,


Assume my file has 100 records and I want to see only first 10 records. Is this possible through lf?

0 Answers  


What will be your approach in going either for OPNQRYF or Logical files. Which one to go for?

2 Answers  


suppose i i am changing / updating record of subfile and i want to change the record in reverse order . means i want to change the bottom record first and so on through readc . how i do it please any one explain .

4 Answers   CSC,


Difference between creating a report using Printer file and WRKQRY(Query Report) ?

3 Answers  


what r drawbacks of OPM? Why do we go for ILE RPG?

1 Answers  


Can somebody tell me that, Is it possible to read all the member of PF without OVRDBF?

6 Answers  






Categories