Prices : Array : XMLRecord = <> ..

- RecordsIn File_name '/' Flags ( R : 
                                      - ParseRecord >Prices< R [ R.Attr->>'price' ] 
                                ) 
' Flags = PARSE_ALL | PARSE_FILE | READ_ANYWAY
