Error message in Sheet Advisor

[sstaabs]

What does it mean when you get Wrong profile function in Sheet Advisor?

sample of code:

(sha-define-shop-table "cvr_hls"
:TABLE-TITLE "Tank Cover Holes"
:COLUMNS
(:DIA :DESCR :MIN_THICK :MAX_THICK :PREFERENCE :ADVICE )
:COLUMN-NAMES
( "Dia" "Descr" "Min Thick" "Max Thick" "Pref" "Advice")
:UNITS
( :inch nil :inch :inch nil nil)
:CONTENTS
(
(.3125 " For M6 " 0 1 :PREF "-")
)
:KEY (:DIA )
:DISPLAY (:DIA :DESCR :PREFERENCE :ADVICE)
; :FLAT-TEXT ("")
:HELP "sha_rnd"
; unique, not displayable column entries
:PROF_FNC sha-cvr_hls
:BROWSER-ICON "icon_rnd_co"
:USABLE-AS-CORNER-RELIEF :DIA
)


;=================================================
;
; TANK HOLE COVER
;
;=================================================
(defun sha-cvr_hls
(&key
dia
&allow-other-keys
)
(let ((result nil)
(tool-wp (sha-tool-wp))
)
(create_workplane :new
:name tool-wp
:world_origin
)
;********* create Profile *******
(CIRCLE :CEN_DIA 0,0 dia)
;******** create Adjustpoints ******
(C_POINT
0,0
(gpnt2d -2 -.4375)
(gpnt2d 2 -.4375)
(gpnt2d -2 .4375)
(gpnt2d 2 .4375)
)
(setq result (sha-profile-of-wp tool-wp))
(sha-delete-or-show-wp)
result
)
)

Thanks,

Steve