Re: aclfgl_substr ERROR

Mike Aubury <[email protected]>
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <CAGAq4WGLAnPVrV6U98MuB3jRn7WbUTBE00GyfS-njNszQV1dzA@mail.gmail.com>
To my knowledge - there is no builtin 4gl 'substr' function in Informix4GL
or Aubit4GL...

You normally use something like:

let vc_ano=somecharvar[3,5]

Perhaps the code you are converting had its own definition of a substr
function ?
(it would certainly be trivial to write on)

Although - in your case - perhaps just vc_ano=TODAY USING "yy" would be
simpler anyway ?






On 21 December 2012 20:17, Horacio Villanueva <[email protected]> wrote:

> Hi Guys,
>
> I'm trying to use 4gl SUBSTR() function on aubit4gl, but when I compile
> the code get this error:
>
> captura_venta.ao: In function `aclfgl_captura_venta':
> captura_venta.c:(.text+0x80d): undefined reference to `aclfgl_substr'
> collect2: ld returned 1 exit status
>
> So... I'm using the wrong function or is something else?
>
>
>
>
> Environment: DBDATE=DMY4
>
> Note: I Need to keep DBDATE as is and not change it
>
>
>
> Code:
>
> DEFINE v_ano DATETIME YEAR TO YEAR
> DEFINE vc_ano CHAR(4)
>
> LET v_ano = TODAY
> LET vc_ano = SUBSTR(vc_ano,3,2)
> DISPLAY vc_ano_fecha AT 2,2 ATTRIBUTE(REVERSE, BOLD)
>
> Thanks...
> --regards--
>
> --
> Salu2
> Un cerebro holgazán es la morada del demonio, y ese demonio se llama
> Alzheimer
>
>
> ------------------------------------------------------------------------------
> LogMeIn Rescue: Anywhere, Anytime Remote support for IT. Free Trial
> Remotely access PCs and mobile devices and provide instant support
> Improve your efficiency, and focus on delivering more value-add services
> Discover what IT Professionals Know. Rescue delivers
> http://p.sf.net/sfu/logmein_12329d2d
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>
>

------------------------------------------------------------------------------
LogMeIn Rescue: Anywhere, Anytime Remote support for IT. Free Trial
Remotely access PCs and mobile devices and provide instant support
Improve your efficiency, and focus on delivering more value-add services
Discover what IT Professionals Know. Rescue delivers
http://p.sf.net/sfu/logmein_12329d2d

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.