ftp.nice.ch/Attic/openStep/tools/business/QTax.4.2.m.NIS.bs.tar.gz#/QTax_4.2/Source/RegularObject.m

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

#import "RegularObject.h"

@implementation RegularObject

- (void)Calc:sender
{

    float price;
    float tps;
    float subtotal;
    float tvq;
    float total;


	price = [Price floatValue];

	tps = (price*0.07);
 
        subtotal = (price+tps);

        tvq = (subtotal*0.075);

        total = (subtotal+tvq);

        [TPS setFloatValue:tps];// Display result

        [SubTotal setFloatValue:subtotal];// Display result

        [TVQ setFloatValue:tvq];// Display result
     	
        [Total setFloatValue:total];// Display result

	[Price selectText:self]; 
}

// AWAKEFROMNIB
// This is one of the last methods executed after the nib file is loaded.
// This is the BEST way I know how to initialize an object and jump into
// a method after the nib file was loaded, because you are all the methods
// and variables needed can be used. (Unlike init which is not compeletly
// ready when that message is sent
- (void)awakeFromNib
{
	[RegularPanel center];
	[RegularPanel makeKeyAndOrderFront:NULL];
	[Price selectText:self];
}

@end

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