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

Lyn 1.7.2 - Lightweight image browser an...
Lyn is a fast, lightweight image browser and viewer designed for photographers, graphic artists, and Web designers. Featuring an extremely versatile and aesthetically pleasing interface, it delivers... Read more
Lyn 1.7.2 - Lightweight image browser an...
Lyn is a fast, lightweight image browser and viewer designed for photographers, graphic artists, and Web designers. Featuring an extremely versatile and aesthetically pleasing interface, it delivers... Read more
Tunnelblick 3.6.7beta02 - GUI for OpenVP...
Tunnelblick is a free, open source graphic user interface for OpenVPN on OS X. It provides easy control of OpenVPN client and/or server connections. It comes as a ready-to-use application with all... Read more
jAlbum Pro 13.4 - Organize your digital...
jAlbum Pro has all the features you love in jAlbum, but comes with a commercial license. You can create gorgeous custom photo galleries for the Web without writing a line of code! Beginner-friendly... Read more
calibre 2.65.1 - Complete e-book library...
Calibre is a complete e-book library manager. Organize your collection, convert your books to multiple formats, and sync with all of your devices. Let Calibre be your multi-tasking digital librarian... Read more
jAlbum 13.4 - Create custom photo galler...
With jAlbum, you can create gorgeous custom photo galleries for the Web without writing a line of code! Beginner-friendly, with pro results - Simply drag and drop photos into groups, choose a design... Read more
Backblaze 4.2.0.966 - Online backup serv...
Backblaze is an online backup service designed from the ground-up for the Mac. With unlimited storage available for $5 per month, as well as a free 15-day trial, peace of mind is within reach with... Read more
Backblaze 4.2.0.966 - Online backup serv...
Backblaze is an online backup service designed from the ground-up for the Mac. With unlimited storage available for $5 per month, as well as a free 15-day trial, peace of mind is within reach with... Read more
Tunnelblick 3.6.7beta02 - GUI for OpenVP...
Tunnelblick is a free, open source graphic user interface for OpenVPN on OS X. It provides easy control of OpenVPN client and/or server connections. It comes as a ready-to-use application with all... Read more
calibre 2.65.1 - Complete e-book library...
Calibre is a complete e-book library manager. Organize your collection, convert your books to multiple formats, and sync with all of your devices. Let Calibre be your multi-tasking digital librarian... Read more

