Erratic results when running legacy programs that do single character read

[denhamson]

Running a legacy program that executes command Read IN:TIMEOUT appears to work OK for alphabetic and numeric characters but returns strange results with punctuation characters. Examples "/" character input echoes as "¿" and "" character input echoes as "8" with corresponding wrong ascii values in the IN variable.

[eduard93]

Unable to reproduce with:

USER > r a:2
/
USER > w a 
/

Please provide code to reproduce.

[denhamson]

See attached export of a object script routine called readtest and attached sample output. For all three read types the keys entered were / then * then ENTER Hope this helps. Mike Brown mike.brown.mbcs@me.com

…

On 27 Jan 2017, at 17:47, Eduard ***@***.***> wrote: Unable to reproduce. USER > r a:2 / USER > w a / Please provide code to reproduce. — You are receiving this because you authored the thread. Reply to this email directly, view it on GitHub <https://github.com/intersystems-ru/webterminal/issues/87#issuecomment-275727329>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AJEhsMGNM_ptiZjwe2Ezw5IYMb0PxRmyks5rWi2YgaJpZM4Lv5Yf>.

[denhamson]

Apologies Forgot the attachments Mike Brown mike.brown.mbcs@me.com

…

On 27 Jan 2017, at 17:47, Eduard ***@***.***> wrote: Unable to reproduce. USER > r a:2 / USER > w a / Please provide code to reproduce. — You are receiving this because you authored the thread. Reply to this email directly, view it on GitHub <https://github.com/intersystems-ru/webterminal/issues/87#issuecomment-275727329>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AJEhsMGNM_ptiZjwe2Ezw5IYMb0PxRmyks5rWi2YgaJpZM4Lv5Yf>.

[nikitaeverywhere]

@denhamson, attachments are still not attached (I guess the mail response doesn't work for attachments here). Thanks!

[denhamson]

Trying with pdf attachments, GitHub doesn’t appear to look xml or rtf file types. Mike Brown mike.brown.mbcs@me.com

…

On 27 Jan 2017, at 20:02, Nikita ***@***.***> wrote: @denhamson <https://github.com/denhamson>, attachments are still not attached (I guess the mail response doesn't work for attachments here). Thanks! — You are receiving this because you were mentioned. Reply to this email directly, view it on GitHub <https://github.com/intersystems-ru/webterminal/issues/87#issuecomment-275760460>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AJEhsG2UUB9apoqPQSoxOXKik56uDTE3ks5rWk1GgaJpZM4Lv5Yf>.

[denhamson]

You are correct, GitHub doesn’t pick up attachments from emails, I have uploaded attachments directly to GitHub website. Mike Brown mike.brown.mbcs@me.com

…

On 27 Jan 2017, at 17:47, Eduard ***@***.***> wrote: Unable to reproduce. USER > r a:2 / USER > w a / Please provide code to reproduce. — You are receiving this because you authored the thread. Reply to this email directly, view it on GitHub <https://github.com/intersystems-ru/webterminal/issues/87#issuecomment-275727329>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AJEhsMGNM_ptiZjwe2Ezw5IYMb0PxRmyks5rWi2YgaJpZM4Lv5Yf>.

[nikitaeverywhere]

@denhamson, I still cannot see the attachments. Try using zip for other file types. You need just to drag&drop file onto the comment input here on GitHub.

[denhamson]

Done Mike Brown mike.brown.mbcs@me.com

…

On 27 Jan 2017, at 20:02, Nikita ***@***.***> wrote: @denhamson <https://github.com/denhamson>, attachments are still not attached (I guess the mail response doesn't work for attachments here). Thanks! — You are receiving this because you were mentioned. Reply to this email directly, view it on GitHub <https://github.com/intersystems-ru/webterminal/issues/87#issuecomment-275760460>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AJEhsG2UUB9apoqPQSoxOXKik56uDTE3ks5rWk1GgaJpZM4Lv5Yf>.

[nikitaeverywhere]

@denhamson, there is still no attachments. Please go directly to GitHub here: #87 and upload the files (zip).

[denhamson]

attachments

readtest.xml.pdf
readtestSampleOutput.pdf

[eduard93]

testreadsingle
	set timeout=4 ; four second timeout
	read !,"single>",*in:timeout
	goto:in=13 testreadfixed ; exit when empty response
	write !,"in=",in,?10,"$zb=",$zb,?20,"$za=",$za,?30,"$test=",$test
	goto testreadsingle
testreadfixed
	read !,"fixed>",in#1:timeout
	goto:in="" testreadnormal ; exit when empty response
	write !,"in=",in,?10,"$zb=",$zb,?20,"$za=",$za,?30,"$test=",$test
	goto testreadfixed
testreadnormal
	read !,"normal>",in:timeout
	quit:in="" ; quit when empty response
	write !,"in=",in,?10,"$zb=",$zb,?20,"$za=",$za,?30,"$test=",$test
	goto testreadnormal

do ^readtest