function __obr_to_lab ($obr,$patient)
Convert parsed OBR array into labs record ID
Record id, or false if none is found.