Welcome to the NEW CHUG— your ultimate destination for cutting-edge insights and discussions at the intersection of healthcare and technology.

Our platform is dedicated to exploring the dynamic landscape of healthcare technology, empowering professionals, enthusiasts, and innovators alike with the knowledge and resources to navigate the rapidly evolving field.

From telemedicine revolutionizing patient care to the transformative potential of artificial intelligence in diagnostics, we delve into a myriad of topics shaping the future of healthcare delivery. Whether you’re a seasoned healthcare IT professional, an aspiring entrepreneur in the digital health space, or simply curious about the latest innovations, our curated content, expert interviews, and thought-provoking articles provide a comprehensive exploration of healthcare technology’s most pressing issues.

Join us as we navigate the forefront of innovation, driving forward the transformation of healthcare for a healthier, more connected world.

Have questions or suggestions? Please use the contact button below.

Notifications

Clear all

COMPILER ERROR NEARBY: RIGHT CURLY BRACE was unexpected after IDENTIFIER

General Discussion

Last Post by Adam Daniel 11 years ago

7 Posts

3 Users

0 Reactions

57 Views

RSS

ronmoses

(@ronmoses)

Posts: 158

Estimable Member

Topic starter

I've been beating my head against this banner formula for days now, and I keep getting the same problem no matter what I do. The objective is to determine whether a patient is new or established based on whether they've been seen at one of our practices in the past three years.

{! fn NEW_OR_ESTABLISHED(){
local retVal = "New patient"
local apptCount = getRowCount("_MELPastPatientAppt")
local i = 0
local a
local loc = array(344,369,367,375,373,365,359,2015,2209,2430,5435)
while i < apptCount do
i = i + 1
a = getRow("_MELPastPatientAppt",i,"ApptKind","EmrApptStart","FacilityId")
/* Check for patient appointment */
if a[1] <> 1 then
continue
endif
/* Check for date range */
if DURATIONDAYS(sub(str(a[2]),1,10),str(._TODAYSDATE)) < 1095 then /*pass date check*/
if match(loc,a[3]) > 0 then /*pass date and PPA check*/
retVal = "Established patient"
break
else
continue
endif
else
break
endif
return retVal}}

{NEW_OR_ESTABLISHED()}

In the banner, the last two lines are:

return retVal} <- COMPILER ERROR NEARBY: [...]

{NEW_OR_ESTABLISHED()} <- FUNCTION DEFINITION NOT EXECUTABLE

I've been over this six ways to Sunday and I just don't see what I'm doing wrong. I even tried removing the last bracket, and it just prints out the text of the formula. Can anyone shed some light?

thanks,

ron

Posted : March 25, 2014 12:28 am

DavidShower

(@davidshower)

Posts: 1255

Noble Member

You are missing an ENDWHILE for your WHILE....

Posted : March 25, 2014 3:24 am

ronmoses

(@ronmoses)

Posts: 158

Estimable Member

Topic starter

DavidShower said:

You are missing an ENDWHILE for your WHILE....

God I feel stupid. It still doesn't work, but at least now it doesn't blow up. Laugh Thank you David.

Posted : March 25, 2014 3:29 am

DavidShower

(@davidshower)

Posts: 1255

Noble Member

Should be easier to trace now and see what is really happening.

Posted : March 25, 2014 4:33 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Once you get this working could you share, I would interested in what else could be done with the code.

Posted : March 25, 2014 10:57 pm

ronmoses

(@ronmoses)

Posts: 158

Estimable Member

Topic starter

adaniel said:

Once you get this working could you share, I would interested in what else could be done with the code.

Sure, glad to.

1. First I added this to mellib.txt:

global _MELPastPatientAppt = _PatientAppointmentsPast

2. Then I added this to mldefs3.txt. This is a modification of _PatientAppointments that looks at appointments in the past:

Object: _PatientAppointmentsPast        Table: Appointments            Refresh: RBook
    Property:    Snapshot
    Property:   Prepare
    Field:    AppointmentsId        Type: ID     Hidden Key
    Field:    FacilityId            Type: Long
    Field:    ApptKind            Type: Long
    Field:    OwnerId                Type: Long
    Field:    EmrApptStart        Type: DateTime
    Field:    ApptStart            Type: DateTime
    Field:    ApptStop            Type: DateTime
    Field:    Status                Type: String    Length: 50
    Field:    Canceled            Type: Long
    Field:    PatientCheckIn        Type: Long
    Field:    PriorAuthorizationNumber Type: String    Length: 50
    Field:    WCCId                Type: Long
    Field:    Notes                Type: CLOB
    Field:    ApptStatusMId        Type: Long
    Field:    DoctorId            Type: Long
    Field:    ResourceId            Type: Long
    Field:    Type                Type: String    Length: 50
    Field:    PatientVisitId        Type: Long
    Field:    TicketNumber        Type: String    Length: 20
    Field:    HideNewVisit        Type: Short
    Field:    ApptTypeId            Type: Long
    Field:    ApptSetId            Type: Long
    Field:    ApptChainId            Type: Long
    Field:    RoomNo                Type: String    Length: 30
    Field:    CasesId                Type: Long
    Field:    CompanyId            Type: Long
    Field:    ExternalApptId        Type: String    Length: 75
    Field:    DocCreate            Type: Short
    Field:    DocId                Type: Double
    Field:    CreatedBy            Type: String
    Filter:        filter1,        OwnerId = Patient.PatientProfileId    Hidden
    Variable:    dateVar            Type: Date                            Hidden
    Filter:        dateFilter,        EmrApptStart < dateVar        Disable     Hidden
    Order:        'ApptStart DESC'

3. Finally, I added this to the banner to display whether the patient was new or established. If they've been seen in one of a list of practices in the past three years, they're established. Otherwise, they're new.

{! fn NEW_OR_ESTABLISHED(){
local retVal = "New patient"
local apptCount = getRowCount("_MELPastPatientAppt")
local i = 0
local a
local loc = array("344","369","367","375","373","365","359","2015","2209","2430","5435")
while i < apptCount do
i = i + 1
a = getRow("_MELPastPatientAppt",i,"ApptKind","EmrApptStart","FacilityId","Status")
/* Check for completed patient appointment */
if (a[1] <> 1 OR a[4] <> "Completed") then
continue
endif
/* Check for date range */
if DURATIONDAYS(sub(str(a[2]),1,10),str(._TODAYSDATE)) < 1095 then /*passes date check*/
/* Check for practice */
if match(loc,a[3]) > 0 then /*passes date and PPA check*/
retVal = "Established patient"
break
else
continue
endif
else
break
endif
endwhile
return retVal}}{NEW_OR_ESTABLISHED()}

I'm still fine-tuning it to account for the fact that a user might be entering a charge for an appointment that took place yesterday. The patient may have been new on Monday, but by the time they enter the charge on Tuesday, it's going to say they're established. I'm considering putting in a buffer but we haven't made any decisions yet.

Posted : March 25, 2014 11:18 pm

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Wow thanks definitely a little out of my realm in programming experience but I can learn from this, thank you.

So are you actually modifying the text file that the Patient banner uses? Or am I way off.

Posted : March 25, 2014 11:26 pm

24 Forums
9,940 Topics
39.9 K Posts
1 Online
6,470 Members

Forum Icons: Forum contains no unread posts Forum contains unread posts

Topic Icons: Not Replied Replied Active Hot Sticky Unapproved Solved Private Closed