File:  [NeXTSTEP 3.3 examples] / Examples / DatabaseKit / AssociationOracle / QualifiedAssociation.m
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:49:00 2018 UTC (8 years, 1 month ago) by root
Branches: NeXT, MAIN
CVS tags: NeXTSTEP33, HEAD
Sample Programs from NeXSTEP 3.3

/* QualifiedAssociation.m:
 * You may freely copy, distribute, and reuse the code in this example.
 * NeXT disclaims any warranty of any kind, expressed or  implied, as to its
 * fitness for any particular use.
 *
 * Written by Mai Nguyen, NeXT Developer Support
 *
 */

#import "QualifiedAssociation.h"

@implementation QualifiedAssociation

/*  initialization method.
 */

- (QualifiedAssociation *)initAndReplaceAssociationTo:(DBFetchGroup *)detailFG
{
	DBModule * 				dbModule;
	DBAssociation * 		dbAssociation;
	DBExpression *			dbExpression;
	DBFetchGroup *			masterFetchGroup;
		
	/* Get a hold of the association from master fetchgroup to detail
	 * fetchgroup
	 */
	dbModule = [detailFG module];
	dbAssociation = [dbModule associationForObject:detailFG];
	dbExpression = [dbAssociation expression];
	masterFetchGroup = [dbAssociation fetchGroup];
		/* Remove the association from the master fetchgroup
		 */
	[masterFetchGroup removeAssociation:dbAssociation];
	[self initFetchGroup:masterFetchGroup
		expression: dbExpression
		destination: detailFG ];
			
	[masterFetchGroup addAssociation:self];
	
		/* Free old association */
	[dbAssociation free];
	return self;
}

- setValue:value
{
	[[self destination] fetchContentsOf:value usingQualifier:dbQualifier];
	return self;
}

- setQualifier: qualifier
{
	dbQualifier = (DBQualifier *)qualifier;
	return self;
}

- qualifier
{
	return dbQualifier;
}


@end

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.