HP Forums

Full Version: Bug in INPUT (7820)
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
This program demonstrates the error in the command INPUT. The error involves, inter alia, by displaying only part of the space of two first lists.

full version
EXPORT INPUTBUG()
BEGIN
LOCAL opcjenc:=1,opcjeac:=1,tryb:=1;
INPUT({{opcjenc,{"brak","podane","z innego celu","kurs z per"},{40,50,1}},{opcjeac,{"obliczane","podane","z innego celu","kurs z per"},{40,50,3}},{tryb,{"SH5","SH4"},{40,50,5}}},"Opcje",{"Nowy cel krs prd","Aktu celu krs prd","Tryb"},{"","",""},{1,1,1},{opcjenc,opcjeac,tryb})
END;

short version
EXPORT INPUTBUG2()
BEGIN
LOCAL a:=1,b:=1,c:=1;
INPUT({{a,{"A","B","C","D"},{40,50,1}},{b,{"E","F","G","H"},{40,50,3}},{c,{"I","J"},{40,50,5}}},"XXX",{"X","Y","Z"},{"","",""},{1,1,1},{a,b,c})
END;
Reference URL's