TweetFollow Us on Twitter

Another Dimension
Volume Number:7
Issue Number:2
Column Tag:Developer's Forum

Programming In Another Dimension

By Joe Pillera, MacTutor Contributing Editor, The Environmental Research Institute of Michigan

Programming In Another Dimension

Introduction. As software development systems evolve, there is always a increasing level of abstraction away from the machine - and to the problem domain of the user. One tool for the Macintosh that exemplifies this is the 4th Dimension® (4D1) from Acius. 4D is an incredible tool, because it goes far beyond a database: rather than just producing GUI (graphical user interface) skeletons like other programs, 4D can generate finished, ready to ship programs, complete with all the necessary Macintosh user interface controls.

This is the story of MacTutor Phone Book (MTPB), a complete 4D program (which is a stand-alone Macintosh application when compiled with the 4D compiler) which features:

• Complete support of the Macintosh interface, including pull down menus, desk accessory support, modeless dialog boxes, and printing.

• Searching, sorting and printing of address labels.

Background.

When constructing MTPB, I wanted more than a flat-file database: I wanted an application that could stand alone by itself. While a phone book application may not be as exotic as killing viruses, it serves as a good example of what 4D is capable of; without it, I would have faced the prospect of writing thousands of lines of code, and undoubtedly reinventing the wheel several times in the process.

Developing in 4D. The first aspect to developing in 4D is to specify the table structures, and use the layout editor to paint your user interface. As can be seen in Figures 1 and 2, 4D gives you a rich set of GUI controls to design the look and feel of your program.

Figure 1. Construction a MTPB input disalog with the 4D layout editor

Figure 2. The repetoire of user interface controls available for a custom 4D application.

Once the database structures and your custom windows have been designed, the fun starts. 4D gives you a comprehensive script language to implement custom applications, and even comes with a symbolic debugger, as illustrated in Figure 3. This script language is very pascal-like (minus the Unit module encapsulation feature), and includes features such as arrays, functions and procedures (a 4D function is a procedure that returns a value in the variable $0), pointer manipulation, and string manipulation that reminds me of BASIC (BASIC has one of the richest string manipulation syntaxes available).

Figure 3. Debugging a 4D procedure.

After your application has been designed, you can compile it with the 4D Compiler, as illustrated in Figure 4.

Figure 4. How to build a stand-alone application out of MTPB with the 4D Compiler

MacTutor Phone Book. Refer to Figure 5: not only can MTPB manage your phone records - it’s a complete Macintosh application (when compiled with the 4D Compiler).

Figure 5. MTPB as a stand-alone Macintosh application.

Furthermore, one of the parallels between object oriented programming and 4D programming is that you can “inherit” functionality, without having to write any code to implement it. Refer to Figures 6 and 8: MTPB makes full use of searching, and label printing - but these are given to you by 4D, and not implemented by me. This kind of reuse of software allows you to concentrate on the problem at hand, rather than on implementing code that has been written many times before. When custom windows do need to be designed, they can be assembled very quickly with 4D’s layout editor, as illustrated in Figure 7.

Figure 6. Search for all addresses that are either in Ann Arbor or whose last name field starts with 'P'.

Figure 7. Sorting in MTPB with a custom dialog constructed with the 4D layout editor.

Figure 8. Printing labels with MTPB.

Suggestions for Improvement.

While 4D is an incredibly powerful tool, I would like to suggest two possible future improvements:

Hierarchical menus: would be very useful in the menu editor, and would allow for a more concise construction of 4D applications.

Procedure abstraction: in a large 4D application, it is easy to get buried by a plethora of “global procedures.” What would be extremely useful here is some sort of hierarchical way of cataloging procedures. For example, introducing a “module” concept (containing procedures with scope only visible to it) would make organizing your 4D code a lot easier.

The End... Please note that this month’s source code disk contains only the data files for MTPB - and not a stand-alone program. Because of licensing rules, you’ll need to compile it with your own copy of the 4D Compiler - and a 4D Runtime module - before ending up with a double-clickable application.

The technical support at Acius is outstanding, and the software very thorough. Compared to other development tools which also hammer out skeleton user interfaces, there’s no doubt that 4D costs more. But that age-old adage still applies here.

You get what you pay for.

