Looking for Iguana v.5 or v.6? Learn More or see the Help Center.
Examining the Patient Update Transformation Script |
The Patient Update transformation script works in the same way as the Lab Message transformation script that was described in the previous section. This script creates a segment iterator object, uses this object to access each segment of the message in turn, and builds the transformed message.
To view the transformation script for Patient Update messages:
- In the Workspace, expand the ADTA31 message definition and double-click Transformation Script. The Transformation Script window appears.
Transformation Script Window
The Transformation Script window displays the Python code that performs the actual transformation.
The following Python code is the transformation script used for Patient Update messages. Note that \ is the Python continuation character; it indicates that a statement continues on to the next line of code. This makes it easier to fit long statements onto a page.
current_segment = environment.input_segment_iterator()
Msh4 = current_segment.field(4).value
current_segment.apply_transform()
output = current_segment.output()
if current_segment.move_next('EVN'):
current_segment.apply_transform()
output = output + current_segment.output()
if current_segment.move_next('PID'):
current_segment.apply_transform()
current_segment.field(4).subfield(4).value ='FMPSSN'
SponId = current_segment.field(4).subfield(0).value
Id1 = SponId[3:]
Id1 = strip_chars('-', Id1)
current_segment.field(4).repeat_field(1).subfield(0).value = Id1
current_segment.field(4).repeat_field(1).subfield(4).value = 'SPONSSN'
current_segment.field(4).repeat_field(2).subfield(0).value = SponId[0:2]
current_segment.field(4).repeat_field(2).subfield(4).value = 'FMP'
current_segment.field(4).repeat_field(3).subfield(0).value = \
current_segment.field(5).subfield(0).value[0:1] + SponId[10:14]
current_segment.field(4).repeat_field(3).subfield(4).value = 'LNSPSSN'
current_segment.field(4).repeat_field(4).subfield(0).value = \
current_segment.field(5).subfield(0).value[0:1] + \
current_segment.field(19).subfield(0).value[7:11]
current_segment.field(4).repeat_field(4).subfield(4).value ='LNSSN'
if current_segment.field(14).value == '':
current_segment.field(14).value = '""'
isPCMID = 'N'
current_segment2 = environment.input_segment_iterator()
current_segment2.reset()
if current_segment2.move_next('ZPX'):
Zpx4 = current_segment2.field(4).value
if Zpx4 <> "" :
# log("ZPX4=" + Zpx4)
isPCMID='Y'
current_segment.field(4).repeat_field(5).subfield(0).value = Zpx4 + '-' + Msh4
current_segment.field(4).repeat_field(5).subfield(4).value = 'PCMID'
IsVip = 'N'
current_segment2.reset()
if current_segment2.move_next('ZP1'):
for ItemIndex in range(0, current_segment2.field(4).count_of_repeat()):
Title = current_segment2.field(4).repeat_field(ItemIndex).value
if (Title == "CONGRESSIONAL"):
IsVip = 'Y'
elif (Title == "FLAG ADMISSIONS"):
IsVip = 'Y'
elif (Title == "FOREIGN DIGNITARY"):
IsVip = 'Y'
elif (Title == "SECRETARIAL DESIGNEE"):
IsVip = 'Y'
if isPCMID == 'Y' :
field_number = 6
else :
field_number = 5
if IsVip <> 'Y' :
current_segment.field(4).repeat_field(field_number).subfield(0).value = 'N'
else:
current_segment.field(4).repeat_field(field_number).subfield(0).value = 'Y'
current_segment.field(4).repeat_field(field_number).subfield(4).value = 'VIP'
output = output + current_segment.output()
ZenCount = 0
current_segment.reset()
if current_segment.move_next('PID'):
if not current_segment.field(27).is_null():
ZenCount = ZenCount + 1
output += "ZEN|" + str(ZenCount) + "|PATCAT|"
output += current_segment.field(27).subfield(0).value + "^" + \
current_segment.field(27).subfield(3).value + " " + \
current_segment.field(27).subfield(1).value
output += "\r"
current_segment.reset()
if current_segment.move_next('ZPX'):
if not current_segment.field(1).is_null():
ZenCount = ZenCount + 1
Code = current_segment.field(1).value
output = output + "ZEN|" + str(ZenCount) + "|ACV|" + Code + "^"
if Code == "A":
output += "TRICARE PRIME (ACTIVE DUTY)"
elif Code == "B":
output += "CHAMPVA (OCONUS)"
elif Code == "C":
output += "CHAMPUS"
elif Code == "D":
output += "MEDICARE DEMONSTRATION"
elif Code == "E":
output += "TRICARE PRIME (CHAMPUS)"
elif Code == "I":
output += "FEDERAL EMPLOYEE HEALTH BENEFITS PROGRAM"
elif Code == "K":
output += "CATCHMAN AREA MG"
output += "|\r"
if not current_segment.field(3).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|DMISID|"
output += current_segment.field(3).subfield(1).value + "^" + \
current_segment.field(3).subfield(1).value
output += "|\r"
current_segment.reset()
if current_segment.move_next('ZPS'):
if not current_segment.field(9).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|UIC|^"
output += current_segment.field(9).subfield(1).value + " (" + \
current_segment.field(9).subfield(3).value + ")"
output += "|\r"
if not current_segment.field(5).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|RANK|"
output += current_segment.field(5).subfield(0).value + "^" + \
current_segment.field(5).subfield(1).value
output += "|\r"
current_segment.reset()
if current_segment.move_next('ZPI'):
if not current_segment.field(7).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|DEERS|"
output += current_segment.field(7).value + "^" + current_segment.field(7).value
output += "|\r"
if not current_segment.field(9).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|DST|"
output += "^" + current_segment.field(9).value
output += "|\r"
if not current_segment.field(10).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|DEND|"
output += "^" + current_segment.field(10).value
output += "|\r"
current_segment.reset()
if current_segment.move_next('ZP1'):
if not current_segment.field(2).subfield(0).subfield(0).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|RECSAT|"
output += current_segment.field(2).subfield(0).subfield(0).value + "^" + \
current_segment.field(2).subfield(0).subfield(1).value
output += "|\r"
if not current_segment.field(5).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|VMS|"
output += current_segment.field(5).value
output += "|\r"
Code1 = '""'
Code2 = '""'
current_segment.reset()
if current_segment.move_next('ZCS'):
Code1 = hard_delete(current_segment.field(1).subfield(0).value)
Code2 = hard_delete(current_segment.field(1).subfield(1).value)
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|COMSEC|" + Code1 + "^" + Code2 + "|\r"
current_segment.reset()
if current_segment.move_next('ZCS'):
if not current_segment.field(2).is_null():
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|DNAONFILE|"
output += current_segment.field(2).value
output += "|\r"
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|COMINT|PRESENT"
output += "|\r"
ParentId = str(ZenCount)
current_segment.reset()
current_segment.move_next('ZP1')
for ItemIndex in range(0, current_segment.field(4).count_of_repeat()) :
if ((not current_segment.field(4).repeat_field(ItemIndex).is_null()) or \
(not current_segment.field(4).repeat_field(ItemIndex).subfield(1).is_null())):
ZenCount = ZenCount + 1
output = output + "ZEN|" + str(ZenCount) + "|COMINT|"
output = output + hard_delete(current_segment.field(4).repeat_field(ItemIndex).subfield(0).value) + \
"^" + hard_delete(current_segment.field(4).repeat_field(ItemIndex).subfield(1).value) + \
"|" + ParentId
output += "|\r"
if (ZenCount == 10):
output = output + 'ZEN|11|COMINT|""^""|10\r' # empirically observed mapping rule
current_segment.reset()
if current_segment.move_next('NK1'):
current_segment.apply_transform()
output = output + current_segment.output()
current_segment.reset()
if current_segment.move_next('PV1'):
current_segment.apply_transform()
output = output + current_segment.output()
current_segment.reset()
if current_segment.move_next('PR1'):
current_segment.apply_transform()
output = output + current_segment.output()
else:
output = output + 'PR1||\r' # put an empty PR1 segment in
#In1Count = 0
current_segment.reset()
while current_segment.move_next('IN1'):
if (current_segment.field(7).value == ''):
current_segment.field(7).value = '""'
else:
current_segment.field(7).value = get_clean_phone(current_segment.field(7).value)
current_segment.field(5).subfield(0).value = \
strip_trailing_chars(' ', current_segment.field(5).subfield(0).value)
current_segment.field(32).subfield(0).value = '' # default this to null
output = output + current_segment.output()
value = output
|