Contact Alpha tech support Error message

[goldberg2727]

Came across an error message that told me to contact alpha tech support. I sent a message to Richard to forward to tech support since I didn't know what tech support e-mail address was. Maybe somewhere here knows what this problem is and if my installation of alpha is gone screwy....

Here is the message i sent to tech support and a screenshot of the error message is attached.

Tech Support,
I recieved this error message that requested I send report this problem and send it to tech support. I am unsure of what the problem. I posted the code I was executing below this e-mail. I was writing xBasic to populate a listbox of a form. The code is on the OnInit action for the form I have called Wks_EditView. The table I am populating the listbox from is called tblws_items. The form is based on a single table called "Wks_EditView". Also, to note I have been having problems with the tblws_items table. I am unsure if it is corrupted or something but the other day I went to add a field and populate it with a calculated field. I added the field and defined the calculation but when I went to recalculate the field rules for the table it only made it halfway through the table, I tried to rebuild the indexes and that didn't work so I recalculate and fill the field manually and it made it still only got about halfway through. So now that I am trying to lookup this table, I don;t know if this problem is related. (screenshot of the error message is attached)

Thanks in advance,
Lee

xBasic Script....

'Date Created: 15-Jul-2010 02:10:48 AM
'Last Updated: 20-Jul-2010 12:50:53 AM
'Created By  : LEN-LEE-10
'Updated By  : LEN-LEE-10

'There are several additional optional parameters that you can specify for 
'each choice. The parameters are all delimited with the vertical bar character.
'
'For each choice, you can specify the following parameters:
'
'<label>|<value>|<bitmap type>|<bitmap name>|<pressed bitmap type>|<pressed bitmap name>

DIM pObj AS P
DIM pEmpObj as p
DIM pTrkObj as p
DIM vListItemCode as c
DIM vListItemDesc as c
DIM vListItemQty as 
DIM vListEmp as c
DIM vListTrk as c
DIM cWksNum as n
cWksNum = parentform:wksht_num.value
vListItemCode = table.external_record_content_get("tblws_items","alltrim(str(item_code)) + ' - ' + alltrim(Desc) +' - '+ alltrim(str(Qty)) + ' |  BillRate: ' + alltrim(str(bill_rate))+ ' PayRate: ' + alltrim(str(pay_rate))","Item_Code","Wksht_num = val('"+cWksNum+"')")
'Values of the Tree Control Object Named: vItems of WksView_Edit are defined with xBasic below...
pObj = topparent:vItems.this
pObj.settings.dynamic_list = vListItemCode


vEditMode = .f.

parentform.Allow_Change(vEditMode)

[goldberg2727]

Re: Contact Alpha tech support Error message

Nevermind i didn't define the variable type for vListItemQty.... (one little character)