xlt_infile: hl7 2.4 quantros_adt ADT_A08
who: tayala
date: “January 12, 2018 8:42:54 AM PST”
xlt_outfile: hl7 2.4 quantros_adt ADT_A08
type: xlt
version: 7
end_prologue
{ { OP COMMENT }
{ COMMENT {********** SUPPRESS Non-Patient **********} }
}
{ { OP IF }
{ ERR 0 }
{ COND { 0(0).PV1(0).#18(0).[0] eq =1} }
{ THENBODY {
{ { OP SUPPRESS } }
}}
{ ELSEBODY {
}}
}
{ { OP COMMENT }
{ COMMENT {********** MSH Segment **********} }
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN 0(0).MSH(0) }
{ OUT 0(0).MSH(0) }
}
{ { OP IF }
{ ERR 0 }
{ COND { 0(0).MSH(0).#4(0) eq =05 || 0(0).MSH(0).#4(0) eq =06 || 0(0).MSH(0).#4(0) eq =07} }
{ THENBODY {
{ { OP PATHCOPY }
{ ERR 0 }
{ IN =6100089 }
{ OUT 0(0).MSH(0).#4(0) }
}
}}
{ ELSEBODY {
}}
}
{ { OP IF }
{ ERR 0 }
{ COND { 0(0).MSH(0).#4(0) eq =10} }
{ THENBODY {
{ { OP PATHCOPY }
{ ERR 0 }
{ IN =6100090 }
{ OUT 0(0).MSH(0).#4(0) }
}
}}
{ ELSEBODY {
}}
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN =QUANTROS }
{ OUT 0(0).MSH(0).#5(0) }
}
{ { OP COMMENT }
{ COMMENT {********** EVN Segment **********} }
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN 0(0).EVN(0) }
{ OUT 0(0).EVN(0) }
}
{ { OP COMMENT }
{ COMMENT {********** PID Segment **********} }
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN 0(0).PID(0) }
{ OUT 0(0).PID(0) }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PID(0).#8(0).[0]}} }
{ OUT {{0(0).PID(0).#8(0).[0]}} }
{ TBL quantros_gender.tbl }
{ SIDE {} }
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN @null }
{ OUT 0(0).PID(0).#10(0) }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PID(0).#10(0).[0]}} }
{ OUT {{0(0).PID(0).#10(0).[0]}} }
{ TBL quantros_race.tbl }
{ SIDE {} }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PID(0).#10(0).[0]}} }
{ OUT {{0(0).PID(0).#10(0).[1]}} }
{ TBL quantros_race_desc.tbl }
{ SIDE {} }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PID(0).#16(0).[0]}} }
{ OUT {{0(0).PID(0).#16(0).[0]}} }
{ TBL quantros_marital.tbl }
{ SIDE {} }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PID(0).#16(0).[0]}} }
{ OUT {{0(0).PID(0).#16(0).[1]}} }
{ TBL quantros_marital_desc.tbl }
{ SIDE {} }
}
{ { OP COMMENT }
{ COMMENT {********** PV1 Segment **********} }
}
{ { OP PATHCOPY }
{ ERR 0 }
{ IN 0(0).PV1(0) }
{ OUT 0(0).PV1(0) }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PV1(0).#7(0).[0]}} }
{ OUT {{0(0).PV1(0).#7(0).[0]}} }
{ TBL physician_npi.tbl }
{ SIDE {} }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PV1(0).#8(0).[0]}} }
{ OUT {{0(0).PV1(0).#8(0).[0]}} }
{ TBL physician_npi.tbl }
{ SIDE {} }
}
{ { OP ITERATE }
{ BASIS 0(0).PV1(0).#9 }
{ VAR %f1 }
{ TYPE field }
{ BODY {
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PV1(0).#9(%f1).[0]}} }
{ OUT {{0(0).PV1(0).#9(%f1).[0]}} }
{ TBL physician_npi.tbl }
{ SIDE {} }
}
}}
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PV1(0).#17(0).[0]}} }
{ OUT {{0(0).PV1(0).#17(0).[0]}} }
{ TBL physician_npi.tbl }
{ SIDE {} }
}
{ { OP TABLE }
{ ERR 0 }
{ IN {{0(0).PV1(0).#18(0).[0]}} }
{ OUT {{0(0).PV1(0).#18(0).[0]}} }
{ TBL quantros_pattype.tbl }
{ SIDE {} }
}
{ { OP IF }
{ ERR 0 }
{ COND { 0(0).PV1(0).#10(0).[0] eq =OBV} }
{ THENBODY {
{ { OP PATHCOPY }
{ ERR 0 }
{ IN =OVS }
{ OUT {{0(0).PV1(0).#18(0).[0]}} }
}
}}
{ ELSEBODY {
}}
}
{ { OP COMMENT }
{ COMMENT {********** DG1 Segment **********} }
}
{ { OP ITERATE }
{ BASIS 2(0).DG1 }
{ VAR %s1 }
{ TYPE segment }
{ BODY {
{ { OP PATHCOPY }
{ ERR 0 }
{ IN 2(0).DG1(%s1) }
{ OUT 2(0).DG1(%s1) }
}
}}
}