NATO ( inputLtrNbr ; outputType )

NATO: Converts single character alpha/numeric input to it's Verbose, Morse Code, or Phonetic equivalent

Average rating: 4.5 (30 votes) Log in to vote

Brian Currell
CSS/IGI
http://filemakergeek.com

Sample input:

NATO ( "A" ; "Verbose" )
NATO ( "A" ; "Morse" )
NATO ( "A" ; "Phonetic" )
NATO ( "A" ; "1" )
NATO ( "A" ; "2" )
NATO ( "A" ; "3" )
NATO ( "A" ; "" )

Sample output:

Alpha
• —
AL-FAH
Alpha
• —
AL-FAH
Alpha

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

//Author:  Brian Currell
//Company: CSS/IGI
//Web:     http://filemakergeek.com
//
//NOTE: If outputType is left blank, it will assume the 'Verbose' option.
//
//Valid outputType Options:
//"Verbose", 'Morse", "Phonetic"     OR     1 , 2 , 3
//
// Numeric Options
//Example 1: NATO ("A";1) will return 'Alpha'
//Example 2: NATO ("A";2) will return '• —'
//Example 3: NATO ("A";3) will return 'AL-FAH'
//
// Descriptive Options
//Example 1: NATO ("A";"Verbose") will return 'Alpha'
//Example 2: NATO ("A";"Morse") will return '• —'
//Example 3: NATO ("A";"Phonetic") will return 'AL-FAH'
//

If(IsEmpty(inputLtrNbr) ; "" ; 

Let([
o0 = outputType ;
o1 = Case( IsEmpty(o0) ; 1 /*default*/ ; o0 = "Verbose" ; 1 ; o0 = "Morse" ; 2 ; o0 = "Phonetic" ; 3 ; o0) ;
s1 = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789" ;
p1 = Position (s1 ; inputLtrNbr ; 1 ; 1 ) ;
d1 = List(
"A∞Alpha∞• —∞AL—FAH" ;
"B∞Bravo∞— • • •∞BRAH—VOH" ;
"C∞Charlie∞— • — •∞CHAR—LEE" ;
"D∞Delta∞— • •∞DELL—TAH" ;
"E∞Echo∞•∞ECK—OH" ;
"F∞Foxtrot∞• • — •∞FOKS—TROT" ;
"G∞Golf∞— — •∞GOLF" ;
"H∞Hotel∞• • • •∞HOH—TEL" ;
"I∞India∞• •∞IN—DEE—AH" ;
"J∞Juliet∞• — — —∞JEW—LEE—ETT" ;
"K∞Kilo∞— • —∞KEY—LOH" ;
"L∞Lima∞• — • •∞LEE-MAH" ;
"M∞Mike∞— —∞MIKE" ;
"N∞November∞— •∞NO-VEM-BER" ;
"O∞Oscar∞— — —∞OSS-CAH" ;
"P∞Papa∞• — — •∞PAH-PAH" ;
"Q∞Quebec∞— — • —∞KEH-BECK" ;
"R∞Romeo∞• — •∞ROW-ME-OH" ;
"S∞Sierra∞• • •∞SEE-AIR-RAH" ;
"T∞Tango∞—∞TANG-GO" ;
"U∞Uniform∞• • —∞YOU-NEE-FORM" ;
"V∞Victor∞• • • —∞VIK-TAH" ;
"W∞Whiskey∞• — —∞WISS-KEY" ;
"X∞X—ray∞— • • —∞ECKS-RAY" ;
"Y∞Yankee∞— • — —∞YANG-KEY" ;
"Z∞Zulu∞— — • •∞ZOO-LOO" ;
"0∞Zero∞— — — — —∞ZEE-RO" ;
"1∞One∞• — — — —∞WUN" ;
"2∞Two∞• • — — —∞TOO" ;
"3∞Three∞• • • — —∞TREE" ;
"4∞Four∞• • • • —∞FOW-ER" ;
"5∞Five∞• • • • •∞FIFE" ;
"6∞Six∞— • • • •∞SIX" ;
"7∞Seven∞— — • • •∞SEV-EN" ;
"8∞Eight∞— — — • •∞AIT" ;
"9∞Nine∞— — — — •∞NIN-ER" 
) ; //end list

r1 = GetValue(d1;p1) ;
r2 = Substitute(r1;"∞";"¶") ;
r3 = Choose(o1; GetValue(r2;1) ; GetValue(r2;2) ; GetValue(r2;3) ; GetValue(r2;4))
];
r3
)//end let

)//end if

Allows you to input a single letter (A-Z) or a number (0-9) and depending on the outputType you specify, it will return the official NATO verbose, morse code, or phonetic equivalent.

Potentially helpful for help desk solutions where the staff needs to read back the proper information using the NATO phonetic equivalent.

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

NATO ( inputLtrNbr ; outputType )

Comments

Support this website.

Support this website.