Pasar programa de dbase (clipper) a access
Publicado por Rafael (13 intervenciones) el 27/08/2017 11:18:05
Tengo un programa que hice en dbase para que los alumnos eligieran las farmacias en las que van a realizar las prácticas. En función de la nota que tienen se les concede la farmacia que piden (pueden solicitar hasta 140). En 2 bases de datos, llamadas alord y farord están los datos de los alumnos y de las farmacias.
Existe algún programa para pasar este programa a Access.
Muchas gracias por anticipado
El programa es el siguiente:
Existe algún programa para pasar este programa a Access.
Muchas gracias por anticipado
El programa es el siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
use alord (Es la base de datos de los alumnos ordenada por nota y nombre del alumnos - Contiene las peticiones de los alumnos llamadas e1 hasta e140)
go top
n=1do while .not. eof()
n=1 do while n<141 if n<10 trozo=1endif
if n>9 .and. n<100
trozo=2endif
if n>99 trozo=3endif
nada="e"+str(n,trozo)
rp=&nada
if rp=0exit
endif
regis=recno()
close database
use farord (Es la base de datos de las farmacias ordenadas por indicador. Contiene los datos de las farmacias y las plazas que ofertan hasta 25)
go top
locate for NUMERO=rp pla=plazas if pla>0 replace plazas with plazas-1 elec=NUMERO farm=nombrefar direc=direccion provi=provincia tele=telefonoclose databases
use alord
goto regis
replace farmacia with farm
replace indicador with elec
replace OPCION with n
replace direcfar with direc
replace provfar with provi
replace telefar with tele
exit
endif
if pla=0n=n+1
use alord
goto regis
loop
endif
enddo
skip
enddo
Valora esta pregunta
0