Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Cros Tab
Message
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Environment versions
Visual FoxPro:
VFP 9
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01011056
Message ID:
01011557
Views:
12
something like that...
 *-- 05/2005 il faut réaliser une table croisée en ajoutant un élement en abscisse
    *-- en créant un champs composé.
    SELECT ALLTRIM( TRANSFORM( H.iemployeeid ) ) + H.no AS 'iemplId' ,;
      H.ddate , H.cnomp AS 'Min';
      FROM  tpsH H  ORDER BY 1 , 2 INTO CURSOR PauseBefore_vfpTabCursor

    DO vfpxtab.prg WITH 'NomPauseMois',.T.,.F.,.F.,,,,.T.,0,.F.


    *!*	    *---------------------------------------------------------------------------
    *!*	    *-- Nom de la Deuxième pause  ( Cpauseid2)   'CE'     'AC'   etc...
    *!*	    SELECT H.iemployeeid AS 'iemplId' , H.ddate, H.cnomp AS 'Min';
    *!*	      FROM  tpsH H WHERE H.no = 2  ;
    *!*	      UNION ;
    *!*	      SELECT c.iemplId , c.ddate , c.MIN;
    *!*	      FROM cLeurre c ORDER BY 1 , 2 INTO CURSOR PauseNo2
    *!*	    DO vfpxtab.prg WITH 'NomP2',.T.,.F.,.F.,,,,.T.,0,.F.
    *!*	    *---------------------------------------------------------------------------
    *!*	    *-- On unit pour les motifs énumérés ci dessus .....
    SELECT 'P1' AS 'cPauseNo' , NomPauseMois.* FROM NomPauseMois WHERE ;
      '/1' $ NomPauseMois.iemplId ;
      UNION;
      SELECT 'P2' AS 'cPauseNo' , NomPauseMois.* FROM NomPauseMois WHERE;
      '/2' $ NomPauseMois.iemplId INTO CURSOR TotPauseLettre READWRITE

    *-- UT 05/2005 Le tour est joué , on transforme '1458/1' ou '1458/2' en 1458 ( entier )
    ALTER TABLE TotPauseLettre ALTER iemplId I
bernhart


>Bernhart,
>
>I don't think any standard crosstab program would allow you to have 2 values for the same cell. It shouldn't be hard to write a custom code to do that for this particular case.
>
>>The final result is :
>>www.amline.be\finalresult.jpg
>>
>>
>>the structure tables is :
>>www.amline.be\boundtable.jpg
>>
>>I prepare a table for a cross table but it does not function
>>WWW.Amline.be\cross.jpg
>>
>>
>>Each employee can have 2 pauses per day.
>>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform