Iteration
- This topic has 6 replies, 4 voices, and was last updated 6 years, 7 months ago by
.
-
Topic
-
I always have a terrible time with iteration. What I’m trying to do with the XLATE is when there’s a “A” in RXC:1, then put “O” in ZRX:5. The people that wanted this to happen didn’t say there was the chance of multiple RXC segments so I was going update ZRX:5 if any RXC:1 fields had “A”. I don’t get an error, but I don’t populate ZRX:5 either. Here is the XLATE: { { OP DATECOPYOPT }
{ ADDPREC 0 }
{ FABRICATE 1 }
{ USECURTM 1 }
{ RANGE {49 20 19} }
{ TMDEFS {01 01 00 00 00 0000 +0000} }
{ DELIMIT {/ :} }
}
{ { OP BULKCOPY }
{ ERR 0 }
}
{ { OP ITERATE }
{ BASIS 2(0).2(0).RXC }
{ VAR %s1 }
{ TYPE segment }
{ BODY {
{ { OP COMMENT }
{ COMMENT {TODO: Insert new actions here} }
}
{ { OP IF }
{ ERR 0 }
{ COND { 2(0).2(0).RXC(%s1).#1(0) eq =A} }
{ THENBODY {
{ { OP COMMENT }
{ COMMENT {TODO: Insert new actions here} }
}
{ { OP COPY }
{ ERR 0 }
{ IN =O }
{ OUT 2(0).2(0).ZRX(0).#5(0) }
}
}}
{ ELSEBODY {
}}
}
}}
}
- The forum ‘Cloverleaf’ is closed to new topics and replies.
