1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
|
" codeBody "
/* het Facturerings Rapport van de Status 11/22/03
Herziene 5/6/06 */
VASTGESTELDE NOCOUNT
CRE�ëR #Records VAN DE LIJST
(
Varchar TicketNumber (20),
Datetime van het bezoek,
Datetime van LastDateFiled,
Datetime van FirstDateFiled,
Het geld van InsBalance,
Het geld van PatBalance,
Varchar PrimaryInsuranceCarrier (50),
Varchar CurrentInsuranceCarrier (50),
Numerieke CurrentCarrier (1, 0),
Varchar BillStatus (50),
BillStatusID int.,
Ingegane datetime,
FilingType int.,
DaysSinceFiled int.,
Varchar PatientName (50),
Varchar VisitOwner (50),
Varchar beschrijving (100),
Varchar arts (100),
Varchar Credentialed (1)
)
-- Neem de Nieuwe Verslagen op
ALS „1“ = „1“
OF 1 BINNEN (ONGELDIG)
TUSSENVOEGSEL IN #Records
SELECTEER ISNULL (a.TicketNumber, „niets“),
ZET (varchar, a.ApptStart, 101) om,
'',
'',
0,
0,
ISNULL (ic.ListName, „niets“),
ISNULL (ic.ListName, „niets“),
1,
„Nieuw“,
1,
'',
0,
0,
pp. Duur + „,“ + pp. Eerst + „-“ + pp.PatientID,
„Benoeming“,
'',
d.ListName,
COMPUTER-AIDED SOFTWARE ENGINEERING WANNEER icd.InsuranceCarriersDoctorID NIET ONGELDIG IS
DAN „X“
ANDERS ''
EIND
VAN dbo.InsuranceCarriers ic
BINNEN SLUIT me aan bij dbo.PatientInsurance pi OP ic.InsuranceCarriersId = pi.InsuranceCarriersId
JUISTE BUITEN SLUIT ZICH AAN BIJ DBO. Benoemingen a OP pi.PatientProfileId = a.OwnerId
BINNEN SLUIT me aan bij dbo.PatientProfile pp OP a.OwnerID = pp.PatientProfileID
BINNEN SLUIT me aan bij DoctorFacility D OP ISNULL (a.DoctorID,
a.ResourceID) = d.DoctorFacilityID
De LINKERZIJDE SLUIT zich aan bij InsuranceCarriersDoctor icd OP pi.InsuranceCarriersID = icd.InsuranceCarriersID
EN ISNULL (a.DoctorID, a.ResourceID) = icd.DoctorID
WAAR (pi.OrderForClaims = 1)
EN (a.PatientVisitId IS ONGELDIG)
EN (a.ApptKind = 1)
EN (a.HideNewVisit IS ONGELDIG
OF a.HideNewVisit = 0
)
EN (a.Canceled IS ONGELDIG
OF a.Canceled = 0
)
EN (a.ApptStart < GETDATE ())
EN a.ApptStart >= ISNULL (VERKLAAR, „1/1/1900“ NIETIG)
EN a.ApptStart < dateadd (dag, 1, ISNULL (VERKLAAR, „1/1/3000“) nietig)
EN --Filter op verzekeringsdrager
((ONGELDIG IS NIET ONGELDIG
EN ic.InsuranceCarriersId BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op faciliteit
((ONGELDIG IS NIET ONGELDIG
EN a.FacilityID BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op verzekeringsgroep
((ONGELDIG IS NIET ONGELDIG
EN ic.InsuranceGroupId BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op Arts
((ONGELDIG IS NIET ONGELDIG
EN a.ResourceID BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
-- Ga de Verslagen van het Bezoek in
TUSSENVOEGSEL IN #Records
SELECTEER pv.TicketNumber,
pv. Bezoek,
pv.LastFiledDate,
pv.FirstFiledDate,
pva.InsBalance,
pva.PatBalance,
ISNULL (ic.ListName, „niets“),
ISNULL (ic.ListName, „niets“),
pv.CurrentCarrier,
BS. Beschrijving,
pv.BillStatus,
pv. Binnengegaan,
ISNULL (pv.FilingType, 0),
COMPUTER-AIDED SOFTWARE ENGINEERING WANNEER pv.LastFiledDate ONGELDIGE TOEN 0 IS
ANDERS DATEDIFF (D, pv.LastFiledDate, getdate ())
EIND,
pp. Duur + „,“ + pp. Eerst + „-“ + pp.PatientID,
ISNULL (vo. Beschrijving, „Geen Eigenaar“),
VERLATEN ISNULL ((pv. Beschrijving, 100), ''),
d.ListName,
COMPUTER-AIDED SOFTWARE ENGINEERING WANNEER icd.InsuranceCarriersDoctorID GEEN ONGELDIG TOEN „X“ IS
ANDERS ''
EIND
VAN dbo.PatientVisit pv
BINNEN SLUIT me aan bij dbo.PatientProfile pp OP pv.PatientProfileId = pp.PatientProfileId
LINKER BUITEN SLUIT zich aan bij dbo.InsuranceCarriers ic OP pv.PrimaryInsuranceCarriersId = ic.InsuranceCarriersId
LINKER BUITEN SLUIT zich aan bij pva dbo.PatientVisitAgg OP pv.PatientVisitId = pva.PatientVisitId
LINKER BUITEN SLUIT zich aan bij dbo.InsuranceCarriers cic OP pv.CurrentInsuranceCarriersId = cic.InsuranceCarriersId
LINKER BUITEN SLUIT zich aan bij dbo.MedLists BS OP bs.JoinId = pv.BillStatus
EN bs.TableName = „BillStatus“
BINNEN SLUIT me aan bij DoctorFacility D OP pv.DoctorID = d.DoctorFacilityID
LINKER BUITEN SLUIT zich aan bij MedLists vo OP pv.VisitOwnerMID = vo.MedListsID
De LINKERZIJDE SLUIT zich aan bij InsuranceCarriersDoctor icd OP pv.CurrentInsuranceCarriersId = icd.InsuranceCarriersID
EN pv.DoctorID = icd.DoctorID
WAAR pv. Bezoek >= ISNULL (VERKLAAR, „1/1/1900“ nietig)
EN pv. Bezoek < dateadd (dag, 1, ISNULL (VERKLAAR, „1/1/3000“) nietig)
EN pv.BillStatus NIET BINNEN (12, 10)
--Filter op BillStatus
EN ((ONGELDIG IS ONGELDIG
EN „1“ = „1“
)
OF („1“ = „2“
EN ONGELDIG IS ONGELDIG
)
OF pv.BillStatus BINNEN (ONGELDIG)
)
EN --Filter op verzekeringsdrager
((ONGELDIG IS NIET ONGELDIG
EN ic.InsuranceCarriersId BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op faciliteit
((ONGELDIG IS NIET ONGELDIG
EN pv.FacilityID BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op verzekeringsgroep
((ONGELDIG IS NIET ONGELDIG
EN ic.InsuranceGroupId BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN -- De te omvatten prioriteit van de drager
((1 = 1)
OF (1 = 2
EN pv.CurrentCarrier = 1
)
OF (1 = 3
EN pv.CurrentCarrier > 1
)
)
EN --Filter op visitowner
((ONGELDIG IS NIET ONGELDIG
EN pv.VisitOwnerMID BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
EN --Filter op Arts
((ONGELDIG IS NIET ONGELDIG
EN pv.DoctorID BINNEN (ONGELDIG)
)
OF (ONGELDIG IS ONGELDIG)
)
ALS 0 <> 1
SELECTEER *
VAN #Records
ANDERS
SELECTEER *
VAN #Records
WAAR „Nieuwe“ BillStatus <>
|