cvs diff -w -i frmMigration.frm (in directory F:\CVS\pgadmin\)
Index: frmMigration.frm
===================================================================
RCS file: /usr/local/cvsroot/pgadmin/pgadmin/frmMigration.frm,v
retrieving revision 1.2
diff -w -i -r1.2 frmMigration.frm
1130a1131,1149
>                 Select Case rsTemp.Fields(Z).Type
>                    ' 04/24/2001 Jean-Michel POURE
>                    ' Usefull tricks to avoid bugs in non-English systems :
>                    ' replace comma with dots in numerical values
>                    ' and get rid of money acronyms (like FF for example)
>                     Case adCurrency, adDouble, adSingle, adDecimal
>                         Values = Values & "'" & Str(Val(Replace(rsTemp.Fields(Z).Value, ",", "."))) & "', "
>                    
>                    ' Another usefull tricks to avoid bugs in non-English systems :
>                    ' Convert 'True' or 'Vrai' or 'T' into -1
>                    ' and 'False' or 'Faux' or 'F' into 0
>                    ' In PostgreSQL driver uncheck Bool as Char
>                     Case adBoolean
>                         Dim tempValue As String
>                         tempValue = rsTemp.Fields(Z).Value
>                         If (tempValue = "F") Then tempValue = "False"
>                         If (tempValue = "T") Then tempValue = "True"
>                         Values = Values & "'" & CBool(tempValue) * "-1" & "', "
> 
1134c1153
<                 If rsTemp.Fields(Z).Type = adDate Or rsTemp.Fields(Z).Type = adDBDate Or rsTemp.Fields(Z).Type = adDBTimeStamp Then
---
>                      Case adDate, adDBDate, adDBTimeStamp
1142c1161,1163
<                 Else
---
>                        
>                       ' Text values and others
>                       Case Else
1144c1165
<                 End If
---
>                  End Select