Re: 4GL *** UPSHIFT Function for 4GL available *** 4GL

}>>>>>>>>> Perry's response to Tim Schaefer <<<<<<<<<< There is already a function built into 4GL called upshift(). let mycharvar = upshift("abc") yields mycharvar = "ABC" } From: tschaefe@gate.net (Tim Schaefer) } Subject: 4GL *** UPSHIFT Function for 4GL available *** 4GL } Date: 6 Feb 1996 11:39:00 GMT } To: informix-list@rmy.emory.edu } } Somebody posted an article looking for a way to UPSHIFT ( toupper ) a } string, in 4GL. I found the article on our news server at work, but can't } find it on cybergates', so I'll just post this here and hope the right } people catch it. } } I had the need to UPSHIFT a string just last week, so I made one in C. } It's very simple, so anybody should be able to use it. } } At my home page there's a C-language UPSHIFT function (as well as a few } other tools) to link in with a 4GL function. A sample 4GL program is also } included to illustrate using it. It is for strings. You pass it a string } and it UPSHIFTS the whole string. This is not a complicated artificial } intelligence engine, scanning the string and avoiding already UPSHIFTED } characters. It just does the whole string no matter what. It uses the } toupper() C-language function. You can copy this function and create } a tolower function as well. } } Hope this can be of help! } } goto http://www.gate.net/~tschaefe } } Look on the NEWS and UPDATES page. } } Enjoy! } } Tim } } -perryd (Guru) ==================================================================== = Perry Dillard - Chief Architect Direct Dial: (206)517-6430 = = FourGen Software, Inc. FAX: (206)522-0054 = = FourGen Building Tech. Support: (800)444-3398 = = 115 NE 100th Street Sales: (800)333-4436 = = Seattle, W.A. 98125-8098 = = = = e-mail: perryd@fourgen.com Web Site http://www.fourgen.com = = = = Home Page: http://www.geocities.com/SiliconValley/3198 = ====================================================================