Joe Pillera is a research scientist at the Environmental Research Institute of Michigan (ERIM) in Ann Arbor, Michigan. The opinions expressed here are solely those of Joe Pillera, and not of ERIM or its affiliates. The author can be reached electronically via the GEnie2 service by sending mail to JPILLERA.

1 4D is a registered trademark of Acius, Inc.

2 GEnie is a trademark of the General Electric Company.


Global Procedures for MTPB
© MacTutor Magazine, February 1991


f_format_number
 ‘Pretty-process a phone number
 ‘Examples: 
 ‘format_number(“3131234567”)->(313)123-4567
 ‘format_number(“3131234567”;”313")->123-4567
 ‘Arguments:$1 = raw phone number
 ‘ $2 = area code to drop, if any.
 ‘Return Value: $0 = formatted result.
If (Length($1)>0)
 If (Length($2)=3)
 ‘The caller wants to zap an area code...
 If (Substring($1;1;3)=$2)
 ‘Omit the area code    
 $0:=Substring($1;4;3)+ “-” +
 Substring($1;7;4)
 Else 
 ‘Keep it    
 $0:=”(“+Substring($1;1;3)+”) “ +
 Substring($1;4;3) + “-” +
 Substring($1;7;4)
    End if 
  Else 
 ‘Caller wants the area code no matter what
 $0:=”(“ + Substring($1;1;3)+”)” + 
 Substring($1;4;3) + “-” +
 Substring($1;7;4)
  End if 
End if 


p_display
‘Display all records in the phone book
DEFAULT FILE([Phone Book])
ALL RECORDS
OUTPUT LAYOUT([Phone Book];”Output Layout”)
MODIFY SELECTION


p_print_sel
‘Print the records last selected by the user
DEFAULT FILE([Phone Book])
If (Records in selection=0)
 ALERT(“You haven’t selected any records
   to print!”)
Else 
 OUTPUT LAYOUT([Phone Book];”Output Layout”)
 PRINT SELECTION([Phone Book])
End if 


p_print_tbl
‘Print all records in the phone book
DEFAULT FILE([Phone Book])
ALL RECORDS
OUTPUT LAYOUT([Phone Book];”Output Layout”)
PRINT SELECTION([Phone Book])


p_search
‘Let the user perform a search on the database
DEFAULT FILE([Phone Book])
SEARCH
If (OK=1)
 OUTPUT LAYOUT([Phone Book];”Output Layout”)
 DISPLAY SELECTION
End if 


p_sort
‘Permanently sort the database, and display
‘results to the user.
DEFAULT FILE([Phone Book])
OPEN WINDOW(110;100;390;260;0;”Sort The Database”)
DIALOG(“Sort Dialog”)
‘Note: the actual sorting takes place in the script
‘      associated with the “ok” button, but is
‘      omitted here for brevity.
CLOSE WINDOW
If (g_display=True)
  p_display 
End if 


p_labels
DEFAULT FILE([Phone Book])
ALL RECORDS
PRINT LABEL([Phone Book];” “)


p_new
‘Add new records(s) until the user cancels
DEFAULT FILE([Phone Book])
INPUT LAYOUT([Phone Book];”Input Layout”)
Repeat 
 ADD RECORD
Until (OK=0)

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

5 slither.io mash-ups we'd love to...
If there's one thing that slither.io has proved, it's that the addictive gameplay of Agar.io can be transplanted onto basically anything and it will still be good fun. It wouldn't be surprising if we saw other developers jumping on the bandwagon,... | Read more »
How to navigate the terrain in Sky Charm...
Sky Charms is a whimsical match-'em up adventure that uses creative level design to really ramp up the difficulty. [Read more] | Read more »
Victorious Knight (Games)
Victorious Knight 1.3 Device: iOS Universal Category: Games Price: $1.99, Version: 1.3 (iTunes) Description: New challenges awaits you! Experience fresh RPG experience with a unique combat mechanic, packed with high quality 3D... | Read more »
Agent Gumball - Roguelike Spy Game (Gam...
Agent Gumball - Roguelike Spy Game 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Someone’s been spying on Gumball. What the what?! Two can play at that game! GO UNDERCOVERSneak past enemy... | Read more »
Runaway Toad (Games)
Runaway Toad 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: It ain’t easy bein’ green! Tap, hold, and swipe to help Toad hop to safety in this gorgeous new action game from the creators of... | Read more »
PsyCard (Games)
PsyCard 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: From the makers och Card City Nights, Progress To 100 and Ittle Dew PSYCARD is a minesweeper-like game set in a cozy cyberpunk... | Read more »
Sago Mini Robot Party (Education)
Sago Mini Robot Party 1.0 Device: iOS Universal Category: Education Price: $2.99, Version: 1.0 (iTunes) Description: -- Children's Technology Review Editor's Choice -- | Read more »
How to get a high score in every level o...
Sky Charms is an adorable match three puzzler that provides a decent challenge thanks to its creative level design. It regularly presents something new, forcing you to think on your feet. [Read more] | Read more »
Apestorm: Full Bananas (Games)
Apestorm: Full Bananas 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: ***Launch sale – limited time only!*** Fugitive Apes have taken to the skies in search of revenge after humans have... | Read more »
How to create bigger words in Spellspire
Words have power. At least they do in Spellspire,a game about blasting out magical attacks by making words out of a jumble of letters. And it's a lot of fun. But if you want to be the best, you're going to have to think tactically when you start... | Read more »

Price Scanner via MacPrices.net

15-inch 2.2GHz Retina MacBook Pro on sale for...
Amazon.com has the 15″ 2.2GHz Retina MacBook Pro on sale for $1699.99 including free shipping. Their price is $300 off MSRP, and it’s the lowest price available for this model from any reseller (and... Read more
Apple Beats Microsoft at Own Game; Amazon Pri...
First quarter seasonality combined with an overall disinterested customer base led to an annual decline of 14.7% in worldwide tablet shipments during the first quarter of 2016 (1Q16). Worldwide... Read more
Aleratec Releases Mac Software Upgrade for 1...
California based Aleratec Inc., designer, developer and manufacturer of Portable Device Management (PDM) charge/sync products for mobile devices and professional-grade duplicators for hard disk... Read more
Sale! Amazon offers 27-inch iMac, 13-inch 2.9...
Amazon has the 27″ 3.2GHz 5K iMac and the 13″ 3.9GHz Retina MacBook Pro on sale for $300 off MSRP, each including free shipping, for a limited time: - 27″ 3.2GHz/1TB HD 5K iMac (model MK462LL/A): $... Read more
Apple refurbished 13-inch Retina MacBook Pros...
Apple has Certified Refurbished 13″ Retina MacBook Pros available for up to $270 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 13″ 2.7GHz... Read more
13-inch 2.7GHz/128GB Retina MacBook Pro on sa...
Take $200 off MSRP on the price of a new 13″ 2.7GHz/128GB Retina MacBook Pro (model MF839LL/A) at Amazon. Shipping is free: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1099.99 $200 off MSRP Act now if... Read more
Apple refurbished clearance 15-inch Retina Ma...
Apple has Certified Refurbished 2014 15″ 2.2GHz Retina MacBook Pros available for $1609, $390 off original MSRP. Apple’s one-year warranty is included, and shipping is free. They have refurbished 15... Read more
27-inch 5K iMacs on sale for up to $150 off M...
B&H Photo has 27″ 5K iMacs on sale for up to $150 off MSRP including free shipping plus NY sales tax only: - 27″ 3.3GHz iMac 5K: $2199 $100 off MSRP - 27″ 3.2GHz/1TB Fusion iMac 5K: $1849.99 $150... Read more
What Does The Refreshed 12-Inch MacBook Tell...
A lot of commentators are complaining that Apple’s update of the 12-Inch MacBook last week is a bit of a damp squib. I don’t know what they were expecting, since it would be very unlike Apple to do a... Read more
Free Wittify Keyboard Now Available On The Ap...
A team of Harvard Business School students have announced that the Wittify Keyboard, a new app utility for iOS devices, is now available on the Apple App Store. The Wittify keyboard and application... Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
*Apple* Solutions Consultant - Apple (United...
# Apple Solutions Consultant Job Number: 48260200 Phoenix, Arizona, United States Posted: Apr. 22, 2016 Weekly Hours: 40.00 **Job Summary** As an Apple Solutions Read more
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
Simply Mac *Apple* Specialist- Service Repa...
Simply Mac is the largest premier retailer of Apple products in the nation. In order to support our growing customer base, we are currently looking for a driven Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.