La Web del Programador: Comunidad de Programadores
 
    Pregunta:  2633 - PROBLEMILLA DE CLIPPER
Autor:  Iván Rodríguez Fernández
Hola Clipperos! Espero que alguien me pueda solucionar unos problemillas.

1-Tengo un listado con diferentes tipos de máquinas:
M-löw, p-löw, k-com, v-com
Como se puede hacer un filter para que solo se vea un tipo de máquina?

2- Se puede crear un base de datos poniendole un nombre a la base de datos proviniente de una variable.

Es una pregunta sencilla pero no logro aclararme y espero que me ayudeis.

Gracias

  Respuesta:  Iván Rodríguez Fernández
No se si estan bien programado, pero es una solucion a tus problemas.Es un poco lioso pero funciona,si alguien conoce una mejor manera que me lo diga, porque yo solo se esta.
Haces un FOR que recorra toda las maquinas y de el registro de maquina extraes la primera letra, haces un case para cada maquina (cuatro maquinas que empiezan con 4 letras diferentes)
Y grabas los datos del registro en variables y luego las pasa al fichero x tipo de maquina.
Haces un zap de mlow,kcom,plow,vcom.

ejemplo:

SELECT fichero_de_maquinas
GO TOP
N:=LASTREC()

FOR I:= 1 TO N


nMAQUINA:=MAQUINA
LE:=LEFT(NMAQUINA,1)
DO CASE
CASE LE = ´M´

SELECT MLOW
APPEND BLANK
REPLACE (VARIABLES X REGISTROS)
Select fichero_de_maquinas
SKIP 1

CASE LE = ´P´
SELECT PLOW
APPEND BLANK
REPLACE (VARIABLES X REGISTROS)
Select fichero_de_maquinas
SKIP 1

CASE LE = ´V´
SELECT VCOM
APPEND BLANK
REPLACE (VARIABLES X REGISTROS)
Select fichero_de_maquinas
SKIP 1

CASE LE = ´K´
SELECT KCOM
APPEND BLANK
REPLACE ð/LM/W3SVC/157/Root