Siralim 2 (RPG / Roguelike) (Games)
Siralim 2 (RPG / Roguelike) 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Siralim 2 is an old-school monster catching RPG. Summon and customize hundreds of creatures to fight for you as... | Read more »
Clean Text (Productivity)
Clean Text 1.0 Device: iOS Universal Category: Productivity Price: $3.99, Version: 1.0 (iTunes) Description: | Read more »
Gemini - A Journey of Two Stars (Games)
Gemini - A Journey of Two Stars 1.0.1 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.1 (iTunes) Description: *** SPECIAL LAUNCH SALE: $2.99 (25% off) *** "A mesmerizing and unexpectedly emotional journey." -- Los... | Read more »
How to get four NFL superstars for your...
Even though you're probably well on your way to building a top notch squad for the new season in Madden NFL Mobile, let's say you could beef it up by adding Rob Gronkowski, Antonio Brown, Von Miller, and Todd Gurley to your roster. That's... | Read more »
Cartoon Network Superstar Soccer: Goal!!...
Cartoon Network Superstar Soccer: Goal!!! – Multiplayer Sports Game Starring Your Favorite Characters 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Become a soccer superstar with your... | Read more »
NFL Huddle: What's new in Topps NFL...
Can you smell that? It's the scent of pigskin in the air, which either means that cliches be damned, pigs are flying in your neck of the woods, or the new NFL season is right around the corner. [Read more] | Read more »
FarmVille: Tropic Escape tips, tricks, a...
Maybe farming is passé in mobile games now. Ah, but farming -- and doing a lot of a other things too -- in an island paradise might be a little different. At least you can work on your tan and sip some pina coladas while tending to your crops. [... | Read more »
Become the King of Avalon in FunPlus’ la...
King Arthur is dead. Considering the legend dates back to the 5th century, it would be surprising if he wasn’t. But in the context of real-time MMO game King of Avalon: Dragon Warfare, Arthur’s death plunges the kingdom into chaos. Evil sorceress... | Read more »
Nightgate (Games)
Nightgate 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: *** Launch Sale: 25% OFF for a limited time! *** In the year 2398, after a great war, a network of intelligent computers known as... | Read more »
3 best fantasy football apps to get you...
Last season didn't go the way you wanted it to in fantasy football. You were super happy following your drafts or auctions, convinced you had outsmarted everyone. You were all set to hustle on the waiver wire, work out some sweet trades, and make... | Read more »

Price Scanner via MacPrices.net

MacBook Airs on sale for up to $101 off MSRP
Amazon has 11″ and 13″ MacBook Airs on sale for up to $101 off MSRP for a limited time. Shipping is free: - 11″ 1.6GHz/128GB MacBook Air (model MJVM2LL/A): $798 $101 off MSRP - 11″ 1.6GHz/256GB... Read more
Apple certified refurbished iPad mini 4s avai...
Apple has certified refurbished iPad mini 4s now available for up to $120 off the cost of new models. An Apple one-year warranty is included with each iPad, and shipping is free. The following models... Read more
Apple price trackers, updated continuously
Scan our Apple Price Trackers for the latest information on sales, bundles, and availability on systems from Apple’s authorized internet/catalog resellers. We update the trackers continuously: - 15″... Read more
Global Tablet Shipments Projected to Increase...
Digitimes’ Jim Hsiao reports that global tablet shipments will increase by 16.3 percent sequentially to reach nearly 47 million units in 2016′s third quarter, but that volume will still be down over... Read more
Apple’s 2016 Back to School promotion: Free B...
Purchase a new Mac or iPad using Apple’s Education Store and take up to $300 off MSRP. All teachers, students, and staff of any educational institution qualify for the discount. Shipping is free, and... Read more
Apple refurbished iPad Air 2s available start...
Apple has Certified Refurbished iPad Air 2 available starting at $339. Apple’s one-year warranty is included with each model, and shipping is free: - 128GB Wi-Fi iPad Air 2: $499 - 64GB Wi-Fi iPad... Read more
13-inch 2.5GHz MacBook Pro available for $961...
Overstock has the 13″ 2.5GHz MacBook Pro available for $961.63 including free shipping. Their price is $138 off MSRP. Read more
Clearance 12-inch Retina MacBooks, Apple refu...
Apple has Certified Refurbished 2015 12″ Retina MacBooks available starting at $929. Apple will include a standard one-year warranty with each MacBook, and shipping is free. The following... Read more
BookBook Releases SurfacePad, BookBook &...
BookBook has released three new covers just for iPad Pro: SurfacePad, BookBook and BookBook Rutledge Edition. BookBook for iPad Pro is a gorgeous leather case reminiscent of a vintage sketchbook.... Read more
Clean Text 1.0 for iOS Reduces Text Cleanup a...
Apimac today announced availability of Clean Text for iOS, a tool for webmasters, graphic designers, developers and magazine editors to reduce text cleanup and editing time, and also for any iPhone... Read more

Jobs Board

*Apple* Retail - Multiple Positions Victor,...
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* /Mac Support Engineer - GFI Digital,...
FI Digital, Inc. is currently seeking candidates for a full time Apple Support Engineer to add to our Maryland Heights, Missouri IT team. Candidates must be dynamic Read more
SW Engineer *Apple* TV - Apple Inc. (United...
The Apple TV team is looking for excellent software engineers with experience in hardware, media management, media playback, content delivery and a passion for Read more
Senior *Apple* Administrator - Pratt Instit...
POSITION SUMMARY: Directs the coordination and standardization of campus-wide Apple systems, including planning, analysis and implementation of Apple -related Read more
*Apple* Solutions Consultant - Apple (United...
# Apple Solutions Consultant Job Number: 51218534 Pleasant Hill, California, United States Posted: Aug. 18, 2016 Weekly Hours: 40.00 **Job Summary** As an Apple Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.