checking in latest changes for Quick FTP

QuickFTP/quickftp/Program.cs

@@ -4,6 +4,8 @@ using Sdaleo.Systems.Advantage;
 using System;
 using System.Collections.Generic;
 using System.Configuration;
+using System.Data;
+using System.IO;
 using System.Linq;
 using System.Text;
 using Yaulw.Registry;
@@ -18,8 +20,6 @@ namespace quickftp
             string user = quickftp.Properties.Settings.Default.AdvantageUser;
             string pass = quickftp.Properties.Settings.Default.AdvantagePass;
 
-            ddd();
-
             if (String.IsNullOrEmpty(path) || String.IsNullOrEmpty(user) || String.IsNullOrEmpty(pass))
             {
                 Console.WriteLine("Advantage settings blank or null");
@@ -33,20 +33,52 @@ namespace quickftp
                 return;
             }
 
+            string query1 = ReadQuery("query1.txt");
+            if (String.IsNullOrEmpty(query1))
+                return;
+
             DB db = DB.Create(cred);
-            DBRetVal retVal = db.FillDataTable("Select Top 10 * FROM MWPAT");
+            DBRetVal retVal = db.FillDataTable(query1);
             if(!retVal.IsValid)
             {
                 Console.WriteLine(retVal.ErrorMsg);
                 return;
             }
             
+            foreach (DataRow r in retVal.GetDataTableRetVal().Rows)
+            {
+                var d = r[1];
+            }
+
+            //Console.Writeline()
+
+            ddd();
+
             //DBMS.CreateErrorDBRetVal            
             
             //cred.AdvDataSource = credential.DataSource;
             //cred.AdvIsRemote = (ConnStr.RetrieveValue("SERVERTYPE", credential.ConnectionString) == "REMOTE");
         }
 
