Como salvar arquivo de relatório txt em maiúsculas

Tenho um fonte que gera relatórios, mas o nome do arquivo sai todo minúsculo, mesmo eu tendo colocado em maiúsculas no cArquivo. Já tentei de tudo e ele continua salvando as strings 'MV_' e '_COSBEL.txt' em minúsculas.

Local cArquivo := 'MV_' + MV_PAR01 + MV_PAR02 + '_COSBEL.txt'

oFWriter := FWFileWriter():New(cPasta + cArquivo, .T.)

Olá,

A classe FWFileWriter herda da classe FwFileIOBASE.

A classe FwFileIOBASE possui o método SetCaseSensitive, que define se as letras maiúsculas serão consideradas.

Portanto, para salvar o arquivo contendo letras maiúsculas, você deve instanciar a classe e logo após isso, já chamar o método SetCaseSensitive, antes mesmo de efetuar a criação do arquivo, dessa forma o valor enviado como nome do arquivo será respeitado:


Local cArquivo as character

cArquivo := 'MV_' + MV_PAR01 + MV_PAR02 + '_COSBEL.txt'

oFWriter := FWFileWriter():New(cPasta + cArquivo, .T.)

oFWriter:SetCaseSensitive(.T.)
oFWriter:Create()

Documentações:

https://tdn.totvs.com.br/display/public/framework/FWFileWriter

https://tdn.totvs.com.br/display/public/framework/FwFileIOBASE

1 curtida

Muito obrigada, deu certo, fiz exatamente desta maneira e deu certo! Obrigada!!

Olá, no caso do FWMSPrinter, tem algo que possa fazer para o nome do arquivo sair maiusculo.