Kevin -- >From the GT.M Messages and Recovery Procedures Manual:
------------------------------ INDEXTRACHARS INDEXTRACHARS, Indirection string contains extra trailing characters Compile Time Error: This indicates that an indirection string ends with a syntactically incorrect sequence. Action: Look for extra trailing characters in the indirection string. ------------------------------ What is the value of $P(T,";",2)? -- Bhaskar -----Original Message----- From: [EMAIL PROTECTED] on behalf of Kevin Toppenberg Sent: Sun 6/12/2005 9:04 PM To: Hardhats Sourceforge Cc: Subject: [Hardhats-members] Repeated crash with screenman I keep getting a crash when I try to edit a screenman form. Actually, when I first launch Vista, it works fine. It always on the second time that I try to edit the form that I get a crash (or a hang.) The error is: "150373010,GETKEY+14^DDGF0,%GTM-E-INDEXTRACHARS, Indirection string contains extra trailings" The error line is: .. S @("K="_$P(T,";",2)) I don't understand what this is doing... set @ ??, setting to what? Here is the relevant info. Any help would be appreciated. Kevin Here is the function that the crash occurs in... GETKEY ;Get key sequences and defaults N AU,AD,AR,AL,F1,F2,F3,F4,I,K,N,T S AU=$P(DDGLKEY,U,2) S AD=$P(DDGLKEY,U,3) S AR=$P(DDGLKEY,U,4) S AL=$P(DDGLKEY,U,5) S F1=$P(DDGLKEY,U,6) S F2=$P(DDGLKEY,U,7) S F3=$P(DDGLKEY,U,8) S F4=$P(DDGLKEY,U,9) ; F N="","S","D" D . S DDGF(N_"IN")="",DDGF(N_"OUT")="" . F I=1:1 S T=$P($T(@(N_"MAP")+I),";;",2,999) Q:T="" D .. S @("K="_$P(T,";",2)) <-----** Error point** .. I DDGF(N_"IN")'[(U_K) D ... S DDGF(N_"IN")=DDGF(N_"IN")_U_K ... S DDGF(N_"OUT")=DDGF(N_"OUT")_$P(T,";")_U . S DDGF(N_"IN")=DDGF(N_"IN")_U . S DDGF(N_"OUT")=$E(DDGF(N_"OUT"),1,$L(DDGF(N_"OUT"))-1) Q ; MAP ;Keys for main screen __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 _______________________________________________ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
<<winmail.dat>>