FiveTech Software tech support forums

agentdoc.prg

Dear Antonio,
and the challenge afterward is to manage this information.

I have been working on a comprehensive DMS for a long time. That’s why I often contribute opinions suggesting that the filesystem serves as a database and some form of DBFs as content directories.
I cannot imagine that the data volumes generated by AI will work in the future by being imported into SQL and analyzed through SQL queries.

Best regards,
Otto

Does it works?

Antonio Linares wrote: Thu Jan 16, 2025 5:48 pm agentdoc.prg

Code: Select all | Expand

#include "FiveWin.ch"

REQUEST DBFCDX

function Main()

   local aFiles := Directory( "c:\fwh\source\classes\*.prg" )
   local oChat  := TDeepSeek():New(), aFile
   local cPrompt := "document this code, explaining what this Class is about," + ;
                    " listing all the DATAs and METHODs," + ;
                    " and providing a brief description of each of them. Code:"

   DbCreate( "classes.dbf", { { "name", "C", 15, 0 }, { "docs", "M", 10, 0 } }, "DBFCDX" )
   USE classes

   for each aFile in aFiles
      MsgRun( "documenting " + aFile[ 1 ],;
              "please wait...", { || oChat:Send( cPrompt + ;
              hb_memoRead( "c:\fwh\source\classes\" + aFile[ 1 ] ) ) } ) 

      DbAppend()
      classes->name := aFile[ 1 ]
      classes->docs := oChat:GetValue()
   next
   
   GO TOP
   XBrowse()

return nil

Yes!

agentdoc2.prg is a new example using AI included in next FWH build soon to be published