IF .F.
__dbCreate( "TEMP" )
DBAPPEND()
FIELD->FIELD_NAME := "A0101"
FIELD->FIELD_TYPE := "C"
FIELD->FIELD_LEN := 20
FIELD->FIELD_DEC := 0
DBAPPEND()
FIELD->FIELD_NAME := "A0102"
FIELD->FIELD_TYPE := "C"
FIELD->FIELD_LEN := 20
FIELD->FIELD_DEC := 0
//總價
DBAPPEND()
FIELD->FIELD_NAME := "A0103"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 10
FIELD->FIELD_DEC := 0
//坪數
DBAPPEND()
FIELD->FIELD_NAME := "A0104"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 6
FIELD->FIELD_DEC := 2
//房
DBAPPEND()
FIELD->FIELD_NAME := "A0105"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 2
FIELD->FIELD_DEC := 0
//廳
DBAPPEND()
FIELD->FIELD_NAME := "A0106"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 2
FIELD->FIELD_DEC := 0
//衛
DBAPPEND()
FIELD->FIELD_NAME := "A0107"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 2
FIELD->FIELD_DEC := 0
//車
DBAPPEND()
FIELD->FIELD_NAME := "A0108"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 2
FIELD->FIELD_DEC := 0
//車價
DBAPPEND()
FIELD->FIELD_NAME := "A0109"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 10
FIELD->FIELD_DEC := 0
//車坪
DBAPPEND()
FIELD->FIELD_NAME := "A0110"
FIELD->FIELD_TYPE := "N"
FIELD->FIELD_LEN := 6
FIELD->FIELD_DEC := 2
DBCLOSEAREA()
__dbCreate( "TBA01", "TEMP" )
ENDIF