// test of communication software link to amiser web site


zipDir = "C:\\PKZImagesCompressed\\"   
zipFilename = "Test" + "20140121" + ".zip"

      st=FileXferStatus(0) // these should both be -1 (no status, because xfer hasn't taken place)
      st=FileXferStatus(1)



//     FILE_SEND srcDirectory, srcFilename, destNodeName, destDirectory, destFilename

//FILE_SEND zipDir, zipFilename, "amisrsite", "/data/release/PKR/FPI/RAW/2014/", zipFilename
FILE_SEND zipDir, zipFilename, "amisrsite", "/data/release/PKR/FPI/RAW/2014", zipFilename

twait = 400
   
  // Check send status periodically for twait sec
   for (j=0; j<twait; j=j+1)
   {
  	  st=FileXferStatus(0)
  	  if(st==1)
   {
  		DELAY 1 // continue to monitor
  	  }
   	  else
         {
   		j=twait // done--stop monitoring (Error if st!=0)
  	  }
   }