Returns a type from its textual representation.

Type.FromText

let func =   
 (TypeAsText as text) =>
Record.Field(
    [type null = Expression.Evaluate( "type null", [ type null = type null] ), 
    type logical = Expression.Evaluate( "type logical", [ type logical = type logical] ), 
    type decimal = Expression.Evaluate( "type number", [ type number = type number] ), 
    type time = Expression.Evaluate( "type time", [ type time = type time] ), 
    type date = Expression.Evaluate( "type date", [ type date = type date] ), 
    type datetime = Expression.Evaluate( "type datetime", [ type datetime = type datetime] ), 
    type datetimezone = Expression.Evaluate( "type datetimezone", [ type datetimezone = type datetimezone] ), 
    type duration = Expression.Evaluate( "type duration", [ type duration = type duration] ), 
    type text = Expression.Evaluate( "type text", [ type text = type text] ), 
    type binary = Expression.Evaluate( "type binary", [ type binary = type binary] ), 
    type type = Expression.Evaluate( "type type", [ type type = type type] ), 
    type list = Expression.Evaluate( "type list", [ type list = type list] ), 
    type record = Expression.Evaluate( "type record", [ type record = type record] ), 
    type table = Expression.Evaluate( "type table", [ type table = type table] ), 
    type function = Expression.Evaluate( "type function", [ type function = type function] ), 
    type anynonnull = Expression.Evaluate( "type anynonnull", [ type anynonnull = type anynonnull] )],
TypeAsText) ,
documentation = [
Documentation.Name =  " Type.FromText ",
Documentation.Description = " Returns a type from its textual representation. ",
Documentation.LongDescription = " Returns a type from its textual representation. Only primitive types will be returned",
Documentation.Category = " Type ",
Documentation.Source = " www.TheBIccountant.com https://wp.me/p6lgsG-2dd .   ",
Documentation.Version = " 2.1: Added different number types ",
Documentation.Author = " Imke Feldmann: www.TheBIccountant.com.  ",
Documentation.Examples = {[Description =  "  ",
Code = " Type.FromText(""type number"") ",
Result = " number (as type) "]}]
  
 in  
  Value.ReplaceType(func, Value.ReplaceMetadata(Value.Type(func), documentation))

Adjusted to include only primitive types.