subroutine mvDId
***********************************************************************
* Display system identification information
***********************************************************************
*
* [00] 13Feb01 jr Initial Creation
include wbp w3Include
execute "!hostname" capturing name returning x
call w3mvDInit("", "")
call w3mvDInsert("Name", name, "")
call w3mvDInsert("Sysinfo", system(100), "")
call w3mvDInput(err, 0, "")
return