This function is available as github project on https://github.com/nftools/underscore

Latest update allows you to create a deep structure of multiple childs at once.

See _test.prg : ( https://github.com/nftools/underscore/blob/master/_Test.prg )

*----------------------------------------------
* Create a deep object structure at once:
*----------------------------------------------
*
* instead of:
*
* oCust = create('empty')
* addproperty(oCust,'oInfo',create('empty')
* addproperty(oCust.oInfo,'address',create('empty')
* addproperty(oCust.oInfo.address.billing,'phone',create('empty')
* oCust.oInfo.address.billing.phone = 2358811
*
*----------------------------------------------------------------------
* using _( ) :
*

oCust = createObject('empty')

with _( m.oCust ,'.info.address.billing.phone')
	.number = 2358811
endwith

? 'm.oCust.info.address.billing.phone.number:'
?? m.oCust.info.address.billing.phone.number