仿真出错，求大神帮我看看哪里错了

effie不是东北人

我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例，在8.2.2里需要生成仓储货架层，我按照书上的语句输进去之后结果在22行出错了。
语句是这样的
# x% S( |0 t( J8 Nis
        i:integer;
        Res:string;
        obj:object;
do
        if existsObject("Status") then
                Status.deleteObject;
        end;
9 Q% ~; u0 O8 a        for i:=1 to 10 loop
                Res:=sprint("Store_",i);
                if existsObject(Res) then
1 u4 a4 q& {  M4 y2 a2 T4 G                        Obj:=str_to_obj(Res);
                        Obj.deleteObject;
                end;
! k0 U' o* |: ^8 F) m' s; Q        next;
7 Z7 ^  F. }. B% h" E        --shengcheng Status:zimoxingceng
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
1 V, O7 E) y( U8 B+ a: R        Obj.Label:="warehouse status";
       
        for i:=1 to WH_nums loop
                Res:=sprint("Store_",i);
: w  Q7 p2 i3 _2 y" P& }" A  O                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
8 I) T# i7 L" D1 {  H$ [* n                Obj.Label:=sprint("huojiaceng:",i);
% R% n$ C' E; W% }                Obj.xDim:=WH_x;
                Obj.yDim:=WH_y;
! l' `# _- ^. f4 M                Res:=sprint("StoreData_",i);
7 P  j* L8 ~% B1 K               
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
                Obj.Label:=sprint("huojiaceng:",i);
                Obj.inheritFormat:=false;
1 [" f' ?$ @8 X+ F                Obj.maxxDim:=WH_x;
                Obj.maxyDim:=WH_y;
8 b# x( v  [# B/ _5 L, p                Obj.ColumnWidth:=3;
- w) Q: }7 Y6 P- A# `        next;
2 n% h! h3 C6 [& H! N# L       
9 D2 W# Y6 p8 q7 S& ]* S: R  O6 C0 \' a        .Delivery.MUs.Forklift.speed:=2;
' j' x' [1 P' K+ I: [        WH_var.delete({1,Part_Nums+1}..{*,*});
        for i:=1 to Part_Nums loop
3 f) V2 N) \% R# [7 I                WH_var[1,i]:=chr(64+i);
6 W0 [% d! C6 R* d9 n2 ]- I        next;
* Z. }0 O9 [6 L# \+ gend;
1 t& f1 f; K5 \( \出错的截图在这里。这些语句可以生成出来子模型层Status，但是生成不了货架层，错误显示说是unknown identifer res.求大神帮忙看看！！！多谢了