prompt-editor

[Otto]

Hello friends,
We have released a new program called "prompt-editor."

It is a simple editor that stores standard prompts for ChatGPT, making it easier to edit the questions.

Now, we need to update the DBF file that contains the standard questions over the internet.

What is the simplest way to do this?

Best regards,
Otto

[karinha]

Now, we need to update the DBF file that contains the standard questions over the internet.

Ahora, necesitamos actualizar el archivo DBF que contiene las preguntas estándar a través de Internet.

Master Otto, explain better.

Maestro Otto, explíquese mejor.

Thanks.

Regards, saludos.

[Otto]

Hello Joao,

It is a simple program. Standard tasks are stored in the DBF file, as you can see in the second screenshot.

The quality of the prompt is important for the results provided by ChatGPT.

We offer a service where we store standard questions, such as a list of allergens according to Austrian regulations or many others.

We would like to distribute the updates over the internet. I also need a solution for the executable file.

Regards,
Otto

[Otto]

... BTW, this is the answer to the shown question:

Code: Select all  Expand view

Sure, here are the posts from May 31, 2023, that I found on the FiveTech forum:

"prompt-editor" by Otto. Last post at 12:49 PM.
"hb_CDPSELECT() crash ?" by Jimmy. Last post at 12:32 PM.
"CLASS modification" by Otto. Last post at 7:09 AM.
"Problem with xBrowse" by Armando. Last post at 4:23 AM.
"Fastreport de Cristobal" by mgsoft. Last post at 12:06 PM.
"Como evitar warnings" by JoseAlvarez. Last post at 12:02 PM.
"HBSSL CON FUNCIONES DE DIEGO FAZIO INCLUIDAS" by rterraz. Last post at 7:23 AM​1​​2​.
As for the xBase forum, I've checked several sub-forums but did not find any posts from May 31, 2023. It seems the forum isn't as active as the FiveTech one, or it could be due to the time difference and posts might appear later in the day. It would be a good idea to check the forum again later in the day.

 

[Silvio.Falconi]

Fastreport de Cristobal ???????

[Otto]

Hello friends,
I start testing with these functions:

Code: Select all  Expand view

function jsonerzeugen()

    LOCAL cDbf :="INIfiles.dbf"
    LOCAL aData := {}
   LOCAL cJson, nHandle
   
   USE (cDbf) ALIAS MyTable NEW

   DBGOTOP()

   DO WHILE !EOF()
      AADD(aData, GetRecordData())
      DBSKIP()
   ENDDO

   USE

   cJson := hb_jsonEncode(aData)
   
   ? cJson

   nHandle := FCreate("output.json", 0)
   
   FWrite(nHandle, cJson, LEN(cJson))
   
   FClose(nHandle)
 
RETURN

And to read the json fill from the web:

Code: Select all  Expand view

  #include "FiveWin.ch"

    function Main()

       local cURL := "https://w...1/output.json"
       local cDownload := ""
         local h
       cDownload := WebPageContents( cURL )
 
 
        hb_JsonDecode( StrTran( cDownload, "=>", ":" ), @h )
        xbrowse( h )


    return nil