Subject: [os2genau_digest] No. 1200
From: Digest <deadmail>
To: "OS/2GenAu Digest"<deadmail>
Date: Wed, 28 Sep 2005 00:02:11 EST-10EDT,10,-1,0,7200,3,-1,0,7200,3600

**************************************************
Tuesday 27 September 2005
 Number  1200
**************************************************

Subjects for today
 
1  Re:  File Title and Real Name : Dennis Nolan <djn at aanet dot com dot au>

**= Email   1 ==========================**

Date:  Tue, 27 Sep 2005 17:01:46 +1000
From:  Dennis Nolan <djn at aanet dot com dot au>
Subject:  Re:  File Title and Real Name

Thanks John
It's just what the doctor ordered.

Regards
Dennis.

John Angelico wrote:

>On Mon, 26 Sep 2005 21:06:54 +1000, Dennis Nolan wrote:
>
>  
>
>>Unfortunately this renumbering leaves the title unaffected, and 
>>applications like pmView uses the title rather than the real name.
>>
>>So does anyone know how to synchronize Title to Real Name?
>>    
>>
>
>Hi Dennis
>
>How about using Rexx SYSSETOBJECTDATA to alter the Title as well?
>
>Following added by son Chris.
>
>Instead of using the system "REN" command, use:
>call syssetobjectdata
>"current_name_inc_path","TITLE=new_filename_without_path"
>
>For instance:
>call sysfiletree directory()"\*.*","stem","fo"
>do i=1 to stem.0
>	call charout ,"["filespec("N",stem.i)"] "
>	parse pull newname
>	if newname\="" then call syssetobjectdata stem.i,"TITLE="newname
>end
>
>This program will run through the files in the current directory and prompt
>for a new name for each. (Hit Enter to keep the same name). Note it reads
>file names, not titles... to read titles you need WPTools.DLL; replace the
>call charout line with:
>	call wptoolsqueryobject stem.i,,"curtit"; call charout ,"["curtit"] "
>
>Bon chance!
>
>
>Best regards
>John Angelico
>OS/2 SIG
>os2 at melbpc dot org dot au or 
>talldad at kepl dot com dot au
>___________________
>
>PMTagline v1.50 - Copyright, 1996-1997, Stephen Berg and John Angelico
>... OS/2: Not just another pretty program loader!

> 

>
>  
>

-- 

Howard's "Fair Dismissal" means it's fair for sleaze-bag bosses to sack anyone who rejects their sleazy gropings.
How will you explain that to your daughter.

Dennis Nolan
ETU Shopsteward.

[attachments have been removed]
----------------------------------------------------------------------------------