diff --git a/compiler/genpc/genpc.go b/compiler/genpc/genpc.go
index 28548a9..9523c45 100644
--- a/compiler/genpc/genpc.go
+++ b/compiler/genpc/genpc.go
@@ -498,6 +498,25 @@ func (g *generator) emitCall(e *ast.CallExpr) {
 				}
 			}
 		}
+		// Peephole: AllTrim(FieldGet(<int literal>)) → PcOpFieldTrim <idx>.
+		// Fuses the character-field CHAR-trim normalization that
+		// SqlExprToPrg auto-wraps into one opcode, saving one Function
+		// dispatch + one intermediate string allocation per row.
+		if strings.EqualFold(ident.Name, "AllTrim") && len(e.Args) == 1 {
+			if inner, ok := e.Args[0].(*ast.CallExpr); ok {
+				if innerIdent, ok := inner.Func.(*ast.IdentExpr); ok &&
+					strings.EqualFold(innerIdent.Name, "FieldGet") &&
+					len(inner.Args) == 1 {
+					if lit, ok := inner.Args[0].(*ast.LiteralExpr); ok && lit.Kind == token.INT {
+						if n, err := strconv.Atoi(lit.Value); err == nil && n > 0 && n <= 0xFFFF {
+							g.emit(hbrt.PcOpFieldTrim)
+							g.emitU16(uint16(n))
+							return
+						}
+					}
+				}
+			}
+		}
 		g.emitString(hbrt.PcOpPushSymbol, strings.ToUpper(ident.Name))
 		g.emit(hbrt.PcOpPushNil)
 		for _, arg := range e.Args {
diff --git a/hbrt/pcinterp.go b/hbrt/pcinterp.go
index adc02ba..975f3a5 100644
--- a/hbrt/pcinterp.go
+++ b/hbrt/pcinterp.go
@@ -174,6 +174,41 @@ func execPcodeBody(t *Thread, fn *PcodeFunc, mod *PcodeModule) {
 				t.Function(1)
 			}
 
+		// --- AllTrim(FieldGet(n)) fused peephole ---
+		case PcOpFieldTrim:
+			fIdx := int(binary.LittleEndian.Uint16(code[pc:]))
+			pc += 2
+			// Fast path: use direct field getter, trim inline.
+			var v Value
+			if fg := t.FastFieldGetter; fg != nil {
+				v = fg(fIdx)
+			} else {
+				// Fallback: resolve via FIELDGET RTL
+				t.PushSymbol(t.VM().FindSymbol("FIELDGET"))
+				t.PushNil()
+				t.PushLong(int64(fIdx))
+				t.Function(1)
+				v = t.Pop2()
+			}
+			if v.IsString() {
+				s := v.AsString()
+				// ASCII-space trim — DBF CHAR fields pad with 0x20 only
+				lo, hi := 0, len(s)
+				for lo < hi && s[lo] == ' ' {
+					lo++
+				}
+				for hi > lo && s[hi-1] == ' ' {
+					hi--
+				}
+				if lo == 0 && hi == len(s) {
+					t.PushValue(v)
+				} else {
+					t.PushString(s[lo:hi])
+				}
+			} else {
+				t.PushValue(v)
+			}
+
 		// --- Function calls ---
 		case PcOpPushSymbol:
 			slen := int(binary.LittleEndian.Uint16(code[pc:]))
diff --git a/hbrt/pcode.go b/hbrt/pcode.go
index 1a16be5..e17219a 100644
--- a/hbrt/pcode.go
+++ b/hbrt/pcode.go
@@ -74,6 +74,12 @@ const (
 	// peephole optimization. Operand: uint16 1-based field position.
 	PcOpFieldGet byte = 0x46
 
+	// `AllTrim(FieldGet(n))` peephole — fetch the field, trim the
+	// result in place, push one string. Skips two Function dispatches
+	// (FieldGet + AllTrim) and one intermediate string allocation
+	// per invocation. Operand: uint16 1-based field position.
+	PcOpFieldTrim byte = 0x47
+
 	// Self / OOP
 	PcOpPushSelf      byte = 0x48
 	PcOpPushSelfField byte = 0x49 // + uint16 len + name