CALLP PROGRAMA(P1:P2.....);

Saludos
Felipe Mart�nez
[EMAIL PROTECTED]
http://www.tcbcn.com



"Javier Garc�a Marqu�s" <[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED]

18/11/2004 17:43
Por favor, responda a forum.help400

       
        Para:        [EMAIL PROTECTED]
        cc:        
        Asunto:        Call en RPG-Free
        Categor�a:        


Ya que estamos con el RPG-Free y pasando a otro tema �come se llama a otro
programa en RPG-Free? ya que no acepta el Call ni el Callb.

Saludos cordiales,
Javier Garc�a Marqu�s
LO�TRANS, Log�stica y Transporte, S.A. (Div. Inform�tica)
Tel.:      93 298 30 78
Fax.:     93 298 30 13
E-mail: [EMAIL PROTECTED]
Web:    www.lotrans.es



-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] En nombre de Vicente Garc�a
Enviado el: jueves, 18 de noviembre de 2004 16:55
Para: [EMAIL PROTECTED]
Asunto: Re: [TV041119] RPG sin indicadores �sigue siendo RPG? (era %Eof)


Buenas tardes:
En esta ocasi�n siento llevarte totalmente la contraria Juanra:

Con la aparici�n del ILE-RPG y posteriormente del RPG free el uso de
indicadores pr�cticamente ha desaparecido por completo.

La totalidad de operaciones de acceso y trabajo con ficheros se han visto
reconvertidas a BIFs que te evitan el uso de indicadores.

Cuando antiguamente accedias a varios ficheros, por ejemplo con CHAIN, y
llegaba un momento en el que era necesario ejecutar ciertas acciones si
habian sido satisfactorios todos los accesos la cosa quedaba mas o menos
asi:

       N61N62N63       Z-ADD  0   VARIAB       5 0

Tenias que recordar que N61 era que hab�a sido satisfactorio el acceso al
FICHEROA, N62 al FICHEROB y N63 al FICHEROC.

En ILE free la cosa ser�a tambi�n mas o menos:

  If %found(FICHEROA) And
     %found(FICHEROB) And
     %found(FICHEROC);
        VariaB = 0;
   EndIf;

Vamos que no hay color.
       
Que decir de los indicadores de pantalla o listado. Con la posibilidad de
utilizar punteros, podemos dar nombres significativos a los indicadores que
pasan a ser variables booleanas. En ILE free podemos preguntar:

   If Condicion;
        CodClieProt = True;
        CodPaisPosCursor =True;
   EndIf;

No es necesario utilizar *On u *Off puesto que se pueden definir las
constantes True y False con estos valores y preguntar por ellas.

Se podrian poner muchos mas ejemplos.

No se trata de quitar indicadores por que si o por que vamos a utilizar
ILE-free. Es el propio lenguaje el que te va a permitir hacer todo lo que
hacias antes con mucho menos c�digo, mucho mas claro y sin necesidad de los
indicadores.

Una de las cosas que mas nos llamo la atenci�n cuando comenzamos a utilizar
el ILE free, fu� que los programas una vez tecleados compilaban casi siempre
a la primera, puesto que las posibilidades de errores al teclear fuera de
posici�n, falta de indicadores, variables sin definir, etc. son mucho
menores
con el free.

freeSauriosSaludos

Juan Ram�n Garcia escribi�:

>Pr�logo: Hoy no es Viernes, es Jueves por la tarde (al menos en Espa�a)
>pero como �ltimamente el Foro tarda en replicar (al menos a mi) varias
>horas, algun@ ver�is este mensaje ma�ana.
>-----------------------------------------------------
>Hola a [EMAIL PROTECTED]:
>
>A ver, creo que, enfrascado con asuntos "legales" (LOPD y esas
>hierbas), me he perdido algo importante y gracias a este tema he
>levantado mis ojos de tanto BOE y RD's y mi esp�ritu RPGero ha sufrido
>un estremecimiento
>
>  
>
>>La pregunta es: c�mo 'apago' el %Eof(fichero)?
>>    
>>
>>>Utiliza un indicador en el setll y lo apagas antes del nuevo setll
>>>      
>>>
>>>>Hombre,con un indicador normal no hay problema, pero se trata de ir
>>>>quitando indicadores para cuando empecemos con Free RPG.
>>>>        
>>>>
>
>Pues no lo entiendo, debe ser que soy demasiado mayor y mis neuronas se
>han
>  
>


_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es _____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]


_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]


Responder a