屋價資料庫

屋價資料庫


IF .F.
  aStruct := { ;
 { 'A0101', 'C', 20, 0 } ;
,{ 'A0102', 'C', 20, 0 } ;
,{ 'A0103', 'N', 10, 0 } ; //總價
,{ 'A0104', 'N',  6, 2 } ; //坪數
,{ 'A0105', 'N',  2, 0 } ; //房
,{ 'A0106', 'N',  2, 0 } ; //衛
,{ 'A0107', 'N',  2, 0 } ; //廳
,{ 'A0108', 'N',  2, 0 } ; //車
,{ 'A0109', 'N', 10, 0 } ; //車價
,{ 'A0110', 'N',  6, 2 } ; //車坪
}
  REQUEST DBFCDX
  dbCreate( 'TBA01', aStruct, 'DBFCDX', .t., 'TBA01' )
ENDIF