Variable Type "H"

[reynolditpi]

I have tried to use the action script to create a new record using xbasic to add a record which contains a html memo field.

A5 dimmed the variable type for the html field as "H" which i am assuming means html. Regardless, when the script is run alpha does not recognize "H" as a valid variable type.

Since A5 dimmed the variable itself should it not then recognize it?

[Davidk]

I've had a look through help and can't see a variable data type "H"

[reynolditpi]

David,
I couldnt find it either. However, A5 still dimmed it as "H" in my action script

[Davidk]

I added a button to form, which executed a script via xbasic. The script added a new record, setting an HTML Memo field to the value "Test". The script ran fine.

I converted the script to in-line xbasic... here's the code... is this what you're referring to? It's not dimming the field as "H".

'Open the table that you want to update...
dim tbl as p
tbl = table.open("tblclaims",FILE_RW_SHARED)

tbl.enter_begin()
tbl.HTMLTEST = "Test"
tbl.enter_end(.t.)
tbl.close()

[MikeC]

Tony,
Could just be an anomaly, quirk, whathaveyou.....earlier today I noticed after messing with a couple of calculated definitions, they showed up in the xy dialog box's bottom left side of the status bar as a type Z (zee). And I know this is not a variable type. Once I got the calculation to work as I wanted and leaving Alpha and coming back, it shows as N as it should.

[csda1]

Hi Tony,

I can't speak to the cause of an action script DIM'ing as H (It would be useful if you could show the action or post some code here), however, I have compiled a list of various types that help highlight some of this. I suspect there is a minor bug with the action script. Type "H" was added to the Memo field types in A5v9.

The types are basically defined as

' Types actually stored in a DBF Table Structure
' C=Character
' N=numeric
' L=Logical (width 1)
' D=Date (width 8)
' T=Time (width 17)
' Y=Short Time (width 9)
' E=ExponentNumeric (width 20)
' K=UUID (width 32) A5v9
' M=Memo (width 10)
' M=Bitmap Memo (width 10)
' M=OLE Memo (width 10)
' M=Rich Text Field Memo (width 10)
' M=JPEG image Memo (width 10)
' M=Image File Reference Memo (width 10)
' M=HTML Memo (width 10) A5v9

' Variable types allowed in XBasic Code
' A=Any Type
' B=Blob
' C=Character
' D=Date
' F=Function
' L=Logical
' N=numeric
' P=Pointer
' T=Time
' U=Collection
' Y=Short Time
' Z=Undefined (Null) Type
' K=UUID (A5v9)
' I=I Type (This type is unknown in it's usage)

' non-Memo field types (Data types as stored in the Data Dictionaries)
' C=Character
' N=numeric
' L=Logical (width 1)
' D=Date (width 8)
' T=Time (width 17)
' Y=Short Time (width 9)
' E=ExponentNumeric (width 20)
' K=UUID (width 32) A5v9
' Memo field types (Data types as stored in the Data Dictionaries)
' M=Memo (width 10)
' B=Bitmap image Memo (width 10)
' O=OLE Memo (width 10)
' R=Rich Text Field Memo (width 10)
' J=JPEG image Memo (width 10)
' I=Image File Reference Memo (width 10) (Not sure if L and I are the same or different)
' L=Image File Reference Memo (width 10) (sometimes referred to as a LINK field)
' H=HTML Memo (width 10) A5v9

Main questionable areas are Type I in the variables and Type I/L in the Dictionaries.

I hope this helps some!

[reynolditpi]

Thanks guys. A lot of good info. For what it is worth, I have been able to consistantly reproduce the problem.

Here is the xbasic for the action script. Note the variable type H.

'Open the table that you want to update...
dim tbl as p 
tbl = table.open("test",FILE_RW_SHARED)
'Use an Xdialog box to prompt for field values.....
dim flag_ok_selected as l
flag_ok_selected = .f.
'
DIM  Prompt_var_1 as H
DIM  ui_get_parameters_result as C
Prompt_var_1 = convert_type("","H")
ok_button_label = "&OK"
cancel_button_label = "&Cancel"
ui_get_parameters_result = ui_dlg_box("Enter field values",<<%dlg%
{region}
Htmlfield:| [.40Prompt_var_1];
{endregion};
{line=1,0};
{region}
<*15=ok_button_label!OK> <15=cancel_button_label!CANCEL>
{endregion};
%dlg%,<<%code%
if a_dlg_button = "ok" then 
	flag_ok_selected = .t. 
end if 

%code%)
if ui_get_parameters_result <> "OK" then 
	end 
end if 
	
tbl.enter_begin()
tbl.HTMLFIELD = prompt_var_1
tbl.enter_end(.t.)
tbl.close()

Also note that this action script produces an error and wont run.
T

[csda1]

Hi Tony,

Originally Posted by reynolditpi

.... Note the variable type H.

....
DIM  Prompt_var_1 as H
DIM  ui_get_parameters_result as C
Prompt_var_1 = convert_type("","H")
....

If you change the XBasic code line

DIM Prompt_var_1 as H

to

DIM Prompt_var_1 as C

it should work. "Type "H" in a memo field is treated as type "C" in XBasic.

However, whatever action script you were doing, has a bug in it that generates it as type "H", which is wrong. Since people using Action Scripts don't necessarily understand the code that it is generating, it is easier for a bug like this to slip into the code, particularly with new data types, as they don't look at the underlying code and can only recognize a bug when it causes a noticeable error.


Let us know what action script line you are using and it's parameters that generates the offending code, and report the bug to Alpha.