Write NULL value

[Armando]

Hello Friends.

In a MySQL table I have a date type field that accepts null value,
when registering the record a date type value is saved in this field,
example 20210623, now how can I re-record NULL ?

BTW, I write all fields with this source code

Code: Select all  Expand view  RUN

STATIC FUNCTION Upgrade(oRsHdr)
   IF lAddD02
      oRsD02:AddNew()
      oRsD02:Fields("D02_NUMPRO"):Value   := oRsHdr:Fields("HDR_PRO"):Value
   ENDIF
   oRsD02:Fields("D02_FECVIS"):Value := oD02:FECVIS    // Fecha de la visita
   oRsD02:UpDate()
 

I tried with

Code: Select all  Expand view  RUN

   oRsD02:Fields("D02_FECVIS"):Value := NULL or NIL  // Fecha de la visita
 

But it does not work

I know that with the INSERT command it is possible but there are
more than 50 tables, one prg for each table, and each table has
more than 100 fields

Regards

[nageswaragunupudi]

Use FWH function AdoNull()

Code: Select all  Expand view  RUN

oRs:Fields( "datefield" ):Value := AdoNull()

This works.

When a NULL value is read, oRs:Fields( xx ):Value returns NIL.
But assigning NIL does not work. Assigning AdoNull() and then calling oRs:Update() works.

[Armando]

Mr. Rao:

Thank you very much, It Works fine.

Regards