Solución propuesta para el lógico y el ajuste de centavos.
---------------------------------------------------------------------------------------------------

A..........T.Nombre++++.Lon++TPdB......Funciones

A          R BR02                      PFILE(BF02)

A            BANCO

A            CTAB          -8

A            $DEBE

A            $HBER

A            STS1

***  Llaves de Acceso

A          K STS1

A          K BANCO

A          K CTAB

-------------------------------------------------------------------

Ajuste de Centavos

CL0N01N02N03Factor1+++Oper+Factor2+++ResultLonD

C                     MOVE $         DOS     20

C           DOS       IFGT 0

C                     MOVE $         X       10

C           X         IFGT 4

C                     MOVE 5         $

C                     ELSE

C                     MOVE 0         $

C                     END

C                     ELSE

C                     SUB  .05       $

C                     END

----------------------------------------------------

El 22 de mayo de 2009 10:42, <[email protected]>escribió:

> Envíe los mensajes para la lista Forum.help400 a
>        [email protected]
>
> Para subscribirse o anular su subscripción a través de la WEB
>        http://listas.combios.es/cgi-bin/mailman/listinfo/forum.help400
>
> O por correo electrónico, enviando un mensaje con el texto "help" en
> el asunto (subject) o en el cuerpo a:
>        [email protected]
>
> Puede contactar con el responsable de la lista escribiendo a:
>        [email protected]
>
> Si responde a algún contenido de este mensaje, por favor, edite la
> linea del asunto (subject) para que el texto sea mas especifico que:
> "Re: Contents of Forum.help400 digest...". Además, por favor, incluya
> en la respuesta sólo aquellas partes del mensaje a las que está
> respondiendo.
>
>
> Asuntos del día:
>
>   1. consulta sobre archivo lógico ( Peñaherrera, Mauro )
>   2. Re: consulta sobre archivo lógico (informat)
>   3. tema redondeo en función de decimales (Paco Medina)
>   4. RE: consulta sobre archivo lógico (Javier Mora)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Fri, 22 May 2009 10:06:05 -0500
> From: " Peñaherrera, Mauro " <[email protected]>
> Subject: consulta sobre archivo lógico
> To: "forum.help400" <[email protected]>
> Message-ID:
>        <d94ba4a3c4ed1a43b933362260f88ea7184baef...@optar.optarecuador.local
> >
> Content-Type: text/plain; charset="iso-8859-1"
>
> Compañeros:
>
> Una consulta sobre archivos lógicos.
>
> Tengo un campo alfanumérico y deseo una parte de ese campo sea clave del
> archivo (eso lo realizo con lo siguiente:
>
> A            X1NUTA             I      SST(VALE8P 1  22)
>  A          K X1NUTA
>
> Si el campo es numérico no puedo utilizar esta instrucción , por lo cual
> quería saber si alguien sabe cómo puedo realizar esto con ese campo
> numérico.
>
> Gracias.
>
>
> ________________________________
> Nota de descargo: La información contenida en este e - mail y sus anexos es
> confidencial y sólo puede ser utilizada por el destinatario del mismo. Esta
> información no debe ser distribuida, ni copiada total o parcialmente por
> ningún medio sin la autorización de DINERS/INTERDIN. Además, DINERS/INTERDIN
> no asume responsabilidad sobre información, opiniones o criterios contenidos
> en este e-mail.
>
> Disclaimer: The information contained in this e-mail and its attached files
> are confidential and intended only for the use of the person to which it is
> addressed. This information can not be totally or partially distributed nor
> copied by any media without the authorization from DINERS/INTERDIN. In
> addition, DINERS/INTERDIN does not assume responsibility about this
> information, opinions or criteria contented in this e-mail.
> ------------ próxima parte ------------
> Se ha borrado un adjunto en formato HTML...
> URL: <
> http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20090522/6104fa0f/attachment-0001.htm
> >
>
> ------------------------------
>
> Message: 2
> Date: Fri, 22 May 2009 17:22:20 +0200
> From: "informat" <[email protected]>
> Subject: Re: consulta sobre archivo lógico
> To: "forum.help400" <[email protected]>
> Message-ID: <ec9b60fa7aa74e748090ac0eb6128...@equipo>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Si es númerico entiendo que necesitas ordenar por numero excluyendo unos
> valores, si ese es el caso, yo lo que haria
> es una seleccion/omision de los valores que no deban entrar, y ademas
> indexar por ese campo númerico.
>
> Saludos
>
> Josep Sánchez
>  ----- Original Message -----
>  From: Peñaherrera, Mauro
>  To: forum.help400
>  Sent: Friday, May 22, 2009 5:06 PM
>  Subject: consulta sobre archivo lógico
>
>
>  Compañeros:
>
>
>
>  Una consulta sobre archivos lógicos.
>
>
>
>  Tengo un campo alfanumérico y deseo una parte de ese campo sea clave del
> archivo (eso lo realizo con lo siguiente:
>
>
>
>  A            X1NUTA             I      SST(VALE8P 1  22)
>
>   A          K X1NUTA
>
>
>
>  Si el campo es numérico no puedo utilizar esta instrucción , por lo cual
> quería saber si alguien sabe cómo puedo realizar esto con ese campo
> numérico.
>
>
>
>  Gracias.
>
>
>
>
>
>
> ------------------------------------------------------------------------------
>  Nota de descargo: La información contenida en este e - mail y sus anexos
> es confidencial y sólo puede ser utilizada por el destinatario del mismo.
> Esta información no debe ser distribuida, ni copiada total o parcialmente
> por ningún medio sin la autorización de DINERS/INTERDIN. Además,
> DINERS/INTERDIN no asume responsabilidad sobre información, opiniones o
> criterios contenidos en este e-mail.
>
>  Disclaimer: The information contained in this e-mail and its attached
> files are confidential and intended only for the use of the person to which
> it is addressed. This information can not be totally or partially
> distributed nor copied by any media without the authorization from
> DINERS/INTERDIN. In addition, DINERS/INTERDIN does not assume responsibility
> about this information, opinions or criteria contented in this e-mail.
>
>
>
>
> ------------------------------------------------------------------------------
>
>
>  __________________________________________________
>  Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS.
>  &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
>  http://www.help400.es
>  _____________________________________________________
>
>  Para darte de baja visita la siguente URL:
>  http://listas.combios.es/mailman/listinfo/forum.help400
> ------------ próxima parte ------------
> Se ha borrado un adjunto en formato HTML...
> URL: <
> http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20090522/3760d2a6/attachment-0001.htm
> >
>
> ------------------------------
>
> Message: 3
> Date: Fri, 22 May 2009 17:42:08 +0200
> From: "Paco Medina" <[email protected]>
> Subject: tema redondeo en función de decimales
> To: "'forum.help400'" <[email protected]>
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Buenas compañeros,
>
>
>
> Como podría solucionar teniendo estos precios de tarifa
>
> como puedo obtener estos resultados.
>
>
>
> 4,20   que sea 4,20
>
>
>
> 4,21   que sea 4,20
>
> 4,22   que sea 4,20
>
> 4,23   que sea 4,20
>
> 4,24   que sea 4,20
>
>
>
> 4,25   que sea 4,20
>
>
>
> 4,26   que sea 4,25
>
> 4’27   que sea 4,25
>
> 4’28   que sea 4,25
>
> 4,29   que sea 4,25
>
>
>
> 4,30   que sea 4,30
>
>
>
> Y en los casos que sea 00 lo tengo es precio-0,05
>
> 4,00   que sea 3,95
>
>
>
>
>
>
>
>
>
> Gracias,
>
>
>
>
>
>
>
> Paco Medina
>
>
>
> DEPT. INFORMÁTICA
> Exclusivas Camacho, S. Ltd.
> CIF B29145240
> Av. J. Ortega y Gasset, 301 (Pol. San Luis)
> Málaga, España
> Tel.   +34 952 322 900
> Fax   +34 952 314 900
> www.e-camacho.com
> [email protected]
>
> Este mensaje se dirige exclusivamente a su destinatario y puede contener
> información privilegiada o confidencial. Si no es vd. el destinatario
> indicado, queda notificado de que la utilización, divulgación y/o copia sin
> autorización está prohibida en virtud de la legislación vigente. Si ha
> recibido este mensaje por error, le rogamos que nos lo comunique
> inmediatamente por esta misma vía y proceda a su destrucción. Gracias.
>
> This message is intended exclusively for its addressee and may contain
> information that is CONFIDENTIAL and protected by professional privilege.
> If
> you are not the intended recipient you are hereby notified that any
> dissemination, copy or disclosure of this communication is strictly
> prohibited by law. If this message has been received in error, please
> immediately notify us via e-mail and delete it. Thank you.
>
>
>
>
>
> ------------ próxima parte ------------
> Se ha borrado un adjunto en formato HTML...
> URL: <
> http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20090522/a63847f0/attachment-0001.htm
> >
>
> ------------------------------
>
> Message: 4
> Date: Fri, 22 May 2009 17:42:35 +0200
> From: "Javier Mora" <[email protected]>
> Subject: RE: consulta sobre archivo lógico
> To: "forum.help400" <[email protected]>
> Message-ID:
>        <443a351e8e1fb741b028ce10b25879d302e37...@srvexchange.dominio.local
> >
> Content-Type: text/plain; charset="iso-8859-1"
>
> Si no recuerdo mal, no es posible convertir un número en alfanumérico en
> las DDS.
>
> ________________________________
>
> De: [email protected] [mailto:
> [email protected]] En nombre de Peñaherrera, Mauro
> Enviado el: viernes, 22 de mayo de 2009 17:06
> Para: forum.help400
> Asunto: consulta sobre archivo lógico
>
>
>
> Compañeros:
>
>
>
> Una consulta sobre archivos lógicos.
>
>
>
> Tengo un campo alfanumérico y deseo una parte de ese campo sea clave del
> archivo (eso lo realizo con lo siguiente:
>
>
>
> A            X1NUTA             I      SST(VALE8P 1  22)
>
>  A          K X1NUTA
>
>
>
> Si el campo es numérico no puedo utilizar esta instrucción , por lo cual
> quería saber si alguien sabe cómo puedo realizar esto con ese campo
> numérico.
>
>
>
> Gracias.
>
>
>
>
> ________________________________
>
> Nota de descargo: La información contenida en este e - mail y sus anexos es
> confidencial y sólo puede ser utilizada por el destinatario del mismo. Esta
> información no debe ser distribuida, ni copiada total o parcialmente por
> ningún medio sin la autorización de DINERS/INTERDIN. Además, DINERS/INTERDIN
> no asume responsabilidad sobre información, opiniones o criterios contenidos
> en este e-mail.
>
> Disclaimer: The information contained in this e-mail and its attached files
> are confidential and intended only for the use of the person to which it is
> addressed. This information can not be totally or partially distributed nor
> copied by any media without the authorization from DINERS/INTERDIN. In
> addition, DINERS/INTERDIN does not assume responsibility about this
> information, opinions or criteria contented in this e-mail.
>
> ------------ próxima parte ------------
> Se ha borrado un adjunto en formato HTML...
> URL: <
> http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20090522/90127424/attachment.htm
> >
>
> ------------------------------
>
> __________________________________________________
> Forum.HELP400 es un servicio m&amp;amp;#225;s de ServerNEWS.
> &amp;amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://listas.combios.es/mailman/listinfo/forum.help400
>
> Fin de Resumen de Forum.help400, Vol 31, Envío 45
> *************************************************
>
__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a