private void HRA(DataSet myDataSet, ref jolprUtility.utilityCrateFile.create jolprCreateFile, ref jolprUtility.utilityFiles.file jolprUtlityFiles, ref string _fechaRecibido, ref string dataPath) { //HRA hat2012txt outTxt = new hat2012txt(); string yy = DateTime.Now.Year.ToString(); string jjj = null; string BATCH = null; string BATCH_TMP = null; int PG = 0; foreach (DataTable T in myDataSet.Tables) { foreach (DataRow R in T.Rows) { jolprCreateFile = new jolprUtility.utilityCrateFile.create(); jolprCreateFile.setStringLen = 199; string evalNecesidad_20 = "N"; string habitosToxicos_21 = "N"; string evalDiabetica_22 = "N"; string altoRiesgo_23 = "N"; string evalNutricional_24 = "N"; jjj = R["v0document"].ToString().Trim().Substring(0, 3); BATCH = R["v0document"].ToString().Trim().Substring(3, 3); if (R["V1PAGE"].ToString() != "99") { if (BATCH_TMP == BATCH) { PG = PG + 1; } else { BATCH_TMP = BATCH; PG = 1; } } outTxt.icn_01 = outTxt.icn_01 = yy + jjj + 0 + BATCH + PG.ToString("00") + "00"; //R["V1ORIGINAN"].ToString(); // Len 15 yyyy + jjj + 0 + batch + PG +00//R["V1ORIGINAN"].ToString(); // Len 15 yy + DOCNAME + "0" + BATCH + PG.ToString("00") + "00"; outTxt.contrato_02 = R["V1INSURED"].ToString(); //len 13 outTxt.cpt_03 = R["v2cpt"].ToString(); // Len 5 outTxt.modificador_04 = " ";// R["V1MOD1"].ToString();// Len 2 outTxt.lugarServicio_05 = "11"; //R["V1LUGARSE1"].ToString();// Len 2 outTxt.npiBilling_06 = R["V133ANPI"].ToString();// Len 10 outTxt.npiRenderring_07 = R["V1NPI"].ToString();// Len 10 outTxt.fechaServicio_08 = setFecha(R["V2DATEFROM"].ToString());// Len 8 outTxt.fechaRecibido_09 = _fechaRecibido; outTxt.diagnotico_10 = R["V1DIAG1"].ToString();// Len 5;// Len 7 Contatnte V70.9 outTxt.codigo_01_11 = R["V1DIAG2"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_02_12 = R["V1DIAG3"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_03_13 = R["V1DIAG4"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_04_14 = R["V1DIAG5"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_05_15 = R["V1DIAG6"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_06_16 = R["V1DIAG7"].ToString().Substring(0, 5);// Len 5 outTxt.codigo_07_17 = R["V1DIAG8"].ToString().Substring(0, 5);// Len 5 outTxt.signoVita_18 = R["VIC"].ToString();// Len 3 outTxt.funcionalidad_19 = R["VIG"].ToString();// Len 3 //if (R["V2H"].ToString().Trim() == "001") evalNecesidad_20 = "Y"; outTxt.evalNecesidad_20 = " ";// Len 1 if (R["VIK"].ToString().Trim() == "001") habitosToxicos_21 = "Y"; outTxt.habitosToxicos_21 = habitosToxicos_21;// Len 1 //if (R["V2L"].ToString().Trim() == "001") evalDiabetica_22 = "Y"; outTxt.evalDiabetica_22 = " ";//evalDiabetica_22;// Len 1 //if (R["V2M"].ToString().Trim() == "001") altoRiesgo_23 = "Y"; outTxt.altoRiesgo_23 = " "; //altoRiesgo_23;// Len 1 //if (R["V2P"].ToString().Trim() == "001") evalNutricional_24 = "Y"; outTxt.evalNutricional_24 = " "; //evalNutricional_24;// Len 1 outTxt.evalMiniMental_25 = " "; //R["V2R"].ToString();// Len 3 outTxt.evalDepresion_26 = " "; //R["V2S"].ToString();// Len 3 outTxt.filler_27 = new string(' ', 67); // Len 67 //set write jolprCreateFile.constructorString(outTxt.icn_01, 1 - 1); jolprCreateFile.constructorString(outTxt.contrato_02, 16 - 1); jolprCreateFile.constructorString(outTxt.cpt_03, 29 - 1); jolprCreateFile.constructorString(outTxt.modificador_04, 34 - 1); jolprCreateFile.constructorString(outTxt.lugarServicio_05, 36 - 1); jolprCreateFile.constructorString(outTxt.npiBilling_06, 38 - 1); jolprCreateFile.constructorString(outTxt.npiRenderring_07, 48 - 1); jolprCreateFile.constructorString(outTxt.fechaServicio_08, 58 - 1); jolprCreateFile.constructorString(outTxt.fechaRecibido_09, 66 - 1); jolprCreateFile.constructorString(outTxt.diagnotico_10, 74 - 1); jolprCreateFile.constructorString(outTxt.codigo_01_11, 81 - 1); jolprCreateFile.constructorString(outTxt.codigo_02_12, 86 - 1); jolprCreateFile.constructorString(outTxt.codigo_03_13, 91 - 1); jolprCreateFile.constructorString(outTxt.codigo_04_14, 96 - 1); jolprCreateFile.constructorString(outTxt.codigo_05_15, 101 - 1); jolprCreateFile.constructorString(outTxt.codigo_06_16, 106 - 1); jolprCreateFile.constructorString(outTxt.codigo_07_17, 111 - 1); jolprCreateFile.constructorString(outTxt.signoVita_18, 116 - 1); jolprCreateFile.constructorString(outTxt.funcionalidad_19, 119 - 1); jolprCreateFile.constructorString(outTxt.evalNecesidad_20, 122 - 1); jolprCreateFile.constructorString(outTxt.habitosToxicos_21, 123 - 1); jolprCreateFile.constructorString(outTxt.evalDiabetica_22, 124 - 1); jolprCreateFile.constructorString(outTxt.altoRiesgo_23, 125 - 1); jolprCreateFile.constructorString(outTxt.evalNutricional_24, 126 - 1); jolprCreateFile.constructorString(outTxt.evalMiniMental_25, 127 - 1); jolprCreateFile.constructorString(outTxt.evalDepresion_26, 130 - 1); jolprCreateFile.constructorString(outTxt.filler_27, 133 - 1); //write file in disk jolprUtlityFiles.setString = jolprCreateFile.getString; jolprUtlityFiles.write(dataPath); }//! end for }// end for }
/* * Y:\Desktop\Applica\BASE DATOS HRA 2012\SSHRA12A.DBF File size (bytes): 19830 Version: FoxPro with memo, index present Number of records: 30 N Field name Type Width --------------------------------- 1 V0DOCUMENT Character 13 2 V0BATCHNUM Character 8 3 V0SEQUENCE Character 8 4 V0CURSTAGE Character 2 5 V0EXPRUNID Character 8 6 V0KEYOPER Character 4 7 V0VFYOPER Character 4 8 V0VIEWNAME Character 8 9 V0FILEPATH Character 64 10 V0IFNAME01 Character 36 11 V0CONFIDNC Memo 10 12 V1PAGE Character 2 13 V1INSURED Character 13 14 V133ANPI Character 10 15 V1NPI Character 10 16 V125FEDERA Character 9 17 V1ORIGINAN Character 15 18 V1DIAG1 Character 7 19 V1DIAG2 Character 7 20 V1DIAG3 Character 7 21 V1DIAG4 Character 7 22 V1DIAG5 Character 7 23 V1DIAG6 Character 7 24 V1DIAG7 Character 7 25 V1DIAG8 Character 7 26 V1DIAG9 Character 7 27 V1DIAG10 Character 7 28 V1DIAG11 Character 7 29 V1DIAG12 Character 7 30 V1DIAG13 Character 7 31 V1DIAG14 Character 7 32 V1DIAG15 Character 7 33 V1DIAG16 Character 7 34 V1DIAG17 Character 7 35 V1DIAG18 Character 7 36 V1DIAG19 Character 7 37 V1DIAG20 Character 7 38 V2DATEFROM Character 6 39 V2CPT Character 5 40 V2CHANGE Character 1 41 V3DATEFROM Character 6 42 V3CPT Character 5 43 V3CHANGE Character 1 44 V4DATEFROM Character 6 45 V4CPT Character 5 46 V4CHANGE Character 1 47 V5DATEFROM Character 6 48 V5CPT Character 5 49 V5CHANGE Character 1 50 V6DATEFROM Character 6 51 V6CPT Character 5 52 V6CHANGE Character 1 53 V7DATEFROM Character 6 54 V7CPT Character 5 55 V7CHANGE Character 1 56 V8DATEFROM Character 6 57 V8CPT Character 5 58 V8CHANGE Character 1 59 V9DATEFROM Character 6 60 V9CPT Character 5 61 V9CHANGE Character 1 62 VADATEFROM Character 6 63 VACPT Character 5 64 VACHANGE Character 1 65 VBDATEFROM Character 6 66 VBCPT Character 5 67 VBCHANGE Character 1 68 VCDATEFROM Character 6 69 VCCPT Character 5 70 VCCHANGE Character 1 71 VDDATEFROM Character 6 72 VDCPT Character 5 73 VDCHANGE Character 1 74 VEDATEFROM Character 6 75 VECPT Character 5 76 VECHANGE Character 1 77 VFDATEFROM Character 6 78 VFCPT Character 5 79 VFCHANGE Character 1 80 VGDATEFROM Character 6 81 VGCPT Character 5 82 VGCHANGE Character 1 83 VHDATEFROM Character 6 84 VHCPT Character 5 85 VHCHANGE Character 1 86 VIC Character 3 87 VIG Character 3 88 VIK Character 3 * */ public void Run(string dbfName, string dataPath, string _fechaRecibido, bool isHRA ) { try { jolprUtility.utilityCrateFile.create jolprCreateFile = new jolprUtility.utilityCrateFile.create(); jolprUtility.utilityFiles.file jolprUtlityFiles = new jolprUtility.utilityFiles.file(); String cnnString = "Provider=VFPOLEDB.1;Data Source=" + dbfName.Trim(); OleDbConnection cnn = new OleDbConnection(); OleDbDataAdapter dataAdapter = new OleDbDataAdapter(); OleDbCommand cmd = new OleDbCommand(); System.Data.DataSet myDataSet = new System.Data.DataSet(); if (cnn.State == System.Data.ConnectionState.Closed) { cnn.ConnectionString = cnnString; cnn.Open(); } int whereis = dbfName.LastIndexOf("\\"); string sTable = dbfName.Substring(whereis + 1); int whereis2 = sTable.LastIndexOf("."); sTable = sTable.Substring(0, whereis2 ); cmd.Connection = cnn; cmd.CommandType = System.Data.CommandType.Text; cmd.CommandText = "select * from " + sTable + " where V1PAGE <> '99' ORDER BY v0batchnum,v0sequence;"; //SSHRA12A dataAdapter.SelectCommand = cmd; dataAdapter.Fill(myDataSet); jolprUtlityFiles.createFile(dataPath ); if (isHRA) { HRA(myDataSet, ref jolprCreateFile, ref jolprUtlityFiles, ref _fechaRecibido, ref dataPath); }else { HAT(myDataSet, ref jolprCreateFile, ref jolprUtlityFiles, ref _fechaRecibido, ref dataPath); } cnn.Close(); cmd.Dispose(); dataAdapter.Dispose(); myDataSet.Dispose(); cnn.Dispose(); } catch (Exception ex) { throw new Exception(ex.Message + " run"); } }