I don't know if this wil work on Pick D3, but this is how we do it on
UniVerse (PICK Flavor), Windows 2003
This entry sits in the VOC
PS:Replace the '[info]' with your own info
0001 PA
0002 C
0003 IF <<I2,Is it alright to copy the EFT files to the local drive
[Y]es/[N]o , "Y" OR "N">> = "N" THEN GO SKIP.COPY
* Here you set the network path if required
0004 DOS /C "NET USE T: [Path To Copy From eg:\\127.0.0.1\FilesToCopy]
[password] /USER[User Code]"
* Here you copy the file to the required place
0005 DOS /C "COPY T:\[FileName] C:\*"
0006 DISPLAY
0007 DISPLAY Copied File
0008 DISPLAY
* Here you can delete the original file if you no longer require it
0009 DOS /C "DEL T:\[FileName] /Q"
0010 SKIP.COPY:
Regards
Bjorn
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 19 July 2005 08:01
To: u2-users@listserver.u2ug.org
Subject: [U2] Viaduct data transfer
I am working on a project to copy a DOS file to a Pick file using Viaduct
and then update the system with this data. I have found some similar
programs to use, but I do not know what the command is doing or what the
parameters mean. The manuals don't offer much help either.
Any help would be appreciated. Thank you.
001 OPEN 'UPLOAD.FILE' TO F.UPLOAD ELSE STOP
002 CLEARFILE F.UPLOAD
003 FILENAME="testdata.xls"
004 PATH="C:\DATA\"
005 DOSPATH=PATH:"\":FILENAME
006 *
007 PCMCD=CHAR(27):CHAR(8); ENDCMD=CHAR(0)
008 PRINT PCMCD:"KEY /O /P <ALT+F>E":DOSPATH:"<CR>UPLOAD.FILE<CR>#<CR>1
2<CR>O<CR><CR><ALT>":ENDCMD:
009 EXECUTE "PCCTL"
010 CRT "TRANSFER COMPLETE..."
011 STOP
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
