use mgw10002 shared
browse NORMAL
use mgw10003 shared
browse NORMAL
use mgw10004 shared
browse NORMAL
use mgw10005 shared
browse NORMAL
locate for ccodigop01="7506212112189"
browse nowait NORMAL
use mgw10001 shared
use mgw10000 shared
browse NORMAL
use
use mgw10005 shared
locate for ccodigop01="10191509"
browse NORMAL
locate for ccodigop01="10191509"
locate for ccodigop01="7509695246265"
browse NORMAL
locate for ccodigop01="7506212112189"
browse NORMAL
locate for ccodigop01="7509695246265"
browse NORMAL
locate for ccodigop01="7509695246265"
browse NORMAL
browse nowait NORMAL
locate for ccodigop01="7509695246265"
select * from ccodigop01="10191509" into nuevo
select * from ccodigop01="10191509" into cursor nuevo
select * from mgw10005 where ccodigop01="10191509" into cursor nuevo
select nuevo
browse nowait NORMAL
select * from mgw10005 where ccodigop01="7506212112189" into cursor nuevo
select nuevo
browse nowait NORMAL
locate for ccodigop01="750012553920"
locate for ccodigop01="PRODU01"
select 3
use mgw10010 shared
go bottom
browse NORMAL
?trans(cunidades,"9999.999")
?trans(cunidade02,"9999.999")
?trans(cunidade01,"9999.999")
locate for ccodigop01="24010595873517"
quit
use mgw10000 shared
browse nowait NORMAL
select 2
use "C:\Compacw\Empresas\Maria_de_los_Angeles\mgw10000.dbf" shared
browse nowait NORMAL
quit
use mgw1000 shared
use mgw10000 shared
browse nowait NORMAL
quit
