4
4
* Home page: http://plasma-gate.weizmann.ac.il/Grace/
6
6
* Copyright (c) 1991-1995 Paul J Turner, Portland, OR
7
* Copyright (c) 1996-2001 Grace Development Team
7
* Copyright (c) 1996-2002 Grace Development Team
9
* Maintained by Evgeny Stambulchik <fnevgeny@plasma-gate.weizmann.ac.il>
9
* Maintained by Evgeny Stambulchik
12
12
* All Rights Reserved
649
656
case FORMAT_DDMMYY:
650
strcpy(format, "%02d-%02d-%d");
657
strcpy(format, "%02d-%02d-%0*d");
651
658
jul_to_cal_and_time(loc, ROUND_DAY, &y, &m, &d, &h, &mm, &sec);
652
sprintf(s, format, d, m, y);
659
sprintf(s, format, d, m, yprec, y);
654
661
case FORMAT_MMDDYY:
655
strcpy(format, "%02d-%02d-%d");
662
strcpy(format, "%02d-%02d-%0*d");
656
663
jul_to_cal_and_time(loc, ROUND_DAY, &y, &m, &d, &h, &mm, &sec);
657
sprintf(s, format, m, d, y);
664
sprintf(s, format, m, d, yprec, y);
659
666
case FORMAT_YYMMDD:
660
strcpy(format, "%d-%02d-%02d");
667
strcpy(format, "%0*d-%02d-%02d");
661
668
jul_to_cal_and_time(loc, ROUND_DAY, &y, &m, &d, &h, &mm, &sec);
662
sprintf(s, format, y, m, d);
669
sprintf(s, format, yprec, y, m, d);
664
671
case FORMAT_MMYY:
665
strcpy(format, "%02d-%d");
672
strcpy(format, "%02d-%0*d");
666
673
jul_to_cal_and_time(loc, ROUND_MONTH, &y, &m, &d, &h, &mm, &sec);
667
sprintf(s, format, m, y);
674
sprintf(s, format, m, yprec, y);
669
676
case FORMAT_MMDD:
670
677
strcpy(format, "%02d-%02d");
701
708
case FORMAT_MONTHSY:
702
strcpy(format, "%s-%d");
709
strcpy(format, "%s-%0*d");
703
710
jul_to_cal_and_time(loc, ROUND_MONTH, &y, &m, &d, &h, &mm, &sec);
704
711
if (m - 1 < 0 || m - 1 > 11) {
705
712
sprintf(s, format, "???");
707
sprintf(s, format, months[m - 1], y);
714
sprintf(s, format, months[m - 1], yprec, y);
710
717
case FORMAT_MONTHL:
746
753
sprintf(s, format, m, d, y, h, mm, sec);
748
755
case FORMAT_YYMMDDHMS:
749
strcpy(format, "%d-%02d-%02d %02d:%02d:%02d");
756
strcpy(format, "%0*d-%02d-%02d %02d:%02d:%02d");
750
757
jul_to_cal_and_time(loc, ROUND_SECOND, &y, &m, &d, &h, &mm, &sec);
751
sprintf(s, format, y, m, d, h, mm, sec);
758
sprintf(s, format, yprec, y, m, d, h, mm, sec);
753
760
case FORMAT_DEGREESLON: