Sample Progress 4GL Query to check duplicate customer in the table

By -
Sample Query to check duplicate customer in the table

Define buffer mBuf FOR xx_mstr.
Define buffer kBuf FOR xx_mstr.

Define temp-table tt
   Field tt_recid as recid .


 Empty temp-table tt.

 Output to "Duplicate_records.xls".
 FOR EACH each xx_mstr no-lock :
    FIND first tt where tt_recid = recid(xx_mstr) no-lock NO-ERROR.
    IF avail tt THEN next.

    FIND First mBuf where mBuf.cust-num = xx_mstr.cust-num and recid(mBuf) <> recid(xx_mstr) no-lock no-error.
    IF avail mBuf THEN
    do:
      Export delimiter "~011" mBuf.

      FOR EACH kbuf where kbuf.cust-num = xx_mstr.cust-num :
           create tt
     Assign
tt_recid = recid(mBuf).      
      END.
    End.        
 END.
 output close.

Comments

Post a Comment

Popular posts from this blog

Progress 4GL interview questions for QAD technology

By -
1.        What is “No-undo” in the variable declaration? 2.        What are the different .pf parameters 3.        What are the different types of  locks in progress? Explain with example. If a record is locked Exclusively, can a shared lock be provided over the same? 4.        What are different type of procedures in progress? Can internal procedure call other internal procedure? If yes how? If no why no? Can external procedure call internal procedures? 5.        How is array defined in progress? What is the limit of extent for progress? Can we create 2 dimensional / multi dimensional arrays in progress / How? If no then how can we achieve the same? 6.        What are browses? 7.        What are queries? 8.        Can we call e...
Read more

QAD interview questions for SE and Eb2 version

By -
1.       What is the difference between WO close and WO accounting close. 2.       What are the different types of transaction types in mfg-pro 3.       What is tag count when it is used 4.       Explain the purchase cycle 5.       What is the difference between the WO module and Repetitive  module. 6.       Explain the Payment cycle 7.       Explain the Sales Cycle 8.       What is a schedule order 9.       Explain GTM why and where it can be used 10.   How can u ensure that the supplier is given a schedule on a particular day of the week say only on Monday. 11.   What is MRP .What are the different types of MRP 12.   Can the  status of the the material can be changed 13.   What are financial transactions pass...
Read more

Sample code to do cim load in QAD/MFGPRO

By -
{mfdeclre.i} OUTPUT TO  "/home/hu/maggonm/rscupcimout.txt" . INPUT FROM "/home/hu/maggonm/rscup.cim" . {gprun.i ""rscup.p""}  INPUT CLOSE . OUTPUT CLOSE. Where   "rscup.cim" is the cim file which you want to load.   "rscup.p" is the program in which you are doing cim load.   "rscupcimout.txt" is the output file which shows the screen shot of the screens while doing cim load.
Read more