Re: NumberField = AlphaField in rpg/free

["Peter Colpaert" <Peter.Colpaert@xxxxxxxxxxxx>]

Nick,

you should look at atoi(); here's some pseudo-code:

? ? ?h dftactgrp(*no) actgrp(*new)
? ? ?h debug(*yes) alwnull(*inputonly)
? ? ?h bnddir('QC2LE')
? ? ? *
? ? ? *--------------------------------------
? ? ? * Prototype for procedure: AtoI
? ? ? *--------------------------------------
? ? ?d AtoI ? ? ? ? ? ?PR ? ? ? ? ? ?10i 0 ExtProc('atoi')
Alpha to Integer
? ? ?d ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? * ? value options(*string)
? ? ? * Mainline program
? ? ? *
? ? ? ? /FREE
? ? ? ? NumberField = atoi(AlphaField);
? ? ? ?/END-FREE

HTH,

Peter Colpaert
Application Developer
Honda Europe NV







                                                     I am trying to move a
                                                     2 position alpha field
                                                     into a 2 position
                                                     numeric field.

                                                     // free
                                                     ...
                                                     ?Numberfield =
                                                     alphafield;
                                                     ...

                                                     // end-free

                                                     When I try to compile
                                                     this, I get an RNF7416
                                                     (the types of the
                                                     right and left hand
                                                     side do no match in
                                                     the EVAL operation.

                                                     Any suggestions how to
                                                     accomplish this.

                                                     Nick



      ______________________________________________________________________
   The information contained in this communication is confidential and may
   be legally privileged. It is intended solely for the use of the
   individual or the entity to whom it is addressed and others authorised
   to receive it. If you have received it by mistake, please let the sender
   know by e-mail reply and delete it from your system.
   If you are not the intended recipient you are hereby notified that any
   disclosure, copying, distribution or taking any action in reliance of
   the contents of this information is strictly prohibited and may be
   unlawful.
   Honda Europe NV is neither liable for the proper and complete
   transmission of the information contained in this communication nor for
   any delay in its receipt.