UCXACL(CSIDE,JD0,ND) $BF|!&7n!&G/$K4X$9$k:BI8<4$rIA$/!%(B
UCYACL(CSIDE,JD0,ND)
UCXADY(CSIDE,JD0,ND) $BF|$K4X$9$k:BI8<4$rIA$/!%(B
UCYADY(CSIDE,JD0,ND)
UCXAMN(CSIDE,JD0,ND) $B7n$K4X$9$k:BI8<4$rIA$/!%(B
UCYAMN(CSIDE,JD0,ND)
UCXAYR(CSIDE,JD0,ND) $BG/$K4X$9$k:BI8<4$rIA$/!%(B
UCYAYR(CSIDE,JD0,ND)
UCpGET(CP,IPARA) $BFbItJQ?t$r;2>H$9$k!%(B
UCpSET(CP,IPARA) $BFbItJQ?t$r@_Dj$9$k!%(B
UCpSTX(CP,IPARA) $BFbItJQ?t$r@_Dj$9$k!%(B
$B!J
$B%5%V%k!<%A%s$N@bL@(B
UCXACL/UCYACL
- $B5!G=(B
$BF|!&7n!&G/$K4X$9$k:BI8<4$rIA$/!%(B
- $B8F$S=P$7J}K!(B
CALL UCXACL(CSIDE,JD0,ND)
CALL UCYACL(CSIDE,JD0,ND)
- $B%Q%i%a!<%?!<$N@bL@(B
CSIDE (C*1) $B:BI8<4$r=q$/>l=j$r;XDj$9$k!%(B
JD0 (I) UC$B$G(B0$B$KAjEv$9$k>l=j$NF|IU$r;XDj$9$k!%(B
ND (I) $B:n2h$9$kF|?t$r;XDj$9$k!%(B
- $BHw9M(B
- UCXACL$B$O(BUCXADY, UCXAMN, UCXAYR
$B!J0J2<$N@a;2>H!K$rB3$1$F8F$s$G$$$k!%(B
- UCYACL$B$O(BUCYADY, UCYAMN, UCYAYR
$B!J0J2<$N@a;2>H!K$rB3$1$F8F$s$G$$$k!%(B
UCXADY/UCYADY
- $B5!G=(B
$BF|$K4X$9$k:BI8<4$rIA$/!%(B
- $B8F$S=P$7J}K!(B
CALL UCXADY(CSIDE,JD0,ND)
CALL UCYADY(CSIDE,JD0,ND)
- $B%Q%i%a!<%?!<$N@bL@(B
CSIDE (C*1) $B:BI8<4$r=q$/>l=j$r;XDj$9$k!%(B
JD0 (I) UC$B$G(B0$B$KAjEv$9$k>l=j$NF|IU$r;XDj$9$k!%(B
ND (I) $B:n2h$9$kF|?t$r;XDj$9$k!%(B
- $BHw9M(B
- $B2?F|$4$H$KL\@9$HF|IU$rIA$/$+$O!$(B
$B4X?t(BNUCDAY$B$rDL$7$FFbItJQ?t(B'NDAY'$B$,7h$a$k!%(B
'NDAY'$B$,ITDj$J$i(B0, 1, 2, 5, 10, 15$B$NCf$+$iE,Ev$JCM$,(B
$BA*$P$l$k(B(0$B0J2<$N$H$-$O<4$rIA$/$@$1$GL\@9$HF|IU$OIA$+$J$$!K(B;
$BM[$KM?$($i$l$F$$$l$P$=$NCM$r;H$&!J=i4|CM$OITDj!K(B.
- $BL\@9$HF|IU$rIA$/$?$a$N>pJs$rJ];}$9$k$?$a$K(B
$BFbIt$GG[Ns$rMQ0U$7$F$$$k!%(B
$B$=$NG[Ns$NBg$-$5$K4X$9$k@)8B$+$i!$(B
$BIA$-$&$kL\@9$HF|IU$O:GBg(B100$B8D$G$"$k!%(B
- UCXADY/UCYADY$B$O$=$l$>$l(B
UXPAXS/UYPAXS (ISLCT=2)$B$G<4$rIA$$$F$$$k(B;
UXPTMK/UYPTMK (ISLCT=1)$B$GL\@9$rIA$$$F$$$k(B;
UXPLBL/UYPLBL (ISLCT=1)$B$GF|$N%i%Y%k$rIA$$$F$$$k!%(B
$B$7$?$,$C$F!$$3$l$i:BI8<[email protected]$NB0@-$O!$(B
UZpGET/UZpSET$B$K$h$C$F;2>H(B/$BJQ99$9$k$3$H$,$G$-$k!%(B
$B$?$@$7!$(B'ICENTzs'$B$O(B0$B$H$9$k(B;
'IROTLzs'$B$O(B'IROTCzs'$B$r(B
$B;2>H$7$FMQ$$$k(B; 'LBTWN'$B$O(B.FALSE.$B$H$9$k!%(B
$B$/$o$7$/$OBh(B[here]$B>O$r;2>H$N$3$H!%(B
UCXAMN/UCYAMN
- $B5!G=(B
$B7n$K4X$9$k:BI8<4$rIA$/!%(B
- $B8F$S=P$7J}K!(B
CALL UCXAMN(CSIDE,JD0,ND)
CALL UCYAMN(CSIDE,JD0,ND)
- $B%Q%i%a!<%?!<$N@bL@(B
CSIDE (C*1) $B:BI8<4$r=q$/>l=j$r;XDj$9$k!%(B
JD0 (I) UC$B$G(B0$B$KAjEv$9$k>l=j$NF|IU$r;XDj$9$k!%(B
ND (I) $B:n2h$9$kF|?t$r;XDj$9$k!%(B
- $BHw9M(B
- $B7nL>$r2?J8;zIA$/$+$O!$(B
$B4X?t(BNUCCHR$B$rDL$7$FFbItJQ?t(B'NCHAR'$B$,7h$a$k!%(B
'NCHAR'$B$,ITDj$J$i(B0, 1, 2, 3, 9$B$NCf$+$iE,Ev$JCM$,(B
$BA*$P$l$k(B(0$B$N$H$-$O<4$rIA$/$@$1$GL\@9$H7nL>$OIA$+$J$$!K(B;
$BM[$KM?$($i$l$F$$$l$P$=$NCM$r;H$&!J=i4|CM$OITDj!K(B.
'NCHAR'$B$NCM$,Ii$N$H$-$O$=$N@dBPCM$ND9$5$N7nL>$r=q$-!$(B
$B$5$i$K(B2$BJ8;zL\0J9_$r>.J8;z$K$9$k!%(B
- $BL\@9$H7nL>$rIA$/$?$a$N>pJs$rJ];}$9$k$?$a$K(B
$BFbIt$GG[Ns$rMQ0U$7$F$$$k!%(B
$B$=$NG[Ns$NBg$-$5$K4X$9$k@)8B$+$i!$(B
$BIA$-$&$kL\@9$H7nL>$O:GBg(B50$B8D$G$"$k!%(B
- UCXAMN/UCYAMN$B$O$=$l$>$l(B
UXPAXS/UYPAXS (ISLCT=2)$B$G<4$rIA$$$F$$$k(B;
UXPTMK/UYPTMK (ISLCT=2)$B$GL\@9$rIA$$$F$$$k(B;
UXPLBL/UYPLBL (ISLCT=2)$B$G7n$N%i%Y%k$rIA$$$F$$$k!%(B
$B$7$?$,$C$F!$$3$l$i:BI8<[email protected]$NB0@-$O!$(B
UZpGET/UZpSET$B$K$h$C$F;2>H(B/$BJQ99$9$k$3$H$,$G$-$k!%(B
$B$?$@$7!$(B'ICENTzs'$B$O(B0$B$H$9$k(B;
'IROTLzs'$B$O(B'IROTCzs'$B$r(B
$B;2>H$7$FMQ$$$k(B; 'LBTWN'$B$O(B.TRUE.$B$H$9$k!%(B
$B$/$o$7$/$OBh(B[here]$B>O$r;2>H$N$3$H!%(B
UCXAYR/UCYAYR
- $B5!G=(B
$BG/$K4X$9$k:BI8<4$rIA$/!%(B
- $B8F$S=P$7J}K!(B
CALL UCXAYR(CSIDE,JD0,ND)
CALL UCYAYR(CSIDE,JD0,ND)
- $B%Q%i%a!<%?!<$N@bL@(B
CSIDE (C*1) $B:BI8<4$r=q$/>l=j$r;XDj$9$k!%(B
JD0 (I) UC$B$G(B0$B$KAjEv$9$k>l=j$NF|IU$r;XDj$9$k!%(B
ND (I) $B:n2h$9$kF|?t$r;XDj$9$k!%(B
- $BHw9M(B
- $BL\@9$HG/$rI=$9?t;z$rIA$/$?$a$N>pJs$rJ];}$9$k$?$a$K(B
$BFbIt$GG[Ns$rMQ0U$7$F$$$k!%(B
$B$=$NG[Ns$NBg$-$5$K4X$9$k@)8B$+$i!$(B
$BIA$-$&$kL\@9$H?t;z$O:GBg(B50$B8D$G$"$k!%(B
- UCXAYR/UCYAYR$B$O$=$l$>$l(B
UXPAXS/UYPAXS (ISLCT=2)$B$G<4$rIA$$$F$$$k(B;
UXPTMK/UYPTMK (ISLCT=2)$B$GL\@9$rIA$$$F$$$k(B;
UXPLBL/UYPLBL (ISLCT=2)$B$GG/$N%i%Y%k$rIA$$$F$$$k!%(B
$B$7$?$,$C$F!$$3$l$i:BI8<[email protected]$NB0@-$O!$(B
UZpGET/UZpSET$B$K$h$C$F;2>H(B/$BJQ99$9$k$3$H$,$G$-$k!%(B
$B$?$@$7!$(B'ICENTzs'$B$O(B0$B$H$9$k(B;
'IROTLzs'$B$O(B'IROTCzs'$B$r(B
$B;2>H$7$FMQ$$$k(B; 'LBTWN'$B$O(B.TRUE.$B$H$9$k(B;
'RSIZET2'$B$O(B1.5$BG\$7$F$$$k!%(B
$B$/$o$7$/$OBh(B[here]$B>O$r;2>H$N$3$H!%(B
UCpGET/UCpSET(UCpSTX)
- $B5!G=(B
UCPACK$B$G;H$&FbItJQ?t$r;2>H(B/$BJQ99$9$k!%(B
(UCpSTX$B$O
- $B8F$S=P$7J}K!(B
CALL UCpGET(CP,IPARA)
CALL UCpSET(CP,IPARA)
CALL UCpSTX(CP,IPARA)
- $B%Q%i%a!<%?!<$N@bL@(B
CP (C*8) $BFbItJQ?t$NL>A0!%(B
IPARA (I,R,L) $BFbItJQ?t$NCM!%(B
$B0J2<$K(BCP$B$H$7$F;XDj$G$-$kL>A0$N%j%9%H$r5-$9!%(B
'NDAY' (I) UCXADY/UCYADY$B$r;H$&$H$-!$(B
$B2?F|$4$H$KL\@9$HF|IU$rIA$/$+$r;XDj$9$k!%(B
'NDAY'$B$,ITDj$J$i(B0, 1, 2, 5, 10,
15$B$NCf$+$iE,Ev$JCM$,(B $BA*$P$l$k(B
(0$B0J2<$N$H$-$O<4$rIA$/$@$1$GL\@9$HF|IU$OIA$+$J$$!K(B;
$BM[$KM?$($i$l$F$$$l$P$=$NCM$r;H$&!J=i4|CM$OITDj!K(B.
$B$3$l$O4X?t(BNUCDAY$B$,7h$a$k!%(B [-1ex]0ex1ex}
'NCHAR' (I) UCXAMN/UCYAMN$B$r;H$&$H$-!$(B
$B7nL>$r2?J8;zIA$/$+$r;XDj$9$k!%(B 'NCHAR'$B$,ITDj$J$i(B0,
1, 2, 3, 9$B$NCf$+$iE,Ev$JCM$,(B $BA*$P$l$k(B
(0$B$N$H$-$O<4$rIA$/$@$1$GL\@9$H7nL>$OIA$+$J$$!K(B; $BM[(B
$B$KM?$($i$l$F$$$l$P$=$NCM$r;H$&!J=i4|CM$OITDj!K(B.
$B$3$l$O4X?t(BNUCCHR$B$,7h$a$k!%(B [-1ex]0ex1ex}
'LOWER' (L) UCXADY/UCYADY$B$GIA$/7nL>$N(B
2$BJ8;zL\0J2<$r>.J8;z$K$9$k$+$I$&$+$r;XDj$9$k!%(B
.TRUE.$B$J$i>.J8;z$K$9$k(B;
.FALSE.$B$J$iBgJ8;z$N$^$^$K$9$k!J=i4|CM$O(B.FALSE)
. [-1ex]0ex1ex}
'IUNDEF' (I) $BCM$,ITDj$G$"$k$3$H$r<($9FbItJQ?t(B $B!J=i4|CM$O(B-999)
. [-1ex]0ex1ex}
- $BHw9M(B
- $BFbItJQ?t$r4IM}$9$k$?$a$N2<@A$1%k!<%A%s$H$7$F(B
$B0J2<$N$b$N$,$"$k!%(B
UCPQNP(NCP) $BFbItJQ?t$NAm?t(BNCP$B$r5a$a$k!%(B
UCPQID(CP,IDX) $BFbItJQ?t(BCP$B$N0LCV(BIDX$B$r5a$a$k!%(B
UCPQCP(IDX,CP) IDX$B$N0LCV$K$"$kFbItJQ?t$NL>A0(BCP$B$r;2>H$9$k!%(B
UCPQVL(IDX,IPARA) IDX$B$N0LCV$K$"$kFbItJQ?t$NCM(BIPARA$B$r;2>H$9$k!%(B
UCPSVL(IDX,IPARA) IDX$B$N0LCV$K$"$kFbItJQ?t$NCM(BIPARA$B$rJQ99$9$k!%(B
- UCpGET$B$O>e$K=R$Y$?(BUCPQID$B$r8F$s$G(B
$BFbItJQ?t$N0LCV$r5a$a!$(BUCPQVL$B$K$h$C$FCM$r;2>H$9$k(B;
UCpSET$B$O(BUCPQID$B$r8F$s$GFbItJQ?t$N0LCV$r5a$a!$(B
UCPSVL$B$K$h$C$FCM$r@_Dj$9$k!%(B
$B$7$?$,$C$F;XDj$7$?FbItJQ?tL>$,8+$D$+$i$J$$$H$-!$(B
$B%(%i!<%a%C%;!<%8$O(BUCPQID$B$,=PNO$9$k!%(B
- $BFbItJQ?t$N7?$K1~$8!$(BIPARA$B$H$7$FE,@Z$J7?$N(B
$BDj?t$"$k$$$OJQ?t$r;XDj$9$k$3$H!%(B
$B$=$NB>$N4X?t(B
$B$3$N%Q%C%1!<%8$K$O$3$N$[$+$K0J2<$N2<0L4X?t$,$"$k!%(B
$B$3$3$G$O$=$NL>A0$r$"$2$k$K$H$I$a$k!%(B
NUCCHR NUCDAY
Back to Main
Latex Source
$BCO5eN.BNEEG>6f3ZIt(B : 95/6/9 (Version 5.0)
NUMAGUTI Atusi <[email protected]>
Last Modified: Thu Aug 31 13:07:55 EDT 1995