fbpx
Welcome, Guest
Username: Password: Remember me
  • Page:
  • 1

TOPIC: # setinternational ( clipper )

# setinternational ( clipper ) 7 months 1 week ago #1

  • Karl-Heinz
  • Karl-Heinz's Avatar Topic Author
  • Offline
  • Posts: 191
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 ?

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

Please Log in or Create an account to join the conversation.

  • Page:
  • 1