1. Store Manager bug
Robert Craig noticed a bug in the most recent release of Store Manager. =
The program begins by looking for storemgr.ini, and if not found creates =
it. But for some reason, rather than creating the file, the program =
crashes. I'll fix that for the next release, but for now you can create =
it as follows:
----- Begin storemgr.ini
{'A',{"LPT1:"},1,1,1,0.0700}
----- End storemgr.ini
The correct location for the program should by now be updated on the =
Recent Contributions page, but you can also get it directly from my =
homepage below. Thanks for those who have tried it and given me =
feedback.
Michael J. Sabal
mjs at osa.att.ne.jp
http://home.att.ne.jp/gold/mjs/index.html
2. Store Manager bug
Michael Sable wrote:
>Robert Craig noticed a bug in the most recent release of Store Manager. =
The >program begins by looking for storemgr.ini, and if not found creates=
it. But for >some reason, rather than creating the file, the program
crashes. I'll fix that for the >next release, but for now you can create=
it as follows:
The file can be created by rewriting the procedure getCFGfile() a bit:
-- Store Manager --> Main Menu functions
<<snip>>
--------------- Begin new code
procedure getCFGfile()
atom fn
fn =3D open("storemgr.ini","r")
-- Added these lines:
if fn =3D -1 then
cfg_data =3D {GET_FAIL}
else
cfg_data =3D get(fn)
close(fn)
end if
-- up to here
if cfg_data[1] !=3D GET_SUCCESS then
cfg_data =3D {'A',{"LPT1:"},1,1,1,.175} -- 1:branch #, 2:printer=
s, =
--3:next item#, 4:next PO, 5:next SO, 6:tax
dflt(Dutch!-- use your own!)
else
cfg_data =3D cfg_data[2]
end if
end procedure
--------- End new code
>----- Begin storemgr.ini
>{'A',{"LPT1:"},1,1,1,0.0700}
>----- End storemgr.ini
>The correct location for the program should by now be updated on the
Recent >Contributions page, but you can also get it directly from my
homepage below. >Thanks for those who have tried it and given me feedbac=
k.
>Michael J. Sabal
>mjs at osa.att.ne.jp
>http://home.att.ne.jp/gold/mjs/index.html
