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

SpamSieve 2.9.38 - Robust spam filter fo...
SpamSieve is a robust spam filter for major email clients that uses powerful Bayesian spam filtering. SpamSieve understands what your spam looks like in order to block it all, but also learns what... Read more
TeamViewer 15.0.8397 - Establish remote...
TeamViewer gives you remote control of any computer or Mac over the Internet within seconds or can be used for online meetings. Find out why more than 200 million users trust TeamViewer! Free for non... Read more
SteerMouse 5.4.3 - Powerful third-party...
SteerMouse is an advanced driver for USB and Bluetooth mice. SteerMouse can assign various functions to buttons that Apple's software does not allow, including double-clicks, modifier clicks,... Read more
Toast Titanium 18.2.1 - The ultimate med...
Roxio Toast Titanium, the leading DVD burner for Mac, makes burning even better, adding Roxio Secure Burn to protect your files on disc and USB in Mac- or Windows-compatible formats. Get more style... Read more
HoudahSpot 5.0.11 - Advanced file-search...
HoudahSpot is a versatile desktop search tool. Use HoudahSpot to locate hard-to-find files and keep frequently used files within reach. HoudahSpot will immediately feel familiar. It works just the... Read more
ClipGrab 3.8.6 - Download videos from Yo...
ClipGrab is a free downloader and converter for YouTube, Vimeo, Facebook and many other online video sites. It converts downloaded videos to MPEG4, MP3 or other formats in just one easy step Version... Read more
ExpanDrive 7.4.0 - Access cloud storage...
ExpanDrive builds cloud storage in every application, acts just like a USB drive plugged into your Mac. With ExpanDrive, you can securely access any remote file server directly from the Finder or... Read more
Adobe Dreamweaver CC 2020 20.0 - Build w...
Dreamweaver CC 2020 is available as part of Adobe Creative Cloud for as little as $20.99/month (or $9.99/month if you're a previous Dreamweaver customer). Adobe Dreamweaver CC 2020 allows you to... Read more
Eye Candy 7.2.3.85 - 30 professional Pho...
Eye Candy renders realistic effects that are difficult or impossible to achieve in Photoshop alone, such as Fire, Chrome, and the new Lightning. Effects like Animal Fur, Smoke, and Reptile Skin are... Read more
Sparkle Pro 2.8.5 - Visual website creat...
Sparkle Pro will change your mind if you thought building websites wasn't for you. Sparkle is the intuitive site builder that lets you create sites for your online portfolio, team or band pages, or... Read more

Latest Forum Discussions

See All

Pre-register for Hello Kitty AR: Kawaii...
Hello Kitty — the cute cat that launched a multi-billion-pound franchise — has been brought to life… sort of. Sanrio has teamed up with the Bublar Group to create a new mobile game that uses AR tech to turn the real world into Hello Kitty’s... | Read more »
Gorgeous and tranquil puzzler Spring Fal...
One-man indie studio SPARSE//GameDev has now launched its tranquil puzzler, Spring Falls. It's described as "a peaceful puzzle game about water, erosion, and watching things grow". [Read more] | Read more »
Black Desert Mobile gets an official rel...
Pearl Abyss has just announced that its highly-anticipated MMO, Black Desert Mobile, will launch globally for iOS and Android on December 11th. [Read more] | Read more »
Another Eden receives new a episode, cha...
Another Eden, WFS' popular RPG, has received another update that brings new story content to the game alongside a few new heroes to discover. [Read more] | Read more »
Overdox guide - Tips and tricks for begi...
Overdox is a clever battle royale that changes things up by adding MOBA mechanics and melee combat to the mix. This new hybrid game can be quite a bit to take in at first, so we’ve put together a list of tips to help you get a leg up on the... | Read more »
Roterra Extreme - Great Escape is a pers...
Roterra Extreme – Great Escape has been described by developers Dig-It Games as a mini-sequel to their acclaimed title Roterra: Flip the Fairytale. It continues that game's tradition of messing with which way is up, tasking you with solving... | Read more »
Hearthstone: Battlegrounds open beta lau...
Remember earlier this year when auto battlers were the latest hotness? We had Auto Chess, DOTA Underlords, Chess Rush, and more all gunning for our attention. They all had their own reasons to play, but, at least from where I'm standing, most... | Read more »
The House of Da Vinci 2 gets a new gamep...
The House of Da Vinci launched all the way back in 2017. Now, developer Blue Brain Games is gearing up to deliver a second dose of The Room-inspired puzzling. Some fresh details have now emerged, alongside the game's first official trailer. [Read... | Read more »
Shoot 'em up action awaits in Battl...
BattleBrew Productions has just introduced another entry into its award winning, barrelpunk inspired, BattleSky Brigade series. Whilst its previous title BattleSky Brigade TapTap provided fans with idle town building gameplay, this time the... | Read more »
Arcade classic R-Type Dimensions EX blas...
If you're a long time fan of shmups and have been looking for something to play lately, Tozai Games may have just released an ideal game for you on iOS. R-Type Dimensions EX brings the first R-Type and its sequel to iOS devices. [Read more] | Read more »

Price Scanner via MacPrices.net

13″ 2.4GHz MacBook Pros available for up to $...
Apple has a full line of Certified Refurbished 2019 13″ 2.4GHz 4-Core Touch Bar MacBook Pros available starting at $1529 and up to $300 off MSRP. Apple’s one-year warranty is included, shipping is... Read more
New at T-Mobile: Switch to T-Mobile, and get...
T-Mobile is offering a free 64GB iPhone 8 for new customers who switch to T-Mobile and open a new line of service. Eligible trade-in required, and discount applied over a 24 month period. The fine... Read more
Xfinity Mobile’s Black Friday Apple savings:...
Take $250 off the purchase of any iPhone at Xfinity Mobile with a new line activation, and transfer of phone number to Xfinity Mobile, through December 8, 2019. This includes Apple’s new iPhone 11... Read more
2019 13″ 1.4GHz MacBook Pros available starti...
Apple has a full line of Certified Refurbished 2019 13″ 1.4GHz 4-Core Touch Bar MacBook Pros available starting at $1099 and up to $230 off MSRP. Apple’s one-year warranty is included, shipping is... Read more
Save up to $350 on a 21″ or 27″ iMac with the...
Apple has Certified Refurbished 2019 21″ & 27″ iMacs available starting at $929 and up to $350 off the cost of new models. Apple’s one-year warranty is standard, shipping is free, and each iMac... Read more
Early Holiday 2019 Sale: B&H again offers...
B&H Photo has 10.2″ iPads on sale again for $30 off Apple’s MSRP, starting at $299, as part of their early Holiday 2019 sale. Overnight shipping is free to many addresses in the US: – 10.2″ 32GB... Read more
Apple iMacs on sale today at B&H Photo fo...
B&H Photo has new 2019 21″ and 27″ 5K iMacs on stock today and on sale for up to $150 off Apple’s MSRP. Overnight shipping is free to many locations in the US. These are the same iMacs sold by... Read more
2018 4 and 6-Core Mac minis on sale today for...
Apple resellers are offering new 2018 4-Core and 6-Core Mac minis for $80-$100 off MSRP for a limited time. B&H Photo has the new 2018 4-Core and 6-Core Mac minis on sale for up to $100 off Apple... Read more
Early Holiday 2019 sale at B&H Photo: 12....
B&H Photo has new 12.9″ iPad Pros on sale for up to $120 off Apple’s MSRP as part of their early Holiday 2019 sale. Overnight shipping is free to many addresses in the US: – 12.9″ 64GB WiFi iPad... Read more
8-Core iMac Pro on sale today for $4499 at B...
B&H Photo has the base 8-Core 3.2GHz 32GB/1TB iMac Pro on sale today for $4499 — $500 off Apple’s MSRP. Shipping is free. Their price is the lowest available for a new iMac Pro from any Apple... Read more

Jobs Board

*Apple* Health Benefit Specialist - Call Cen...
Description ** Apple Health Benefit Specialist - Call Center (MAS 3/MACSC)** **Olympia, WA Multiple Positions** *The ideal candidate for this position will have Read more
Hair Stylist - *Apple* Blossom Mall - JCPen...
Hair Stylist - Apple Blossom Mall Location:Winchester, VA, United States- Apple Blossom Mall 1850 Apple Blossom Dr Job ID:1065040Salon Professionals Job Read more
*Apple* Mobility Pro - Best Buy (United Stat...
**747088BR** **Job Title:** Apple Mobility Pro **Job Category:** Store Associates **Store NUmber or Department:** 000297-Reston-Store **Job Description:** At Best Read more
Nurse Practitioner - Field Based (San Bernard...
Nurse Practitioner - Field Based (San Bernardino, CA, Apple Valley, Hesperia) **Location:** **United States** **Requisition #:** PS30312 **Post Date:** Nov 11, 2019 Read more
Best Buy *Apple* Computing Master - Best Bu...
**747061BR** **Job Title:** Best Buy Apple Computing Master **Job Category:** Store Associates **Store NUmber or Department:** 000647-Kildeer-Store **Job Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.