That's supposed to be 46 (sorry)

Peter

>Peter,
> Investigating this, I see the third record you have posted, doesn't match the record above it. The PID is not the CID of the record above. Is this a typo, or part of the problem?
>
>Tracy
>
>>Hi,
>>I am working on a treeview to display bills of material in a hierachial way.
>>All works fine until a part is encountered which is used multiple times on the BOM. It is then not a unique key
>>
>>How are other folks getting around that problem??
>>
>>

>>* Program....:  D_BOM.LOADTREE
>>* Version....:
>>* Author.....: Peter A. Cortiel , mailto:pcortiel@earthlink.net
>>* Date.......: 5/2/2003
>>* Notice.....: Copyright (c) 2003 ** PCS **, All Rights Reserved.
>>* Compiler...: Visual FoxPro 08.00.0000.2521 for Windows for Windows
>>* Abstract...:
>>* Changes....:
>>
>>*!*1		Pid        	Cid        	Lev        		Pname                                             	Cname                                             	Txt
>>*!*2	    2546	        529	            1		TEST5                                             	PVANF1
>>*!*3		 529	         46	            2		PVANF1                                            	APHOT
>>*!*4	        6	         33	            3		APHOT                                             	AMYO4V
>>*!*5	       46	         35	            3		APHOT                                             	ANUR1L
>>*!*6	    2546	       2251	        1		TEST5                                             	ZZPC21
>>*!*7	    2546	       1785	        1		TEST5                                             	AAEMA9
>>*!*8	    2546	       1813	        1		TEST5                                             	QCET4F
>>*!*9	    2546	       2545	        1		TEST5                                             	TEST4
>>*!*10	    2545	          6	            2		TEST4                                             	ACYT1L
>>*!*11	    2545	       1291	        2		TEST4                                             	ACYT4L
>>*!*12	    2545	       2542	        2		TEST4                                             	zzTEST
>>*!*13	    2542	         64	            3		zzTEST                                            	BPGA5V
>>*!*14	      64	         46	            4		BPGA5V                                            	APHOT
>>*!*15	      46	         33	            5		APHOT                                             	AMYO4V
>>*!*16	      46	         35	            5		APHOT                                             	ANUR1L
>>*!*17	    2542	       1629	        3		zzTEST                                            	BNCHCP
>>*!*18	    2546	       1292	        1		TEST5                                             	AGHCL5
>>
>>THISFORM.oletreeView.ImageList = THISFORM.OleImageList.OBJECT
>>THISFORM.oletreeView.Nodes.CLEAR()
>>SELECT ccBOM
>>LOCATE
>>liIndex=0
>>SCAN
>>	lcParent=STR(ccBOM.pid,10,0)+"_"
>>	lcChild =STR(ccBOM.cid,10,0)+"_"
>>	lcName= ccBOM.cName
>>	lcLev=ccBOM.lev
>>	IF lcLev=1
>>		loNode=THISFORM.oletreeView.Nodes.ADD(	 ,1,lcChild ,lcName)
>>		loNode.expanded=.T.
>>	ELSE
>>		loNode=THISFORM.oletreeView.Nodes.ADD( lcParent ,4,lcChild ,lcName)
>>		loNode.expanded=.T.
>>	ENDIF
>>	liIndex=loNode.INDEX
>>ENDSCAN
>>
>>
>>
>>

>>
>>Any iteas would be appreciated
>>
>>Thanks
>>
>>Peter