Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Old Basic Language Code
Message
From
01/07/2008 13:39:41
 
 
To
01/07/2008 10:41:47
Hilmar Zonneveld
Independent Consultant
Cochabamba, Bolivia
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01327712
Message ID:
01327975
Views:
12
Hi Hilmar,

It's been quite sometime since I did anything with Basic but I did work for MAI Basic Four for a period (not real memorable either) but as for your questions......

The # from what I remember is a comment type marker for Quick Basic or Business Basic.... tells the interpreter not to tokenize or compile this line of code..... in your case it might be a marker that the printer understands as the beginning of the command. Your printer manual should describe command structure. The $mid is the substring within a string just the same as substr($variable,1,4).
The & might be a signal to the printer as the command line end and the $ signifies a string type of variable in the basic code. The complete line appears to be a concatenated command within #......& sent to the Auxilary Port (sendAux).

My best guess.....




>>I am using a product called LinxBasic which is a subset of Quick Basic. We are stuck with this since it comes with the Linx Data terminals we use to send data to our Foxpro tables in our plant. I have had to make a new set of code, which was easy following the pattern of previous code, and made a few changes for a new terminal. We are stuck on making our barcode labels print with the product number, serial #, weight, etc.
>>
>>Can someone explain to me what the following code "#" means? Is this a Basic Language Printer wake-up code? We can't seem to figure out what the wake-up code is for a new DataMax I-4208 Printer. Even the people at Linx Data Inc. don't know how to do this. Any old Basic Language gurus out there? Also, what does the ampersand mean in this context? SendQue "S&"+empl$+","+
>>
>>
>>  pc2 "Printing Weight Tag"
>>  'sendAux prints the tag to the default printer.
>>  'The other printers use a cross-over connector adapter.
>>  sendAux "#"+getDateCode$+","+Ltrim$(tare$)+","+Mid$(Desc$,1,15)+","+Ltrim$(wkord.carbon$)+","+Ltrim$(wkord.note$)+","+pn$+","+wo$+","+serial$+","+Ltrim$(gross$)+","+Ltrim$(net$)+"&"
>>
>>' We use "S" for STRANDER SCALE. This data goes to the Scale Control, specifically
>>' to c:\irl\linx01.txt and c:\irl\linxbkup.txt on the IRWCLOCK workstation.
>>  SendQue "S&"+empl$+","+GetDate$+" "+GetTime$+",S,"+mach$+",,"+gross$+","+wo$+","+serial$+","+weight.twgt+","+pn$+","+net$+",,G,"+empname$+","+desc$
>>
>
>SendQue and SendAux look like subroutines - the equivalent of a UDF.
>
>If I remember correctly, certain basic variations used the "$" sign to indicate a character-type variable. The code seems to contain lots of variables.
>
>mid$ is something like substr().
Previous
Reply
Map
View

Click here to load this message in the networking platform