+        public static string ReadQuery(string filename)
+        {
+            try
+            {   // Open the text file using a stream reader.
+                using (StreamReader sr = new StreamReader(filename))
+                {
+                    // Read the stream to a string, and write the string to the console.
+                    String line = sr.ReadToEnd();
+                    return line;
+                }
+            }
+            catch (Exception e)
+            {
+                Console.WriteLine(String.Format("The file could not be read: {0}", filename));
+                Console.WriteLine(e.Message);
+            }
+            return "";
+        }
+
         public static void ddd()
         {
             string regValue = RegKey.GetKey<string>(HKEYRoot.LocalMachine, "Software\\PanaceanTech", "SMFTP", "").ToLower();

QuickFTP/quickftp/bin/Debug/query1.txt

@@ -0,0 +1,178 @@
+Select 
+A."Entry Number",
+A.Chart_Number,
+A."First Name" as First_Name,
+A."Last Name" as Last_Name,
+A.Claim_Number,
+A.Date_From,
+A.Description as Level_Of_Care,
+A.Amount,
+B.Payment_Status,
+A.Diagnosis1,
+A.Diagnosis_Description,
+D.DED,
+I.ERA_DED,
+A.Insurance_Name,
+A.Insurance_Class,
+A."Insurance_1_Amount_Paid",
+A."Insurance_2_Amount_Paid",
+A.Adjustment_Amount,
+A.Referring_Provider,
+A.Policy_1,
+A.Group_Number_1,
+A.Initial_Billing_Date,
+A.Primary_Billing_Date, 
+A.Referring_Provider,
+MWPRI."Date From" as Primary_Paid_Date,
+MWSEC."Date From" as Secondary_Paid_Date,
+MWGUA."Date From" as Guarantor_Paid_Date
+   
+
+
+					from
+//Main Query
+(Select distinct MWTRN."Entry Number",
+        MWTRN."Chart Number" as Chart_Number,
+        MWPAT."First Name",
+		MWPAT."Last Name",
+		MWTRN."Claim Number" AS Claim_Number,
+		MWTRN."Date From" AS Date_From, 
+
+		
+		MWTRN."Diagnosis Code 1" as Diagnosis1,
+        MWTRN."Diagnosis Code 2" as Diagnosis2,
+		DIA."Description" as Diagnosis_Description ,
+        DIA2."Description" Diagnosis2_Description,
+
+        MWINS."Insurance Class" as Insurance_Class,
+
+		MWTRN.Amount, 
+//whatthehellisthis		"Procedure Code" As Units,
+		MWPRO.Description, 
+		"Adjustment Amount",
+		MWPRO."Description",
+		MWINS."Name" as Insurance_Name,
+        MWTRN.Amount,
+        MonthName("MWTRN"."Date Created") as MonthofYear,
+        Year("MWTRN"."Date Created") as TheYear,
+        MWTRN."Diagnosis_12_Description" as Blank,
+        MWPRO."Description" As Level_Of_Care,  
+        MWINS."Insurance Class" as Insurance_Class,
+        MWINS."Name" as Insurance_Name,
+	    MWCAS."Policy Number #1" as Policy_1,
+        MWCAS."Group Number #1" as Group_Number_1,
+	    MWCLA."Initial Billing Date 1" as Initial_Billing_Date,
+	    MWCLA."Primary BIlling Date"as Primary_Billing_Date, 
+        MWTRN."Attending Provider" AS Attending_Provider, 
+        MWTRN."Insurance 1 Amount Paid" AS Insurance_1_Amount_Paid, 
+        MWTRN."Insurance 2 Amount Paid" AS Insurance_2_Amount_Paid, 
+        MWTRN."Insurance 3 Amount Paid" AS Insurance_3_Amount_Paid, 
+        MWTRN."Guarantor Amount Paid" AS Guarantor_Amount_Paid, 
+        MWTRN."Adjustment Amount" AS Adjustment_Amount,
+       (MWRPH."First Name" + MWRPH."Last Name") AS Referring_Provider,
+ 	    MWRPH."Code" as Referring_Provider_Code
+
+	  
+ FROM  MWTRN 
+INNER JOIN MWCAS MWCAS ON
+      (MWCAS."Case Number" = MWTRN."Case Number")
+INNER JOIN MWINS MWINS ON
+      (MWINS."Code" = MWCAS."Insurance Carrier #1")
+	  INNER JOIN MWDIA DIA ON 
+      MWTRN."Diagnosis Code 1" = DIA."Code 1"
+      left outer JOIN MWDIA DIA2 ON
+      MWTRN."Diagnosis Code 2" = DIA2."Code 1"
+INNER JOIN MWPAT MWPAT ON
+      (MWPAT."Chart Number" = MWTRN."Chart Number")
+INNER JOIN MWPRO MWPRO ON
+      (MWTRN."Procedure Code" = MWPRO."Code 1")	
+	  left outer JOIN MWRPH ON
+	  MWCAS."Referring Provider" = MWRPH."Code"
+INNER JOIN MWCLA MWCLA ON
+      (MWCLA."Claim Number" = MWTRN."Claim Number")  
+WHERE  (MWTRN."Transaction Type" BETWEEN 'A' AND 'H') AND 
+       (MWTRN."Date From" between '01/1/2015' and '12/31/2016') AND (MWCLA."Claim Status 1"  in ('2', '3', '4', '6'))) A 
+
+	   //Primary Payments (MWPRI)
+LEFT OUTER JOIN	   
+   (Select distinct MWTRN."Entry Number",   MAX(MWTRN2."Date From") as "Date From"
+      from MWTRN INNER JOIN MWPAX ON
+      MWPAX."Charge Reference" = MWTRN."Entry Number"
+      INNER JOIN MWTRN MWTRN2 ON 
+      MWPAX."Payment Reference" = MWTRN2."Entry Number"
+      Where MWPAX."Who Paid" = '1' and MWPAX."Payment Amount" < 0
+      and MWTRN2."Transaction Type" in ('I', 'M')
+	  group by MWTRN."Entry Number") MWPRI ON
+	  A."Entry Number" = MWPRI."Entry Number"
+	  
+	  //Gather Secondary Payments (MWSEC)
+	  left outer JOIN 
+	        (Select distinct MWTRN."Entry Number",  MAX(MWTRN2."Date From") as "Date From"
+      from MWTRN INNER JOIN MWPAX ON
+      MWPAX."Charge Reference" = MWTRN."Entry Number"
+      INNER JOIN MWTRN MWTRN2 ON 
+      MWPAX."Payment Reference" = MWTRN2."Entry Number"
+      Where MWPAX."Who Paid" = '2' and MWTRN2."Transaction Type" in ('I', 'M')
+	  group by MWTRN."Entry Number") MWSEC ON
+	  A."Entry Number" = MWSEC."Entry Number"
+	  left outer JOIN
+	     
+	//Gather Guarantor Payments	 (MWGUA)
+		    (Select distinct MWTRN."Entry Number",  MAX(MWTRN2."Date From") as "Date From"
+      from MWTRN INNER JOIN MWPAX ON
+      MWPAX."Charge Reference" = MWTRN."Entry Number"
+      INNER JOIN MWTRN MWTRN2 ON 
+      MWPAX."Payment Reference" = MWTRN2."Entry Number"
+      Where MWPAX."Who Paid" = 'G'
+	  group by MWTRN."Entry Number") MWGUA ON
+	  A."Entry Number" = MWGUA."Entry Number"
+	  
+	  //Deductible Stuff (D)
+	  left outer join
+          (Select abs(sum(cast(MWPAX."Payment Amount" as SQL_NUMERIC(9,2)))) as DED, MWTRN."Entry Number", MWTRN."Chart Number" from MWTRN INNER JOIN MWPAX on MWTRN."Entry Number" = MWPAX."Charge Reference"
+		  inner join MWTRN MWTRN2 on MWPAX."Payment Reference" = MWTRN2."Entry Number"
+		  Where MWTRN2."Transaction Type" = 'P'
+		  group by MWTRN."Chart Number", MWTRN."Entry Number") D
+		  on D."Entry Number" = A."Entry Number"	   
+
+		  //I have no clue (I)
+		  left outer join (Select sum(cast((Substring(replace(MWTRN."Description", ',', ''), (LOCATE('$', MWTRN."Description") +1),
+                    ((LOCATE(' ', MWTRN."Description") -1) - (LOCATE('$', MWTRN."Description") +1) ))) as SQL_Numeric(9,2))) as ERA_DED, mwtrn2."Entry Number", MWTRN2."Chart Number" from MWTRN
+                  INNER JOIN MWPAX on MWTRN."Entry Number" = MWPAX."Payment Reference"
+		  inner join MWTRN MWTRN2 on MWPAX."Charge Reference" = MWTRN2."Entry Number"
+                  Where MWTRN."Description" like 'ERA:Deductible=%' or MWTRN."Description" like 'ERA:PR1=%'
+				  group by  MWTRN2."Chart Number", MWTRN2."Entry Number") I
+				  ON I."Entry Number" = A."Entry Number"
+				  
+				  left outer join
+				  
+(Select "Charge Reference" as CRef,
+(Case When MWDEP."Deposit Code" = 'A' Then 'ERA_Payment_Posting' 
+When MWDEP."Deposit Code" = 'B' Then 'ERA_Payment_Confirmed'
+When MWDEP."Deposit Code" = 'F' Then 'Paid_Confirmed_Aging_To_Facility'
+When MWDEP."Deposit Code" = 'G' Then 'Paid_Per_Check_To_Facility'
+When MWDEP."Deposit Code" = 'J' Then 'Paid_Per_AR_To_Patient'
+When MWDEP."Deposit Code" = 'K' Then 'Paid_Per_Check_To_Patient'
+When MWDEP."Deposit Code" = 'N' Then 'Paid_Per_Aging_To_Facility'
+Else 'Unpaid' End) as Payment_Status,
+
+sum(Case When MWDEP."Deposit Code" in ('A', 'B', 'E', 'F', 'G', 'J', 'K', 'N') Then (Cast(MWPAX."Payment Amount" as 
+
+SQL_NUMERIC(9,2))) Else 0 End) as Total_Deposit,
+Sum(Case WHen MWTRN."Transaction Type" = 'P' Then (Cast(MWPAX."Payment Amount" as SQL_NUMERIC(9,2))) Else 0 End) as D,
+Sum(Case WHen MWTRN."Transaction Type" in ('J', 'K', 'L') Then (Cast(MWPAX."Payment Amount" as SQL_NUMERIC(9,2))) Else 0 
+
+End) as C,
+Sum(Case WHen MWTRN."Transaction Type" in ('M', 'N', 'O') Then (Cast(MWPAX."Payment Amount" as SQL_NUMERIC(9,2))) Else 0 
+
+End) as P
+
+
+from MWPAX 
+inner join MWDEP on 
+MWDEP."Entry Number" = MWPAX."Deposit ID"
+inner join MWTRN on
+MWTRN."Entry Number" = MWPAX."Payment Reference" where MWTRN."Transaction Type" in ('I', 'J', 'K', 'N', 'O', 'P')
+Group By Cref, Payment_Status ) B
+ ON A."Entry Number" = B.CREF
+// Group BY A.Chart_Number, A.Procedure_Code, A."First Name", A."Last Name", A.Insurance_Class, A.MonthofYear, A.TheYear,A.Blank,