...
...
dw_destination.dataobject = dw_source.dataobject  
dw_destination.settransobject(sqlca)
// copy de l'une vers l'autre  
dw_source.RowsCopy(dw_sourceGetRow(), dw_source.RowCount(), Primary!, dw_destination, 1, Primary!)
....
....
//Récupération de la liste des objets
ls_list_objet = dw_detsination.Describe("datawindow.objects")
ls_list_objet = adw.Describe("datawindow.objects")
li_len_string_obj = len(ls_list_objet) 
li_pos_fin =  Pos(ls_list_objet,ls_sep,1) 
//on parcours les objets de la datwindow
if li_pos_fin >= 1 Then
  DO WHILE not lb_fin
    li_pos_fin =  Pos(ls_list_objet,ls_sep,1) 
    if li_pos_fin = 0 then 
      lb_fin = true 
      li_pos_fin = li_len_string_obj+1
    end if
    // on récupère l'objet courant
    ls_obj_courant = Mid(ls_list_objet, li_pos_deb, (li_pos_fin - li_pos_deb))
    ...
    ...
    if dw_destination.dw_export.Describe(ls_obj_courant+".Edit.Style")  = 'dddw' then
       //Nom de la display colonne 
       ls_ddw_col = dw_destination.Describe(ls_obj_courant+".DDDW.DisplayColumn")
       if (ls_ddw_col <> "?") and (ls_ddw_col <> "!") then
       ...
       ...
      ls_create = 'create column(band=detail '
      ls_create += ' id=1' + string(integer(Max_id)+1) + ' '
      ls_create += ' alignment="' + "2" + '" tabsequence=32766 '
      ls_create += 'border="' + "0" + '" color="' + ls_font_color + '"'  
      ls_create += ' x="' + as_x + '" y="'+as_y+'" height="' + as_height + '" width="' +as_width+ '" '
      ls_create += 'format="' + ls_format + '" '
      ls_create += 'name= ' + as_nom + ' '
      ls_create += 'visible="' + as_visible + '" '
      ls_create += 'edit.limit=0 edit.case=any edit.autoselect=yes '
      ls_create += 'edit.format="' + ls_format + '" '
      ls_create += 'font.face="Arial" font.height="-8" '
      ls_create += 'font.weight="400" font.family="2" font.pitch="2" font.charset="0" '  
      ls_create += 'background.mode="'+as_bkg_mode+'" background.color='+as_bkg_color+'") '
      
      ls_err = w_export_datawindow.dw_export.Modify(ls_create)
      
      if ls_err <> "" then 
         f_isa_error(0, "Problème lors de la création de la colonne : " + ls_err, "nvo_export_data.uof_ajouter_colonne", 16)  
         li_ret = -1
      end if
      
      // Boucle sur les enrgeistrements de la datawindow source pour récupérer les displayvalues
      FOR li_cpt=1 TO dw_source.rowcount()
         ls_displayvalue = dw_source.Describe("Evaluate('LookUpDisplay("+ls_obj_courant+")'," + string(li_cpt)+")")  
         if (ls_displayvalue <> "!") and (ls_displayvalue <> "?") then
           //On enregistre la valeur dans l adatwindow de destination.
           li_code_retour = dw_destination.SetItem(li_cpt,ls_new_col, ls_displayvalue)
             if li_code_retour = -1 then
               f_error(li_code_retour, "Problème sur l'affectation", "F_copier", 75)
           end if   
         end if  
      NEXT  
       end if    
    end if
    
        
    // On supprime l'objet courant de la liste des objet à traiter
    li_len_obj_courant = len(ls_obj_courant)  
    ls_list_objet = Right(ls_list_objet, (li_len_string_obj - li_len_obj_courant - 1))
    
    //On re-calcul la longueur de la chaîne 
    li_len_string_obj = len(ls_list_objet) 
  LOOP  
end if