牧野標本館タイプ標本データベースの構築

ファイルメーカー４のデータ解析

元となるファイル

MAK_type_database
PhotoCD_List

から構成されている。

ファイルメーカーデータファイルの構造解析（2/8/00）

ファイルメーカーのデータフィールドの一覧を作製するAppleScriptを以下に示す。この部分をコピーして、スクリプト内のコマンド「AppleScriptを実行」のコマンドとして貼り付ければ、データ内容一覧のテキストファイルを作ることが出来る。




      
tell application "ファイルメーカー Pro"
	-- getting the name of the front database
	set MyfName to the name of database 1
	tell application "Finder"
		set MyCCount to number of characters of MyfName
		if MyCCount > 25 then
			set MyfName to (characters 1 thru 25 of MyfName) & ".dat" as string
		else
			set MyfName to MyfName & ".dat" as string
		end if
		-- creating a text file to write the data
		set MyData to new file with prompt "Data File Name:" default name MyfName
		
		try
			set F to open for access MyData with write permission
			set eof F to 0
		on error MyResult
			display dialog "Error " & MyResult
		end try
		-- write the name as a headder
		write (MyfName as string) & return to F
	end tell
	set MyCellCount to number of fields of current layout
	-- getting name and type of each field
	repeat with i from 1 to MyCellCount
		-- using try loop to escape the error caused by ghost fields
		try
			set MyDataLine to ""
			set MyDataLine to ((name of field i of current layout) & tab) as string
			set MyDataLine to (MyDataLine & (default type of field i of current layout) ﾂ
				& return) as string
		end try
		try
			if MyDataLine is not "" then
				-- FileMaker 4 does not have function to write a file!
				tell application "Finder" to write MyDataLine to F
			end if
		on error MyResult
			close access F
			display dialog "Error " & MyResult
		end try
	end repeat
	try
		close access F
	on error MyResult
		display dialog "Error " & MyResult
	end try
	
end tell

データ構造の解析結果（2/8/00）

MAK_type_database.dat

項目名

属性

項目表示
No doub 標本番号
Type_Sci_name TEXT タイプ学名
PhotoCD_No::Stand_image PICT 画像Ｃ
PhotoCD_No::Thumb_image PICT 画像Ａ
Type_Jap_name TEXT タイプ和名
Family_name TEXT 科学名
Family_Jap_name TEXT 科和名
Curr_Jap_name TEXT 現行和名
Curr_Sci_name TEXT 現行学名
Curr_loc_J TEXT 現行地名（和）
Curr_loc_E TEXT 現行地名（英）
Orig_loc_J TEXT ラベル地名（和）
Orig_loc_E TEXT ラベル地名（英）
Altitude doub 標高
Coll_date doub 採集年月日
Coll_J TEXT 採集者（和）
Coll_E TEXT 採集者（英）
Coll_No TEXT 採集者番号
Duplicate TEXT 重複標本
M TEXT 牧野標本
Other_herbarium TEXT MAK以外の重複標本
Citation TEXT 原記載
Type_status TEXT タイプの種類
Synonyms TEXT 異名
family TEXT family
genus TEXT genus
species TEXT species
PhotoCD_No::PhotoID doub PhotoID
Image TEXT Image

PhotoCD_list.dat

項目名
 属性

注釈
No doub 標本番号（リレーション項目）
Thumb_image PICT 画像オブジェクト
PhotoCD doub PhotoCDの下４桁番号（文字データにすべき）
Photo_No doub PhotoCDの画像番号（文字データにすべき）
Thumbnail TEXT 画像ファイル所在計算値
Standard TEXT 画像ファイル所在計算値
PhotoID doub PhotoCDのID計算値（文字データにすべき）
Stand_image PICT 画像オブジェクト

データ項目の属性の修正

Copyright by Akira Kihara, Last changes: