636384_it-IT

liliconcom

data/colonna

Buongiorno a tutti,

 

Ho diverse colonne:

1- colonne "data di inizio".

2- Colonne "Data di fine".

 

 

 

 

Normalmente ogni colonna appartenente al gruppo (2) dovrebbe appartenere anche al gruppo (1) e viceversa. Quindi dovremmo avere lo stesso numero di colonne in entrambi i gruppi.

Tuttavia, le colonne appartenenti al gruppo 1 non appartengono al gruppo 2 e viceversa.

 

Esempio : "data inizio 9899" ma la colonna "data fine 9899" non esiste.

 

L'obiettivo è avere l'intersezione di questi 2 gruppi in modo che ci siano le stesse colonne nei 2 gruppi.

 

Mi sono ispirato al seguente codice:

Names Default To Here(1);

dt = Current Data Table();

// build 
aa_duree = Associative Array();
aa_nonduree = Associative Array();

For Each({col_name}, dt << Get Column Names("String"),
 If(Word(1, col_name) == "date début",
  aa_duree[Word(-1, col_name)] = col_name;
 , !IsMissing(Regex(col_name, "")),
  aa_nonduree[col_name] = 1;
 ,
  continue()
 );
);
show(aa_duree);
show(aa_nonduree);

aa_duree_copy = aa_duree;
aa_duree_copy << Intersect(aa_nonduree);
cols_to_keep = Insert(aa_duree_copy << get keys, aa_duree_copy << get values);

aa_duree_copy2 = aa_duree;
aa_nonduree_copy = aa_nonduree;
aa_duree_copy2 << remove(aa_nonduree);
aa_nonduree_copy << remove(aa_duree);
cols_to_remove = Insert(aa_nonduree_copy << get keys, aa_duree_copy2 << get values);

show(cols_to_keep, cols_to_remove);

Accesso ai datiRe: data/colonne

Lo script di esempio che hai fornito non funzionerà perché Word(1, col_name) restituirà solo il primo lavoro della stringa e lo stai confrontando con due parole. Quindi l'istruzione if andrà sempre all'istruzione else. Potrebbero esserci altri problemi, ma questo è almeno un problema lì. Puoi provare a cambiare le parole, ad esempio, in Inizia con () https://www.jmp.com/support/help/en/17.0/#page/jmp/character-functions-2.shtml?os=win&source=application#ww2489516 . Assicurati inoltre che le maiuscole e minuscole siano corrette quando confronti le stringhe

Re: data/colonne

Ecco il mio modo vecchio stile per attaccare il problema

Names Default To Here( 1 );

dt = Current Data Table();

keep = {};
delete = {};

colNameList = dt << get column names( string );
For Each( {col, i}, colNameList, colNameList[i] = Uppercase( col ) );

While( N Items( colNameList ) > 0,
 If(
  Contains( colNameList[1], Uppercase( "Date début" ) ),
   found = Contains( colNameList, Substitute( colNameList[1], Uppercase( "début" ), "FIN" ) );
   If( found > 0,
    Insert Into( keep, colNameList[1] );
    Insert Into( keep, colNameList[found] );
    Remove From( colNameList, found, 1 );
    Remove From( colNameList, 1, 1 );
   ,
    Insert Into( delete, colNameList[1] );
    Remove From( colNameList, 1, 1 )
   );,
  Contains( colNameList[1], Uppercase( "Date fin" ) ),
   found = Contains( colNameList, Substitute( colNameList[1], "FIN", Uppercase( "début" ) ) );
   If( found > 0,
    Insert Into( keep, colNameList[1] );
    Insert Into( keep, colNameList[found] );
    Remove From( colNameList, found, 1 );
    Remove From( colNameList, 1, 1 );
   ,
    Insert Into( delete, colNameList[1] );
    Remove From( colNameList, 1, 1 )
   );,
  Remove From( colNameList, 1, 1 )
 )
);

show( keep, delete );

Re: data/colonna

Ottimo, grazie per il tuo aiuto!