gistfile1.txt

PROCEDURE TemplateBuild(LOCAL sTemplate is string, Variables is assosiative array of strings)

sOpenBrace is string = "${"
sCloseBrace is string = "}"

sNewStr is string = ""

nUPos is int = 1
nPos is int
nPos = Position(sTemplate,sOpenBrace)
nFin is int
WHILE nPos >= 1
	sNewStr += sTemplate[[nUPos TO nPos - 1]]
	
	nFin = Position(sTemplate,sCloseBrace,nPos)
	sNewStr += Variables[sTemplate[[nPos + Length(sOpenBrace) TO nFin - 1]]]
	
	nUPos = nFin + Length(sCloseBrace)
	nPos = Position(sTemplate,sOpenBrace,nUPos)
END

sNewStr += sTemplate[[nUPos TO]]

RESULT sNewStr