RE: Synchronization of Objects and corresponding Source. -Reply

[Glenn Ericson <Glenn-Ericson@xxxxxxx>]

Mani 
V3R1 is OK. 
Order the PTF - It is free !
and apply it &  you are off and running.
                Glenn

At 04:10 PM 5/20/98 -0700, you wrote:
>Glenn, Bruce, Kris, Jon and others,
>
>Thanks for your suggestions. I am working on V3R1 and this box does not
>have the PTF SF42617 applied. So, I am unable to use 'ANZUSROBJ'. Finally,
>I am settling with comparison of object/member/record change dates.
>
>Thanks again,
>...Mani
>
>
>At 08:14 AM 5/20/98 -0700, you wrote:
>>You can write an SQLRPGLE program to check objects dates. If the source last
>>change date is greater than the object create date, then attempt to verify
>>the source member record dates.  Here is where you process the source member
>>with an SQL statement to find the MAX(SRCDAT).
>>
>>Of course this isn't fool proof but it may give you an idea if the source
>>member was accidentally modified or moved to another source file.  There are
>>other faults here,.. here are a couple:
>>a. The source date can be manipulated in SEU and the date may be invalid.
>>b. Some editors may use MDY format vs. YMD.
>>
>>HTH,
>>Regards,
>>-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
>>Jon A. Erickson
>>Viking Industries, Inc.
>>http://www.vikingindustries.com
>>-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
>>
>>
>>> -----Original Message-----
>>> From: owner-midrange-l@midrange.com
>>> [mailto:owner-midrange-l@midrange.com]On Behalf Of Mani
>>> Sent: Wednesday, May 20, 1998 12:46 AM
>>> To: MIDRANGE-L@midrange.com
>>> Subject: Re: Synchronization of Objects and corresponding Source. -Reply
>>> Importance: High
>>>
>>>
>>> Hello,
>>>
>>> I understand that DSPOBJD retrieves the Source File/Member from which the
>>> object was created. But, my concern is that the source could have been
>>> modified after that object was created. Now, how do I ensure that the
>>> current version of the source was the one used for creating that object?
>>>
>>> One way, as I see it, is to compare the 'Create Date' of the
>>> object and the
>>> 'Last Change Date' of the source member to ensure that the source member
>>> was not modified after the object was created. Is there any other reliable
>>> way of doing it?
>>>
>>> Thanks,
>>> ...Mani
>>>
>>>
>>> >
>>> ><snip>
>>> >
>>> >The DSPOBJD command using the *FULL option will show you the
>>> >source file used to create a given object.  You can send the output
>>> >of this command to an outfile for querying & reporting.
>>> >
>>> >Scott Cornell
>>> >Mercy Information Systems
>>> >+---
>>>
>>>
>>>
>>>
>>>    _/      _/      _/      _/   _/   _/
>>>  _/  _/ _/    _/ _/    _/ _/_/   _/
>>> _/ _/ _/   _/   _/   _/    _/   _/  ...Time is what you make of it!!
>>> +---
>>> | This is the Midrange System Mailing List!
>>> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>>> | To unsubscribe from this list send email to
>>> MIDRANGE-L-UNSUB@midrange.com.
>>> | Questions should be directed to the list owner/operator:
>>> david@midrange.com
>>> +---
>>>
>>
>>
>>
>>Attachment Converted: "C:\EUDORA\Attach\Jon Erickson.vcf"
>>
>>
>>+---
>>| This is the Midrange System Mailing List!
>>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>>| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
>>| Questions should be directed to the list owner/operator:
david@midrange.com
>>+---
>>
>>
>
>
>
>   _/      _/      _/      _/   _/   _/
> _/  _/ _/    _/ _/    _/ _/_/   _/    
>_/ _/ _/   _/   _/   _/    _/   _/  ...Time is what you make of it!!
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator: david@midrange.com
>+---
>


Glenn
___________________________________________________
Glenn Ericson,          Phoenix Consulting                      
P O Box 701164   East Elmhurst NY 11370-3164 USA                            
Phone 718 898 9805       Fax 718 446 1150
AS/400 & Year 2000- - Solutions Specialists
 © 1998 copyright,  all rights reserved
____________________________________________________


 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---