You talked about a "daily event checking routine."  If you don't mind
could you tell me how you automated that function.  I have been doing
this process manually for more than a year and it does get tiring.

                        Dave Larimer
                        Email:  Dave_Larimer AT kne DOT com
                        KNEnergy Inc.
>
>>I encountered this problem when I automated the daily  event checking
>>routine to mail exception notices to nodes which have not completed
>>successfully the previous night.    Everything works great for node who's
>>name is 13 characters or less.   The problem arises when the node names
>>greater that 13 characters are encountered.   I have a work around for this
>>situation by creating an entry in the mail aliases name file for these
>>shortened node names.  There are other situations where it would be nice to
>>be able to format the output yourself so you don't have to do it manually
>>latter.
>>
>>Any help would be appreciated.   Thanks in advance.
>>
>>Steve Wilson
>>WA. State Dept. of Info Services
>>stevew AT dis.wa DOT gov
>
>I have run into this problem doing the exact same thing.  What I did was in
>my perl script that generates the report and sents out the E-mail message, I
>pull the entire name.  This is done by checking the last character of the
>field
>(the 12th character).  If it is a '-' then read the next line and check the
>12 th character again for a '-', and continue the loop util done.  I have to
>do
>this because we use fully qualified hostnames (hostname.domain.domain.com) as
>the node name.  Below is a sample of the code.  I hope this helps.
>
>Chuck T.
>
>
>  # this runs the dsmadmc command and reads its output as input.
>  # (I did not put the entire command, you can fill in the rest)
>  open(RPT,"dsmadmc -id=xxx -passowrd=xxx q event * * begint=......|");
>
>  while ( <RPT> ){
>      # a line of the report is read and placed into $_
>      ...
>      ...
>      $node1=substr($_,56,13);           # Pull the Field the Node name is
>in.
>      $test_var=$node1;                  # Load temp var. for checking.
>
>      # the chop command cuts off the last character and returns it as the rc
>
>      while ( chop($test_var) eq "-" ){  # loop while last charcter = "-"
>          $next_line=<RPT>;              # Grab next line to get rest.
>          $node1_part2=substr($next_line,57,12); # Pull out rest of the node.
>          $node1=$test_var.$node1_part2; # Add rest of name to what you have.
>          $test_var=$node1;              # Reload test variable.
>      }                                  # End of while chop
>      ...
>      ...
>  }  # End of while loop for reading in the report.
>
>----------------------------------------------------------------
>Disclaimer: These are my views and not those of my employer.
>
> Charles (Chuck) N. Tomlinson               IBM Global Services, Austin,
>Texas
> Phone: (512) 823-0730  Tie Line: 793-073   Storage Management Division
> http://w3.austin.ibm.com/~chuckt           Email: chuckt AT austin.ibm DOT com
>