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

Text Translation for Concatenate Text

General Discussion

Last Post by Lee 8 years ago

5 Posts

3 Users

0 Reactions

60 Views

RSS

srock

(@srock)

Posts: 81

Estimable Member

Topic starter

Hello! Hoping for help with text translation of the function below. I want the strings separated by a hard return and it works as long as I choose document variables that are next to each other.

I need the text translation to be separated by 1 hard return, no matter how far apart the document variable are. (Example: If I select INSTRU1 and INSTRU20, I only want hard return between them.

Does that even make sense?

//Assessment Tab Start//
{ ConcatenateText(DOCUMENT.INSTRU1,DOCUMENT.INSTRU2,DOCUMENT.INSTRU3,DOCUMENT.INSTRU4,DOCUMENT.INSTRU5,DOCUMENT.INSTRU6,DOCUMENT.INSTRU7,DOCUMENT.INSTRU8,DOCUMENT.INSTRU9,DOCUMENT.INSTRU10,DOCUMENT.INSTRU11,DOCUMENT.INSTRU12,DOCUMENT.INSTRU13,DOCUMENT.INSTRU14,DOCUMENT.INSTRU15,DOCUMENT.INSTRU16,DOCUMENT.INSTRU17,DOCUMENT.INSTRU18,DOCUMENT.INSTRU19,DOCUMENT.INSTRU20)}

{ fn ConcatenateText(strvar1,strvar2,strvar3,strvar4,strvar5,strvar6,strvar7,strvar8,strvar9,strvar10,strvar11,strvar12,strvar13,strvar14,strvar15,strvar16,strvar17,strvar18,strvar19,strvar20)

{

local obsstr=""

//following line needs to be modified as you wish to separate strings

obsstr=

strvar1+HRET+HRET+
strvar2+HRET+HRET+
strvar3+HRET+HRET+
strvar4+HRET+HRET+
strvar5+HRET+HRET+
strvar6+HRET+HRET+
strvar7+HRET+HRET+
strvar8+HRET+HRET+
strvar9+HRET+HRET+
strvar10+HRET+HRET+
strvar11+HRET+HRET+
strvar12+HRET+HRET+
strvar13+HRET+HRET+
strvar14+HRET+HRET+
strvar15+HRET+HRET+
strvar16+HRET+HRET+
strvar17+HRET+HRET+
strvar18+HRET+HRET+
strvar19+HRET+HRET+
strvar20

obsnow("INSTRUCTIONS",obsstr)

}

Posted : June 27, 2016 8:07 am

jfitzmd

(@jfitzmd)

Posts: 419

Reputable Member

Use concatenated inline if() statements:

obsstr=(if strvar1=="","",strvar1+HRET)+(if strvar2=="","",strvar2+HRET)+.........

Posted : June 27, 2016 8:27 am

srock

(@srock)

Posts: 81

Estimable Member

Topic starter

This is what I changed it to:
//Assessment Tab Start//
{ ConcatenateText(DOCUMENT.INSTRU1,DOCUMENT.INSTRU2,DOCUMENT.INSTRU3,DOCUMENT.INSTRU4,DOCUMENT.INSTRU5,DOCUMENT.INSTRU6,DOCUMENT.INSTRU7,DOCUMENT.INSTRU8,DOCUMENT.INSTRU9,DOCUMENT.INSTRU10,DOCUMENT.INSTRU11,DOCUMENT.INSTRU12,DOCUMENT.INSTRU13,DOCUMENT.INSTRU14,DOCUMENT.INSTRU15,DOCUMENT.INSTRU16,DOCUMENT.INSTRU17,DOCUMENT.INSTRU18,DOCUMENT.INSTRU19,DOCUMENT.INSTRU20)}

{ fn ConcatenateText(strvar1,strvar2,strvar3,strvar4,strvar5,strvar6,strvar7,strvar8,strvar9,strvar10,strvar11,strvar12,strvar13,strvar14,strvar15,strvar16,strvar17,strvar18,strvar19,strvar20)

{

local obsstr=""

//following line needs to be modified as you wish to separate strings

obsstr=

(if strvar1=="",""strvar1+HRET)+
(if strvar2=="",""strvar2+HRET)+
(if strvar3=="",""strvar3+HRET)+
(if strvar4=="",""strvar4+HRET)+
(if strvar5=="",""strvar5+HRET)+
(if strvar6=="",""strvar6+HRET)+
(if strvar7=="",""strvar7+HRET)+
(if strvar8=="",""strvar8+HRET)+
(if strvar9=="",""strvar9+HRET)+
(if strvar10=="",""strvar10+HRET)+
(if strvar11=="",""strvar11+HRET)+
(if strvar12=="",""strvar12+HRET)+
(if strvar13=="",""strvar13+HRET)+
(if strvar14=="",""strvar14+HRET)+
(if strvar15=="",""strvar15+HRET)+
(if strvar16=="",""strvar16+HRET)+
(if strvar17=="",""strvar17+HRET)+
(if strvar18=="",""strvar18+HRET)+
(if strvar19=="",""strvar19+HRET)+
strvar20

obsnow("INSTRUCTIONS",obsstr)

}

And this is the error I'm getting when the form is opened in Centricity:
{
/*FUNCTION DEFINITIONS*/

fn ConcatenateText(strvar1,strvar2,strvar3,strvar4,strvar5,strvar6,strvar7,strvar8,strvar9,strvar10,strvar11,strvar12,strvar13,strvar14,strvar15,strvar16,strvar17,strvar18,strvar19,strvar20)

{

local obsstr=""

//following line needs to be modified as you wish to separate strings

obsstr=

(if strvar1=="",""strvar1 <-COMPILER ERROR NEARBY: Expect RIGHT PAREN. Instead had IDENTIFIER after STRING

Posted : June 27, 2016 8:41 am

Lee

(@lee-cooper)

Posts: 348

Reputable Member

The syntax used is MEL shorthand, and it is rather picky.

(if strvar1=="",""strvar1+HRET)+

Reads as:

(if strvar1=="" then"" else strvar1+HRET endif)+

Knowing this, you need to add a second comma after the second set of quotes:

(if strvar1=="","",strvar1+HRET)+

This should clean it up for you.

Posted : June 27, 2016 9:36 am

Lee

(@lee-cooper)

Posts: 348

Reputable Member

A cleaner approach to this functionality would be:

{! fn fnBuildInstr()

{
local retStr = ""
local strBuf = ""
local i
local nArgs

nArgs = getnargs()

for i = 1, i <= size(nArgs), i = i + 1 do
strBuf = getarg(i)
if strBuf <> "" then
if retStr <> "" then
retStr = retStr + HRET + strBuf
else
retStr = strBuf
endif
else ""
endif
endfor
obsnow("INSTRUCTIONS",retStr)

return ""
}
}

You would still create the 'standard' function call, however:

fnBuildInstr(DOCUMENT.INSTRU1,DOCUMENT.INSTRU2,DOCUMENT.INSTRU3, etc.)

This makes the function easily used in other contexts with minimal modification of the obsterm assignment method.

Posted : June 27, 2016 9:49 am

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