Xlate Error: Malformed Tcl Keyed List null – Help?

[KeithBrennan]

When Try to load an Xlate in the translation configurator I get the following error:

File ‘IHS_to_MEDITECH.xlt’ is malformed:  FileFormatException File ‘D:hciroot3.7.1PdrmcliveXlateIHS_to_MEDITECH.xlt’ is malformed between lines 298 and 310: Malformed Tcl Keyed List null

here’s the lines of code in question:

{ { OP CALL }

   { ERR 0 }

   { IN {0(0).PV1.#3 ~0(0).PV1.#18 ~0(0).PV1.#41 0(0).EVN.#1} }

   { OUT {0(0).PID.#18 0(0).PID.#3} }

   { TCL {

        lassign $xlateInVals cond1 cond2 cond3 cond4

                if [cequal $cond1 OD] && [cequal $cond2 IN] && [cequal $cond3 DIS] && [cequal $cond4 A08]} {

                          set out

          xpmstore -list $xlateId [lindex $xlateOutList 0] c $out

          xpmstore -list $xlateId [lindex $xlateOutList 1] c $out

                }

   }}

}

Can someone tell me why this code generates that error?  thanks!

Topic

[Steve Carter]

You’re missing the open brace at the beginning of your IF statement.

Steve

KeithBrennan wrote:

When Try to load an Xlate in the translation configurator I get the following error:

File ‘IHS_to_MEDITECH.xlt’ is malformed:

[KeithBrennan]

Doh!  Thanks Steve.  Works like a charm now.

[Author]

Replies