Re: Multiple DB access
Posted in 1997
Claude E. Desrochers <cdesroch@wbn.ca> schrieb im Beitrag
<345F9362.5210@wbn.ca>...
> I am looking for a way, if at all possible, using a single 4gl program,
> to read a table from one Informix database and write to another Informix
> table sitting in a different db.
>
>
> Environment: Informix SE 7.1.0
> Informix 4GL 6.02
> Platform AIX 4.1.2
>
> Thank you in advance.
> --
> Claude Desrochers
>
database db1
main
define
h_txt char(200)
# now you are in database 1
select .....
let h_txt = "database db2"
prepare prep_dbs from h_txt
if status != 0 then
display "prepare: ", h_txt clipped
sleep 3
exit program
end if
execute prep_dbs
if status != 0 then
display "Fehler bei execute:",sele clipped
sleep 3
exit program
end if
# now your are in database 2
select .....
end main
Live long and prosper!
Patric