问我如何循环循环记录一个字符一次？

EN

// Input Link "DSLink2" 
// provides a column named "text"


// Stage Variables:

NVarCHar(20) svLine := DSLink2.text
NChar(1)     svReplacementChar := "?"


// Loop Variables:

NChar(1)     lvCharToTest
Bit          lvCharOK := 0
NVarCHar(20) lvNewLine := ''
Integer      i := 0


// Loop Condition:

loop while (i < Len(svLine)) {
  i = i + 1
  lvCharToTest := svLine[i,1]

  // replace by proper test condition or function according to your needs:
  lvCharOK     := lvCharToTest = 'ä' 

  if (lvCharOK) {
    lvNewLine = lvNewLine + lvCharToTest
  }
  else {
    lvNewLine = lvNewLine + svReplacementChar
  }
}

// DSLink4_output:

If (i = Len(svLine)) {
  DSLInk4_output.text := lvNewLine
}