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:
6:
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:
|
USE [Demo04]
GEHEN
/****** Gegenstand: UserDefinedFunction [dbo]. [cusfn_Responses] Index-Datum: 07/13/2010 15:45: 58 ******/
ANSI_NULLS AN EINSTELLEN
GEHEN
QUOTED_IDENTIFIER AN EINSTELLEN
GEHEN
FUNKTION [dbo] VERURSACHEN. [cusfn_FilingHistory] (@PatientVisitId INT)
RÜCKKEHR VARCHAR (8000)
WIE ANFANGEN
ERKLÄREN
@TicketNumber VARCHAR (20),
@FilingType VARCHAR (10),
@ClearingHouseName VARCHAR (255),
@FiledTo VARCHAR (255),
@FiledBy VARCHAR (30),
@ClaimDate DATUM/UHRZEIT,
@ProceduresFiled VARCHAR (255),
@Charges GELD,
@Result VARCHAR (8000);
@Result EINSTELLEN = ''
MyCursor CURSOR LOKALES FAST_FORWARD ERKLÄREN
FÜR AUSERWÄHLTES
pv.TicketNumber,
„Elektronisch“ ALS FilingType,
ch.ClearinghouseName,
ic.ListName ALS FiledTo,
ecf.FiledBy,
ecf.FileTransmitted ALS ClaimDate,
EC. Verfahren ALS ProceduresFiled,
EC. Gebühren ALS Gebühren
IN
#temp
VON
EDIClaimFile ecf
INNER EDIClaim EC AUF ANSCHLIESSEN ecf.EDIClaimFileId = ec.EDIClaimFileId
INNER InsuranceCarriers IC AUF VERBINDEN ec.InsuranceCarriersId = ic.InsuranceCarriersId
INNER patientvisit pv AUF ANSCHLIESSEN ec.patientvisitID = pv.patientvisitID
INNER Verrechnungszentrale ch AUF VERBINDEN ecf.clearinghouseID = ch.clearinghouseID
WO
pv.PatientVisitId = @PatientVisitId
EINSATZ IN
#temp
(
TicketNumber,
FilingType,
ClearinghouseName,
FiledTo,
FiledBy,
ClaimDate,
ProceduresFiled,
Gebühren
)
AUSERWÄHLT
pv.TicketNumber,
„Papier“ ALS FilingType,
'' ALS ClearinghouseName,
ISNULL (pvpc. Name, „keine Fördermaschine ") ALS FiledTo,
pvpc.createdby ALS FiledBy,
pvpc.created ALS ClaimDate,
pvpc. Verfahren ALS ProceduresFiled,
pvpc. Gebühren ALS Gebühren
VON
PatientvisitPaperClaim pvpc
INNER patientvisit pv AUF ANSCHLIESSEN pvpc.patientvisitID = pv.patientvisitID
WO
pv.PatientVisitId = @PatientVisitId
AUSERWÄHLT
*
VON
#temp
MyCursor ÖFFNEN
ZUNÄCHST VON MyCursor IN @TicketNumber, @FilingType, @ClearingHouseName, das @FiledTo, @FiledBy, das @ClaimDate, @ProceduresFiled, @Charges HOLEN;
WÄHREND @@FETCH_STATUS = 0
ANFANGEN
@Result = @Result EINSTELLEN
+ „Karte: “ + VERLIESS (ISNULL (@TICKETNUMBER, '') + RAUM (10), 10)
+ „Art: “ + @FilingType + RAUM (5)
+ „CL Haus: “ + VERLASSEN (ISNULL (@CLEARINGHOUSENAME, '') + RAUM (15), 15)
+ „FiledTo: “ + VERLASSEN (ISNULL (@FILEDTO, '') + RAUM (40), 40)
+ „FiledBy: “ + VERLASSEN (ISNULL (@FILEDBY, '') + RAUM (20), 20)
+ „ClaimDate: “ + VERLASSEN (ISNULL (BEKEHRTER (VARCHAR (15), @CLAIMDATE, 101), '') + RAUM (15), 15)
+ „Verfahren: “ + VERLASSEN (ISNULL (@PROCEDURESFILED, '') + RAUM (60), 60)
+ PUTZFRAU (13) + PUTZFRAU (10);
REICHWEITE ZUNÄCHST VON MyCursor IN @TicketNumber, @FilingType, @ClearingHouseName, @FiledTo, @FiledBy, @ClaimDate, @ProceduresFiled, @Charges;
ENDE;
NAHES MyCursor;
MyCursor FREIGEBEN;
RTRIM (@RESULT) ZURÜCKBRINGEN;
ENDE
|
