FileMaker [GetAsCSS]で変換された文字を元に戻す TAGはそのまま

スクリプト名[GetString(CSS)]
{
#[GetAsCSS]で変換された文字をデコード　TAGはそのまま
変数を設定 [$CSS; 値:Get(スクリプト引数)]
Loop # 変数を設定 [$P; 値:Position ( $CSS ; "&#" ; 1 ; 1 )]
If [$P = 0]
変数を設定 [$Result; 値:$Result & $CSS]
変数を設定 [$CSS; 値:""]
Else
変数を設定 [$Result; 値:$Result&Left ( $CSS ; $P-1 )]
変数を設定 [$CSS; 値:Middle ( $CSS ; $P ; Length ( $CSS )-$P+1 )]
End If # If [Left ($CSS ; 2 ) = "&#"]
変数を設定 [$CSScode; 値:Middle ( $CSS ; 3 ; 5 )]
変数を設定 [$String; 値:Char ( $CSScode )]
#
変数を設定 [$Result; 値:$Result & $String]
#
変数を設定 [$CSS; 値:Middle ( $CSS ; 9 ; Length ( $CSS )-8 )]
End If
Exit Loop If [IsEmpty ( $CSS )] End Loop
現在のスクリプト終了 [結果: $Result]
｝