ftp.nice.ch/pub/next/developer/objc/EOF/OTC_EOFBetaExamples.1.0.bs.tar.gz#/OTC_EOFBetaExamples_V1.0/EOFramework/EnterpriseObject/Author.m

This is Author.m in view mode; [Download] [Up]

/*--------------------------------------------------------------------------
 *
 * 	You may freely copy, distribute, and reuse the code in this example.
 * 	SHL Systemhouse disclaims any warranty of any kind, expressed or  
 *	implied, as to its fitness for any particular use.
 *
 *	Author
 *
 *	Inherits From:		NSObject
 *
 *	Conforms To:		None
 *
 *	Declared In:		Author.h
 *
 *------------------------------------------------------------------------*/
#import "Author.h"
#import "Address.h"
#import <foundation/NSString.h>




@implementation Author

/*--------------------------------------------------------------------------
 *	Init and Dealloc
 *------------------------------------------------------------------------*/
- init
{
	[super init];
	address = [[Address allocWithZone: [self zone]] init];
	return self;
}


- (void) dealloc
{
	[au_id release];
	[fullname release];
	[address release];
	[super dealloc];
}


/*--------------------------------------------------------------------------
 *	Accessors
 *------------------------------------------------------------------------*/
- (NSString *) fullname
{
	return fullname;
}


- (NSString *) address
{
	return [address address];
}


- (NSString *) city
{
	return [address city];
}


- (NSString *) state
{
	return [address state];
}


- (NSString *) zip
{
	return [address zip];
}


- (void) setFullname: (NSString *)aName
{
	[fullname autorelease];
	fullname = [aName retain];
}

	
- (void) setAddress: (NSString *)anAddress
{
	[address setAddress: anAddress];
}

	
- (void) setCity: (NSString *)aCity;
{
	[address setCity: aCity];
}

	
- (void) setState: (NSString *)aState
{
	[address setState: aState];
}


- (void) setZip: (NSString *)aZip
{
	[address setZip: aZip];
}


@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.