diff --git a/doc/examples/F90GetSelectedOutputStringLine.f90 b/doc/examples/F90GetSelectedOutputStringLine.f90
index ce269ae8..d22a976c 100644
--- a/doc/examples/F90GetSelectedOutputStringLine.f90
+++ b/doc/examples/F90GetSelectedOutputStringLine.f90
@@ -9,6 +9,11 @@ PROGRAM example
      STOP
   END IF
   
+  IF (SetSelectedOutputStringOn(id, .TRUE.).NE.IPQ_OK) THEN
+     CALL OutputErrorString(id)
+     STOP
+  END IF
+  
   IF (LoadDatabase(id, "phreeqc.dat").NE.0) THEN
      CALL OutputErrorString(id)
      STOP