# setinternational ( clipper )

This forum is meant for questions and discussions about the X# language and tools
Post Reply
Karl-Heinz
Posts: 774
Joined: Wed May 17, 2017 8:50 am

# setinternational ( clipper )

Post by Karl-Heinz »

Guys,

Whereever you live on this planet, hopefully you´ll see the same results as i do ;-)

Because of the #Clipper setting and setnatdll() you should see a german/frence formatted date and german/frence day and month names. I've also tried to do a #clipper sort, but it looks like that the nation depending rules are not yet implemented, right ?

Code: Select all


LOCAL d AS DATE 

   
   d := condate ( 2018 , 8 , 12 ) 

    SetInternational( #CLIPPER) 
    setcollation( #clipper ) 
    
    
    IF ! setnatdll ( "german" )  
    	? "Error SetNatDll german"     	
    	
    ENDIF 
    
   SetDatecountry ( 5 )  // 5 == german   

  ?
   ? d   // 12.08.18     
   ? "cdow ( d )" + _chr(9) + _chr(9) + _chr (9)+ cdow ( d )      			// Sonntag
   ? "NToCDoW ( dow ( d) )"  + _chr ( 9 ) + _chr(9) + NToCDoW ( dow ( d)   )  // Sonntag
   ? "NToCMonth ( month ( d )  )" + _chr(9) + NToCMonth ( month ( d )  )      // August
   ? "getnatdll() " + _chr ( 9 ) + _chr ( 9) + _chr(9) + getnatdll()    // german
    
 
    IF ! setnatdll ( "french" )  // "french"
    	? "Error SetNatDll french"     	
    	
    ENDIF 
    
   SetDatecountry ( 4 )  //  4 == French
  
   ?
   ? d   // 12/08/18     
   ? "cdow ( d )" + _chr(9) + _chr(9) + _chr (9)+ cdow ( d )      		  // Dimanche
   ? "NToCDoW ( dow ( d) )"  + _chr ( 9 ) + _chr(9) + NToCDoW ( dow ( d)   )  // Dimanche
   ? "NToCMonth ( month ( d )  )" + _chr(9) + NToCMonth ( month ( d )  )      // Août
   ? "getnatdll() " + _chr ( 9 ) + _chr ( 9) + _chr(9) + getnatdll()    // french

regards
Karl-Heinz
Post Reply