c:\hmg.3.4.4\SOURCE\h_browse.prg

[AUGE_OHR]

hi

i have look into c:\hmg.3.4.4\SOURCE\h_browse.prg

Code: Select all

Procedure _BrowseUpdate( ControlName,ParentName , z )
   ...
   For j := First To HMG_LEN (Fields)
	cTemp := Fields [j]
	cTempType := ValType(&cTemp)

    	ElseIf cTempType == 'N'
	ElseIf cTempType == 'D'
    	ElseIf cTempType == 'L'
    	ElseIf cTempType == 'C'
    	ElseIf cTempType == 'M'
608    	ElseIf cTempType == 'N' // follow are dupe ?!
    	ElseIf cTempType == 'D'
    	ElseIf cTempType == 'L'
    	ElseIf cTempType == 'C'
    	ElseIf cTempType == 'M'
651

so all from 608 - 651 are dupe, or