示例#1
0
        private bool IsLastDoc(TsImage tsImageInfo)
        {
            try
            {
                //  Get the LastDoc of the Batch string
                var sLastDocId = new StringBuilder();
                sLastDocId.Append(TsMemFiles.GetInt("Image", "Level4", 0, LastDocInfo));
                sLastDocId.Append("-");
                sLastDocId.Append(TsMemFiles.GetInt("Image", "Level3", 0, LastDocInfo));
                sLastDocId.Append("-");
                sLastDocId.Append(TsMemFiles.GetInt("Image", "Level2", 0, LastDocInfo));
                var sCurrentDocId = new StringBuilder();
                sLastDocId.Append(tsImageInfo.Level4);
                sLastDocId.Append("-");
                sLastDocId.Append(tsImageInfo.Level3);
                sLastDocId.Append("-");
                sLastDocId.Append(tsImageInfo.Level2);

                if (sLastDocId.Equals(sCurrentDocId))
                {
                    return true;
                }
                else
                {
                    return false;
                }
            }
            catch (Exception)
            {

                throw;
            }
        }
示例#2
0
        /// <summary>
        /// <para>To Retrieve Data:</para>
        /// <list>
        /// <item>Dim sValue1 As String = New String(_TSMemFiles.GetString("Field Data", "FIELD_NAME", "", pbstrBlob))</item>
        /// </list>
        /// <para>To Save Data:</para>
        /// <list>
        /// <item>_TSMemFiles.SetString("Field Data", "FIELD_NAME", "FIELD_VALUE", pbstrBlob)</item>
        /// </list>
        /// </summary>
        /// <param name="lType"></param>
        /// <param name="pbstrBlob">Our BLOB file with all our information</param>
        /// <returns></returns>
        /// <remarks></remarks>
        public int TSDataLookup(int lType, ref string pbstrBlob)
        {
            var iResult = 0;
            ErrMsg = string.Empty;

            try
            {
                try
                {
                    //  Populate Batch Info
                    CurrentBatch = new TsBatch
                    {
                        BatchName = TsMemFiles.GetString("Batches", "BatchName", string.Empty, pbstrBlob),
                        BatchDesc = TsMemFiles.GetString("Batches", "BatchDesc", string.Empty, pbstrBlob),
                        BatchId = TsMemFiles.GetInt("Batches", "BatchID", 0, pbstrBlob),
                        JobId = TsMemFiles.GetInt("Batches", "JobID", 0, pbstrBlob),
                        BatchLocation = TsMemFiles.GetInt("Batches", "BatchLocation", 0, pbstrBlob),
                        WfStatus = TsMemFiles.GetInt("Batches", "WFStatus", 0, pbstrBlob),
                        TemplateBatchId = TsMemFiles.GetInt("Batches", "TemplateBatchID", 0, pbstrBlob),
                        TotalImages = TsMemFiles.GetInt("Batches", "TotalImages", 0, pbstrBlob),
                        AppStep = TsMemFiles.GetInt("Batches", "AppStep", 0, pbstrBlob),
                        WfStep = TsMemFiles.GetInt("Batches", "WFStep", 0, pbstrBlob)
                    };

                    //  Just run one time
                    if (TsFieldList == null && !string.IsNullOrEmpty(CurrentBatch.BatchName) && CurrentBatch.TemplateBatchId > 0)
                    {
                        TsFieldList = _tsRepo.GetJobFieldList(CurrentBatch.TemplateBatchId, TsCallbackHelper);
                        LastDocInfo = _tsRepo.GetTsLastDocInfo(CurrentBatch.BatchId);
                    }

                    //  Populate Image Info
                    CurrentImage = new TsImage
                    {
                        ImageId = TsMemFiles.GetInt("Image", "ImageID", 0, pbstrBlob),
                        ImageNo = TsMemFiles.GetInt("Image", "ImageNo", 0, pbstrBlob),
                        ImageName = TsMemFiles.GetString("Image", "ImageName", string.Empty, pbstrBlob),
                        ImagePath = TsMemFiles.GetString("Image", "ImagePath", string.Empty, pbstrBlob),
                        LocalFile = TsMemFiles.GetString("Image", "ImageFile", string.Empty, pbstrBlob),
                        ImageType = TsMemFiles.GetInt("Image", "ImageType", 0, pbstrBlob),
                        Level1 = TsMemFiles.GetInt("Image", "Level1", 0, pbstrBlob),
                        Level2 = TsMemFiles.GetInt("Image", "Level2", 0, pbstrBlob),
                        Level3 = TsMemFiles.GetInt("Image", "Level3", 0, pbstrBlob),
                        Level4 = TsMemFiles.GetInt("Image", "Level4", 0, pbstrBlob),
                        Level5 = TsMemFiles.GetInt("Image", "Level5", 0, pbstrBlob),
                        FormName = TsMemFiles.GetString("FormResults", "FormName", string.Empty, pbstrBlob),
                        FormDesc = TsMemFiles.GetString("FormResults", "FormDesc", string.Empty, pbstrBlob),
                        LastPage = TsMemFiles.GetInt("Image", "LastPage", 0, pbstrBlob)
                    };

                    //  Implement BLOB Write Functionality for testing.
                    if (Support.WriteBlob)
                    {
                        try
                        {
                            if (!Directory.Exists(Support.BlobPath))
                            {
                                Directory.CreateDirectory(Support.BlobPath);
                            }

                            if (lType < 100)
                                File.WriteAllText(Path.Combine(Support.BlobPath, string.Format("Blob_{0}_{1}.ini", CurrentImage.ImageId.ToString().PadLeft(4, '0'), lType)), pbstrBlob);
                        }
                        catch (Exception ex)
                        {
                            MessageBox.Show(ex.Message);
                        }
                    }
                }
                catch (Exception ex)
                {
                    MessageBox.Show(ex.Message);
                }

                switch (lType)
                {
                    case TSBATCH_OPEN:
                        //implement your functionality

                        break;
                    case TSBATCH_PROCESSREADY:
                        //implement your functionality

                        break;
                    case TSFIELD_CHECK:
                        //implement your functionality

                        break;
                    case TSFIELD_CORRECT:
                        //implement your functionality

                        break;
                    case TSFIELD_SHORTCUT:
                        //implement your functionality

                        break;
                    case TSFIELD_ACTIVATE:
                        //implement your functionality

                        break;
                    case TSFIELD_DEACTIVATE:
                        //implement your functionality

                        break;
                    case TSDATASET_LOAD:
                        //implement your functionality
                        MessageBox.Show(string.Format("BatchLocation: {0}", CurrentBatch.BatchLocation));
                        switch (CurrentBatch.BatchLocation)
                        {
                            case (int)ProcModule.AI:

                                break;
                            case (int)ProcModule.QA:
                            case (int)ProcModule.VR:
                                if (TsIndexPanel != null && CurrentImage.Level2 != PrevDocNo)
                                {
                                    TsIndexPanel.TsImageInfo = CurrentImage;

                                    //  Reset fields and update with values from TS

                                    PrevDocNo = CurrentImage.Level2;
                                    TsIndexPanel.LastFocusControl.Focus();
                                }
                                else if (TsIndexPanel != null)
                                {
                                    TsIndexPanel.TsImageInfo = CurrentImage;

                                    //  Make any needed changes to same document
                                }

                                var tsImageInfo = string.Empty;
                                var imageToGet = CurrentImage.ImageNo + 1;
                                var ret = TsCallbackHelper.GetImageInfoByNo(imageToGet, ref tsImageInfo);
                                MessageBox.Show(string.Format("GetImageInfo: {0}", ret));
                                File.WriteAllText(Path.Combine(Support.BlobPath, string.Format("ImageInfo_{0}_{1}.ini", CurrentImage.ImageId.ToString().PadLeft(4, '0'), imageToGet)), tsImageInfo);
                                break;
                        }
                        iResult = 1;
                        break;
                    case TSDATASET_CHECK:
                        //implement your functionality

                        break;
                    case TSDATASET_CORRECT:
                        //  Set common variables
                        iResult = 0;

                        //  Save whatever values we can
                        TsMemFiles.SetString("Lookup Actions", "MultiResults", "1", ref pbstrBlob);
                        //  Do not post any TS error messages.
                        TsMemFiles.SetString("Lookup Actions", "NoErrorMessage", "1", ref pbstrBlob);

                        //  *** Start work that happens in all modules ***

                        //  Get the FLDBarcode value
                        string FLDBarcode = Support.BlobReadField("FLDBarcode", pbstrBlob);

                        //  Start work per module
                        if (CurrentBatch != null)
                            switch (CurrentBatch.BatchLocation)
                            {
                                case 8:
                                case 16:
                                    //  AutoIndex

                                    break;
                                case 64:
                                    //  Verification

                                    break;
                                case 128:
                                    //  QA

                                    break;
                            }

                        iResult = 1;
                        break;
                    case TSDATASET_SAVE:
                        //implement your functionality

                        break;
                    case TSLOOKUP_UPDATE:
                        //implement your functionality

                        break;
                    case TSCUSTOM_API:
                        //implement your functionality
                        //iResult = TSCustomAPIProc(ref pbstrBlob);
                        break;
                }
            }
            catch (Exception ex)
            {
                iResult = -2;
                ErrMsg = string.Format("General Error During TSDataLookup: {0} - {1}", ex.Message, ex.StackTrace);
            }
            return (iResult);
        }