Can anyone suggest how to insert a series of control images into a running batch at set intervals?

SeanGetitngs

Hi,

Can anyone suggest how to insert a series of control images into a running batch at set intervals? I'm having a few issues regarding inserting a series of control images into a batch being processed.

I think I need a loop counter, an open and process command, update data collector and return to where the batch left off. I cant get past the loop counter.

any help would be much appreciated.

YuriG

Hi Sean,

How do you run batch processing in IP Plus? You can use our sample script Batch_Process.ipm, which you can find in the Scrips folder of IPWIN installation. The script has some comments, so you can check how it works and modify for your needs.

Regards,

Yuri

SeanGetitngs

Hi Yuri, 

On IP plus 6.3 I use the batch process script with the process directory macro.

currently it will run through my images and dump the data in the data collector which is fine, but i need to insert control images at regular intervals for quality assurance. 

I've looked through the script comments and cant find anything to suggest how i can modify it in this way.

Also there doesn't not seem to be a straight forward command for a loop counter in 6.3 is there a way round this?

regards,
Sean

YuriG

Sean,

Looping is done in while loop:

    While fName <> ""

    ' Print out the file name and its attributes

   Debug.Print GetAttr(gDirStart + fName); " "; fName

   

   ' Load the image

   docID = IpWsLoad(gDirStart + fName, "")

   

   ' Don't process if there is a failure loading

   If docID >= 0 Then

    ' Call processing routine here ***

    ' The document ID and file name are sent here 

    ' in case the processing routine needs them.

   DoStuff docID, gDirStart + fName

   

   ' Close the initial image

   ret = IpAppSelectDoc(docID)

   ret = IpDocClose()

Else

Debug.Print "Error loading "; gDirStart + fName

End If

   ' Get the next file name

   fName = Dir()

    Wend

you can create your own indexing variable and control the count:

    Dim MyCounter as Integer
    MyCounter=0

    While fName <> ""

       ...
       MyCounter=MyCounter+1

    Wend

Regards,

Yuri