Homepage › Clovertech Forums › Read Only Archives › Cloverleaf › Cloverleaf › Generating NTE segments based on the value of OBX|3 › Reply To: Generating NTE segments based on the value of OBX|3
November 10, 2005 at 9:56 pm
#57744
Arslan Khan
Participant
OBX5 [datget [xpmfetch $xlateId 1(0).1(0).1(%g1).OBX(0).00573] VALUE]
if {[string length $OBX5] > 80} {
set pos 0
set cnt 0
while {$pos < [string length $OBX5]} { xpmstore $xlateId {1(0).1(0).1(%g1).NTE($cnt).00098} c [string range $OBX5 $pos [expr $pos + 80]] incr pos 80 incr cnt } } else { xpmstore $xlateId {1(0).1(0).1(%g1).NTE(0).00098} c $OBX5 }