Update sheet; xr, -la s 0, pu, pdf, saveas 2000, Close

(defun c:zz( )
(command "-insert" "gc-sheet=C:\\Users\\...\\Documents\\gc-sheet_stamp" "y")
(command \e "resume")
(command "-insert" "gc-xr-plan=C:\\Users\\...\\Documents\\gc-xr" "y")
(command \e "resume")
(command "-insert" "gc-xr-sec=C:\\Users\\...\\Documents\\gc-xr" "y")
(command \e "resume")
(command "-insert" "gc-xr-elev=C:\\Users\\...\\Documents\\gc-xr" "y")
(command \e "resume")
(command "-layer" "s" "0" "")
(command "-purge" "a" "*" "n")
(command "-purge" "a" "*" "n")
(command "-purge" "a" "*" "n")
(command "sd")
(command "saveas" "2000" "" "y")
(command "close")
)