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");
}
}
