API tools faq
paste
yuvarajupadhyaya

Reporting_GetTestByPatientidWorksheet

yuvarajupadhyaya
Jul 20th, 2021 (edited)
239
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SQL 22.59 KB | None | 0 0
raw download clone embed print report
  1. ALTER PROC [dbo].[Reporting_GetTestByPatientidWorksheet]                
  2.        
  3. @strPatientId nvarchar(50),                        
  4.        
  5. @strPathocatid nvarchar(50),                        
  6.        
  7. @TYPE nvarchar(50),                  
  8.        
  9. @UsingPart nvarchar(50),      
  10. @sampleid nvarchar(50)      
  11.        
  12. AS                        
  13.        
  14. BEGIN                    
  15.        
  16. IF @UsingPart='Sampling'                  
  17.        
  18. BEGIN                  
  19.        
  20. IF(@TYPE='P')                        
  21.        
  22.  BEGIN                        
  23.        
  24.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  25.        
  26.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  27.        
  28.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,tsC.strItemName,PLT.MasterTestId FROM tblTestSampling TS                          
  29.        
  30.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  31.        
  32.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  33.        
  34.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  35.        
  36.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  37.        
  38.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  39.        
  40.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  41.        
  42.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                      
  43.        
  44.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                        
  45.        
  46.   AND TS.strPatientId=@strPatientId AND PLT.intPathocatid IN(SELECT CAST(Item AS INTEGER)    
  47.         FROM dbo.SplitString(@strPathocatid, ',')) AND TS.intStatus=0   AND TS.strSampleId=@sampleid                      
  48.        
  49.   ORDER BY  PC.strCategory       --,tg.intTestGroupId                
  50.        
  51.  END                        
  52.        
  53.                        
  54.        
  55. ELSE IF(@TYPE='E')                        
  56.        
  57.  BEGIN                        
  58.        
  59.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  60.        
  61.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  62.        
  63.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId   FROM tblTestSampling TS                          
  64.        
  65.   LEFT JOIN  tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  66.        
  67.   LEFT JOIN  tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  68.        
  69.   LEFT JOIN  tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  70.        
  71.   LEFT JOIN  tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  72.        
  73.   LEFT JOIN  tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  74.        
  75.   LEFT JOIN   tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  76.        
  77.   LEFT JOIN   tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  78.        
  79.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                      
  80.        
  81.   AND ts.strEcounterId=(CASE WHEN @strPatientId='All' THEN ts.strEcounterId ELSE @strPatientId END)  AND PC.intPathoCatId IN(@strPathocatid) AND TS.intStatus=0                          
  82.        
  83.   ORDER BY tg.intTestGroupId                        
  84.        
  85.  END                        
  86.        
  87.                        
  88.        
  89. ELSE IF(@TYPE='B')                        
  90.        
  91.  BEGIN                        
  92.        
  93.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  94.        
  95.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  96.        
  97.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,  PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId FROM tblTestSampling  TS                          
  98.        
  99.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  100.        
  101.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  102.        
  103.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  104.        
  105.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  106.        
  107.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  108.        
  109.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  110.        
  111.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  112.        
  113.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                  
  114.        
  115.   AND TS.strbillno=@strPatientId AND PC.intpathocatid IN(@strPathocatid)  AND TS.intStatus=0                            
  116.        
  117.   ORDER BY tg.intTestGroupId                        
  118.        
  119.  END                        
  120.        
  121.                        
  122.        
  123. ELSE IF(@TYPE='S')                        
  124.        
  125.  BEGIN                        
  126.        
  127.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.DigitsAfterDecimal,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,              
  128.        
  129.                  
  130.        
  131.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  132.        
  133.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId  FROM tblTestSampling TS                          
  134.        
  135.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  136.        
  137.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  138.        
  139.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  140.        
  141.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  142.        
  143.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  144.        
  145.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  146.        
  147.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  148.        
  149.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                  
  150.        
  151.   AND TS.strSampleId=@strPatientId AND PLT.intPathocatid IN(@strPathocatid) AND TS.intStatus=0                            
  152.        
  153.   ORDER BY tg.intTestGroupId                        
  154.        
  155.  END                  
  156.        
  157. END                  
  158.        
  159.                  
  160.        
  161. ELSE IF  @UsingPart='Reporting'                  
  162.        
  163. BEGIN                  
  164.        
  165. BEGIN                  
  166.        
  167. IF(@TYPE='P')                        
  168.        
  169.  BEGIN                        
  170.        
  171.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  172.        
  173.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  174.        
  175.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,tsC.strItemName,PLT.MasterTestId FROM tblTestSampling TS                          
  176.        
  177.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  178.        
  179.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                            
  180.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  181.        
  182.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  183.        
  184.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  185.        
  186.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  187.        
  188.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                      
  189.        
  190.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                        
  191.        
  192.   AND TS.strPatientId=@strPatientId AND PLT.intPathocatid IN(@strPathocatid)                  
  193.        
  194.   ORDER BY tg.intTestGroupId                        
  195.        
  196.  END                        
  197.        
  198.                        
  199.        
  200. ELSE IF(@TYPE='E')                        
  201.        
  202.  BEGIN                        
  203.        
  204.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  205.        
  206.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  207.        
  208.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId   FROM tblTestSampling TS                          
  209.        
  210.   LEFT JOIN  tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  211.        
  212.   LEFT JOIN  tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  213.        
  214.   LEFT JOIN  tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  215.        
  216.   LEFT JOIN  tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  217.        
  218.   LEFT JOIN  tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  219.        
  220.   LEFT JOIN   tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  221.        
  222.   LEFT JOIN   tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  223.        
  224.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                      
  225.        
  226.   AND ts.strEcounterId=(CASE WHEN @strPatientId='All' THEN ts.strEcounterId ELSE @strPatientId END)  AND PC.intPathoCatId IN(@strPathocatid)                      
  227.        
  228.   ORDER BY tg.intTestGroupId                        
  229.        
  230.  END                        
  231.        
  232.                        
  233.        
  234. ELSE IF(@TYPE='B')                        
  235.        
  236.  BEGIN                        
  237.        
  238.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  239.        
  240.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  241.        
  242.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,  PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId FROM tblTestSampling  TS                          
  243.        
  244.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  245.        
  246.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  247.        
  248.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  249.        
  250.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  251.        
  252.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  253.        
  254.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  255.        
  256.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  257.        
  258.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                    
  259.        
  260.   AND TS.strbillno=@strPatientId AND PC.intpathocatid IN(@strPathocatid)                      
  261.        
  262.   ORDER BY tg.intTestGroupId                        
  263.        
  264.  END        
  265.        
  266.                        
  267.        
  268. ELSE IF(@TYPE='S')                        
  269.        
  270.  BEGIN                        
  271.        
  272.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  273.        
  274.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  275.        
  276.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId  FROM tblTestSampling TS                          
  277.        
  278.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  279.        
  280.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  281.        
  282.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  283.        
  284.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                      
  285.        
  286.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  287.        
  288.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  289.        
  290.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId              
  291.        
  292.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                      
  293.        
  294.   AND TS.strSampleId=@strPatientId AND PLT.intPathocatid IN(@strPathocatid)                        
  295.        
  296.   ORDER BY tg.intTestGroupId                        
  297.        
  298.  END                  
  299.        
  300. END                  
  301.        
  302. END                  
  303.        
  304. ELSE IF  @UsingPart='ReportVerification'                  
  305.        
  306. BEGIN                  
  307.        
  308. BEGIN                  
  309.        
  310. IF(@TYPE='P')                        
  311.        
  312.  BEGIN                        
  313.        
  314.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  315.        
  316.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  317.        
  318.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,tsC.strItemName,PLT.MasterTestId FROM tblTestSampling TS                          
  319.        
  320.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  321.        
  322.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  323.        
  324.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  325.        
  326.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  327.        
  328.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  329.        
  330.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  331.        
  332.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                      
  333.        
  334.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                        
  335.        
  336.   AND TS.strPatientId=@strPatientId AND PLT.intPathocatid IN(@strPathocatid) AND TS.intstatus=1      
  337.        
  338.   ORDER BY tg.intTestGroupId                        
  339.        
  340.  END                        
  341.        
  342.                        
  343.        
  344. ELSE IF(@TYPE='E')                        
  345.        
  346.  BEGIN                        
  347.        
  348.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  349.        
  350.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  351.        
  352.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId   FROM tblTestSampling TS                          
  353.        
  354.   LEFT JOIN  tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  355.        
  356.   LEFT JOIN  tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  357.        
  358.   LEFT JOIN  tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  359.        
  360.   LEFT JOIN  tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  361.        
  362.   LEFT JOIN  tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  363.        
  364.   LEFT JOIN   tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  365.        
  366.   LEFT JOIN   tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  367.        
  368.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                      
  369.        
  370. AND ts.strEcounterId=(CASE WHEN @strPatientId='All' THEN ts.strEcounterId ELSE @strPatientId END)  AND PC.intPathoCatId IN(@strPathocatid)  AND TS.intstatus=1                    
  371.        
  372.   ORDER BY tg.intTestGroupId                        
  373.        
  374.  END                        
  375.        
  376.                        
  377.        
  378. ELSE IF(@TYPE='B')                        
  379.        
  380.  BEGIN                        
  381.        
  382.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  383.        
  384.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  385.        
  386.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,  PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId FROM tblTestSampling  TS                          
  387.        
  388.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  389.        
  390.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  391.        
  392.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                        
  393.        
  394.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  395.        
  396.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  397.        
  398.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  399.        
  400.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                        
  401.        
  402.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                    
  403.        
  404.   AND TS.strbillno=@strPatientId AND PC.intpathocatid IN(@strPathocatid)  AND TS.intstatus=1                  
  405.        
  406.   ORDER BY tg.intTestGroupId                        
  407.        
  408.  END                        
  409.        
  410.                        
  411.        
  412. ELSE IF(@TYPE='S')                        
  413.        
  414.  BEGIN                        
  415.        
  416.   SELECT TS.intTestSampleId,TS.strPatientId,TS.strSampleId,TS.strEcounterId,TS.strPatientId,TS.intTestId,PLT.strTestName,PLT.FormulaHidden,PLT.DigitsAfterDecimal,TS.intmethodId,Pm.strMethod,TPS.intspecId,                      
  417.        
  418.   TPS.strSpecimen,TS.StrBillNo,TS.intstatus,TCD.ID AS ReferId,TCD.strDoctorName,CONVERT(nvarchar(20),TS.dtSampleDate,106) AS dtSampleDate,TS.dtSampleDate AS dtSampleDate1,                      
  419.        
  420.   PLT.strInputMethod,PLT.strUnit,PLT.strDefaultValue,PC.intPathoCatId,PC.strCategory,TG.intTestGroupId,TS.ServiceCostId,TSC.strItemName,PLT.MasterTestId  FROM tblTestSampling TS                          
  421.        
  422.   LEFT JOIN tblPathoLabTest PLT ON PLT.intTestId=TS.intTestId                        
  423.        
  424.   LEFT JOIN tblPathoCategory PC ON pc.intPathoCatId=PLT.intPathoCatId                        
  425.        
  426.   LEFT JOIN tbltestgroup tg ON tg.intTestid=TS.intTestId AND tg.intscid=TS.ServiceCostId                        
  427.        
  428.   LEFT JOIN tblservicecost TSC ON TSC.intSCID=TS.ServiceCostId                      
  429.        
  430.   LEFT JOIN tblPathoSpecimen TPS ON TPS.intspecId=TS.strSpecimen                        
  431.        
  432.   LEFT JOIN  tblConsaltantdoctr TCD ON TCD.ID=TS.strReferBy                        
  433.        
  434.   LEFT JOIN  tblPathoMethod Pm ON PM.IntMethodId=TS.intmethodId                  
  435.   WHERE PLT.[STATUS]='1' AND isnull(ts.resamplestatus,0)=0                      
  436.        
  437.   AND TS.strSampleId=@strPatientId AND PLT.intPathocatid IN(@strPathocatid)  AND TS.intstatus=1                    
  438.        
  439.   ORDER BY tg.intTestGroupId                        
  440.        
  441.  END                  
  442.        
  443. END                  
  444.        
  445. END              
  446. END                      
  447.        
  448.                        
  449.        
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!