Information générale
Catégorie:
Codage, syntaxe et commandes
I was trying to clean it up some. This is the actual code. LX is the table. XP = "v:\dbf\dbfs\dbf" then the next section adds a date 0317, converted it reads "v:dbf\dbfs\dbf0317\rwall\lx"
ImportFileLnsCurrent = xp + ALLTRIM(SUBSTR(DTOC(DATE()-1),1,2) + ;
SUBSTR(DTOC(DATE()-1),4,2)) + "\rwall\lx"
SELE 1
USE lns_current
Handle = -1
DO WHILE Handle < 0
Handle = FOPEN(ImportFileLnsCurrent + ".dbf",12)
IF Handle > 0
=FCLOSE(Handle)
ZAP
APPEND FROM &ImportFileLnsCurrent
ELSE
WAIT "Waiting for LX file to become available" WINDOW AT 30,1 TIMEOUT 5
ENDIF
=FCLOSE(Handle)
ENDDO
I have substituted "\\dev\backporch\imp_tabs\w52_lns" and it does not work. If I use "i:\imp_tabls\w52_lns" it works.
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement