Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - sebastianlalin1
Páginas: [1]
1
« en: Lunes 10 de Noviembre de 2008, 00:56 »
Alguien me puede ayudar a corregir bien este codigo de modo que sea recursivo a nivel de hardware:
Inicio
Abrir archivos
Leer el primer nombreperiodico
DO WHILE hay mas nombre(s).periodici
PRINT fecha
PRINT NOMBRE.PERIODICO
Leer el primer registro(s).subcriptor
DO WHILE hay mas resgistros(s).suscriptor
IF transaccion= modificar.renovacion
THEN Duracion.suscrip=duracion.sucrip+Numero....
ELSE IF transacion=nueva
THEN PERFORM agregar.suscriptor
THEN duracion.suscrip=numero.semanas
ELSE IF transaccion=modificar.direccion
THEN PERFORM cambiar.direccion
ELSE IF transacion=eliminar.suscriptor
THEN PERFORM preparar.reembolsos.actualizar
PERFOM imprimir.reembolso.cheque
Duracion.suscrip=0
ELSE PERFOM error.en.transaccion
END IF
PERFOM preparar.suscriptor.lista
Leer otro registro.suscriptor
END DO
PERFOM imprimir.Suscriptor.lista
Obtener siguiente nombre.periodico
END DO
END
Cerrar archivos
Páginas: [1]
Mostrar Mensajes
