Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form/Report no executável
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00657688
Message ID:
00657771
Views:
23
This message has been marked as a message which has helped to the initial question of the thread.
Tà, vamos nos acertar......

É mais interessante dar prioridade para o arquivo no disco ou para o linkado?

Eu acho mais interessante dar prioridade pro arquivo do disco, então teríamos uma inversão na ordem do teu DO CASE (que viraria um IF):
PROCEDURE Imprime( tcRelatorio )
LOCAL lArquivoDisco

   lArquivoDisco = BuscaArquivoNoDisco(tcRelatorio) && retorna o path todo se achou

   IF TYPE("lArquivoDisco") == "C"  && preferencia pro arquivo do disco

      REPORT FORM (lArquivoDisco)

   ELSE  && Usa o linkado

      REPORT FORM (tcRelatorio)

   ENDIF

ENDPROC
Bom, pro caso do teu OTHERWISE, que seria o caso de não ter o relatório nem no disco nem no EXE, a solução seria tratar o erro. Guarda o ON("ERROR") anterior, define um novo, trata e volta pro original.

Espero ter ajudado, mais fiz um brainstorm do que pensei numa solução, mas de vez em quando é assim que surgem grandes idéias.... ;P
Like Frank said: "I did it... MY WAY!"
Previous
Reply
Map
View

Click here to load this message in the networking platform