RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
As a project for anyone so motivated, it would probably be helpful all round to apply LXR (see the Linux kernel browser at http://lxr.linux.no/ - LXR is available from Source Forge at http://sourceforge.net/projects/lxr). -- Bhaskar On Fri, 2005-03-25 at 13:41 -0800, Jim Self wrote: Kevin wrote: I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. I tried grep on the r directory from SemiViva0.4 and confirmed that a simple search on *.m does complain of Argument list too long, but searching on D*.m works fine, for instance, to find OUTX in any routine with a name that begins with D: grep OUTX D*.m You can also search the whole directory with the -r flag (recursive search of directories). This will also work for searching through all routines in installations where the routines are broken out into 30 or so subdirectories. The example below searches all files in the current directory (.) or in any subdirectory. grep -r OUTX . --- Jim Self Systems Architect, Lead Developer VMTH Computer Services, UC Davis (http://www.vmth.ucdavis.edu/us/jaself) --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
That link sates that lxr is: The Linux Cross-Reference project is the testbed application of a general hypertext cross-referencing tool. (Or the other way around.) Would this solve the problem outlined below? Kevin --- Bhaskar, KS [EMAIL PROTECTED] wrote: As a project for anyone so motivated, it would probably be helpful all round to apply LXR (see the Linux kernel browser at http://lxr.linux.no/ - LXR is available from Source Forge at http://sourceforge.net/projects/lxr). -- Bhaskar On Fri, 2005-03-25 at 13:41 -0800, Jim Self wrote: Kevin wrote: I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. I tried grep on the r directory from SemiViva0.4 and confirmed that a simple search on *.m does complain of Argument list too long, but searching on D*.m works fine, for instance, to find OUTX in any routine with a name that begins with D: grep OUTX D*.m You can also search the whole directory with the -r flag (recursive search of directories). This will also work for searching through all routines in installations where the routines are broken out into 30 or so subdirectories. The example below searches all files in the current directory (.) or in any subdirectory. grep -r OUTX . --- Jim Self Systems Architect, Lead Developer VMTH Computer Services, UC Davis (http://www.vmth.ucdavis.edu/us/jaself) --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members __ Do you Yahoo!? Yahoo! Small Business - Try our new resources site! http://smallbusiness.yahoo.com/resources/ --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
There is a find command in linux and also a locate command that will find files of a certain anme the format is find start directory -name name of file -print Or locate file name locate uses a database so it is faster but you have to initialize the database before it can be used. That command is (I believe) locate -U Thanks, Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email:Marc[EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Kreis Sent: Thursday, March 24, 2005 6:10 PM To: hardhats-members@lists.sourceforge.net Subject: Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) You won't find that specific line. It is born of logic, deeply buried in the DIS routines, that builds the line on the fly and puts it in the DIS array at run time. So a simple error in applying George's fix, or possibly having a starting point different than the one George modified, could be the culprit and would be very tricky to spot. You are in one of the most abstract parts of the FM forest -- did you see the Cheshire cat? ;-) Thankfully you aren't in the scariest area... few have come out of the DICOMP* bogs alive. ;-) Kevin Toppenberg wrote: Well, that seems obvious enough not that you point itout... :-)Now I have to see where that erroneous line comesfrom... I can't find that line in DIS1.mI'll have to wait until I'm at my office and I can usethe graphic 'find' function that comes with KDE. Ican't ever seem to get to grep to work for me to workas a find.Thanks for finding that for me.Kevin--- Holloway, Thomas (EDS)[EMAIL PROTECTED] wrote: re: GTMW DIS(0)X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73There should only be one space between the IF andthe $PIECE. tjh-Original Message-From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of KevinToppenbergSent: Thursday, March 24, 2005 11:20 AMTo: Hardhats SourceforgeSubject: [Hardhats-members] Need help debuggingFileman Search (DIS1.m)I have tried to puttng the code patch for Filemanputup by George Timson. I could just use a fresh copy,but it would be better if I could learn the sourceofthe error.So I have done some studying of GT.M's debuggingtools, and I have applied them to the drop-out I amgetting.I wonder if someone could look at this screen logandsuggest the next step to discovering the problem:OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD:IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVINS)STORE RESULTS OF SEARCH IN TEMPLATE:SORT BY: NUMBER//START WITH NUMBER: FIRST//FIRST PRINT FIELD: .01 DOCUMENT TYPETHEN PRINT FIELD:Heading (S/C): TIU DOCUMENT SEARCH//DEVICE: home TELNET -** NoticedropoutGTMw $ECODE,Z150372458,GTMw $ZSTATUS150372458,SCR+1^DIO2,%GTM-E-CMD, Command expectedbutnot foundGTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1))GTMW DIS(0)X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73GTMW DIS(SCR)S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1GTM What would be causing the dropout?Thanks, Kevinp.s. Here is the variable table:GTMzwrite%=SEARCHA=1C=,D0=3DC=,DCC=^TIU(8925,DD=1DE=0DHT=0DI=0DIJ=0DILCT=0DIO=0DIO(SCR)=1DIOSL=24DIPCRIT=0DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 STIUFPRIV=1DIS0=1DISEARCH=1DISTP=0DISUPNO=0DISYS=19DIWL=0DJ=0DJK=1DN=1DP=8925DQI=4DT=3050324DTIME=3600DUZ=73DUZ(0)=@DUZ(1)=DUZ(2)=69DUZ(AG)=ODUZ(AUTO)=1DUZ(BUF)=1DUZ(LANG)=1DX=2DX(0)=I DC[, X ^UTILITY($J,1)DXS=YDY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 SDN=0,D0=-1DY(2)=S DN=1 D SEARCHI(0)=^TIU(8925,IO=/dev/pts/2IO(0)=/dev/pts/2IO(1,/dev/pts/2)=IO(ERROR)=IO(HOME)=38^/dev/pts/2IO(ZIO)=/dev/pts/2IOBS=$C(8)IOF=#,$C(27,91,50,74,27,91,72)IOHG=IOM=80ION=GTM-UNIX-TELNETIOPAR=IOS=38IOSL=24IOST=C-VT100IOST(0)=9IOT=VTRMIOUPAR=IOX=0IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)IOY=0J(0)=8925L=1P=U=^X=1XMDUZ=73XQCH=SEARXQDIC=1337XQJMP=0XQPSM=P10025XQSV=1337^10025^DIUSER^FM VAFilename^^M^n^1^^XQT=AXQUSER=KEVIN S TOPPENBERGXQVOL=VOLXQXFLG=0^0^XUPXQY=1330XQY0=DISEARCH^Search FileEntries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but itwouldbe difficult to read with wordwrapping...Kevin__Do You Yahoo!?Tired of spam? Yahoo! Mail has the best spamprotection around http://mail.yahoo.com --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon2005Attend MEDC 2005 May 9-12 in Vegas. Learn more aboutthe latest WindowsEmbedded(r) Windows Mobile(tm) platforms,applications content.Registerby 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___Hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
It's actually mudh more general than that. Finding files using -name is but one option (though perhaps the most common). Take a look at the manual page for find. --- Aylesworth Marc A Contr AFRL/IFSE [EMAIL PROTECTED] wrote: There is a find command in linux and also a locate command that will find files of a certain anme the format is find start directory -name name of file -print Or locate file name locate uses a database so it is faster but you have to initialize the database before it can be used. That command is (I believe) locate -U Thanks, Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Kreis Sent: Thursday, March 24, 2005 6:10 PM To: hardhats-members@lists.sourceforge.net Subject: Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) You won't find that specific line. It is born of logic, deeply buried in the DIS routines, that builds the line on the fly and puts it in the DIS array at run time. So a simple error in applying George's fix, or possibly having a starting point different than the one George modified, could be the culprit and would be very tricky to spot. You are in one of the most abstract parts of the FM forest -- did you see the Cheshire cat? ;-) Thankfully you aren't in the scariest area... few have come out of the DICOMP* bogs alive. ;-) Kevin Toppenberg wrote: Well, that seems obvious enough not that you point it out... :-) Now I have to see where that erroneous line comes from... I can't find that line in DIS1.m I'll have to wait until I'm at my office and I can use the graphic 'find' function that comes with KDE. I can't ever seem to get to grep to work for me to work as a find. Thanks for finding that for me. Kevin --- Holloway, Thomas (EDS) mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] wrote: re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] ] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
Marc, I was hoping someone would offer help on that point. I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. Thanks Kevin --- Aylesworth Marc A Contr AFRL/IFSE [EMAIL PROTECTED] wrote: There is a find command in linux and also a locate command that will find files of a certain anme the format is find start directory -name name of file -print Or locate file name locate uses a database so it is faster but you have to initialize the database before it can be used. That command is (I believe) locate -U Thanks, Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Kreis Sent: Thursday, March 24, 2005 6:10 PM To: hardhats-members@lists.sourceforge.net Subject: Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) You won't find that specific line. It is born of logic, deeply buried in the DIS routines, that builds the line on the fly and puts it in the DIS array at run time. So a simple error in applying George's fix, or possibly having a starting point different than the one George modified, could be the culprit and would be very tricky to spot. You are in one of the most abstract parts of the FM forest -- did you see the Cheshire cat? ;-) Thankfully you aren't in the scariest area... few have come out of the DICOMP* bogs alive. ;-) Kevin Toppenberg wrote: Well, that seems obvious enough not that you point it out... :-) Now I have to see where that erroneous line comes from... I can't find that line in DIS1.m I'll have to wait until I'm at my office and I can use the graphic 'find' function that comes with KDE. I can't ever seem to get to grep to work for me to work as a find. Thanks for finding that for me. Kevin --- Holloway, Thomas (EDS) mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] wrote: re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] ] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, === message truncated === __ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
It seems you are reaching some system limit maybe a line length limit , I think it is 4098 characters in Linux you might have to break it up by common packages like X* or QA* or you can write a batch file that would take your original search and do the same thing inside a foreach loop Thanks Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email: [EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Friday, March 25, 2005 2:18 PM To: hardhats-members@lists.sourceforge.net Subject: RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m ) Marc, I was hoping someone would offer help on that point. I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. Thanks Kevin --- Aylesworth Marc A Contr AFRL/IFSE [EMAIL PROTECTED] wrote: There is a find command in linux and also a locate command that will find files of a certain anme the format is find start directory -name name of file -print Or locate file name locate uses a database so it is faster but you have to initialize the database before it can be used. That command is (I believe) locate -U Thanks, Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Kreis Sent: Thursday, March 24, 2005 6:10 PM To: hardhats-members@lists.sourceforge.net Subject: Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) You won't find that specific line. It is born of logic, deeply buried in the DIS routines, that builds the line on the fly and puts it in the DIS array at run time. So a simple error in applying George's fix, or possibly having a starting point different than the one George modified, could be the culprit and would be very tricky to spot. You are in one of the most abstract parts of the FM forest -- did you see the Cheshire cat? ;-) Thankfully you aren't in the scariest area... few have come out of the DICOMP* bogs alive. ;-) Kevin Toppenberg wrote: Well, that seems obvious enough not that you point it out... :-) Now I have to see where that erroneous line comes from... I can't find that line in DIS1.m I'll have to wait until I'm at my office and I can use the graphic 'find' function that comes with KDE. I can't ever seem to get to grep to work for me to work as a find. Thanks for finding that for me. Kevin --- Holloway, Thomas (EDS) mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] wrote: re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] ] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, === message
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
Kevin wrote: I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. I tried grep on the r directory from SemiViva0.4 and confirmed that a simple search on *.m does complain of Argument list too long, but searching on D*.m works fine, for instance, to find OUTX in any routine with a name that begins with D: grep OUTX D*.m You can also search the whole directory with the -r flag (recursive search of directories). This will also work for searching through all routines in installations where the routines are broken out into 30 or so subdirectories. The example below searches all files in the current directory (.) or in any subdirectory. grep -r OUTX . --- Jim Self Systems Architect, Lead Developer VMTH Computer Services, UC Davis (http://www.vmth.ucdavis.edu/us/jaself) --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m )
I hadn't thought of a simple script. Good idea. It's just a pain to try this 26 times in a row for all of the letters of the alphabet. Thanks Kevin --- Aylesworth Marc A Contr AFRL/IFSE [EMAIL PROTECTED] wrote: It seems you are reaching some system limit maybe a line length limit , I think it is 4098 characters in Linux you might have to break it up by common packages like X* or QA* or you can write a batch file that would take your original search and do the same thing inside a foreach loop Thanks Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email: [EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Friday, March 25, 2005 2:18 PM To: hardhats-members@lists.sourceforge.net Subject: RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m ) Marc, I was hoping someone would offer help on that point. I need to actually look into each file, not just look for the filenames. I think this is done with grep. But when I try to run grep with a file list of * in the sourcecode directory, it tells me that the list is too long. Thanks Kevin --- Aylesworth Marc A Contr AFRL/IFSE [EMAIL PROTECTED] wrote: There is a find command in linux and also a locate command that will find files of a certain anme the format is find start directory -name name of file -print Or locate file name locate uses a database so it is faster but you have to initialize the database before it can be used. That command is (I believe) locate -U Thanks, Marc Aylesworth C3I Associates AFRL/IFSE Joint Battlespace Infosphere Team 525 Brooks Rd Rome, NY 13441-4505 Tel:315.330.2422 Fax:315.330.7009 Email:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Kreis Sent: Thursday, March 24, 2005 6:10 PM To: hardhats-members@lists.sourceforge.net Subject: Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) You won't find that specific line. It is born of logic, deeply buried in the DIS routines, that builds the line on the fly and puts it in the DIS array at run time. So a simple error in applying George's fix, or possibly having a starting point different than the one George modified, could be the culprit and would be very tricky to spot. You are in one of the most abstract parts of the FM forest -- did you see the Cheshire cat? ;-) Thankfully you aren't in the scariest area... few have come out of the DICOMP* bogs alive. ;-) Kevin Toppenberg wrote: Well, that seems obvious enough not that you point it out... :-) Now I have to see where that erroneous line comes from... I can't find that line in DIS1.m I'll have to wait until I'm at my office and I can use the graphic 'find' function that comes with KDE. I can't ever seem to get to grep to work for me to work as a find. Thanks for finding that for me. Kevin --- Holloway, Thomas (EDS) mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] wrote: re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] ] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) === message truncated === __ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_idh83alloc_id149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
Ok, ok... that answer was too quick. Syntactically, one space will resolve the 'missing command' error but that ignores the whole meaning of the line of code. Is the IF a test of the result of eXecuting DIS(SCR) and then you want to do something with the $Piece of ^TIU or are you testing the value of that piece of ^TIU and then want to do something based on the result? Either way, there's something missing from the whole line. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Holloway, Thomas (EDS) Sent: Thursday, March 24, 2005 11:26 AM To: hardhats-members@lists.sourceforge.net Subject: RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_idh83alloc_id149op=ick ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn
Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
Looks like you have two spaces after the IF command. I $P($G(^TIU(8925,D0,13)),U,2)=73 Kevin Toppenberg wrote: I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
An unadorned IF statement does have the effect of setting $T and is perfectly legal. Not knowing what this code ios meant to accomplish, I can't say whether or not that is the intended effect. I 0 I W !,HELLO --- Holloway, Thomas (EDS) [EMAIL PROTECTED] wrote: Ok, ok... that answer was too quick. Syntactically, one space will resolve the 'missing command' error but that ignores the whole meaning of the line of code. Is the IF a test of the result of eXecuting DIS(SCR) and then you want to do something with the $Piece of ^TIU or are you testing the value of that piece of ^TIU and then want to do something based on the result? Either way, there's something missing from the whole line. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Holloway, Thomas (EDS) Sent: Thursday, March 24, 2005 11:26 AM To: hardhats-members@lists.sourceforge.net Subject: RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r
Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
Right. I answered too soon as well.. ;-) The question is how did the DIS(0) code get generated that way... The mod George sent is in the routine that generates DIS array members, so we are in the right neck of the woods... ;-) Now, Kevin, how many patches are in the routine that you modified and what is the last number? (See the second line of the routine.) The one that Jim worked on was at 113. Holloway, Thomas (EDS) wrote: Ok, ok... that answer was too quick. Syntactically, one space will resolve the 'missing command' error but that ignores the whole meaning of the line of code. Is the IF a test of the result of eXecuting DIS(SCR) and then you want to do something with the $Piece of ^TIU or are you testing the value of that piece of ^TIU and then want to do something based on the result? Either way, there's something missing from the whole line. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Holloway, Thomas (EDS) Sent: Thursday, March 24, 2005 11:26 AM To: hardhats-members@lists.sourceforge.net Subject: RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- This SF.net email is sponsored by Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save
RE: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
Well, that seems obvious enough not that you point it out... :-) Now I have to see where that erroneous line comes from... I can't find that line in DIS1.m I'll have to wait until I'm at my office and I can use the graphic 'find' function that comes with KDE. I can't ever seem to get to grep to work for me to work as a find. Thanks for finding that for me. Kevin --- Holloway, Thomas (EDS) [EMAIL PROTECTED] wrote: re: GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 There should only be one space between the IF and the $PIECE. tjh -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin Toppenberg Sent: Thursday, March 24, 2005 11:20 AM To: Hardhats Sourceforge Subject: [Hardhats-members] Need help debugging Fileman Search (DIS1.m) I have tried to puttng the code patch for Fileman put up by George Timson. I could just use a fresh copy, but it would be better if I could learn the source of the error. So I have done some studying of GT.M's debugging tools, and I have applied them to the drop-out I am getting. I wonder if someone could look at this screen log and suggest the next step to discovering the problem: OUTPUT FROM WHAT FILE: TIU DOCUMENT// -A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY -A- CONDITION: = EQUALS -A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S kst PHYSICIAN -B- SEARCH FOR TIU DOCUMENT FIELD: IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN S) STORE RESULTS OF SEARCH IN TEMPLATE: SORT BY: NUMBER// START WITH NUMBER: FIRST// FIRST PRINT FIELD: .01 DOCUMENT TYPE THEN PRINT FIELD: Heading (S/C): TIU DOCUMENT SEARCH// DEVICE: home TELNET -** Notice dropout GTMw $ECODE ,Z150372458, GTMw $ZSTATUS 150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected but not found GTMZPRINT SCR+1^DIO2 X DIS(0) Q:'$T G PASS:'$D(DIS(1)) GTMW DIS(0) X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 GTMW DIS(SCR) S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 GTM What would be causing the dropout? Thanks, Kevin p.s. Here is the variable table: GTMzwrite %=SEARCH A=1 C=, D0=3 DC=, DCC=^TIU(8925, DD=1 DE=0 DHT=0 DI=0 DIJ=0 DILCT=0 DIO=0 DIO(SCR)=1 DIOSL=24 DIPCRIT=0 DIS(0)=X DIS(SCR) I $P($G(^TIU(8925,D0,13)),U,2)=73 DIS(SCR)=S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1 DIS0=1 DISEARCH=1 DISTP=0 DISUPNO=0 DISYS=19 DIWL=0 DJ=0 DJK=1 DN=1 DP=8925 DQI=4 DT=3050324 DTIME=3600 DUZ=73 DUZ(0)=@ DUZ(1)= DUZ(2)=69 DUZ(AG)=O DUZ(AUTO)=1 DUZ(BUF)=1 DUZ(LANG)=1 DX=2 DX(0)=I DC[, X ^UTILITY($J,1) DXS=Y DY(1)=S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S DN=0,D0=-1 DY(2)=S DN=1 D SEARCH I(0)=^TIU(8925, IO=/dev/pts/2 IO(0)=/dev/pts/2 IO(1,/dev/pts/2)= IO(ERROR)= IO(HOME)=38^/dev/pts/2 IO(ZIO)=/dev/pts/2 IOBS=$C(8) IOF=#,$C(27,91,50,74,27,91,72) IOHG= IOM=80 ION=GTM-UNIX-TELNET IOPAR= IOS=38 IOSL=24 IOST=C-VT100 IOST(0)=9 IOT=VTRM IOUPAR= IOX=0 IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72) IOY=0 J(0)=8925 L=1 P= U=^ X=1 XMDUZ=73 XQCH=SEAR XQDIC=1337 XQJMP=0 XQPSM=P10025 XQSV=1337^10025^DIUSER^FM VA Filename^^M^n^1^^ XQT=A XQUSER=KEVIN S TOPPENBERG XQVOL=VOL XQXFLG=0^0^XUP XQY=1330 XQY0=DISEARCH^Search File Entries^^A^^^y^^n^1^^ I'll post my version of DIS1.m if needed, but it would be difficult to read with wordwrapping... Kevin __ 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 Microsoft Mobile Embedded DevCon 2005 Attend MEDC 2005 May 9-12 in Vegas. Learn more about the latest Windows Embedded(r) Windows Mobile(tm) platforms, applications content. Register by 3/29 save $300 http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members --- === message truncated === __ Do you Yahoo!? Yahoo! Small Business - Try our new resources site! http://smallbusiness.yahoo.com/resources/ --- SF email is sponsored by - The IT Product Guide Read honest candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595alloc_id=14396op=click ___ Hardhats-members mailing list Hardhats-members@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/hardhats-members
Re: [Hardhats-members] Need help debugging Fileman Search (DIS1.m)
You won't find that specific line. It is born of logic, deeply buried
in the DIS routines, that builds the line on the fly and puts it in the
DIS array at run time. So a simple error in applying George's fix, or
possibly having a starting point different than the one George
modified, could be the culprit and would be very tricky to spot.
You are in one of the most abstract parts of the FM forest -- did you
see the Cheshire cat? ;-) Thankfully you aren't in the scariest
area... few have come out of the DICOMP* bogs alive. ;-)
Kevin Toppenberg wrote:
Well, that seems obvious enough not that you point it
out... :-)
Now I have to see where that erroneous line comes
from... I can't find that line in DIS1.m
I'll have to wait until I'm at my office and I can use
the graphic 'find' function that comes with KDE. I
can't ever seem to get to grep to work for me to work
as a find.
Thanks for finding that for me.
Kevin
--- "Holloway, Thomas (EDS)"
[EMAIL PROTECTED] wrote:
re: GTMW DIS(0)
X DIS("SCR") I $P($G(^TIU(8925,D0,13)),U,2)=73
There should only be one space between the IF and
the $PIECE.
tjh
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]
On Behalf Of Kevin
Toppenberg
Sent: Thursday, March 24, 2005 11:20 AM
To: Hardhats Sourceforge
Subject: [Hardhats-members] Need help debugging
Fileman Search (DIS1.m)
I have tried to puttng the code patch for Fileman
put
up by George Timson. I could just use a fresh copy,
but it would be better if I could learn the source
of
the error.
So I have done some studying of GT.M's debugging
tools, and I have applied them to the drop-out I am
getting.
I wonder if someone could look at this screen log
and
suggest the next step to discovering the problem:
OUTPUT FROM WHAT FILE: TIU DOCUMENT//
-A- SEARCH FOR TIU DOCUMENT FIELD: enterED BY
-A- CONDITION: = EQUALS
-A- EQUALS NEW PERSON: kst TOPPENBERG,KEVIN S
kst PHYSICIAN
-B- SEARCH FOR TIU DOCUMENT FIELD:
IF: A// ENTERED BY EQUALS 73 (TOPPENBERG,KEVIN
S)
STORE RESULTS OF SEARCH IN TEMPLATE:
SORT BY: NUMBER//
START WITH NUMBER: FIRST//
FIRST PRINT FIELD: .01 DOCUMENT TYPE
THEN PRINT FIELD:
Heading (S/C): TIU DOCUMENT SEARCH//
DEVICE: home TELNET
-** Notice
dropout
GTMw $ECODE
,Z150372458,
GTMw $ZSTATUS
150372458,SCR+1^DIO2,%GTM-E-CMD, Command expected
but
not found
GTMZPRINT SCR+1^DIO2
X DIS(0) Q:'$T G PASS:'$D(DIS(1))
GTMW DIS(0)
X DIS("SCR") I $P($G(^TIU(8925,D0,13)),U,2)=73
GTMW DIS("SCR")
S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S TIUFPRIV=1
GTM
What would be causing the dropout?
Thanks, Kevin
p.s. Here is the variable table:
GTMzwrite
%="SEARCH"
A=1
C=","
D0=3
DC=","
DCC="^TIU(8925,"
DD=1
DE=0
DHT=0
DI=0
DIJ=0
DILCT=0
DIO=0
DIO("SCR")=1
DIOSL=24
DIPCRIT=0
DIS(0)="X DIS(""SCR"") I
$P($G(^TIU(8925,D0,13)),U,2)=73"
DIS("SCR")="S Y=D0 I $D(^TIU(8925,Y,0)) I 1 S
TIUFPRIV=1"
DIS0=1
DISEARCH=1
DISTP=0
DISUPNO=0
DISYS=19
DIWL=0
DJ=0
DJK=1
DN=1
DP=8925
DQI=4
DT=3050324
DTIME=3600
DUZ=73
DUZ(0)="@"
DUZ(1)=""
DUZ(2)=69
DUZ("AG")="O"
DUZ("AUTO")=1
DUZ("BUF")=1
DUZ("LANG")=1
DX=2
DX(0)="I DC["","" X ^UTILITY($J,1)"
DXS="Y"
DY(1)="S D0=$O(^TIU(8925,D0)),DN=2,DI=0 I D0'0 S
DN=0,D0=-1"
DY(2)="S DN=1 D SEARCH"
I(0)="^TIU(8925,"
IO="/dev/pts/2"
IO(0)="/dev/pts/2"
IO(1,"/dev/pts/2")=""
IO("ERROR")=""
IO("HOME")="38^/dev/pts/2"
IO("ZIO")="/dev/pts/2"
IOBS="$C(8)"
IOF="#,$C(27,91,50,74,27,91,72)"
IOHG=""
IOM=80
ION="GTM-UNIX-TELNET"
IOPAR=""
IOS=38
IOSL=24
IOST="C-VT100"
IOST(0)=9
IOT="VTRM"
IOUPAR=""
IOX=0
IOXY="W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)"
IOY=0
J(0)=8925
L=1
P=""
U="^"
X=1
XMDUZ=73
XQCH="SEAR"
XQDIC=1337
XQJMP=0
XQPSM="P10025"
XQSV="1337^10025^DIUSER^FM VA
Filename^^M^n^1^^"
XQT="A"
XQUSER="KEVIN S TOPPENBERG"
XQVOL="VOL"
XQXFLG="0^0^XUP"
XQY=1330
XQY0="DISEARCH^Search File
Entries^^A^^^y^^n^1^^"
I'll post my version of DIS1.m if needed, but it
would
be difficult to read with wordwrapping...
Kevin
__
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 Microsoft Mobile
Embedded DevCon
2005
Attend MEDC 2005 May 9-12 in Vegas. Learn more about
the latest Windows
Embedded(r) Windows Mobile(tm) platforms,
applications content.
Register
by 3/29 save $300
http://ads.osdn.com/?ad_id=6883alloc_id=15149op=click
___
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
---
=== message truncated ===
__
Do you Yahoo!?
Yahoo! Small Business - Try our new resources site!
