Hi you'll find attached a routine i use as a mnemonic for terminal instead of X364 (%ZVT100M). i use just the type TRM and sub type c-cache terminal. You'll find within the %zvt100m all attributes you are speaking of : W /GRH for graphics (boxes). please fill free to play & use it.
Simcha. --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.737 / Virus Database: 491 - Release Date: 11/08/04 begin 666 %ZVT100M.rsa M0V%C:&[EMAIL PROTECTED](%=I;F1O=W,@3E1>24Y47D5X<&]R="!O9B Q(')O=71I;F5S M(&9R;VT@;F%M97-P86-E("5365->?D9O<[EMAIL PROTECTED])5)/(&]N M($%U9R R,B R,# T(" @-3HS,B!030T*)5I65#$P,$U>24Y47C%>-3DU-#(L M,S$S,3!>, T*)5I65#$P,[EMAIL PROTECTED]/[EMAIL PROTECTED](#L-"D8Q(%,@1C$] M)$,H,C<L-SDL.# I(%$-"D8R(%,@1C(])$,H,C<L-SDL.#$I(%$-"D8S(%,@ M1C,])$,H,C<L-SDL.#(I(%$-"D8T(%,@1C0])$,H,C<L-SDL.#,I(%$-"D8U M(%,@1C4])$,H,C<L-SDL.#0I(%$-"D8V(%,@1C8])$,H,C<L.3$L-#DL-34L M,3(V*2!1#0I&-R!3($8W/21#*#([EMAIL PROTECTED]@@4R!& [EMAIL PROTECTED],2PT.2PU-RPQ,C8I(%$-"D8Y(%,@1CD])$,H,C<L.3$L-3 L [EMAIL PROTECTED],3(V*2!1#0I&,3 @4R!&,3 ])$,H,C<L.3$L-3 L-#DL,3(V*2!1#0I& M,[EMAIL PROTECTED]&,3$])$,H,C<L.3$L-3 L-3$L,3(V*2!1#0I&,3(@4R!&,3(])$,H M,C<L.3$L-3 L-3(L,3(V*2!1#0I);G,@4R!);G,])$,H,C<L.3$L-3 L,3(V M*2!1#0I(;VUE(%,@2&[EMAIL PROTECTED],2PT.2PQ,C8I(%$-"E!A9V55<"!3 M(%!A9V55<[EMAIL PROTECTED],2PU,RPQ,C8I(%$-"D1E;"!3($1E;[EMAIL PROTECTED] M,2PU,2PQ,C8I(%$-"D5N9"!3([EMAIL PROTECTED],2PU,BPQ,C8I(%$-"E!A M9V5$;W=N(%,@4&%G941O=VX])$,H,C<L.3$L-30L,3(V*2!1#0I5<$%R<F]W M(%,@57!!<G)[EMAIL PROTECTED],[EMAIL PROTECTED]&]W;D%R<F]W(%,@1&]W;D%R M<F]W/21#*#(W+#DQ+#8V*2!1#0I,969T07)R;W<@4R!,969T07)R;W<])$,H M,C<[EMAIL PROTECTED](%$-"E)I9VAT07)R;W<@4R!2:6=H=$%R<F]W/21#*#(W+#DQ [EMAIL PROTECTED](%<@)$,[EMAIL PROTECTED] @(" -"D%,5"!7("1#*#(W+#8Q M*2!1#0I!5U(@5R [EMAIL PROTECTED],2PV,RPU-2PQ,#0I(%$-"D)"52!7("HR-RPB M6S [,3LT.S5M(B!1#0I"[EMAIL PROTECTED] J-R!1#0I"[EMAIL PROTECTED] J,C<L(ELP.S5M(B!1 M#0I"[EMAIL PROTECTED] J,C<L(ELP.S0[-6TB(%$-"D)/0B!7("HR-RPB6S [,3LU;2(@ M40T*0D],(%<@*C(W+");,#LQ;2(@40T*0D]5(%<@*C(W+");,#LQ.S1M(B!1 M#0I#24Q,*"4Q*2!7("1#*#$S*2PJ,C<L(ELB+"4Q+3$L(D0B(%<Z)3$],2 D [EMAIL PROTECTED],[EMAIL PROTECTED],[EMAIL PROTECTED],[EMAIL PROTECTED] [EMAIL PROTECTED],RDL*C(W+");(BPE,2TQ+")#(B!7 M.B4Q/3$@)$,H,3,I(%$-"D-,[EMAIL PROTECTED] J,C<L(EM((BPJ,C<L(ELR2B(@4R D M6#TQ+"19/[EMAIL PROTECTED](@5R J,3,@4R D6#TQ(%$-"D-23"!7("HR-RPB*4(B M+"HR-RPB6S\S-&PB(%$-"D-24B!7("HR-RPB*3$B+"HR-RPB6S\S-&@B+"HR M-RPB*4DB(%$-"D-4*"4Q*2!7("HR-RPB(R(L)[EMAIL PROTECTED]"*"4Q*2!7("HR M-RPB6R(L)3$L(D0B(%,@)[EMAIL PROTECTED])%,H)[EMAIL PROTECTED])3$\,#HP+#$Z)[EMAIL PROTECTED])3$I(%$-"D-5 M1"@E,[EMAIL PROTECTED] J,C<L(ELB+"4Q+")"(B!3("19/213*"19*R4Q/#(U-3HD62LE M,2PQ.C([EMAIL PROTECTED]&*"4Q*2!7("HR-RPB6R(L)3$L(D,B(%,@)[EMAIL PROTECTED])%,H M)[EMAIL PROTECTED])3$\,C4U.B18*R4Q+#$Z,C4U*2!1#0I#54]&(%<@)$,H,C<L.3$L-C,L M-3 L-3,L,3 X*2!1#0I#54].(%<@)$,H,C<L.3$L-C,L-3 L-3,L,3 T*2!1 M#0I#55 H)3$L)3(I(%<@*C(W+");(BPE,2PB.R(L)3(L([EMAIL PROTECTED](%,@)%D])3$L M)[EMAIL PROTECTED])3(@40T*0U55*"4Q+"4R*2!7("HR-RPB6R(L)3$L(D$B(%,@)%D])%,H M)%DM)3$^,#HD62TE,2PQ.C I(%$-"D1#2"@E,[EMAIL PROTECTED] J,C<L(ELB+"4Q+")0 M([EMAIL PROTECTED] J,C<L(ELR2R(@40T*140H)3$I(%<@*C(W+");(BPE,2PB M2B(@40T*14PH)3$I(%<@*C(W+");(BPE,2PB2R(@40T*14Y'(%<@*C(W+"(I M3"(@40T*1U)((%<@*C(W+"(H,"(@40T*2$)2(%<@*C(W+"(H,2(@40T*2$]- M(%<@*C(W+");2"(@4R D6#TQ+"19/[EMAIL PROTECTED]("[EMAIL PROTECTED](%,@ M)[EMAIL PROTECTED],2PD63TQ(%$-"DE.1"!7("HR-RPB1"(@4R [EMAIL PROTECTED]/#(U-3HD M62LQ+#$Z,C4U*2!1#0I,02!7("HR-RPB6S5I(B!1#0I,[EMAIL PROTECTED] J,C<L(ELT M:2(@40T*3E)-(%<@*C(W+");,&TB(%$-"DY532!7("1#*#(W+#8R*2!1#0I. M5U(@5R [EMAIL PROTECTED],2PV,RPU-2PQ,[EMAIL PROTECTED](%$-"E)"02!7("HR-RPB6S [-SLQ M;2(L*C<@40T*4D)"(%<@*C(W+");,#LW.S$[-6TB(%$-"E)"[EMAIL PROTECTED] J,C<L M(ELP.S<[-#LQ.S5M([EMAIL PROTECTED] J,C<L(ELP.S<[-6TB(%$-"E)"52!7 M("HR-RPB6S [-SLT.S%M([EMAIL PROTECTED] J,C<L."!1#0I214<@5R J,C<L M(BA"(B!1#0I222!7("HR-RPB32(@4R [EMAIL PROTECTED]/C Z)%DM,2PQ.C I M(%$-"E))4R!7("HR-RPBXR(@4R H)[EMAIL PROTECTED])%DI/[EMAIL PROTECTED](%<@*C(W+"); M,#LW.S0[-6TB(%$-"E)-*"4Q*2!7("HR-RPB6R(L)3$L(FPB(%$-"E)60B!7 M("HR-RPB6S [-SLQ;2(@40T*4E92(%<@*C(W+");,#LW;2(@40T*4E95(%<@ M*C(W+");,#LW.S1M(B!1#0I3,3,R(%<@*C(W+");/S-H(B!1#0I3.# @5R J M,C<L(EL_,VPB(%$-"E-#02!7("HR-RPW(%$-"[EMAIL PROTECTED],2PE,[EMAIL PROTECTED] J,C<L M*CDQ+"4Q+"HU.2PE,BPJ,3$T(%$@(#M7("HR-RPB6R(L)3$L(CLB+"4R+"+R M(@T*4TTH)3$I(%<@*C(W+");(BPE,2PB:"(@40T*4TY'(%<@)$,H,C<L,S4L M-3,I(%$-"E-23B!7("HR-RPB6S\U;"(@40T*4U)2(%<@*C(W+");/S5H(B!1 M#0I53E,@5R J,C<L(ELP.S1M(B!1#0I71D(@5R [EMAIL PROTECTED],[EMAIL PROTECTED] M5T93(%<@)$,H,C<L,S4L-30I(%$-"E=&5"!7("1#*#(W+#,U+#4Q*2!1#0I7 M24Y"(%<@*C(W+");,&TB(%$-"E=)3D@@5R J,C<L(ELP.S<[-#LQ;2(@40T* M5TE.32!7("HR-RPB6S [-VTB(%$-"E=)3E,@5R J,C<L(ELP.S<[-6TB(%$- '"@T*#0H-"@`` ` end
