diff --git a/harbour/contrib/dot/prgscrpt.prg b/harbour/contrib/dot/prgscrpt.prg
index c3ec9b1e94..f2f759ab75 100644
--- a/harbour/contrib/dot/prgscrpt.prg
+++ b/harbour/contrib/dot/prgscrpt.prg
@@ -15,7 +15,7 @@ Procedure Main()
    sPPed := PP_PreProLine( "RETURN" )
    PP_CompileLine( sPPed, 3, aCompiledProcs, NIL, @nProcId )
 
-   PP_ExecuteProcedure( aCompiledProcs[1] )
+   PP_ExecProcedure( aCompiledProcs[1] )
 
    // OR :
 
@@ -29,6 +29,6 @@ Procedure Main()
    sPPEd += ";" + PP_PreProLine( "return 'Hello Again'" )
 
    PP_CompileLine( sPPed, 0, aCompiledProcs, NIL, @nProcId )
-   PP_ExecuteProcedure( aCompiledProcs[1] )
+   PP_ExecProcedure( aCompiledProcs[1] )
 
 return