Uso como ALIAS o próprio nome do arquivo, então, isso implica em alterar TODOS os fontes que usam pedidos.
Como conferir se ficou algum de fora?
Na falta de outra opção, acabei usando um recurso do DOS/Windows.
Como era só pra conferência, juntei os fontes:
COPY *.PRG LIXO
Como procurar JPPEDI? o find
TYPE lixo | find /i "jppedi"
Mesmo assim, muita coisa pra conferir visualmente.
Como conferir o que já foi corrigido?
Ué... o que já foi corrigido, está como jppedido.
Então outro filtro, o find negativo
TYPE lixo | find /i "jppedi" | find /i /v "jppedido"
Pronto.
Me listou as linhas contendo JPPEDI, mas que não contém JPPEDIDO.
Se está JPPEDI falta corrigir, mas se está JPPEDIDO já foi corrigido.
Poderia ser o contrário também.
TYPE lixo | find /i /v "jppedido" | find /i "jppedi"
type lixo | find /i "jppedi" | find /i /v "jppedido"
IndexInd( "jppedi2", "pdCliFor+Dtos(pdDatEmi)+pdPedido" )
IndexInd( "jppedi3", "pdNotFis+pdPedido" )
Na pasta da LIB,sobraram só as duas tags de indexação, que nem interessa alterar agora.
type lixo | find /i "jppedi" | find /i /v "jppedido"
OrdSetFocus("jppedi2")
2016.08.29 - No PrecoItem() testa se estÒo abertos jppedi e jpcadas
OrdSetFocus( "jppedi2" )
IF ! File( "jppedi.dbf" )
IF ! ValidaStru( "JPPEDI", aStruList )
MsgStop( "JPPEDI nÒo dispnÝvel!" )
IF ! UseSoDbf( "jppedi", .T. )
SELECT jppedi
SEEK jppedi->pdPedido
FieldPut( nCont, jppedi->( FieldGet( FieldNum( cCampo ) ) ) )
SELECT jppedi
fErase( "jppedi.dbf" )
:ExecuteCmd( "DROP TABLE IF EXISTS JPPEDI" )
Na pasta dos outros fontes, sobraram o uso dos índices, e também as rotinas de atualização de versão.
Lógico, esta foi a pesquisa final.
Antes dessa, encontrei fontes aonde tinha esquecido de alterar.
Não sei se algum editor de textos permitiria pesquisar isso fácil.
Talvez algum que use RegEx(), ou talvez um programa em Harbour.
Mas... arquivo bat resolveu.
Fica aí a dica.
Nota:
É parte das mudanças que acabei misturando na migração pra MySQL.
Agora primeiro organizando tudo.
Quando chegar a vez do MySQL não quero ter nada pendente, pra não querer fazer tudo de uma vez e perder o controle - de novo.