nAcquisitionBlock THEN nFirstAcuIndex := 0 ; (* Block collect finish , put into buffer *) fbBufferAccess.bPutData := TRUE; IF NOT(bSamplingStart) THEN iSeq := 20; (* Stop Acquisition *) END_IF END_IF 20: (* Should call close file process *) iSeq := 0; END_CASE fbBufferAccess(bPutData:= , bGetData:= , bClearFifo:= , pPutData:= ADR(AcquisitionBlock[nAcuNodeId]), pGetData:= ADR(PRG_DatFileCreat.DatAcqBlock), nDataLen:= SIZEOF(AcquisitionBlock[nAcuNodeId]), pFifoMemory:= ADR(AcquisitionBlockBuffer), nFifoSize:= nFifoSize, bFifoEmpty=> , bFifoFull=> , iFifoSizeLeft=> ); IF fbBufferAccess.bPutData THEN fbBufferAccess.bPutData := FALSE; END_IF; IF fbBufferAccess.bGetData THEN fbBufferAccess.bGetData := FALSE; END_IF PRG_DatFileCreat(); ]]>