home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 May / PCO_5_97.ISO / FilesBBS / OS2 / RDB084R2.ARJ / RDB084R2.ZIP / unixplug.Zip / plugin.nrx < prev    next >
Encoding:
Text File  |  1996-11-18  |  967 b   |  38 lines
  1. /* A simple plug-in template */
  2.  
  3. rx = RXFile()
  4. rHowManyFld = Rexx
  5. rHowManyRec = Rexx
  6. rFieldName = Rexx[]
  7. rFieldValue = Rexx[,]
  8. iCount = int
  9.  
  10. rHowManyFld = rx.linein() /* How many fields? */
  11. rFieldName = Rexx[rHowManyFld + 1]
  12.  
  13. loop iCount = 1 to rHowManyFld
  14.  rFieldName[iCount] = rx.linein() /* Get field names */
  15. end
  16.  
  17. rHowManyRec = rx.linein() /* How many records? */
  18. rFieldValue = Rexx[rHowManyFld + 1, rHowManyRec + 1]
  19.  
  20. loop iCount = 1 to rHowManyRec /* Records */
  21.  loop iCount2 = 1 to rHowManyFld
  22.   rFieldValue[iCount2, iCount] = rx.linein()
  23.  end
  24. end
  25.  
  26. /* 
  27.  
  28.    Now you have:
  29.       in rFieldName[1..rHowManyFld] all the field names.
  30.       in rFieldValue[1..rHowManyFld, 1..rHowManyRec] all the records that the user
  31.       has selected before calling the plugin, field by field and record by record.
  32.  
  33.    From now on you can write your own plug-in.. 
  34.    Remember to insert it into plugin.ini, or it won't show up in MaxBase!
  35.  
  36. */
  37.  
  38.