Professional Documents
Culture Documents
Query/400 D9C
f> 4
AS/400e IBM
Query/400 D9C
f> 4
© Copyright International Business Machines Corporation 2000. All rights reserved.
?<
XZ0Query/400 D9C1 . . . . . . vii 4( Query/400 i/D<GBn . . . . . . . 32
-&DA0Query/400 D9C1;i . . . . . . vii * Query/400 !qD~"G<MVN . . . . . 32
4( Query/400 i/D(iNq3r . . . . . 33
Z1?V Query/400 i\ . . . . . . . 1
Z4B * Query/400 i/8("!qD~ 35
* Query/400 i/8(D~!q . . . . . . .
Z1B 24G Query/400? . . . . . . . 3 35
* Query/400 i/!qD~ . . . . . . . . 36
Query/400 y>*X . . . . . . . . . . . . 3
* Query/400 i/!qb . . . . . . . . . 36
Query/400 PDD~"VNMG<q= . . . . . 3
* Query/400 i/!qI1rG<q= . . . . 37
Query/400 (e . . . . . . . . . . . . 5
* Query/400 i/!q`vD~ . . . . . . 37
Query/400 PDb . . . . . . . . . . . . 6
T Query/400 i/7O!n . . . . . . . . 38
Query/400 Dw*&\ . . . . . . . . . . . 6
&m Query/40008(D~!q1A;ODms . . 39
+ Query/400 }]O"=V&mD5P . . . . . 7
Z Query/4000!qD~1A;O!qD~ . . . . 39
(}1SO"+ Query/400 }]O"=V&mD5
Z Query/4000!qI11A;O!qD~I1 . . . 41
P . . . . . . . . . . . . . . . . . 9
Z Query/4000!qG<q=1A;O!qG<q= 42
(}PmO"+ Query/400 }]O"=V&mD5
T>Z Query/4000T>D~!q1A;O!qD+?
P . . . . . . . . . . . . . . . . . 9
D~ . . . . . . . . . . . . . . . . . 43
(}`1>O"+ Query/400 }]O"=V&mD
Z Query/400 i/P,SD~ . . . . . . . . 44
5P . . . . . . . . . . . . . . . . 9
Query/400 i/PD,S`M . . . . . . . . 45
(}PmO"M`1>O"DiO+ Query/400 }
Z Query/400 i/PgN,SD~ . . . . . . 45
]O"=V&mD5P . . . . . . . . . . 10
Query/400 i/P,SD~Dfr . . . . . . 46
Query/400 i/P,SD~D>} . . . . . .
Z2B Query/400 D;cYwE" . . . . 11 49
Z Query/400 i/P*w,SErND~ . . . 52
709C Query/400 . . . . . . . . . . . . 11
Z Query/400 i/PT>yP,SbT . . . . . 55
t/ Query/400 . . . . . . . . . . . . . 11
Z Query/400 i/P&m*'DVN . . . . . . 56
1zjI9C Query/400 1 . . . . . . . . 11
Z Query/400 i/DD~!q}LZd&m*'D
f_ Query/400 zk*24 . . . . . . . . . 12
VN . . . . . . . . . . . . . . . . 57
Z Query/400 P9Ca>M1!5 . . . . . . 12
Z*<|DrT> Query/400 i/1&m*'DV
9C Query/400 &\| . . . . . . . . . 12
N . . . . . . . . . . . . . . . . 57
Z Query/400 P9CPm . . . . . . . . . 14
9C Query/400 |n . . . . . . . . . . . 15
Z5B Z Query/400 P(ea{VN . . 59
9C Query/400 K% . . . . . . . . . . . 15
Z Query/400 P4(a{VN . . . . . . . . 59
9C Query/400 D09Ci/1A; . . . . . . 17
Query/400 a{VN{ . . . . . . . . . . 60
!q%vD Query/400 Nq . . . . . . . . 17
Query/400 mo= . . . . . . . . . . . 61
!q`v Query/400 Nq . . . . . . . . . 18
Query/400 }Vmo= . . . . . . . . . . 62
9C Query/400 i/Pm . . . . . . . . . 19
Query/400 V{mo= . . . . . . . . . . 62
* Query/400 i/!qb . . . . . . . . . 21
Query/400 V{/} . . . . . . . . . . . 64
Z Query/400 PT>#?q= . . . . . . . . 22
Query/400 PDUZ"1dM1dAGmo= . . 68
Query/400 r*mE" . . . . . . . . . . . 23
Z Query/400 PT>#?q= . . . . . . . 71
&m Query/400 E"Mms . . . . . . . . . 24
Query/400 PDUZ"1dM1dAGcuKc . . . 72
|D Query/400 i/ . . . . . . . . . . 24
Query/400 PDUZcuKc . . . . . . . . 73
Query/400 PD1dcuKc . . . . . . . . 75
Z2?V (eM9C Query/400 i/ Query/400 PDVx1d . . . . . . . . . 76
(e. . . . . . . . . . . . . . . . 25 Query/400 PDUZ"1dM1dAG/} . . . . 76
CHAR Query/400 /} . . . . . . . . . . 77
Z3B 4( Query/400 i/(e . . . . 29 DATE Query/400 /} . . . . . . . . . . 77
t/ Query/400 i/(e . . . . . . . . . . 29 DAY Query/400 /} . . . . . . . . . . 78
Z(e Query/400 i/1!q(e=h . . . . . 30 DAYS Query/400 /} . . . . . . . . . . 79
* Query/400 i/(e!q!n . . . . . . 31 HOUR Query/400 /} . . . . . . . . . . 79
Z Query/400 (eA;.dF/ . . . . . . 32 MICROSECOND Query/400 /} . . . . . . 80
5XA Query/4000(ei/1A;1 . . . . . 32 MINUTE Query/400 /} . . . . . . . . . 80
?< v
vi Query/400 D9C V4R5
XZ0Query/400 D9C1
Query/400 Gvv_'V5CLr,zIC4S AS/400 }]bPq!E"#>ihv
gN9C Query/400 !q"EPMVvf"Z;vr`v}]bD~PDE",Tzz
(fMd{}]D~#
PX>i`XDvfoPm,N{:i?a*;#
-&DA0Query/400 D9C1;i
>ifrG)Z AS/400 53O4(i/(fM\m}]DK1#
Query/400 y>*X
53OP8v*XC4i/Mf"E"r}],TczMd{53C'IT9C|4
q!h*Da{#BPwbi\b)*X,rz5wb)*XT0|GkzM Query D
X5,"8<zN<d{vfoTq!|`E"#
Query/400 PDD~"VNMG<q=
E"r}]TwVN=i/"f"Z53O,w*f"Z}]bD~((#F.*D
~)P#D~|,tIvvpE"%*,F*G<,?vG<|,`XD}],N#
G<PD?NE"F*VN,VNDa9ZG<q=(;c;F.*q=)P(e#
1zKPi/zz(f1,Query 9CD~"VNMG<q=S}]bPq!zk*D
E"(TG<m>),"9Cb)G<zzi/(f#
Query S!qDD~Plwzk*D}]#|9CG)D~PD3)VN(MG<q=)
Tzk*DN=!q"Er"FcMc\C}]#|2zz|,C}]Di/(f#
UCS2 6p 1 G 16 ;<NV{`k#Z&m+rLq1,zh*\;dkM&m`v
zRoTD}]#}g,M'{FPmI\|,XkZ,;(h8O,1r!rT>
DBo"#0o""oM)zoV{#
| Query/400 (e
I9Ci/S}]bD~Pq!E"Tzz(f#i/C4q!E"D;vr`vD
~T0gN&mCE"Zi/(eP(eMf"#i/(eG`M* *QRYDFN DT
s,||, Query Tz8(D==iRM9CD~T0zzz#{Da{yh*DyP
8Z#
*4(i/(e,4U;5PA;p=jI(eM#fi/(eD}L#;)(eK
i/(uA1z}Z(ei/1),4IKP|(w*i/)4zzzh*D(f#
Query/400 Dw*&\
=vw0i/1A;:0i/1K%M09Ci/1A;,Gz9C Query 4Pw*N
qDpc#(N{Z73D<3#)m;vX*A;G0(ei/1A;,SboIT*
<i/(ePDyPNq#
v 0i/1K%Jmz*<9Ci/"KPi/r>}i/#9Jmz*<9CD~
r9Cl+RNq#
v 09Ci/1A;Jmz9C;vr`vi/4PX(Nq#IT4("|D"T
>"4F">}rKPi/"r!i/(er+i/}]O"(4iO)=V&m
D5P#
Files
Work with
Queries
display OfficeVision/400
tasks
< 3. 0i/1K%M09Ci/1A;PDw*Nq
+ Query/400 }]O"=V&mD5P
g{ OfficeVision"DisplayWrite 4"DisplayWrite 5 LrICRJmz9Cb)Lr.
;,G4zIT9CCLrM Query +i/}]O"=V&mD5P#IT9CBP}
V=(+i/}]O"=D5P:
v 1SO"(OfficeVision"DisplayWrite 4 r DisplayWrite 5 Lr)
v PmO"(vJCZ OfficeVision)
v `1>O"(vJCZ OfficeVision)
dk!n,404P1|#
< 4. 09Ci/1A;(}]/DVO",yPq=)
OfficeVision/400
or DisplayWrite
Work with
Queries
Copy Delete
Define the
Query
Return to
display
OfficeVision/400
or DisplayWrite
Query definition
Report layout
definition
Exit
Data/Text
Merge
display
RV2N401-0
< 5. (}1SO""PmO"r`1>O"+i/}]O"=V&mD5P
Ts,1*Kr!&mD51,b)5wt/;vTi/(eP8(D}]bD~D
i/,"+a{i/(fTPmq=O"=D5P#bVO"}]D==+4T;v
i/DyPG<TPmq=fEZ;vD5P(k9C1SO"!n1"44PDY
w`,) #PXPmO"Dji,N{ Using OfficeVision/400 Word Processing ;iM
Z1083D:Z Query/400 P!q OfficeVision X*PmDG<;#
":
1. PmO";JCZ+}]O"= DisplayWrite 4 r DisplayWrite 5 D5P#
2. ;\9C Query DV&mC'ITK$4(S}]bq!}]h*D}]VN5w#
PXK$4(b)5wDE",N{ Using OfficeVision/400 Word Processing ;i
PD :Combining Information to Create Documents; wb#
709C Query/400
=<B. 709C Query/400 i/a)K70>},TclYl$ Query#
t/ Query/400
ICwV=(CJ Query#*9C Query,I4PBPdP;nYw:
v (}dk WRKQRY "404P1|9C09Ci/1(WRKQRY) |n#b+<BT
>09Ci/1A;#
v Z0l+RNq1(OFCTSK) K%P!q!n 3(v_'V)
#S0v_'V1A;!
q!n 2(i/)#b+<BT>0i/1K%#
v Z0l+RNq1(OFCTSK) K%P!q!n 8(v_'V)
#S0v_'V1A;!
q!n 2(i/)#b+<BT>0i/1K%#
v (}dk STRQRY "404P1|9C0t/i/1(STRQRY) |n#b+<BT>
0i/1K%#dk GO QUERY "404P1|'{`,#
v 19C OfficeVision 1,Z`-A;O4 F17,;s!q!n 1(i/)#(bZ
OfficeVision *zE"M Using OfficeVision/400 ;iPPbM)#b+<BT>09
Ci/1A;#
v 19C DisplayWrite 4 Lr1,Z`-A;O4 Ctrl + F6#!q!n 2(0q!i
/D~1!n) #bZ DisplayWrite 4 r DisplayWrite 5 ozE"PPj8DbM#
b+<BT>09Ci/1A;#
zITS0i/1K%!q9Ci/"KPi/">}i/"9CD~r4Pkl+
PXDNq#
S09Ci/1A;,zIT:
v 4("|D"4F">}"T>"r!rKPi/,g{z4T0i/1K%r
WRKQRY |n#
v 4("|D"4F">}rT>i/(e,r_IT4P1SO""PmO"r`
1>O",g{z4T OfficeVision#
v 4("|D"4F">}rT>i/(e,r_IT4P1SO",g{z4T
DisplayWrite 4 r DisplayWrite 5 Lr#
1zjI9C Query/400 1
1zjI9C Query 1,ITS09Ci/1A;4 F3(Kv)r F12(!{)Kv#
f_ Query/400 zk*24
1z9Ci/1,Query rzT>;5PA;,/J(ra>)z:
v z#{ Query S;vr`vD~Pq!NVE"
v z#{CE"Gw*(fr!rT>,9Gw*}]dv=m;vD~P
v z#{(f*NVq=
Query SzZA;OdkDD~PU/yPbVE"#
Z Query/400 P9Ca>M1!5
a>G53rz/J|h**@DE"TjIzDksD;V=(#z;h*:nd
UW;#;civB,a>uAP>yPI\D}7!n,rKz;h*dk{Oz
y4PDNqD!q#g{^(7(z&Za>&a)NVE",IT+bjF=a
>,;s40oz1|#
xR,1;vA;vV1,?Va>Q-ndC#b)5F*1!5—b)5GZz
;P8(NN5153h(D5#zITT1!5;wNN|D,g{k*xP|
D,I+bjF=a>&,;sdkm;v5!z1!5#
9C Query/400 &\|
ZNNi/A;OIf19C&\|,g04P1|"0oz1M0r!1#;x,"
;GyPD&\|(g F3"F4 M F11)<JCZyPA;#?vA;ZA;W?T>
CA;#CD&\|(I\;PT>yPICD|)#g{zk*@yPICD&\|
gNCZX(A;,+bjF=CA;PD&\|x,40oz1|#
Zr!i/(f.0,G!:
v F5((f)9Cyq*9ZC(e=hMH0D(e=hP(eDyPE"4KP
i/"T>a{#a{Z0T>(f1A;PT(fq=T>#
VN"8VD>"ns5"n!5"=y5M\F5IT*U5,ZA;PCF[
E (-) m>#
v F13(<V)9Cyq*9(eDyPE"T>PjbMVN<V,x;5JKP(
f#
g{T>!cVN:
v ;. 9 M 0,sz E +029,m>%+H}]#
v ;. 9 M 0,sz E +229,m>++H}]#
v g{}]!Z Query !qDs!($H* 4,!};* 2),G4TZ!cVNI\
2a4= 1.00#
zITi4T>Da{,7(Pd`"?vVND$HMPjbGqzzzk*Da
{#
": T>D(fr(f<V|,yq*9zy("DyPnryvD|D,|,Z4 F5
r F13 .0dkDG)Z]#
Z Query/400 P9CPm
Query *m`A;a)KIC4jIa>Dn?Pm#b)n?I\|(:
v Z(z9CDb
v Z(z9CDi/
v Z(z9CDD~
v 8(D~DG<q=
v 8(D~DI1
v ITCZi/DVN
v *;m
Pm9z;XGd{F,2uYKI\D<kms}#
T> Query/400 Pm
IT+bjF=a>&,;s4 F4(a>)T>Pm,Sxq!3nDPm(}g,D
~PmrbPm)#"b;\ZA;OT>NNnDPm;PPmDnIa>TD;v
"b8w,5wzIT9C F4 q!Pm#
ZA;Pm?VPT>Dn}Gd/D,!vZPmq=MA;a>?V9CDUd
s!#P1vV;vBA;,T>CPm# g{A;;\T>PmPyPDn,IT9
C-3|4Xv/Pm#
Z Query/400 PmP!qn
(}4PBPdP;nYw,zITSPmP!qn:
v ZPmPDZ;v;Cdk{FM!nEk#
v ZPmPn?{Tdk;vEk,1SSPmP!qCn#(}Zn?{TdkE
k1SSPmP!qn?,z-#IT!q`vn,SxZ!s?1d,R;X<
k#
": g{VNGa{VN,r(ea{VND{vmo=T>*$"M#
Query/400 PDXbb{
zIT*i/(e"D~r*;m8(BPNN;vXbb{TQwX*Db:
Xbb{ 5w
*CURLIB CZw5D10b#|G(;QwDb#g{;PR=NN10b,
rQw QGPL#
*LIBL w5bPmPDyPb#4U|GP>D3rQw|G#
*USRLIBL ;Zw5bPmDC'?VPDyPC'b#4U|GP>D3rQ
w|G#
*ALLUSR 53OzP(9CDyPC'b,T0zP(9CD"d{FTV8 Q
*7Dd{b#*ALLUSR ;P>T # V{*7DX( System/36 b#
4UV8NrQwb)b#
*ALL 53OzP(9CDyPb#4UV8NrQwb)b#
GENERIC* QwTGE.0DV{*7"RzP(9CDyPb#}g,zIT
8( STA* 4QwT STA *7DyPb#
": z;\9CTd_PXh(^DG)b#g{8(DXbb{|,z;_P(^
Db,z+;\4=CPmPz_P(^DG)bPDi/#
9C Query/400 |n
|nGC4ks53&\Dod#bb6Ez;hG!8vV{$D|n,x;XG
!yPvp5wr(Q1d9C;5PK%#
Query PDv|n,ISNN|nPdk:
v STRQRY t/0i/1K%#
v WRKQRY t/09Ci/1A;#
v 0KPi/1(RUNQRY) KPVfDi/,rzIT9C|KP1!i/#C|n2
IT6k= CL LrP,TczIT,}g,{mKP8vi/#
v 0>}i/1(DLTQRY) >};vr8vi/(e#
PXgN9Cb)|nDji,N{;i#
9C Query/400 K%
0i/5CLr1K%Jmz*9Ci/"KPH0(eDi/">}i/(er9
CD~!q Query Nq#
!qBPdP;n:
Query/400
1. 9Ci/
2. KPVfDi/
3. >}i/
SQL/400
10. t/ SQL/400 i/\mw
i/\m
20. 9Ci/\mm
21. 9Ci/\mi/
22. t/i/
23. Vv Query/400 (e
PP...
!qr|n
===>
g{z!q!n 1(9Ci/)"404P1|,rT>09Ci/1A;#ZCA;
O,IT8(zk*9CDi/M=(#ZZ173D:9C Query/400 D09Ci/1
A;;Pi\K9CCA;ITt/DNq,|(KPM>}i/Dd{=(#
g{zZ0i/5CLr1K%O!q!n 2(KPVfDi/),rT>0KPi/1
(RUNQRY) |nDa>A;#zIT9CK|nKPi/,"TS;vr`v}]bD
~P!qD}]zIi/(f#zIT9CK|nKPVfDi/(Z53Oy]{
F(eMf"Di/)rKP:1!;i/(4|{Rn#9C53a)D5Di
/) #g{;*@i/{rb{,9C!n 1(9Ci/)ITq!i/MbDPm#
g{zZ0i/5CLr1K%O!q!n 3(>}i/),rT>0>}i/1
(DLTQRY) |nDa>A;#IT9CK|n>}i/(e#g{;*@i/{rb
{,9C!n 1(9Ci/)ITq!i/MbDPm#
!q%vD Query/400 Nq
*9Ci/,zh*7(zk*9CDi/,"h*!qzk*4PDNq#*!q
Nq,ITZ09Ci/1A;PD!na>Pdkzk4PDNqE,r_g{T
>Ki/{Pm,ITZ Opt PPdkNqE(gZ193D<6Py>)
#IT!qTB
Nq:
i/Nq Nq5w
1=4( 4(((e)BDi/#1&mK!n1,T>0(ei/1A;,
TcIT*<(ei/#
2=|D |DVfDi/(e#K!n2T>0(ei/1A;#
3=4F 4FVfDi/(e#T>04Fi/1A;#
4=>} >}VfDi/(e#T>07O>}i/1A;#
5=T> T>i/(e,+;\|D|#
(*|Di/,!q!n 2#
)T>0(
ei/1A;#
6=r!(e r!i/(e#PXji,N{Z1893D:r! Query/400 i/(
e;#(g{zS OfficeVision"DisplayWrite 4 r DisplayWrite 5 L
rxk Query,K!n;IC#)
8=z&mKP z&mKPi/,uYKIZ;%=KPi/}pDJ4{D#(g{
zS OfficeVision"DisplayWrite 4 r DisplayWrite 5 Lrxk Query,
rz&mKP!n;IC#)
*}]rD>O"!q Query/400 Nq
g{zS OfficeVision"DisplayWrite 4 r DisplayWrite 5 Lrxk09Ci/1A;,
!na>D!qG;,D,T'VIT9C Query 44PD}V}]/D>O"#gZ
83D<4Py>,TZ OfficeVision LrxT,b)V&m!n* 6(1SO")"7
(PmO")M 8(`1>O") #TZ DisplayWrite 4 r DisplayWrite 5 LrxT,
ICDV&m!n* 6(1SO")#T>O"!n,x;T>TV&mC';ICD
0r!(e1M0KP1!n(6 M 9) #PX}]/D>O"!nD5w,N{Z73
D:+ Query/400 }]O"=V&mD5P;#
8( Query/400 i/M|Db
*j6zk9CDi/,ITZi/a>Pdki/{,Zba>Pdk+*f"i
/(rQ-f"i/)Db{#r_,zITi4i/{rb{DPm,;s!qz
k*D{F—N{:!q`v Query/400 Nq;#
g{z8(Ki/{,Query Yh|QfZ,"Zba>8(DbPQw|#g{z8
(KXbb{(g *LIBL)r`tb{(g ABC*),r9Cy]8({FR=DZ;v
i/;4UV8NrQwb(*LIBL M *USRLIBL }b)
#
g{z}Z4(i/,;X|{|,}Gzk#f|)Ts9C#PX4(i/Dj
i,N{Z3B 4( Query/400 i/(e#
!q`v Query/400 Nq
g{+bjCZi/a>&,"4 F4(a>)TT>Pm,CPm+|,Zba>8>
DbPDyPi/{#;T>zTd_PXh(^DG)i/Mb#TBA;T>;
)y>i/{#
dk!n(Mi/),404P1|#
1=4( 2=|D 3=4F 4=>} 5=T> 6=r!
8=z&mKP 9=KP
Opt i/ Opt i/
_ __________
_ ACCTPAYFEB _ PAYROLLMAR
_ ACCTPAYMAR
_ ACCTRECFEB
_ ACCTRECMAR
_ INTFEB
_ INTMAR
_ INVFEB
_ INVMAR
_ PAYROLLFEB
< 6. 9Ci/A;(`PPm)
zITSPmP!q 30 vi/,9ITZCA;DZ;vPm;C&dki/{M!
n#Query 4UksZPmPvVDNr&mks,WH&mZZ;vPm;C(Z!
nMi/PDdkVN)PdkD!nMi/#
1z!q`v!nRPm;|,`v{FP1(g<6Py>),PD&mNr*SO
=B,Ss=R#4 Query WH&mZns_PPyP!qDi/,;s&mZ~P,
@K`F#(;x,g{!qD!n|,+4Fr>}Di/,1R=_PG)!n.
;DZ;vi/1+T>04Fi/1r07O>}i/1A;#;s Query +_P`
,!nDyPd{i/4bVi,TcZzi$zk4PDNq# )
9C Query/400 i/Pm
1z9CPm(Zbo8i/Pm)1,Query a)8v&\ozz#TBG;)I\
T:
v *i4;,brbiPDyPi/,ITZ|Dba>PD5"ZS/a>Pdk
UWrGE (*) s404P1|#z+4=ZCbrbiPfZ"RzP(9CDy
Pi/#((}Zba>P8(b{"Xbb{ [g *LIBL]"`tb{ [9Cq=
ABC*] 8>*liD)b#
)
v *i4i/{DX(S/(O!Di),ITZS/a>Pdk`t{(9Cq=
ABC*)"404P1|#g{zAY*@}ZiRD{FD*78vV{,K&\
ITuYiRyhD1d#
BPwbhvKb)&\#
g{z}9Ci/Pm,IT9CBP=(.;!qi/:
v IT9CPmD%?;Cdkzk4(r9CDi/{(Mb{,g{T>bP)#
(*!qVfDi/,|XkIC—N{Z223D:1zT<iRr9CX(
Query/400 i/1Dd{<GBn;#)
g{z}Z4(i/,ZdkB{F.0ITliPmTi4Q-9CKD){
F#;s,ZZ;vPm;C(ZddkVNP)dkBD{F"Z{FTdk 1#
v IT(}Zi/Tdk!n9CPmPDi/#(*!qi/,|XkIC—N{Z
223D:1zT<iRr9CX( Query/400 i/1Dd{<GBn;#
)
9C Query/400 PmS/
zIT9CS/a>i4|!Di/{Di(S/)#*K,dkj6zk*T>Di
/iD*78vV{(q=* ABC*),;s404P1|#T>;Z8(brbiPd
{FTG)V{*7DyPi/#}g,g{zZS/a>Pdk IN*,rzIT4{
ng INTEREST"INTFEB"INTMARCH"INVENTORY"INVFEB"INVMARCH Hi/{Pm#
(?
vbDi/TV83rT>#)
z2ITZS/a>P8(j{D{F(;x *) #Lx0;v>},g{zki4D;
vb|,{* INVENTORY Di/,ZS/a>Pdkj{Di/{#
g{zk5X=H0T>Dj{Pm,>}S/5(rdk * w*S/5),;sYN
404P1|#
(; Query/400 i/Pm
1i/{PmT>1,|G4V8NrT>Z?vbP#
1z404P1|1,Query F/PmTc8(Dj{{F(rZX(bDPmP,_
P8(p<V{DZ;v{F)T>ZPm%?#
9P=V=(ITC4/@$i/Pm:
v IT9CO3|MB3|4X/@Pm#
v IT9C F19(B;i)xAB;vbDi/{Pm*7#
1T>Pm1,zIT9C F11(T>D>)Z;T>n?{Pm(gi/"VNH)
MHT>n?{PmVT>hv?;nDD>.dP;#14 F11 1,PmP?;n?
{T+T>D>—g{Z4(r|Dn?18(KNND>#2ITT>d{E";
}g,1zT>i/PmDD>1,,1T>?vi/4(rns|DDUZ#
9Ci/
dk!n(Mi/),404P1|#
1=4( 2=|D 3=4F 4=>} 5=T> 6=r!
8=z&mKP 9=KP
* Query/400 i/!qb
b{8>zkZDof"BDi/rVfDi/Q-f"ZDo#(g{z}Z4(i
/,;X8(b{,}GzF.#fi/#)xR,g{zZTsi/(e}LPv(
75k*#fi/,Z(eax1z9P;Nza8((i/{M)b{#
g{bGzZ;N9C Query,r+10bw*b{a)#g{z;P10b,9C
QGPL#1z8(;,Db{"Xbb{r`tb{1,Query ZzBN9CKA;1a
)C{F#?NIT9C`,D5,r_IT+||D*d{Dbrbi#(PXj
i,N{Z233D:Query/400 r*mE";#)
*i4r9Cm;vbrbPm,4PBPdP;nYw:
Z Query/400 PT>#?q=
g{*4(r|Di/,"T AS/400 q=8(1drUZ#?r8(x!}Vt{D
}V#?,Cq=Xk{OZ0T>#?q=1A;OT>Dq=5wrVt{#*
lizXk9CNV AS/400 q=rVt{,S0!qG<1A;r0(ea{VN1
A;P4 F17#
i/ . . . . . . : QRY1 !n . . . . . . : CHANGE
b . . . . . . : QGPL CCSID . . . . . . : 65535
9C SAA q=dkUZr1d#?,r
9CBP5hvDq=#
9CT>D!}Vt{#
i/(e5
UZq= . . . . . : *MDY
UZVt{ . . . . : /
1dq= . . . . . : *HMS
1dVt{ . . . . : :
!}Vt{ . . . . : .
404P1|Lx#
F12=!{
1z4PBPYw1vV0T>#?q=1A;:
v S09Ci/1A;|Di/,"Z AS/400 q=(;G*zDw58(DUZr1
dq=)Di/(eP8(KAY;vUZr1d#?#
v S09Ci/1A;T>i/,RUZr1dDw5q=ki/(eP8(D AS/400
UZr1dq=#?;,#
v 9C RUNQRY |nDKPZG<!q!n,RUZr1dDw5q=ki/(eP
8(D AS/400 UZr1dq=#?;,#
v Z QRYRUN }LP9CKPZG<!q!n,RUZr1dDw5q=ki/(e
P8(D AS/400 UZr1dq=#?;,#
v S09Ci/1A;|DrT>i/,r9C RUNQRY |nDKPZG<!q!
n,Ri/GC}V#?(eD,ki/;p#fD!}Vt{k10!}Vt{
;%d#
v S0!qG<1A;P4 F17#
v S0(ea{VN1A;4 F17#
Query/400 r*mE"
Query *?vC'4(M,$i/r*m#1zWN9C0i/5CLr11aT/4
(r*m,xR;)z8(KX(5r4KX(D|,aT/|Br*mD5# z;
X#D4(r|DKr*m#
zI\"b=A;WNT>1,3)A;OD;)a>Q-n4C#b)5I\GS
r*mPq!D,r* Query ZJ1D1r9Cr*ma)3)E"Tr/(eNq#
I\vmD;)B~gB:
v 8(K;v4w*I\!nPvD5#
v 4;Z(9Cz8(Di/"D~rm,rD~10};9C#
v dk5.s|DKwb#
|D Query/400 i/
^[Gr*zdkKmsD5,9GzO*P;v|CD=(4q!zk*DE",
xrKZdk5sDdK"b,za"VZ Query P|DhC\]W#
g{zZ"b=a{;Gzk*Da{.0(e"#fKi/,;kZ09Ci/1
A;O!q!n 2(|D)"|Di/#|Di/1,;!qh*|DD!n,;sZ
T>J1DA;1;kdkBD!qr|DmsD!q#H0(eDd{NNhCT
;P';;XXB(e{vi/#
g{z;kKv,4 F3(Kv)xk0KvKi/1A;#Z0KvKi/1A;O,
8vzGk*#fi/9GKPi/(r=_<4P),;s404P1|#.s,
g{z;P!qd{!n,rT>09Ci/1A;#4 F3 Kv Query#
t/ Query/400 i/(e
(}Z09Ci/1A;O!q!n 1(4(),"I!q8(#{4(Di/{4t
/i/(e#
*8(i/{,Idk#{(eDi/D{F( i/a>P),"RI8(f"Ci
/DbD{F(ba>)#r_,Ii4i/{rb{DPm,T!q#{9CDi/
{Mb{#
9Ci/
dk!n,404P1|#
g{*4(i/((e),;X|{|,}G#{+d#f)Ts9C#(;PZ#f
i/s,|EZ53Ow*i/TsfZ#)g{z75*|{|,9C|{TsD}
#fr,|q-:
g{+bjEZi/a>O"4 F4(a>)T>Pm,|+|,Iba>8>DbPy
Pi/D{F#IZi/a>Pdk`t{,;s4 F4 TC=O!DPm#T>Pm
1,`t{T>ZS/a>P#
4(i/1,!qB{F.0IliKPmi4Q-9CK24{F#ZZ;vPm
;C(ZddkVNP)dkB{F,"Z|T_dk 1#
zh*!qD(;(e=hG 8(D~!q#;X!qyPb)(e=h—v9Cz
h*DG)#s`}=h;X4X(3r44P(d;Zh*9Cs`}=h1(i
9CT>D3r)#z!qD?v=h<G@"D}L,|ZX*1rzT>;vr`
vA;#
(ei/
i/ . . . . . . : !n . . . . . . : 4(
b . . . . . . . : QGPL CCSID . . . . . : 37
Opt i/(e!n
1 8(D~!q
_ (ea{VN
_ !q"ErVN
_ !qG<
_ !qErVN
_ !q{m3r
_ 8((fPq=
_ !q(fc\/}
_ (e(f8V
_ !qdv`MMdvq=
_ 8(&m!n
0(ei/1A;G*<(ei/DwA;#
ISKA;!q(e!n,;c45;vj{Di/(eIDvw*?ViI:
v 0yv!n(ei/>m,|(*i/DD~"CZ?vD~PDVNM*!qD
G<#
v SB4D}v!n(e(fDb[,|(*TD)Pc\T0N1(9C(f8
V)c\#
v 9}Z~v!n(e(fdv?DX,T0Z+|"MA?DX1*9C245#
* Query/400 i/(e!q!n
*SZi/(e!nPPPvDG)!nP!qz#{9CD!n,Z?v!nTD Opt
(!n)PPdk 1,;s404P1|#;sp;T>z!qDG)!nDA;,T
cI4(i/(eDG)?V#
TBG?v(e=hDrLhv#
8(D~!q
K!nGXhD,|CZ8(z#{i/SPqCE"D;vr`vD~#g
{8(`vD~,rT>;)A;,Zb)A;O8(z#{gN,SD~#
(ea{VN
9CK!n(eD~P;fZ+#{Zi/P9CDVN#}g,z!qDD
~|,m>GZ}DVN,+|;|,m>l}DVN,xz4#{(fT>
l}x;GGZ}#zI(e#fFca{Da{VN,|9CGZ}47(
l}#
!q"ErVN
9CK!n(S!qDD~Ma{VN)!q#{vVZ(fPDVN#98
(#{|GT24NrvV#
!qG<
g{#{Z(fPv|(X(G<,9CK!nS;vr`v!qDD~P!
qG<#
!qErVN
9CK!n8(y]D)VNEr,TcTX(NrT>dvG<(g4V8
m3r"5rr}r)#
!q{m3r
9CK!n*i/!q{m3r#z!qD{m3rI0li/Pm`;,D
hC,|(G<!qMErG<1DG<3r#C{m3r(#kzDzRo
TPX#9I*X(Di/8(;,DoT#IZ(eZ;vi/1hC{m
3r1!5,SKTs;XYN|D{m3r#
8((fPq=
9CK!n|D(fPvVDVNDPjb"Pd`"}V`-"$HM!}
;}#
!q(fc\/}
9CK!n*(fPD?vVN8(;vr`v(r+?)`MDc\/}:
\F"=y5"n!5"ns5MF}#
(e(f8V
9CK!n8(gN+(f8V*G<i#
!qdv`MMdvq=
9CK!n8(GT>9Gr!dv,rG+d"MA}]bD~#g{#{
r!dv,9*8(r!ztT#99CK!n8(G*j8dv9Gvc\
dv#
I8(;v"8vr+?T>D!n#*!q+?,4 F21#
Z Query/400 (eA;.dF/
TZ?v!qD!n,Query +*zT>C=hD(eA;#
(Z0(ei/1A;OT
?v!nT>DDVkTC(e=hT>DZ;vA;Djb%d#)ZA;O8((
e5s,404P1|+d|(xi/(eP"43rxkB;vA;#Zh*43
rsK1,4 F10(&m/0;A)#fZA;OdkDZ],;sT>0;vA;,
r4 F12(!{)vTZA;OdkDZ],;sT>0;A;#
Z/@jyPh*D!n.s,404P1|5XA0(ei/1A;#;sI!q
|`D!n"|D!qr_axKi/D(e#
5XA Query/4000(ei/1A;1
5XAKA;1,Query +Z_Pk53a)D(1!)5;,D10(e5DyPG
)(e=hTT>;v > {E#g{z*|DrT>Vf(e,iv2Gby#
mb,g{z4(r|D(e,rT>;uE",a>z4 F3(Kv)T#fi/|D
M/rZK1KPCi/#4 F3 1,T>0KvKi/1A;,byI8(=v!n#
(g{#{Hi4r|D`v(e=h,Is0fGyZ?v!nT_dk 1,;s4
04P1|#)
g{z9CD!nPPNN(ems,Zz5XAKA;1+4`vAb)!n;Z
9C0Kv1|0&|}b)ms#
4( Query/400 i/D<GBn
TBG4(i/Da>n"a>M<I#
* Query/400 !qD~"G<MVN
Query I9CC IDDU"DDS r DB2 UDB AS/400 fLr4(DD~#PXD~i
| /D5w,N{ IDDU Use ;i#
4(i/1,g{;P!q"Eri/*(fDVN,Query +!qTBn?:
v TZ(f,BPn?D0 500 v:
– Z0!qErVN1A;O!wErVNDVN,4|GZCA;OvVD3r
– a{VN,4Z0(ea{VN1A;O(e|GD3r
– ZG<q=P Query I9CDVN,4|GZb)G<q=PvVD3r(WH
GZ;vD~!qPDG)VN,SEGZ~vPDG)VN,@K`F)
v TZ}]bdv:
– G<q=PD+?}]
– Z0(ea{VN1A;O(eDa{VN
4( Query/400 i/D(iNq3r
TBG4(i/D(iNq3r:
1. Z!q"ErVN.0(ea{VN#
2. Z!q"ErVN.08(CZ!qG<DHO#
3. !q"ErVN,"ZXBq=/P.08(ErVN#
4. Z(e(f8V.0!qErVN#
5. ZXBq=/P.00.s4 F5 i4i/a{,"4 F13 i4(f<V#
I9Ci/T}]D~PDG<lYEr#vk!qErVN,!q}]bw*dv
h8,"8(dv}]b{#
kD~!q}LPXDA;|(:
v D~!qA;(CZ;vr`vD~):
– 8(D~!q
– !qb(I!)
– !qD~(I!)
– !qI1(I!)
– !qG<q=(I!)
v D~,SA;(vCZ`vD~):
– 8(,S`M
– 8(gN,SD~
* Query/400 i/8(D~!q
D~!q}L|(!qi/+SdP!C}]D?vD~,T08(|,D~"D~
I1MG<q=Db(r_9CCA;Z;NvV1I Query a)D5)
#g{!q`
vD~,C}L9|(8(D~,SXT#
Z0(ei/1A;O!qK(e=h"404P1|r F21(+!).s,z4=D
Z;vA;G08(D~!q1A;#
dk!n,404P1|#4 F9 8(=SD
D~!q#
W?
F3=Kv F4=a> F5=(f F9=mSD~
F12=!{ F13=<V F24=d{|
08(D~!q1A;CZ8(#{i/D;vr`v}]bD~,TqC(fPh
*D}]#zI8(T`o 32 vD~xPi/,"RI*?vD~8(;v(;D 3
vV{j6{#(g{h*+D~kTm,S,2I8(,;vD~=N;g{by
v,Zi/(eP+dw*=vD~4Fc#}g,zI\8(,;D~=N,+9
C=V;,DG<q=#)
g{z*4(r|Di/(e,&jI;vD~!qyhD+?E"E\*<B;v
D~!q#Query +y]zdkD5M4D|T>zh*DA;#?vD~!qPDa
>3r*:D~"b"I1MG<q=#(g{4jID~!qPDyPE",G4Z
za)XhDE"0P8v F |;apwC# )
?vD~!qiZZ;NT>1,+Z|Da>PT>BPXb5:*FIRST(CZI
1MG<q=)M *ID(g{T>D0,rCZD~ ID )
#1z404P1|1+|D
b)5Md{zI8(D5(g,TZbI8( *LIBL);|G|D*KPi/1+9
CD5J5#I1{DXb5;d#
ZZ;vD~!qiD ba>PT>Du<5GZ0;i/(eDD~!q=hP9
CD5#TZd`DD~!q,u<5kZZ;iP9CD5`,#
* Query/400 i/!qD~
*!qD~,+bjFAD~a>"dkD~{#
g{#{SD~{Pm!qD~,I4 F4(,1+bjEZD~a>P)
#T>0!q
D~1A;,IZKA;O*i/!q;vr`vD~#
* Query/400 i/!qb
r*z*!qDD~I\Z;,DbP,I*?vD~!q8(;,Db{"`tb
{r_Xbb{#
* Query/400 i/!qI1rG<q=
`FX,TZ?vD~!q,g{#{SI1rG<q=PmxP!q,+bjFA
Ca>&"4 F4 i4`XDA;,!q#{CZCD~DI1{(rq={) #;sZ
z5XA08(D~!q1A;1,+Za>PT>C{F#g{;P!qI1{,
Query +ZI1a>Pa) *FIRST#g{;P!qq={,Query +bvXbD1!5
"Zq=a>Pa)Z;vq={#
* Query/400 i/!q`vD~
g{#{*i/|(=SD~,?Nh*m;vD~!q14 F9(mSD~)
#g{*
Ki/jIK0;D~!q,rT>BD;ia>)zn4;D~a>*UW,xd
(+G,g{;PT3vD~!qndD~{,4 F9 +
{a>T>zI|DD1!5#
bjFAUWDD~a>&x;Gxza);vBDD~!q#)
8(D~!q
dk!n,404P1|#4 F9 8(=SD
D~!q#
g{ZKA;O9C`vD~,I9C-3|ZD~!qPmP0sF/#g{4 F18
(D~),2IT;,Dq=i4KE"#F18 +zxA0T>D~!q1A;,"T
>10ZKi/(eP(eDyPD~DD~{"b"D~I1"G<q=MD~ ID#
T Query/400 i/9CD~ ID
D~ ID Jmz(;j6_P`,{F+Z;,D~PDVN#I8(;A}vV{;
Z;vV{XkGV8"$"# r @,ns=vV{ITGV8"}Vr_ $"# r
@#P'j6{D>}*:A"B"B03"AEX M $99#
d;Z08(D~!q1A;O*?vD~8(KD~ ID,+;XZi/(eDd{?
VP9C|G,}Gzh*ZCi/D`vD~P9C_P`,{FDVN#TZ`
,DVN{,?NXk9CD~ ID,T7#9CKb)D~PD}7VN#TZyPd
{VN{,(4vZCi/(eD;vD~PvVDG)VN{),;X9CD~ ID#
T Query/400 i/7O!n
Z4(i/(e1,za4=;uE",*szi$U(eD5#KE"Z(eD~
!q5s404P1|1vV#&i$=K*9!qD!n,;sLx!qD~r_
Z7O!q.saxD~!q}L#*axD~!q,YN404P1|#
1|DVfDi/(e1,404P1|sa4=;,DE","4`T>z|DD
5#&YNi$|D,;sZ~N404P1|TcZ(eP5J|D|G#g{;
PxP|Dr_g{v|DI1{,;X4=N04P1|#
}% Query/400 i/D!n
;\G4(9G|D(e,g{zv(;#{Z(eP#tdP;vD~,I>}D
~a>}%|#Zz404P1|r_ F5"F10 r F13 1,+}%CD~!q#
}%D~!qI\aZ(ePd{X=<Bms#g{z}%DD~CZ,SbTr
_}%DD~PD3vVNCZ(ea{VN,ra"zbViv#
+bjEZUWa>r_vmDa>O,vVDE"hvPXCa>Dms#}g,
zI\dkKz^(9CDD~{#
g{P`vms,Z|}Z;v.s+a4=B;vms#
Z Query/4000!qD~1A;O!qD~
0!qD~1A;T>D~Pm,SCPmI!q;vr`vD~T)zDi/q!
}],r_I!q;vD~TSUi/Ddv#g{+bjEZA;DD~a>O,
;s4 F4(a>),rT>KA;#
(KA;vZz4(r|Di/(e1vV#
)TB
G0!qD~1A;gNT>D>}#
!qD~
D~ ID . . . . : T01
dk!n(MD~),404P1|#
1=!q
Opt D~
_ FILE1
_ CUSTMAST_1
_ CUSTMAST_2
_ CUSTMAST_3
_ EXAMPFILE1
_ EXAMPFILE2
_ INVMAST
_ TESTFILE_A
_ TESTFILE_B
ZCA;D%?,I\vVr_;vV{*D~ ID DVN#v1zS08(D~!q1
A;xkK&"ZGUWDD~a>P4 F4(a>)1,ET>D~ ID VN#g{T
>D~ ID,r|GZ0;A;ObjyZDD~!qiDD~ ID#
g{D~a>*UWRZ08(D~!q1A;O4K F4,G4KA;O+;T>D~
ID VN,xzIZK&!q`vD~#g{D~a>P;vD~{r_PIq!SPm
D`t{,"RZ08(D~!q1A;O4K F4,G4D~ ID VNZKA;OT>
* Tnn,Rz;\!q;vD~#
g{S0(e}]bD~dv1A;r08(St5^({1A;xk,ZKA;O
;\!q;vD~#
I9Cba>i4fZZm;vbrbiPDD~#
g{#{SbPmP!qX(b,+bjEZba>P4 F4#T>DPmv|,zP(
9CDb#
v g{Za>|,b{"*LIBL rUW14 F4,+4=Z *LIBL bmPDb#
v g{Za>|,`tb{rNNd{Xbb{14 F4,z+4=C5m>Dbi#
g{;#{r;h*i4bPm,dkb{"`tb{(9Cq= ABC*)r_TBXb
b{.;:*CURLIB"*LIBL"*USRLIBL"*ALLUSR r *ALL#
ZA;%?D b a>Pdk5s,404P1|rT>CbPzP(9CDD~P
m#
g{dkK`tb{rXbb{,+ZA;OT> bP,TcI7(X(D~$tZ
DvbP#
!qD~
dk!n(MD~kb),404P1|#
1=!q
Opt D~ b Opt D~ b
_ __________ __________
_ CUSTMAST_1 CUSTINV _ CUSTRELFEB CUSTREL
_ CUSTMAST_2 CUSTINV _ CUSTRELJAN CUSTREL
_ CUSTMAST_3 CUSTINV _ CUSTRELMAR CUSTREL
_ EXAMPFILE1 CUSTINV
_ EXAMPFILE2 CUSTINV
_ INVMAST CUSTINV
_ TESTFILE_A CUSTINV
_ TESTFILE_B CUSTINV
W?
F4=a> F11=T>D> F12=!{ F24=d{|
g{T>KbP,IZba>P8(b{"`tb{MXbb{,|GkdkD!n
EMD~{;pjI;vD~!q#g{Zba>PdkK`t{rXbb{,|+
;bv*Z8(DbiP|,_PC{FDD~DZ;vb{#
*i4!;cDD~{i,+bjFAS/a>,dk*7DV{,szGE (*) Tj
6#{i4Di,;s404P1|#+T>Z8(bPD~{TG)V{*7Dy
PD~#(g{;P9C *,vT>_P8({FDD~#)
*5XAD~{Dj{Pm,>}Ka>(rZdPdk;v *)"404P1|#
g{PmP;PTG)V{*7DD~{,Query +F/PmAC{F&vVD;C.
0nS|D{F&#g{Zba>P9CKXbb{r`tb{,v1(;=a>5
j+k{vD~{%d1EXB(;Pm#
9C F11 ZvT>D~{Pmk,1T>D~{MhvD~DD>DPm.dP;#
R=h*DD~.s,Z?vD~{(g{Jm`vD~{D0)T_dk 1,|(Z
Pm%?;CDD~{#g{*!q`vD~,n`I!q 32 vD~,|(G)H0
Q*Ki/!qDD~#"bg{9CK,S_-D~,;\!qYZ 32 vD~,r
*CZ,S_-D~PD?vD~<w* 32 vD~PD;v4F}#}g,g{+}
vomD~,Sx;v,S_-D~P,r+K,S_-D~1w}vD~x;G;
vD~4F}#
xPD~!q.s,404P1|5XA08(D~!q1A;#z!qDyPD~
<mS=H0Q-fZDD~!qP(g{PD0)#(WHndNNQ>}DD~!
q,"y]h*ZsfmSBDD~!q#)b)D~4U|GZ0!qD~1A;O
y_PD`,3rmS,?vD~<PT:D;iD~!qa>#2*|G8(D~ ID
T%dD~!qEk,r_g{CEkQ;<C,r*|G8(Z6' T01 A T32 P
ICDn!I\5,K52I|D(g{#{D0)#
Z Query/4000!qI11A;O!qD~I1
+bjEZA;DI1a>O"4 F4(a>)1+T>0!qI11A;#0!qI
11A;T>;vI1Pm,"Jmz!q;vI1)i/SPq!}],r_!q
;vI1TSUi/Ddv#KA;vZz4(r|Di/(e1vV#
D~ ID . . . . . : T01
D~ . . . . . . . : EXAMPFILE1
b . . . . . . . : CUSTINV
dk!n(MI1),404P1|#
1=!q
Opt I1
_ __________
_ EXAMPMBR1
_ EXAMPMBR2
_ EXAMPMBR3
W?
F11=T>D> F12=!{
g{S08(D~!q1A;r08(St5^({1A;xk,I8(#{i/S
DvI1q!}]#g{S0(e}]bD~dv1A;xk,I8(#{+i/}
]ExDvI1P#
g{S08(D~!q1A;xkK&,rZA;D%?T>D~ ID VN#D~ ID G
ZD~VNPT>DGvD~DD~j6{#KD~Gz#{*d!qI1DGvD
~#bVNT>f"CD~Db#
10fZZA;%?yT>D~PDI1D{FT>ZI1PP#IZI1s_D Opt
PPdk 1,r_ZPmDZ;v;CPdkI1{("Z|T_D Opt PPdk
1),4!qI1#g{Z%?;CP8(;vI1{,CI1K12XkfZ#g{
8( *FIRST r *LAST,Z0;A;ODI1{+|D*C5#by,Zi/KP1f
ZZCD~PDZ;vrns;vI1MG9CDI1#g{S0(e}]bD~d
v1A;xk,2IZCPmDZ;v;CP8( *FILE#
Z0!qI11A;O404P1|1,z8(DI1+T>Zz5XADA;OD
I1a>P#g{;P!qr8({Fx5XA0;A;,T0DI1{r5#V;
d#
Z Query/4000!qG<q=1A;O!qG<q=
+bjEZ08(D~!q1A;Dq=a>O"4 F4(a>)1+T>0!qG<q
=1A;#0!qG<q=1A;T>;vG<q=Pm,SCPmI!qz#{i
/+dCZ!(D~I1DG<q=#KA;vZz4(r|D(e1vV#
D~ ID . . . . . : T01
D~ . . . . . . . : EXAMPFILE1
b . . . . . . . : CUSTINV
dk!n(Mq=),404P1|#
1=!q
Opt q=
_ __________
_ EXAMPFMT1
_ EXAMPFMT2
_ EXAMPFMT3
W?
I*T>ZCA;%?DD~!qDG<q=D{FT>Zq=PP#IZG<q=
s_D Opt PPdk 1,r_ZPmDZ;v;CPdkG<q={("Z|T_D
Opt PPdk 1),4!qG<q=#
g{Z%?;CP8(;vG<q={,CG<q=K12XkfZ#g{8(
*FIRST,Z0;A;ODq={+|D*CD~PZ;vG<q=D5J{F#PI
\3)G<q=;\CZX(DD~I1,+Z&m08(D~!q1A;.0;\
7(bc#
Z404P1|1,z5XA08(D~!q1A;,z!qDq={T>ZxkK
&y4TDq=a>P#g{;P!qr8({Fx5XA0;A;,T0DG<q
={r5#V;d#
T>Z Query/4000T>D~!q1A;O!qD+?D~
1zZA;O4 F18(D~)(F18 P>ZA;W?)1+vV0T>D~!q1A;#
0T>D~!q1A;T>z!qCZi/DyPD~#TZ?vD~,KA;T>
D~ ID"|,CD~DbM+*9CDD~I1MG<q=#KA;ODE"vwN
<;;\ZK&TdxP|D#
ID D~ b I1 q=
T01 EXAMPFILE1 CUSTINV *FIRST EXAMPFILE1
T02 EXAMPFILE2 CUSTINV *FIRST EXAMPFILE2
W?
404P1|T>,SbT#
F12=!{
g{T>`vD~!q,I404P1|T>,S`MMb)`,D~D+?,Sb
T#+G,g{zS08(D~!q1"0|DD~!q1"08(,S`M1r
08(gN,SD~1A;xkKA;,404P1|+5XA0;A;#F12 M04
P1|(;G F18)ICZZ0T>,SbT1A;MKA;.dP;#
Z Query/400 i/P,SD~
9C08(D~!q1A;!q#{CZi/DyPD~.s,g{!qK`vD
~,Xkf* Query Z9Cb)D~SdVNPq!}]1gN,S|G#9CTB=
vA;*zDi/8(yP,S5w:
v 08(,SD~`M1A;Jmz8(#{9CD,S`M#P}V=(IC4,
SD~,Tc!qh*DG<#
v 08(gN,SD~1A;Jmz8>CZ,SD~DVN#8(*9CD)V
N,T0gN+|Gkd{D~PDVNxPHO#
TZ*!qDG<, yPb)D~D,S5wCZ7(Zi/,SD?vD~PGq
fZ%dDG<#TZ?v8(DD~,1!q4HODVNZ]kZ08(gN,
SD~1A;Oa)DbTu~%d1,mwfZ%d#!vZGqfZ%dT0Z
KA;O8(D,S`M,!qG<"+dCZdvP,bIZ08(gN,SD
~1A;OxvDd{,S5wMZ0!qG<1A;OxvDG<!q5w7(#
1 Query 7(S8(DD~P!qG<1,|+9CyPVNPD}]M*Ci/!q
DD~4zI;vdvG<#KdvG<|(Zi/(frdv}]bD~.P#
dk!n,404P1|#
,S`M . . . . . . . . . . 1 1=%dDG<
2=9CwD~D%dG<
3=9CwD~D;%dG<
P}V`MD,S,r_P}V=(IS8(DD~!q%dDr;%dDG<#z
IT:
v v!qZyP8(DD~PP%dG<DG<#
v !q+?wG<,,1|(yP%dDNG<#wG<fZZwD~P#wD~G
Z08(D~!q1A;O!qDZ;vD~#NG<fZZND~P#ND~G
Z08(D~!q1A;OZwD~.s!qDyPD~#jI,S.s,&CG
<!qbT(g{PD0)T7(!qD)G<#
v v!q_P;vr`v;%dDNG<DwG<,,1|(yP%dDNG<#
yP}V`MD,S<9CZ08(gN,SD~1A;O8(D`,,SVNM,
SbT#|G2+T`,D=(9Ci/(ePDd{5w4!qG<"zIdv#
g{#{9CwD~PD?vG<,9CZ~v,S`M(`M 2),x;\|ZND
~PGqP%dG<#
g{#{i4wD~PDD)G<ZND~P;P%dG<,9CZ}v,S`M
(`M 3)#
Z Query/400 i/PgN,SD~
9C08(gN,SD~1A;8(Z*i/!qK`vD~1yhD,SbT#9
CKA;8(tIvVNTMbT5,f* Query gN,S(iO)D~MG<q=;
?vbT58> Query Z!qG<0XkgNHOG)VN#TZyxPDG<!qb
T,,S5wP?vbTDa{Xk*f,?vD~P%dDG<EI,S*;vG
<#
8(gN,SD~
dkHOTT>D~!qGgNX*D,404P1|#
bT:EQ"NE"LE"GE"LT"GT
VN bT VN
______________ _____ ______________
______________ _____ ______________
______________ _____ ______________
______________ _____ ______________
______________ _____ ______________
W?
________________________________________________________________________
VN VN
A.NBR B.NAME
A.NAME B.PHONE
A.ADDR B.SERIAL#
A.ZIP
B.NBR
W?
F3=Kv F5=(f F10=&m/0;A F11=T>D>
F12=!{ F13=<V F18=D~ F24=d{|
TZ?vbT,8(=v*bTDVNM*9CDbT5#Z;vD~PiRVN,
CVN|,IZd{D~DVNPR=D`,(r`F)DE",g{Frj6E#
ZbT5DNN;`8(VN{(g{h*,|(|GDD~j6{)#
}g,g{Z=vVN.d8( EQ(`H)bT5,1b=vVN|,`,D51b
Ta{*f#(8u\G9C EQ 5#)
VN bT VN
A.NAME EQ B.NAME
Query/400 i/P,SD~Dfr
": *8>;#{8(,SbT,9C *ALL ,S#+;vD~PDyPG<kND~
PDyPG<,S,;xPNN;V!q#
,SbTDfr*:
v TZ*P!qX,SD=vD~,|GXkAY_P;v+2VN#("b_P+2
VN";mwVN{`,#)TZ_-}]bD~2Gby,49|GI\yZom
D~(ZK.O4(_-D~)P;,{FDVN#
v g{Z08(,S`M1A;O!q!n 2(9CwD~D%dG<)r!n 3(9
CwD~D;%dG<),rZ,SbTP9CDVNDiO$HXk!ZrHZ
2000 VZ#TZ DBCS VN,?v DBCS V{F*=vVZ#g{VN|,(!
D DBCS }],2+F;V{Fk$HP#
v ;\9C EQ bT5+NN!qDD~,SA,S_-D~#
v ?v,SbTPDVNXk4T;,DD~#
v IT;Tx(DD~9C`vbT#g{Z08(,S`M1A;OD,S`Ma
>P8(!n 2 r 3(<9CwD~),G4ZCD~TP9CDyPbTDbT5
Xk`,#
,SbTDP'HO*:
– }VVNk}VVN
– SBCS V{VNk:
- SBCS V{
- UZ
- 1d
- 1dAG
- q;= DBCS
- *E= DBCS
– UZVNk:
- UZ
- SBCS V{
- q;= DBCS
- *E= DBCS
– 1dVNk:
- 1d
- SBCS V{
- q;= DBCS
- *E= DBCS
Query/400 i/P,SD~D>}
<G;v>},ZK>}Pz*+{* RESIDENTS Dw{FMX7D~,SA{*
PHONELIST D{FMg0EkD~#
Z08(gN,SD~1A;O9C,SbTM!nD;,iO1,zIS;vD~
,SqC8v;,Da{#
TBGzI\gN9C}V;,`MD,SD8v>}#yP>}YhQZ08(g
N,SD~1A;O8(K A.NAME EQ B.NAME#
g{#{S?vD~!qG<,Rv1|GZ?vd{!qDD~PAYP;vG<
%d1,dk 1#2MG,TZ*!qDG<,yPD~XkP%dDG<,bI,S
5w7(#TZi/P9CD?vD~,d!qCZHODVNDZ]kZ08(g
N,SD~1A;Oa)DbTu~%d1,r"z%d#(K`M(!n 1);PwD
~rND~;+,HT}yPD~# )
g{#{Zi/dvP|(wD~PD?vG<MyPd{(N)D~PDyP%d
G<(;*b)G<fZ),dk 2#!qwD~PD?vG<,x;\|GqfZ%
d#(wD~\GZi/(ePWH!qDGvD~#)}biv:g{CZ,SbT
DwD~DVN*U,r;!qwG<#
g{ND~;PkwD~G<D,S5w%dDG<,UW(CZV{VN)"c
(CZ}VVN)r January 1, 0001(CZUZVN)+CwND~D!qVND}
]#g{+b)VN|(*i/(fPDdvVN,rZC(fP9Cf;DV{r
5#Z>>}P,PHONE VNT>UW,r*|;w*V{VN`k#ZVNIUDi
vB,8(D1!5+CwCND~D!qVND}]#g{;P8(1!5,U5
+T>*F[E (-)#
g{#{ZwD~Pv!qZAY;vND~P1Y%dDG<,dk 3#2MG,z
#{!qZ +?ND~P;P%dG<D?vwG<#}g,g{,SDvD~,x
}vND~P;P=vP%dG<,G4|,wD~M=v%dDND~P!(E"
(M;%dDND~D1!}],g{PD0)DG<+w*%vG<|(Zi/d
vP#
K,S`M(#CZP>Z;vr`vND~P*'DG<#
ZRGD>}P,RESIDENTS D~9GwD~,rK;+d;P%dDNG<DG<|
(Zi/(fP#PHONELIST D~P=vbV;%dDG<;ZG< 2 M 6 Pj6D
!';Pg0Ek,rKZND~P;P{GDG<# (NAME VNYNCw=vD~D
HObTVN#)
}g0;V,S`M,UW(CZV{VN)rc(CZ}VVN)CwND~D!
qVNP*'G<D}]#r_,g{ DDS DFT X|VCZ(e1!5,rDCG)
1!5# (ZRGD>}P,PHONE VNT>UW,r*|;w*V{VN`k,;P*
PHONE VN(e DFT 5#)
XpGZTBiv+?*f1,ND~D3rM|X*:
v ,S`M* 2(kw%d)r 3(kw;%d)
#=V`M<P;vwD~,szND
~#
v i/8(+?}vr|`vD~#
v ;vr`vND~;P+d,SAwD~D,SbT#
g{zDi/{OTO8c,rq-ND~Erfr:
9C,SbT+?vND~kZ08(D~!q1A;OCND~.OP>D;vD
~,S#
}g,Z,SDvD~1,9C,SbT+Z~vD~,SAZ;vD~,9Cm;
vbT+Z}vD~,SAZ;vrZ~vD~#I+ZDvD~,SANN;vd
{DD~#
*mwND~ErfrgN7#Z,S=vTODD~1qCZ{Da{,TB>}
T=V=(9C}vD~,dP;v}7,m;v;}7#Z;V=((}7D=
()Z,SD~1zIevG<#;}7D=(zI 15 vG<#=V=((;D;,
GZ~vMZ}vD~DNrDdK#TZw,S,Query TZ08(D~!q1A;
O8>D3r,SD~,x;GT,SbT8>D3r#
}7D=(:
=h 1:,S0=vD~ A M B#
=h 2:+D~ AB ,SAD~ C#
;}7D=(:
Query V=v=h4PD~,S:
=h 2:+D~ AC ,SA B#
\.,KJb;0l9C,S`M 1(%dD)Di/";P=vD~Di/r_Z?
v,SbTP9CwD~Di/#Z>>}P,8(D~D_-NrG CUSTOMER"
PURCHASE M ITEM,+ PURCHASE EZPd,r*|G CUSTOMER M ITEM D~.dD
,S#bv_-Nr2G}7DNr#
Z Query/400 i/PT>yP,SbT
Z0T>D~!q1A;O404P1|1(N{ Z433D:T>Z Query/4000T>
D~!q1A;O!qD+?D~;),+T>0T>,SbT1A;#KA;OD
E"v)N<;K&;\|DdPNN;n#(BfDA;T>3)y>E"#)
T>,SbT
,S`M . . . . . . . . : %dDG<
VN bT VN
A.NAME EQ B.NAME
W?
404P1|Lx#
F12=!{
0T>,SbT1A;T>:
Z Query/400 i/P&m*'DVN
1i/9CDD~!qPD(fVN(4(fP9CDVN)SCD~!qP*'
1,+T>0SD~(e*'DVN1A;#Si/P-4!qDD~P*'DVN
a<BZKPi/1vmr_a)msDa{#}g,}*dv!qK|G.b,I
\Q+dCZ(ea{VNrCZ!qrErG<#
SD~(e*'DVN
i/ . . . . . . : QRY1 !n . . . . . . : |D
b . . . . . . : LIB1
D~ . . . . . . : FILEA
b . . . . . . : LIBA
q= . . . . . . : FMT1
D~ ID . . . . : T01
TBVNI\QCZi/P,R$F
ZKD~(eP,+;PR=#
VN
NAME
ADDR
PHONE
SERIAL#
404P1|LxV4i/(e#
F12=!{
TZfZ*'VND?vD~!q,KA;AYT>;N#Zb6=*'VN.s,
zI\*4 F12(!{)T\b4=*'VND=SA;#r_,g{z#{i4d{
D~!qPDvI\P*'DVN,9C04P1|p;i4?vA;#zI\9#
{5XA0;A;"4 F5((f)KPi/,i4*'DVNgN0l(f#
r_Si/(eP9C.&}%b)VN,r_Xk!q|,G)VND;,D~r
q=#r_,IKv Query,lib)D~rq=>m#ZzZ;N*<|DrT>i
/1g{vVKA;,mwTi/4(r_ON|DT4I\|DKb)D~rq=
PD3)Z]#}g,I\SG<q=(eP>}K;vr`vVN,r_I\+ IDDU
(eDD~4SAK3vJd(e,xVZQO*4Sr_4SA;,D(e#
Z Query/400 i/DD~!q}LZd&m*'DVN
Z|Di/,r(eQ-8(KD~!qDBi/1,Z0(ei/1A;O!qK
8(D~!q!n#;s,Z08(D~!q1A;O,z!qK;vD~rq=,
|;PZ;v!qy|,D+?(fVN#rK,KA;T>v*'DVN#
g{!qZ5XA08(D~!q1A;1404P1|,T7O#{9C10DD
~!q,Query +TVZZKi/PDD~!q!I\`X9CdD~"q=MVNE
"#|S 3)(e=h(g!q"ErVNM!qErVN)Di/(eP}%yP
*'DVN#Z!qCZ Query r DB2 UDB AS/400 fLrD_-D~x;8(N
NErVN1,I\"z;I$bDa{#}g,zI\U;=omD~D_-S
<#
Z(eKa{VNs,ITsfZZ!(D~PDNNd{VN;y9C|#IT+
a{VN|,ZdvP,IT9C|4(em;va{VN,IT+|w*ErVN
9C,HH#
Z(ea{VN1,A;B_DPm(}T>*i/!(DD~PDVN{4oz
z#g{zkNDXZ?vVNDd{E",ghvD>"$HM!};},I9C
F11 |(T>D>)Z`PPmM%PPm.dP;#1zZ7(a{VN{r4(m
o=1,KE"GG#PCD#3|+T>yPICDVN,;NT>DvVN#P
X9C F11 |Dji,N{Z213D:9C F11 T>PX Query/400 i/Dd{E
";#
Zs`}ivB,z(eDa{VNaT>Zi/dvP,+!q|Gw*dvGI
!D,r*P;)a{VNvh*w*qCnsa{DPd=h#}g,zI\v*
!qG<x(e;va{VN,x;#{Ca{VNvVZ(fP#
Z Query/400 P4(a{VN
g{zZ0(ei/1A;D(ea{VN!nTdk 1,+vV0(ea{VN1A
;#9C0(ea{VN1A;I4(i/yhDa{VN#(BfDA;ZW?P>
K;)y>VN#)
9CVN{r#?MKc{dk(e,404P1|#
Kc{:+"-"*"/"SUBSTR"||"DATE...
*(ea{VN,Z0(ea{VN1A;DVNPPdk;v{F,*a{VN8
((;D{F#;\8(Z!(D~PfZDVN{—ZA;B_DPmT>Kb)
VN{#*/@VNPm,+bjCZA;DPm?V"9C-3|#(P;v%V8
>{\GvVZPmDRB=,|f_zZPmPy&D;C#PP...Db<GZ10
yT>DnDs_,2I\G0_,9Pd{n# W? Db<GzQ=KPmDn
s,+Z10T>DG)n.0I\9Pd{n# )9C F19 |(B;i)+Pm(;
=B;v_-VNiD*<(19C F19 1bjI&ZNN;C) (Z;iG!(DV
#
N,g{PD0;Z~iGErVN,g{PD0#g{^!(VN,rVN(}D
~Vi,Z?vD~iP,4UVNZD~(ePvVDNr4P>VN# )
zIT*NN;va{VN8(;vPjb#g{+a>#t*UW,r+a{VN
{Cwa{VN(eDPjb#
Query/400 a{VN{
IZ Query Da{VN{k}]bVN{`F,ITy]BP8>44(|G:
v {FDWV{Xk*V8V{(A A Z"$"# r @),"T#`DV{9C;`Z
9 vDV8}VV{(A A Z"0 A 9"$"#"[@0000] r _)#{FP;\9C
Uq#
dk;v*a{VN4(Z{5Dmo=#
Query/400 }Vmo=
**i/(e}Va{VN(4,|,}VDa{VN),h*q-4(}Vmo=
Dfr#a{VND}Vmo=I%@|,BPwnrb)nDiO:
v }VVN{(|,}VDVND{F)#I9CA;B_PvD}VVN{(}VV
NZ Len M Dec PPT>}V)T0H0(eD}Va{VND{F#}g,I+
=v}VVN`K,+\FEZa{VN AMOUNT P:
AMOUNT = QUANTITY * PRICE
v }V#?(NN}V,g 4 r −12.5)#9C}V#?DfrgB:
– \$H;\,} 31 ;#
(TZ%+H!c#?,\$H;\,} 9 ;#TZ++
H!c#?,\$H;\,} 17 ;#
)b|(.xF!}csR=_D};,+
;|(.xF!}c#yP};<ITZ.xF!}cR_#
– 9C}7D!}Vt{#4 F17 T>Xk9CD!}Vt{(N{ Z223D:Z
Query/400 PT>#?q=;)#
– ;*9CuR{E(Hg $5000),2;*9C';Vt{(Hg 5,000)#
v }V/}#VALUE /}5XGUDZ;v5#N{ Z653D:VALUE Query/400 /
};#
VN AMOUNT Dd{}Vmo=>}gB:
QUANTITY
5
5 + 6
5 + QUANTITY
k"b}Vmo=Da{,HdG|,K}KcD}Vmo=,I\;XOrak,
b!vZzZ08(&m!n1A;O8(DZ](N{Z14B 8( Query/400 &m
!n)#g{;c},i/r;\KP#
Query/400 V{mo=
**i/(eV{a{VN(4,|, SBCS r DBCS V{Da{VN),h*q-
4(V{mo=Dfr#a{VNDV{mo=I%@|,BPwnrb)nDi
O:
v V{VN{(|, SBCS r DBCS V{DVN{)#zIT9CZA;B_PvD
SBCS r DBCS V{VND{F(Z Dec PP,SBCS V{VN_PUWr V(g
{Gd$),(;= DBCS VN_P J,*E= DBCS VN_P O,q;= DBCS
VN_P E,x<N DBCS VN_P G)T0H0(eD SBCS r DBCS V{a
{VND{F#
Query/400 "CKc
V{mo=I|(;vr`v"CKc#"CKcXkCTBq=8(:
ÊÊ value-1 || value-2 ÊÍ
g{NNVNIU,a{VN2IU#g{"CP9CDNNVN*U5,a{mo
=2*U5#
Query/400 V{/}
V{mo=I|(V{/} SUBSTR"DIGITS M VALUE#
SUBSTR Query/400 /}
SUBSTR /}5XV{5D;?V#q=gB:
ÊÊ SUBSTR ( value , offset ) ÊÍ
,length
v Value GV{VN(|(Q(eDa{VN)"V{mo=rV{#?D{F#|I
TG SBCS r DBCS VN"SBCS #?"*E= DBCS #?"(;= DBCS #?
r<N DBCS #?#Z(;= DBCS rq;= DBCS VNOD SUBSTR Kcz
z SBCS V{}]`M#Z*E= DBCS VNOD SUBSTR Kczz*E= DBCS
}]`M#Z<N DBCS VNOD SUBSTR Kczz<N DBCS }]`M#g{
Value GVN,ra{D CCSID *CVND CCSID#g{ Value G#?,ra{
D CCSID *4(i/DC'(r_|Di/DC',g{-< CCSID G 65535)
Dw5`X CCSID#
v Offset GVNrV{#?ZDp<V{;C#;F2ICmo=m>#
v Length G9IS.DV{}#$HICmo=m>#;h*8($H#g{48(,
a{S.GS Offset =axD{vVNrV{#?#
ZS.*X.dXk9C:E;:EsJmPUq#g{Z9C:Ew*.xF!}
cDzR.d"Mi/,*Z:EsS;UqTV*;FM$H#
DIGITS /}5X}5DV{m>#q=gB:
ÊÊ DIGITS ( expression ) ÊÍ
a{G}VV{.,m>Td?DxT5,kdjH^X#a{;|({Er.xF
!}c#a{|(NNXhD0<c,9V{.D$Ho=:
v 5,g{Td?*;x!};D!~xF5#
v 10,g{Td?*;x!};Ds~xF5#
v Td?D$H,g{5Gx!};D9u"x;r~xFVN#
>}:
DIGITS(JOBCODE)
VALUE Query/400 /}
VALUE /}ICZNN`MDmo=P:V{"}V"UZ"1dr1dAG#
VALUE /} VALUE(x,y) 5XGUDZ;vTd?#Td?48(DNrs5#Td
?XkGf]D;V{.Td?k}V;f]#X GVN,Y ITGVN"5r;.V
Nr5#X ITGNN}]`M,"RI\GH0(eDa{VNrNND~VN#
v1yPTd?yIT*U51,a{EITGU5;v1yPTd?*U51,a
{EGU5#;li X 547(|Iq*U#
>}:
VALUE(commission, 0)
g{ commission *U5,ra{G 0#
": g{Z9C:Ew*.xF!}cDzR.d"Mi/,*Z?v:EsS;U
qTV*;.}5PD?v5#
g{h*,!(DTd?a*;*a{DtT#a{DtT4gBy>7(:
v g{Td?GUZ,ra{*UZ#g{Td?G1d,ra{*1d#g{Td
?G1dAG,ra{*1dAG#
v g{Td?G#?,ra{D CCSID *Td?"Cs&zzD CCSID#
v g{yPTd?<G($,ra{*($ n,dP n Gn$DTd?D$H#
v g{PNN;vTd?Gd$,a{*_P$HtT n Dd$,dP n G_Pns
$HtTDTd?D$HtT#
v g{Td?G}V,ra{D}]`M*Td?`Ss&zzD}]`M#
v g{yPTd?y*(;= DBCS,ra{*(;= DBCS#
v g{Td?G(!D DBCS DNN;ViO,ra{**E= DBCS#
v g{Td?G<N DBCS,ra{*<N DBCS#
VARCHAR Query/400 /}
VARCHAR /}5XV{.Dd$V{.m>#
ÊÊ VARCHAR ( expression ) ÊÍ
, length
DEFAULT , ccsid
Z~vTd?g{8(* length,r*a{d$V{.D$HtT#g{Z;vTd?
;IU,Z~vTd?XkG 1 A 32740 .dD;v{#};g{Z;vTd?IU,
Z~vTd?XkG 1 A 32739 .dD;v{#}#g{Z;vTd?GlO}],
rZ~vTd?;\!Z 4#g{48(Z~vTd?r8(K DEFAULT,4gBy
>7(a{$H,dP n GZ;vTd?D$HtT#
v g{Z;vTd?G SBCS rlO}],ra{$H* n#
v g{Z;vTd?G UCS2 <N}]Ra{G SBCS }],ra{$H* n#
v g{Z;vTd?G UCS2 <N}]Ra{GlO}],ra{$H* (2.5*(n-1)) +
4#
a{}]`MG VARCHAR#
g{48( ccsid(Z}vTd?):
v g{Z;vTd?G SBCS V{,ra{* SBCS V{#a{D CCSID kZ;v
Td?D CCSID `,#
v g{Z;vTd?GlOM(*E= DBCS)"(;= DBCS rq;= DBCS,r
a{GlOM#a{D CCSID kZ;vTd?D CCSID `,#
g{8(K ccsid:
v a{k8(D CCSID `X#g{ ccsid G SBCS CCSID,ra{`MG SBCS V
{#g{ ccsid GlOD CCSID,ra{`MGlOV{#
v a{D CCSID G ccsid#
g{Z;vTd?IT*U5,ra{2IT*U5;g{Z;vTd?*U5,r
a{*U5#
VARGRAPHIC Query/400 /}
VARGRAPHIC j?/}a)xPTB*;D=(:
v V{}](SBCS MlO)*;*<N DBCS#
v V{}](SBCS MlO)*;*<N UCS2#
v <N UCS2 *;*<N UCS2#
v <N DBCS *;*<N UCS2#
ÊÊ VARGRAPHIC ( expression ) ÊÍ
,
length DEFAULT ,ccsid
VARGRAPHIC /}5XV{.mo=D<NV{.m>#
Z;vTd?XkGV{.mo=,;\G;}]#
Z~vTd?g{8(* length,r*a{D$HtT,xRg{Z;vTd?;IU,
Z~vTd?XkG 1 A 16370 .dD;v{#};g{Z;vTd?IU,Z~v
Td?XkG 1 A 16369 .dD;v{#}#
g{48(Z~vTd?r8(K DEFAULT,ra{D$HtTkZ;vTd?D$
HtT`,#
ZBPfrP,S m>BPdP;n:
v g{V{.mo=Gb?`k#=P|,}]Dwd?,r S GZ>z`k#=P*
;}]sDmo=Da{#
v g{V{.mo=G>z`k#=PD}],r S GCV{.mo=#
K/}Da{Gd$<NV{.#g{mo=IT*U5,ra{2IT*U5#g
{mo=*U5,ra{*U5#g{mo=GUV{.rG EBCDIC V{.
X’0E0F’,ra{*UV{.#
a{D5J$H!vZTd?PDV{}#Td?D?vV{7(a{D;vV{#
^[ CCSID gN,Td?PD?v+VZzkc;S*;v DBCS V{,Td?PD
?v%VZzkc;S*;v SBCS V{,EBCDIC lO}]F;k X’0E’ M X’0F’
}b#
v g{Td?PZ n vV{G DBCS V{,ra{PDZ n vV{MGC DBCS V
{#
v g{Td?PZ n vV{G_PH' DBCS V{D SBCS V{,ra{PDZ n
vV{MGCH'D DBCS V{#
v g{Td?PZ n vV{G;PH' DBCS V{D SBCS V{,ra{PDZ n
vV{MG DBCS fzV{#
Query/400 PDUZ"1dM1dAGmo=
I+UZ"1dM1dAG}]`MM53ha{VN#a{VNDUZ"1dr1
dAGmo=I%@|,BPwnrb)nDiO:
v UZ"1dr1dAGVN{(|,UZ"1dr1dAG5DVND{F)
v V{#?(C2E}p4D SBCS r DBCS V{ — N{Z623D:Query/400 V
{mo=;BD>}Mfr#)
v UZ"1dM1dAG/}MKc(BPdP;vr`v/}McuKc):
+ (S()
−(u()
CHAR
CURRENT
VALUE
DATE
DAY
DAYS
V{#?CZUZ"1dr1dAGVNr/}P1ITm>UZ"1dr1dAG
5#|GITCZmo=P,"1wUZ"1dr1dAG4&m#}g,ISUZ
VNu%;vUZ#?#
a{VNDUZ"1dr1dAGmo=I%@|,BPwnrb)nDiO:
Query/400 UZ
UZmo=G;v}?V5(j"BMU),8(qo_oUzBD1dc,Kz(
;O*GT+* 01 jpz'#1j]6'G 0001 = 9999#B]6'G 1 A 12#U
6'G 1 A x,dP x G 28"29"30 r 31,!vZB]#
UZT;v}V*<,$HAY* 6 vV{#I|(2?Uq#ISBMU?VPT%
0<c#JmDP'UZq=P>Zm1P#?vq=I{Fj6,|(`XDu4
(I CHAR /}9C)MC(>}#
m 1. UZ}]`MDm>q=
q={ u4 UZq= >}
zJj</i/ ISO yyyy-mm-dd 1987-10-12
IBM USA j< USA mm/dd/yyyy 10/12/1987
IBM 7^j< EUR dd.mm.yyyy 12.10.1987
U>$5j<+* JIS yyyy-mm-dd 1987-10-12
AS/400 q= DMY DD/MM/YY 12/10/87
YMD YY/MM/DD 87/12/10
MDY MM/DD/YY 12/10/87
JUL YYDDD 87/344
YYYYDDD 1987/344
UZVt{ITGdc (.)"
1\ (/)":E (,)"F[E
(-),TZ AS/400 UZq=
}]`M,2ITGU
q#
Query/400 1d
1dmo=G;v}?V5(!1"VSMk),9C 24 !11Sq=8(Uz1d#
!1D6'G 0 A 24,xVSMkD6'G 0 A 59#g{!1G 24,rVSMk
D5w<*c#
1d}]`MT;v}V*<,$HAY* 4 vV{#I|(2?Uq;IS1dD!
1?VPT%0<c,"I{vT%k#g{!qT%k,rO*G 0 k#rK,13.30
`1Z 13.30.00#
1dDP'q=P>Zm2P#?vq=I{Fj6,|(`XDu4(I CHAR /}
9C)MC(>}#
m 2. 1d}]`MDm>q=
q={ u4 1dq= >}
zJj</i/ ISO hh.mm.ss 13.30.05
IBM USA j< USA hh:mm am r pm 1:30 pm
IBM 7^j< EUR hh.mm.ss 13.30.05
U>$5j<+* JIS hh:mm:ss 13:30:05
AS/400 q= - HMS 13:30:05
Query/400 1dAG
1dAGmo=G;v_?V5(j"B"U"!1"VS"kM"k),8(0f
(eDUZM1d#1d?V|("kD!}5w#
1dAG}]`MT;v}V*<,$HAY* 16 vV{#1dAGDj{m>q=
* yyyy-mm-dd-hh.mm.ss.nnnnnn#I|(2?Uq#IS1dAGDB"UM!1?VP
T%0<c#IS"kPXO2?cr{vT%b)c#;X8("k#1dAG
yyy-mm-dd-hh.mm.ss GITS\D#g{!qT%"k?VDNN}V,rO*;T%
D?V* 0#rK,1990-3-2-8.30.00.10 `1Z 1990-03-02-08.30.00.100000#
Z Query/400 PT>#?q=
0T>#?q=1A;T>g{8(UZr1d#?R;9C SAA q=,yXk9C
DUZr1dq=#
T>#?q=
i/ . . . . . . : QRY1 !n . . . . . . : CHANGE
b . . . . . . : QGPL CCSID . . . . . . : 65535
9C SAA q=dkUZr1d#?,r9CBP5
hvDq=#
9CT>D!}Vt{#
i/(e5
UZq= . . . . . : *MDY
UZVt{ . . . . : /
1dq= . . . . . : *HMS
1dVt{ . . . . : :
!}Vt{ . . . . : .
404P1|Lx#
F12=!{
1z4PBPYw1vV0T>#?q=1A;:
v S09Ci/1A;|Di/,"Z AS/400 q=(;G*zDw58(DUZr1
dq=)Di/(eP8(KAY;vUZr1d#?#
v S09Ci/1A;T>i/,RUZr1dDw5q=ki/(eP8(D AS/400
UZr1dq=#?;,#
v 9C RUNQRY |nDKPZG<!q!n,RUZr1dDw5q=ki/(eP
8(D AS/400 UZr1dq=#?;,#
v Z QRYRUN }LP9CKPZG<!q!n,RUZr1dDw5q=ki/(e
P8(D AS/400 UZr1dq=#?;,#
Query/400 PDUZ"1dM1dAGcuKc
ITUZ"1dM1dAG54PS(Mu(Kc,T7(a{VN5#
": g{S(Yw}GUZ"1dr1dAG5,m;vYw}XkGVx1d#
BPfrJCZUZ"1dM1dAGS(:
v g{;vYw}GUZ,m;vYw}XkGUZVx1drj"BrUDjGV
x1d#
v g{;vYw}G1d,m;vYw}XkG1dVx1dr!1"VSrkDj
GVx1d#
v g{;vYw}G1dAG,m;vYw}XkGVx1d#NNVx1d`M<
GP'D#
u(frkS(fr;,,r*;\SVx1dPu%UZ"1dr1dAG5#x
R,+=vUZ"1dr1dAG5`ukSUZ"1dr1dAG5Pu%Vx1
d;,#
BPfrJCZUZ"1dM1dAGu(:
v g{Z;vYw}GUZ,Z~vYw}XkG:
– UZ
– UZVx1d
– UZDV{m>
– j"BrUDjGVx1d
v g{Z~vYw}GUZ,Z;vYw}XkG:
– UZ
– UZDV{m>
v g{Z;vYw}G1d,Z~vYw}XkG:
– 1d
– 1dVx1d
– 1dDV{m>
– !1"VSrkDjGVx1d
v g{Z~vYw}G1d,Z;vYw}XkG:
– 1d
– 1dDV{m>
v g{Z;vYw}G1dAG,Z~vYw}XkG:
– 1dAG
– 1dAGDV{m>
Query/400 PDUZcuKc
Iu%UZ"vSru!UZ#
Z Query/400 Pu%UZ
S;vUZ (DATE1) Pu%m;vUZ (DATE2) Da{GUZVx1d,|8(=
vUZ.dDj"BMUD}?#a{D}]`M*9u.xF}V#g{ DATE1 s
ZrHZ DATE2,rS DATE1 Pu% DATE2#+G,g{ DATE1 !Z DATE2,
rS DATE2 Pu% DATE1,a{D{E*:#TBLr5whvZKc RESULT =
DATE1 - DATE2 Pf0D=h#
If DAY(DATE2) < = DAY(DATE1)
then DAY(RESULT) = DAY(DATE1) - DAY(DATE2).
Z Query/400 PvSMu!UZ
+Vx1dkUZ`SrSUZPu%Vx1dDa{TGUZ#|XkZ 0001 j 1
B 1 U= 9999 j 12 B 31 U.d,R|(b=U#g{SOru%jVx1d,
;0lUZPDj?V#
g{SOru%BVx1d,;0lBMj#U?V;d,}Ga{^'(}g,9 B
31 U)#
SOru%UVx1d0lU?V,2I\0lBMj#
UZVx1d(}}r:})IkUZ`SrSUZPu%#a{GvSru!K8
(Dj"BMU}?DUZ#
1+Vx1dmSAUZ1,mS;vB=8(UZ,da{G;vBsD`,U
Z, }G CUZ;fZ#TZbViv,+CUZhC*B;vBDns;l#}
g, 1 B 28 US;vB4C 2 B 28 U#+ 1 B 29"30 r 31 US;vBC= 2
B 28 UrrjD 2 B 29 U#
Z Query/400 P+}VVN*;*UZVN
TBG+|,UZD}VVN*;*UZ}]`MVND;V==#
4(BPa{VN:
CHARDATE DIGITS(NUMDATE)
CHARDAT2 SUBSTR(CHARDATE,5,2)||'/'||
SUBSTR(CHARDATE,1,2)||'/'||
SUBSTR(CHARDATE,3,2)
NEWDATE DATE(CHARDAT2)
Z Query/400 P9C}VUZ
!(DD~
ID D~ b I1 G<q=
T01 MMDDYY QTEMP MMDDYY MMDDYY
a{VN
{F mo= Pjb Len Dec
* MM (mmddyy/10000) 2 0
* DD (mmddyy/100 - (mm * 100)) 2 0
* YY (mmddyy - (mm*10000 + dd*100)) 2 0
* YYMMDD (yy*10000)+(mm*100)+dd 6 0
* * * * * * * * * * i/r!ax * * * * * * * * * *
i/ . . . . . . . . . . . . . . . . . YYMMDD01
b . . . . . . . . . . . . . . . . . CRP
i/D> . . . . . . . . . . . . . . . YYMMDD = MMDDYY
{m3r . . . . . . . . . . . . . . . EBCDIC
&m!n
* 9Cak . . . . . . . . . . . . . . q
vT.xF}]ms . . . . . . . . . q(1!5)
Xbiv
*** Z1!ivB!qyPG< ***
!(DD~
ID D~ b I1 G<q=
T01 YYMMDD QGPL JUNK YYMMDD
a{VN
{F mo= Pjb Len Dec
* YY (yymmdd/10000) 2 0
* MM (yymmdd/100 - (yy * 100)) 2 0
* DD (yymmdd - (yy*10000 + mm*100)) 2 0
* MMDDYY (mm*10000)+(dd*100)+yy 6 0
* * * * * * * * * * i/r!ax * * * * * * * * * *
MM DD YY MMDDYY YYMMDD
08 31 90 083190 900831
* * * * * * (fax * * * * * *
Query/400 PD1dcuKc
ITu%1d"vSru!1d#S;v1d (TIME1) Pu%m;v1d (TIME2) D
a{G1dVx1d,|8(=v1d.dD!1"VSMkD}?#
Z Query/400 PvSMu!1d
+Vx1dk1d`SrS1dPu%Vx1dDa{TG1d#g{SOru%!
1Vx1d,;0l1dPD!1?V#VSMk#V;d#g{SOru%VSV
x1d,Zh*0lDivB;0lVSM!1#SOru%kVx1d0lk?
V,2I\0lVSM!1#
Query/400 PD1dAGcuKc
ITu%1dAG"vSru!1dAG#+Vx1dk1dAG`SrS1dAG
Pu%Vx1dDa{TG1dAG#UZM1dcukH0(eD`,,;,DG
!1DOgrBgax;=a{DUZ?VP#
Query/400 PDjGVx1d
jGVx1d_PX(D1d%;,m>*;v}V,szBPdP;vVx1dX
|V:
YEAR, YEARS
MONTH, MONTHS
DAY, DAYS
HOUR, HOURS
MINUTE, MINUTES
SECOND, SECONDS
MICROSECOND, MICROSECONDS
v1m;vYw}D`M*UZ"1dr1dAG1,EI9CjGVx1dw*Y
w}#}g:
HIREDATE + 2 MONTHS + 14 DAYS
GP'Dmo=#
HIREDATE + (2 MONTHS + 14 DAYS)
Query/400 PDUZVx1d
| Query/400 PD1dVx1d
Query/400 PD1dAGVx1d
1dAGVx1dm>j"B"U"!1"VS"kM"kD}?,m>*}V
DECIMAL (20, 6)#*KC=}7bM,K}VDq=Xk* yyyymmddhhMMsszzzzzz,
dP yyyy"mm"dd"hh" MM"ss M zzzzzz Vpm>j"B"U"!1"VS"kM
"kD}?#S;v1dAG5Pu%m;v1dAG5Da{*1dAGVx1
d#
Query/400 PDUZ"1dM1dAG/}
ITUZ"1dM1dAG54PBP/}:
K/}Da{G($V{#?#g{Z;vTd?IT*U5,ra{2IT*U
5#g{Z;vTd?*U5,ra{*U5#d{fr!vZZ;vTd?D}]
`M,gBy>:
v g{Z;vTd?GUZ:
– &8(q=,HdGZTBivB:
- i/+I;,DC'9C#
- i/+"M=m;(zw#
- UZ_P=;}Dj]q=tT,d5I\;Z6' 1940 A 2039 Z#9CK
/}i4D;} SAA j]q=DUZ#
– g{T%Z~vTd?,V{.q=*w5q=#
– a{*Z~vTd?8(Dq=m>DUZDV{.m>#
– g{8(q=,a{$H* 10;g{;P8(q=,a{$H* 8#
v g{Z;vTd?G1d:
– g{T%Z~vTd?,V{.q=*w5q=#
– a{*Z~vTd?8(Dq=m>D1dDV{.m>#
– a{$H* 8#
v g{Z;vTd?G1dAG:
– Z~vTd?;JC,R;\8(#
– a{*1dAGDV{.m>#
– a{$H* 26#
>}:
CHAR(HIREDATE,USA)
DATE Query/400 /}
DATE /}S;v55XUZ#q=gB:
ÊÊ DATE ( expression ) ÊÍ
Td?XkG:
v 1dAG
v UZ
v !Z 3 652 059 D}}rmo=
K/}Da{GUZ#g{Td?IT*U5,ra{2IT*U5#g{Td?*
U5,ra{*U5#
v g{Td?G1dAG,ra{*1dAGDUZ?V#
v g{Td?GUZ,ra{*CUZ#
v g{Td?G}V,ra{* 0001 j 1 B 1 U.sD n−1 lDUZ#
v g{Td?GV{5,ra{*V{.m>DUZ#
>}:
DATE(STRDATE)
DAY Query/400 /}
DAY /}5X;v5DU?V#q=gB:
ÊÊ DAY ( expression ) ÊÍ
Td?XkG:
v UZ
v 1dAG
v UZVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?GUZr1dAG,ra{*C5DU?V,|G5Z 1 M 31 .dD~x
FVN#
g{Td?GUZVx1dr1dAGVx1d,ra{*C5DU?V,|G5Z -99
M 99 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
RESULT(DAY) = DAY(HIREDATE)
Td?XkG:
v UZ
v 1dAG
v UZDP'V{m>
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
>}:
RESULT(DAY) = DAYS(CURRDATE) - DAYS(HIREDATE)
RESULT(DAY) HZ;v},|m>b=vUZ.dDl}#
HOUR Query/400 /}
HOUR /}5X;v5D!1?V#q=gB:
ÊÊ HOUR ( expression ) ÊÍ
Td?XkG:
v 1d
v 1dAG
v 1dVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?G1dr1dAG,ra{*C5D!1?V,|G5Z 0 M 24 .dD~
xFVN#
g{Td?G1dVx1dr1dAGVx1d,ra{*C5D!1?V,|G5
Z -99 M 99 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
HOUR(TIME) where time = 12:11:22
Td?XkG:
v 1dAG
v 1dAGVx1d
v 1dAGDP'V{m>
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?G1dAG,ra{*C1dAGD"k?V,|G5Z 0 M 999999 .d
D~xFVN#
g{Td?G1dAGVx1d,ra{*C1dAGVx1dD"k?V,|G5
Z -999999 M 999999 .dD~xFVN#
>}:
MICROSECOND(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
MINUTE Query/400 /}
MINUTE /}5X;v5DVS?V#q=gB:
ÊÊ MINUTE ( expression ) ÊÍ
Td?XkG:
v 1d
v 1dAG
v 1dVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?G1dVx1dr1dAGVx1d,ra{*C5DVS?V,|G5
Z -99 M 99 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
MINUTE(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
Td?XkG:
v UZ
v 1dAG
v UZVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?GUZVx1dr1dAGVx1d,ra{*C5DB?V,|G5Z -99
M 99 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
MONTH(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
SECOND Query/400 /}
SECOND /}5X;v5Dk?V#q=gB:
ÊÊ SECOND ( expression ) ÊÍ
Td?XkG:
v 1d
v 1dAG
v 1dVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?G1dr1dAG,ra{*C5Dk?V,|G5Z 0 M 59 .dD~x
FVN#
g{Td?G1dVx1dr1dAGVx1d,ra{*C5Dk?V,|G5Z -99
M 99 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
SECOND(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
Td?XkG:
v 1d
v 1dAG
v 1dDP'V{m>
K/}Da{G1d5#g{Td?IT*U5,ra{2IT*U5#g{Td?
*U5,ra{*U5#
v g{Td?G1dAG,ra{*1dAGD1d?V#
v g{Td?G1d,ra{*C1d#
v g{Td?GV{.,ra{*V{.m>D1d#
>}:
TIME(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
TIMESTAMP Query/400 /}
TIMESTAMP /}S;v5r;T55X1dAG#q=gB:
ÊÊ TIMESTAMP ( expression ) ÊÍ
expression
Td?Dfr!vZGq8(Z~vTd?#
v g{v8(;vTd?,|XkG:
– 1dAG
– 1dAGDP'V{m>
– $H* 14 DV{.
K/}Da{G1dAG#g{NN;vTd?IT*U5,ra{2IT*U5#
g{NN;vTd?*U5,ra{*U5#
g{8(=vTd?,ra{*1dAG,|DUZIZ;vTd?8(,1dIZ
~vTd?8(#1dAGD"k?V*c#
>}:
RESULT(x) = TIMESTAMP(DATEFRNK,TIMEFRNK)
YEAR Query/400 /}
YEAR /}5X;v5Dj?VD}Vm>#q=gB:
ÊÊ YEAR ( expression ) ÊÍ
Td?XkG:
v UZ
v 1dAG
v UZVx1d
v 1dAGVx1d
K/}Da{G~xFVN#g{Td?IT*U5,ra{2IT*U5#g{T
d?*U5,ra{*U5#
g{Td?GUZVx1dr1dAGVx1d,ra{*C5Dj?V,|G5Z
-9999 M 9999 .dD~xFVN#Gca{kTd?_P`,D{E#
>}:
YEAR(TIMESTAMP) where TIMESTAMP = 1991-10-22-12.15.23.123456
Query/400 PDd{UZ"1dM1dAG/}
yZ531S,k DATE"TIME"TIMESTAMP r TIMEZONE ;p9CD CURRENT
/}5Xk9CD/}T&D10535#9C TIMEZONE /}I+>X1d5aW
X*;*qV~Nj<1d (GMT),4S>X1d5Pu% CURRENT(TIMEZONE)#
g{zDw5UZq=ki/P9CDq=;,,Query/400 +9Cw5UZq=#g
{9C CURRENT(DATE) w*8VVN,1w5Mi/UZq=;,1I\qCbb
Da{#
>}:
CURDAT = CURRENT(DATE)
CURTSP = CURRENT(TIMESTAMP)
Z Query/400 P*;}]bD~dvDUZ
*+UZVN*;*kdkD~;,Dq=,Xk9C DDS b?(edvD~,*d
vUZVN8(UZq=#K*;T/xP#
Z Query/400 P*;A;rr!zdvDUZ
zIT9CUZ/}+dkUZVN*;*m;Vq=#>} 1 M 2 T>+UZVN
S MMDDYY q=*;* YYDDD q=D=V=(#>} 3 M 4 T>S YYDDD
= MMDDYY q=D4r*;#
": *cZDA,+`vAfS<O"*%vA;<s#
(ea{VN
9CVN{"#?MKc{dk(e,404P1|#
Kc{:+"-"*"/"SUBSTR"||"DATE...
YYDDD_____
YY_||_'/'_||_DDD_________________ ____________________ _____ __
_________________________________ ____________________
_________________________________ ____________________
_______________________________________________________________________________
VN D> Len Dec
MMDDYY MMDDYY q=DUZVN 8 L
W?
F3=Kv F5=(f F9=ek F11=vT>{F
F12=!{ F13=<V F20=Xi F24=d{|
9CVN{"#?MKc{dk(e,404P1|#
Kc{:+"-"*"/"SUBSTR"||"DATE...
W?
_______________________________________________________________________________
VN D> Len Dec
MMDDYY MMDDYY q=DUZVN 8 L
W?
F3=Kv F5=(f F9=ek F11=vT>{F
F12=!{ F13=<V F20=Xi F24=d{|
Z>} 3 PKPi/D|n*:
CHGJOB DATFMT(*JUL)
RUNQRY QRY(YYDDD)
(ea{VN
9CVN{"#?MKc{dk(e,404P1|#
Kc{:+"-"*"/"SUBSTR"||"DATE...
W?
F3=Kv F5=(f F9=ek F11=vT>{F
F12=!{ F13=<V F20=Xi F24=d{|
| Z>} 4 PKPi/D|n*:
CHGJOB DATFMT(*MDY)
RUNQRY QRY(MMDDYY)
Z Query/400 P4(mo=D;c<GBn
TBG1z4(mo=1&9CD;);cfr:
v m>UZDV{#?9Ci/(ePf"DUZq=4s5#
v zDmo=ITP%v5,|2ITy]h*9C`vYw}MKc{,T<C
0(ea{VN1A;Oa)D}PUdP#
v g{a{VNI\P;c}rgvDa{,;*Z!qG<bTP9C|r+|C
wErVN#
v I4PBPdP;nYw4\b;c}:
– Z!qG<1,^[G(}!q/T%_-D~9G(}yZGa{VNDVN
DG<!qbT,;!q;a}p;c}DG<#
– g{a{VN(ePD;}}+\G*c,"TTmo=xPBP|D:
-<mo= ---> FIELD = P / X
FIELD = P / (X + S)
Query y]BP-r7(a{VND}]`M:
g{mo=PDZ;v5G}VVN{"}V#?(Hg}V 7 r −3.14)r5X
}5D/},ra{VN*}V#
g{9C SUBSTR /},G4g{5* SBCS"(;= DBCS rq;= DBCS,
ra{VN* SBCS V{VN#g{5**E= DBCS,ra{VN**E= DBCS
VN#g{5*<N DBCS,ra{VN*<N DBCS VN#($VNDS.IT
Gd$VNr($VN,b!vZzgN(e$HM;F#
g{mo=G#?"VNr/},ra{VND}]`M*#?"VNr/}5X
D5D}]`M#
g{9C"CKcR*"CDyP5<G(;= DBCS,ra{VNG(;=
DBCS#
g{9C"CKcR*"CDyP5<G<N DBCS,ra{VNG<N DBCS#
g{9C"CKcR*"CD;v5Gq;= DBCS,r_g{mo=|, SBCS M
(!D DBCS VNr#?DlON=,ra{VNG*E= DBCS#
g{+d$VNk($rd$VN"C,ra{Gd$VN#
g{"C=vr|`v($VN,ra{G($VN#
g{"C=v($ DBCS VN,ra{Gd$VN#
Query/400 PD$HM!};}
TZV{(SBCS M DBCS)"UZ"1dM1dAGa{VN,Xk+ Len M Dec
5#t*UW#g{Z(ea{VN14Z Len M Dec PP8(NNZ],Query +
7(a{VND$H#1 Query 7(b)51,Z|Dmo=1z*<GDBiM|
Y#g{k*@a{VND$H,4 F13 i4(f<V"Fc 9(}VVN)M X
(SBCS V{VN)D}?#g{9CJm DBCS DA;RP DBCS }],r4TB
`pF}:
+VZ J,m>(;= DBCS }]
+VZ O,m>*E= DBCS(lO)}]
+VZ E,m>q;= DBCS }]
+VZ G,m><N DBCS }]
TZUZ"1dr1dAGVN,i4a{VNP10UZ"1dr1dAGD$
H#
TZ}Va{VN,$HGVNPD\};#||(.xF!}csR=_D};,
+;|(.xF!}c#!}G.xF!}cR_D!};}#g{kT$Hdkz
T:D5,*@9bba{,&WHDAZ1263D:Query/400 (fPD$HM!}
;;MZ1963D:Query/400 PDa{VN$HM!};};#xR,&q-BPf
r:
v g{* Len 8(5,9Xk* Dec(!};})8(5#
v g{vSru! Dec PD5,G4 Len PD5&vSru!`,D?#xR,g{
z|D}Vmo=,TszI\h*|Db)5#
v g{+ Len M Dec #t*UW,Zmo=|D1 Query +|DK5#
": g{ku!VN$H,r*z;h*(fOT>DX(P},G4;&|D0(
ea{VN1A;ODVN$H#IT|D08((fPq=1A;ODVN$
H#g{zZ0(ea{VN1A;O8(VN$H,r}Vmo=Da{I\
;XOrak,b!vZzZ08(&m!n1A;O8(DZ]#
(ea{VN
9CVN{"#?MKc{dk(e,404P1|#
Kc{:+"-"*"/"SUBSTR"||"DATE...
W?
_________________________________________________________________________
VN
MONTHS
WEEKS
YEAR
W?
F3=Kv F5=(f F9=ek F11=T>D>
F12=!{ F13=<V F20=Xi F24=d{|
Z Query/400 PmSr}%a{VN
+a{VNmSAi/(e,*s+bj(;ZA;DOk?V,"9C F9 ek;i
UWDa{VN(eP#1zdk(eBDa{VNh*DE"s,b)E"ekZ
4 F9 1bjyZD;Cs#"bXkH(ea{VN,;sEI+|Cw4(m;v
a{VNDmo=D;?V#
;)+bj(;ZA;DOk?V,4B3|ILxT>Bf=vVN(e,1=z
=oPmPDnsGUW(e#4O3|T>0f=v(e,1=z=oPmW#
*}%3a{VN,>}0(ea{VN1A;OTCVNDyP}C0d(e#X
kSi/P}%yPd{X=vVDCVN,x Query axzAd{mo=ri/(e
Dd{?VPvVDCa{VN#
C Query/400 !q"ErVN
g{z4Z0(ei/1A;D0!q"ErVN1!nTdk 1,Query +Ti/P
a)Dn`0 500 vVN!q"Er#g{z!qDD~v|,;)\]WEk 132 P
(r!dvDj<mH)D!VN,Rz;ZudvD3r,C Query *z!q"Er
VNM\Pbe,9ITZ!1d#+GZi/Pv!(zh*DVNI\aZi/
KP1DxT\#
Zi/(eZd,g{zZ0(ei/1A;D!q"ErVN!nTdk 1,+T>
0!q"ErVN1A;#g{zDdKwb,VZ#{ Query *z!q"ErVN,
I4 F12(!{)5X=0;A;#(zZA;OydkD;P<;vT#)
Z Query/400 P!qVN"8(d3r
BfT>0!q"ErVN1A;,Z|DVNPPT>KM'wD~D;)y>V
N#
!q"ErVN
rE VN rE VN
____ ACCTNUMBER ____ PASTDUE
____ COMPANY ____ DATELASTPD
____ FIRSTNAME ____ CURRENTDAT
____ MIDDLEINIT ____ YEAR
____ LASTNAME ____ MONTH
____ STREETADDR
____ CITY
____ STATE
____ ZIPCODE
____ TELENUMBER
____ CRLIMIT
____ BALDUE
W?
;Pyq*9z!qDG)VNvVZdvP#g{z#{d`VN(s_^`ED
#Query +PmE
G)VN)vVZdvPRz;XpZb|GDEP,4 F21(+!)
P*TzQ-!(DVN*7,;s|*yP#`DVNT|GZPmPvVD3r
a)rE#(F21 v1z4(r|Di/(e1EIC#)
1zxP!qr|D3r"4K04P1|s,Query XBEPVNTkz8(D3r
`{O"T>E"0404P1|7O#1#g{zT!qM3rP=zb,YN4
04P1|axVN!q#g{zZ404P1|.0xPKNND|D,+YNT
>KE",zXkYN404P1|Lx#
b)VNZA;OTBPNrT>:
1. ZKA;O!qDyPVNT8(D3rT>#g{;P!qVN,!qw*Ki
/ErVNDVN(g{P)4|GZ0!qErVN1A;Oy3hDEH63
rWHPv#
(N{Z8B Z Query/400 P!qErVN#)
2. *Ki/(e+4!qDNNa{VN#
3. yPd{VNT|GZy!D~DG<q=(ePfZD3rT>#WHPv4S
Z;vD~P!qDVN,sz4SZ~vD~P!qDVN,@K`F#
TBG;vgN!q"ErVND>},|9CTM'wD~Di/zzv;vT>
DZ]M3r* COMPANY"ACCTNUMBER M PASTDUE D(f#
!q"ErVN
rE VN rE VN
2 ACCTNUMBER 3 PASTDUE
1 COMPANY ____ DATELASTPD
____ FIRSTNAME ____ CURRENTDAT
____ MIDDLEINIT ____ YEAR
____ LASTNAME ____ MONTH
____ STREETADDR
____ CITY
____ STATE
____ ZIPCODE
____ TELENUMBER
____ CRLIMIT
____ BALDUE
W?
rE VN rE VN
10 COMPANY ____ BALDUE
20 ACCTNUMBER ____ DATELASTPD
30 PASTDUE ____ CURRENTDAT
____ FIRSTNAME ____ YEAR
____ MIDDLEINIT ____ MONTH
____ LASTNAME
____ STREETADDR
____ CITY
____ STATE
____ ZIPCODE
____ TELENUMBER
____ CRLIMIT
W?
!q"ErVN
rE VN rE VN
10 COMPANY 130 BALDUE
20 ACCTNUMBER 140 DATELASTPD
30 PASTDUE 150 CURRENTDAT
40 FIRSTNAME 160 YEAR
50 MIDDLEINIT 170 MONTH
60 LASTNAME
70 STREETADDR
80 CITY
90 STATE
100 ZIPCODE
110 TELENUMBER
120 CRLIMIT
W?
xP!qDm;V=(GWH*z*!qDyPVN8(`,DrE(}g 1) #404
P1|,Query +yPG)VN<-=Pm%?#;szIT8(BDrE,4zyk
*D(fPvVDNrEPVN#1VN}`,^(T>Z%vA;O1,b;cM
XpPC#
Query ITZA;DPmxT>b)VNDd{E"#g{ZPmPvT>VN{Rz
4K F11,z+4=b)VNDhvD>"$HM!};}#PX9C F11 Dji,N
{Z213D:9C F11 T>PX Query/400 i/Dd{E";#2I+bjFA;v
VN"4 F23 4T>CVND$"M(g{PD0)(rT>(ea{VNDmo=) #
C Query/400 !qG<
g{z4Z0(ei/1A;D!qG<!nTdk 1,Zi/dvP+|(y!D~
PDyPG<#
Zi/(eZd,g{zZ0(ei/1A;D!qG<!nTdk 1,+T>0!q
G<1A;#g{zDdKwb,VZ#{ZdvP|(yPG<,IT4 F12(!
{)5X=0;A;#(zZKA;OydkD;P<;vT#
)
Z Query/400 P!qh*DG<
(#(f<GyZ_P3)+2cDG<,gvP>bfP1uDG)L7D(f#
(}4(HObT!qG<,9zIT8(G<Xk|,(r;|,)X(DE"—
T1uDbfL7*},zk*Z(fPv|(G)VP}?MZX(6pDL7#
K`(f(#H|,D~PyPG<D(f|Pbe"|WZ9C#
*!qG<,+;vr`vVN(|(a{VN)DZ]k;vr`v8(D5HO
4i4;vu~r_bTGq*f#}g,z*ZdvPT>yPU (LASTNAM) HZ
'Clarke' DK#
bT
|
VN | 5
| | |
| | |
LASTNAM EQ 'Clarke'
0!qG<1A;P>zIT9CDVN(|(a{VN)"*sz8(HO#KA
;T>ZBf,Z|DVNPPT>KM'wD~P;)Dy>VN#
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
": 5;\dkA;PDP$H^F#g{*C=|`Ud,LxAB;P#XkC
UqV*yP5#g{;v5;ZP2Rz*LxAB;P,XkZB;PC5
0fS;vUq#(}ZO;PD)2S;v DBCS FkV{"ZB;PDp<S
;v DBCS FvV{,IT+DBCS V{#?p*#
HO_8TByPn:
v *HODVN
v bT
v ;vr`v*kVNHOD5
0!qG<1A;;Na) 6 vdkP,TczdkHO#g{zh*|`DP,4B
3|qC|`DUWdkP#g{bj;ZNNdkPO(^[zGqdkKH
O),IT9C-3|4i4dkDyPHO#
Query/400 PDHOVN
*KxPbT,VNXk*BPdP;n:
v fZZy!D~PDVN#|ITGNNVN,|(4;z!q|,ZdvPDV
N#
v *Ki/(eDa{VN#
1zZHOP8(VN1,Xk4D~j6{"dc"ZPmD`v!(D~PvV
DNNVN{DNrhC#}g,g{VN ACCTNUMBER fZZ_PD~ ID T01 M T02
D=v!(D~P,rXk8( T01.ACCTNUMBER r T02.ACCTNUMBER#g{4|(D~
j6{,Query +^(*@SND~qCHObTyhDJE#IT4 F18(D~)i
4y!D~DPmMk?vD~`XDD~ ID#
VNMz*HOD5XkGf]D}]`M#BPGG<!qbTDP'HO:
v SBCS V{VNk:
SBCS V{
q;= DBCS
*E= DBCS
v q;= DBCS VNk:
SBCS V{
q;= DBCS
*E= DBCS
(;= DBCS
v *E= DBCS VNk:
SBCS V{
q;= DBCS
*E= DBCS
(;= DBCS
v (;= DBCS VNk:
q;= DBCS
*E= DBCS
(;= DBCS
v <N DBCS VNk:
<N DBCS
v <N UCS2 VNk:
<N UCS2
v }VVNk}VVN
v UZVNk:
SBCS V{
UZ
q;= DBCS
*E= DBCS
v 1dVNk:
SBCS V{
(#*?vHOv8(;v5#l#ivZZ993D:Query/400 PDHObT;PV
[#
Query/400 Pw*5DVN
g{+;VNw*59C(4A;OD5P),CVNIT*A;B_PmPDNN
VN#
9CVNw*5D;v>}G,g{z;kSM'wD~q!=Z`n(Z{* BALDUE
DVNP)sZdECnH(Z{* CRLIMIT DVNP)DG<#Z>>}P,zCV
N (BALDUE) k,y2GVND5 (CRLIMIT) HO#
HOVN;X_P`,$H,}VVN;X_P`,!};}#
Query/400 Pw*5DV{#?
#?PDV{ITGV8"}5rXbV{(g *"?"#"$"[@0000],Z;bVNP
I\R=b)V{)DNNiO#Xk9C2E}pV{#?,49|v|,}5#
9Xkj+4z#{Dq=4dks!4V8#XbV{B._ (_) MYVE (%) Z
CZ LIKE bT1_PX(D,e#
;\+}V#?C2E}p4#}V#?IT$o 1 A 31 ;#
;*Z}V#?Z9CuR{E(8>uR5)r';Vt{(8>}'"}Yr
H)#
": g{Z9C:Ew*!}Vt{DzR.d"Mi/,*Z?v:EsS;Uq
TVt SUBSTR /}PD;FM$H,"Z VALUE /}PPmZDw}5.d
2S;Uq#4 F17 T>Zi/P9CDV!}Vt{(N{Z223D:Z
Query/400 PT>#?q=;)#
Query/400 Pw*5DUZ"1d"1dAG#?
UZ"1dr1dAG#?kZ0(ea{VN1A;Oy9CD#?`,#N{Z6
83D:Query/400 PDUZ"1dM1dAGmo=;#4 F17 Ii4 AS/400 UZ
M1dq=kVt{JmD)n(N{Z223D:Z Query/400 PT>#?q=;)#
Query/400 PDU5
Query/400 PDHObT
zIT8(BPHObT:
bT 5w
EQ HZ#9CKbT7(VNDZ]Gqk5`H#
NE ;HZ#9CKbT7(VNDZ]Gqk5;`H#
GT sZ#9CKbT7(VNDZ]GqsZ5#
LT !Z#9CKbT7(VNDZ]Gq!Z5#
GE sZrHZ#9CKbT7(VNDZ]GqsZrHZ5#
LE !ZrHZ#9CKbT7(VNDZ]Gq!ZrHZ5#
RANGE
6'#9CKbT7(VNDZ]GqZz*58(D6'.Z#
LIST Pm#9CKbT7(VNDZ]GqHZPmPD;v5#
NLIST GPm#9CKbT7(VNDZ]Gq;HZPmPDNN5#
LIKE `F#9CKbT7(VNDZ]GqPk5`FD#=#
NLIKE ;`F#9CKbT7(VNDZ]GqPk5;`FD#=#
IS G#9CKbT7(VNGq*U5#(;P'D5G NULL r null#
ISNOT
;G#9CKbT7(VNDZ]Gq;GU5#
Query/400 PDUZ"1dr1dAGHO
UZ"1dr1dAG5ITk`,}]`MDm;v5rkC}]`MDV{m>
HO#yPDHO<G4jzNrxPD#1dck 0001 j 1 B 1 U=6,C1d
cD5M=s#
1d5k1d5DV{m>DHO\G|(k#g{V{m>vTKk,MY(*c
k#|, 24:00:00 D1dr1dAG5k 00:00:00 G;`,D#
9CHZM;HZbT47(VNDZ]kz8(D5G`H9G;H#
g{bTG EQ,v1VN|,k8(D5j+`,D}]1E!qG<#}g,g{
(;DHOG:
INTRAT EQ 18
g{bTG NE,v1VN|,k8(D5;`,D}]1E!qG<#}g,g{z
*!qVN NAME ;|,5 SMITH DG<,8(:
NAME NE 'SMITH'
9C IS M ISNOT bT47(NNVNDZ]Gq*U5#NNVN<IT9C IS r
ISNOT bT4kU5HO#IS M ISNOT D;)>}gB:
NAME IS NULL
9CsZM!ZbT47(VNDZ]GsZ"sZHZ"!Z"9G!ZHZ8(
D5#9C6'bT47(VNDZ];Z8(D5D6'.Z#}K9Cb)4b
T}5}]b,9ITbTV{}]#
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
9C LIST"NLIST bT47(VNDZ]GqkZ0!qG<1A;OD5PPyP
vD;v5`H#
zDPmXk|,AY=v5,|G^h4X(DNr#XkC2E+?vV{#?
}p4,1V{#?>m|,2E19C=v2E(N{:>} 2:Z Query/400 Pb
TPmPD5 (LIST NLIST);PD{F O’Grady)#
g{PmPDyP5Z;PE;B,;kZ5BfDB;POLx#g{;v5ax
Z3PD)2R9*ZB;POLxdkpD5,rXkZB;PD50fS;vU
q#DBCS V{#?IT(}ZO;Pns;PS;v DBCS FkV{"ZB;PZ
;PS;v DBCS FvV{4V*#
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, NLIST, LIKE, NLIKE, IS,ISNOT
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
Xk+bT#=C2E}p4;1bT#=>m|,;v2E1M9C=v2E#g
{bT#=I=v%@D2E (') iI,M+|1IGUV{.#
IT9C;)XbV{4m>VNPz;XDD;);C:
v B._V{ (_) m>x}C;CDV{,;bTCV{#?vB._V{!zVNP
D;vV{#
v YVH{E (%) m>x}yhDNb`V{T=oVN)2rB;v8(DV{#?
v % !zVNPDcvr|`vV{# (rK,z^hvvr*VNP 32 vV{$
x`4P 32 vV{$DbT#=#)
bT#=ITo=5JVND$H,+;\,}|#li#=$H1,Query ;+ % w
*V{F},x+Z#?ZD=v2E1I*;vV{#
ZA;O4gBy>dk|G:
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
Z Query/400 P9C`vHObT
1z9C`vHO1,h*Z AND/OR Pdk,S4f_ Query gN,S|G#=V
,S`M*:
v AND ,S
v OR ,S
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
m;VZHO.dD,SG OR;2MG,*9G<;!(,;vr`vHO(rHO
i)Xk*f#
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
g{4v4,TO>}`FZgBy>:
g{ AND M OR ,SDiO4p4Xp4S,zI\&1P8Xi4HOTKbGq
zIT9C|YD,S44P`,DG<!q#}g,TBG!qZ 1986 OR 1987 Z
dd=Z`nZ $900 A $1000 .dD Rhode Island (‘RI’) M'G<D=V=(#
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
4v4,K>}`FZgBy>:
(BALDUE RANGE 900,1000, AND STATE EQ 'RI' AND YEAR EQ 86)
OR
(BALDUE RANGE 900,1000 AND STATE EQ 'RI' AND YEAR EQ 87)
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT:EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
4v4,K>}`FZgBy>:
(BALDUE RANGE 900,1000 AND STATE EQ 'RI' AND YEAR LIST 86,87)
Z Query/400 PmSM}%HO
0!qG<1A;Da>?V;N;IT>yvHO#Zdkns;Ps,IT4B
3|4qCUWdkP#18(K`ZyvDHO1,IT4O3|i40;A;#
g{zT;HO|DKwb,k*SiP+|>},;h9CUq|r;P|+|>
}#g{zDdKwb,k*++?HO>},4 F12(!{)
#zZ0!qG<1A;
ydkDNNZ]<;vT#
g{z>}K;=PODZ],VZ;Zns;vICDUPORh*|`DP,I
T4 F20 XiUd#Query +QUWPF=HOa2#ZA;OI4=0yvHOP,
Xk4B3|=oUWPr=z*ekPD;C#g{CjKUdR^UWPITF
/,XkXBhFHOT9|G\nk=n` 100 PP#
Z:>}:Query/400 PDX*PmO";P,X*i/CZr!xM'DWCE/,
P>{GZCjHDI:iv#X*i/DXb?VGd0!qG<1A;#A;O
D;vr`v5ZdVN{0P0E,gBy>:
CUSNAME EQ :NAME
>}:Query/400 PDX*PmO"
3+>*"ME/xG)ECnHsZ $500 DM'#?bE/<|,;]M'yI:
DL70[qDe%#D5T :To:; *7,szM'{VND`1>5w#{FVN
NAME !Tb CUST PDi/ QRY1#(QRY1 yZECE"D~ CUS89#QRY1 v!qE
CnH5sZ $500 DG<# )
ZED}DPP;P4=:b)GzDI:n:;,CPBfG=vVNDPm5w,
;vGL75w,m;vG[q#=v5w<8r QRY2,|2Zb CUST P#Zd0!
qG<1A;O,QRY2 T>KHO CUSNAME EQ :NAME#CUSNAME GCZ QRY2 DI:
D~D{FVN#Zd08(X*5^({1A;O,QRY2 8>VN NAME Zi/ QRY1
P,|2Zb CUST P#
1E/r!v4s,|4p4gBy>:
TBGK>}D@@:
v `1>8n ¬&NAME MX*5 NAME(!Tb CUST PD QRY1)}C,;vi/
QRY1#
Z Query/400 PxX*PmD`1>DfrM8O
TBGxX*PmD`1>DfrM8OP>:
v AY;)Pm8nXk}C|,X*5Di/#
v Z`,DD5P,Pm8n;\}C|,X*5D`vi/#
v ZyPX*Pm8n0XkECAY;v`1>8n#
v i/PDX*5Xk}C`1>8ny}CD`,D~ri/#
v |,X*Pm8nDD52IT|,L(}]MU(Pm8n(2MG4-(FD
Pm8n)#
v ZX*5P|{Di/>m;\|,X*5#
v ;\TD5PDPmD>8n9CxX*5Di/#Z09Ci/1r0Kv}]
/D>O"1A;P,vTxX*5Di/!q!n 7(Pm);;*!q!n 6 r
8#
v Xk#fxX*5Di/,Tc+4T OfficeVision D59CCi/#4&m9CC
}]DD5,M;\KPi/#d;bb6Ez;\4 F5 i4(f,+zIT4
F13 4i4<V#
v 1z9CX*51,&P8liZ0!qG<1A;OD5PPdkD{F,r*
#fDi/Z; OfficeVision 9CT0G"V;KmsD#
C Query/400 *z7(G<Nr
| zITC Query 1SS}]bPlw}],"+d|(Zi/Px;xPNNEr#g
| {Zz(fP}]D3r";X*,zM^h<G!qErVN#1KP;v48(
| ErVNDi/1,P;lwvDNrM;P#$#g{Nr\X*,z&Zi/P
| (eErVN#g{z*$bdvD3r,h*+fKb}]bEn,|(D~`M
| Mf!76#
Zi/(eZd,g{Z0(ei/1A;OD!qErVN!nTdkK 1,rT>
0!qErVN1A;#g{zDdKwbx;k!qNNErVN,4 F12(!{)
5X=0;A;#(zZA;OydkD;P<;vT#)
Z Query/400 P!qz*9CDErVN
ZgBy>D0!qErVN1A;O,ZErEH6PdkErEH6E4!qz
y*DErVN#zITSPmP!qn` 32 vErVN# (KA;ODPmvT>G
)Z0!q"ErVN1A;O!qDVN;g{;P!qVN,PmMT>yPV
)yPErVND\$H;\sZ 10 000 vV{(2MG,g{z+ErVND$
N#
H`S,\$H;\,} 10 000 vV{)#
y]zT!*ErVND?vVNydkDEk,Query +(";vErEH6#IT
9CS 0 A 999 DNN`E—Tn_EH6ErVN9CnM`E#g{9Cg 10"
20"30 H`E,TsIT\]WXmSm;vErVN#
Er
EH A/D VN
___ _ ACCTNUMBER
30 _ INIT
20 _ LASTNAME
___ _ STREETADDR
___ _ STATE
___ _ CITY
___ _ ZIPCODE
10 D CRLIMIT
W?
1zdkErEH6Es404P1|1,Query TBPNrXBEPA;ODVN:
v g{Z0!q"ErVN1A;O!qKVN,|G4gBNrP>:
1. T0ZKA;!qDyPVN(g{P)48(DNrP>#
2. *i/!qDVN,+4!*ErVN#b)VN4dZ0!q"ErVN1A
;y8(DNrP>#
v g{Z0!q"ErVN1A;O 4 !qVN,ZKA;ODVN4TBNrT
>:
1. T0ZKA;!qDyPVN(g{P)48(DNrP>#
2. *Ki/(eDNNa{VN#
3. yPd{VN4|GZy!D~DG<q=(ePfZDNrP>#WHPvZ
;vD~PDVN,SEPvZ~vD~PDVN,@K`F#
Query ;sT>E"0404P1|7O#1,byzMPZ~Nza44iErVN
"Zh*1TdxP|D#
*SzD!qP}%ErVN,>}CVN{0fD`E#;h*XB`Ed{V
N#*|DErVNDEH6,;k|D`E#
g{zwKNN|D,YN404P1|#VN{PmMaXBEP,ErVNTz
y8(DErEH6WHT>,sz*dv!qD#`VN#g{*Tv?
10(10"20"30,HH)XB+VN`E,4 F20#
1zO*ErVN!q}7s,ns;N404P1|4axErVN!q#
TBGgN8(ErEH6D;v>}#
YhzG;RgzJ:+>@zV?DEC-m,zh*;]gBq=DM'{Fk
X7(f:
v _Pn_ECnHDM'&WHT>,;sGZ~vn_D,@K`F#
*qCzy*DNr,Z;vErVNGECnH (CRLIMIT),45r(Sn_=nM)
EP;Z~vErVNG] (STATE);Z}vErVNGU (LASTNAME);ns;vEr
VNG{ (INIT)#
4gBy>jI0!qErVN1A;:
!qErVN
Er
EH A/D VN D> Len Dec
___ _ ACCTNUMBER JE 6
40 _ INIT M'{MPd{u4 2
30 _ LASTNAME M'U 20
___ _ STREETADDR V@X7 20
___ _ CITY GP 15
20 _ STATE ]u4 2
___ _ ZIPCODE J]xE 5
10 D CRLIMIT ECnH 7 2
W?
2*"bKA;*?vVNT>K=SE",|(D>"$HM!};}#1z!q
ErVN1,IT4 F11 ZvT>VN{M,1T>VN{kVND=SE".dP
;#PX9C F11 Dji,N{Z213D:9C F11 T>PX Query/400 i/Dd{
E";#
404P1|s,0!qErVN1A;YNvV,+bNx(EH6DVNT8(
DNrWHP>,x4;CwErVNDVN;F=KPmDW?:
Er
EH A/D VN D> Len Dec
10 D CRLIMIT ECnH 7 2
20 A STATE ]u4 2
30 A LASTNAME M'U 20
40 A INIT M'{MPd{u4 2
___ _ ACCTNUMBER JE 6
___ _ STREETADDR V@X7 20
___ _ CITY GP 15
___ _ ZIPCODE J]xE 5
W?
ZK>}PDEra)K;vgBy>D(f:
V@ J] EC
JE { U X7 GP ] xE nH
------- ---- -------------- -------------- ---------- ----- ----- -------
WHP>n_ECnH (9999.00),szB;vn_D#Z?iECnHP,G<4]{
V83rP>#Z?iD]P,M'4UDV83rP>(g New York PD Brown M
Tyron,Z California PD Doe M Hubbard)
#g{_P`,UOD=vr|`vM'
!Z,;v]"RP`,DECnH,rKG<DNr4{MPd{DV83r7(
(gZ New York D AC Jones M JS Jones) #
Query/400 PDd{Er<GBn
}VVN(}cu5Er#
UZ"1dM1dAGVN4jzNrEr#
ErCD(fgBy>:
A
B
-
-
": *a)k}]PV{D.yxFm>^XD$Z'{,M*+`kV{/j6{
(CCSID) M{m3r;p#f#PX CCSID gN0ly9CD{m3rDji,
N{Z2553D:Query/400 PD CCSID M{m3r;#
C Query/400 !q{m3r
g{z4Z0(ei/1A;OD!q{m3rTdk 1,Query/400 M9C1!{m
3r#g{zS4#f}{m3r1!5,Bi/D{m3rM4.yxF3r#
Z Query/400 PhC1!{m3r
;civB,TyPi/9C`,D{m3r#TZs`}C',(;h*D{m3
rGoT{m3r(Zs`}53O<a))#g{zZ4(r|Di/1KZ0(e
i/1A;O!qK0!q{m3r1!n,"+dw*1!5#f=i/r*m
P,ryPi/<IT9CK`,D{m3r!n,x^hZ?vi/(eP8(
|#(b";b6EzXkTyPi/(e9CK`,D{m3r#|;Gb6Eg{
z+{m3r!nw*1!5#f,zM;X*4(D?vi/!q0!q{m3
r1!n;v1z4(Di/h*;v;,D{m3r1E!q|#)
1zZ0!q{m3r1A;O!qKzy*D{m3r!ns,1zTZi4A;
1IT4 F23(mf*1!5),+zD!nw*1!5#f=i/C'r*mP#
g{zv(*T(e{m3r(Z0!q{m3r1A;OD!n 3),2ITZTZ
i40(e{m3r1A;14 F23 4+zD{m3r(w*1!5)#fp4#C3
rD`kV{/j6{ (CCSID)(Yh4Tzw5D CCSID )kr*m;p#f#
Query/400 P{m3rDC>
{m3r7(1*BPC>TV{VN4PYw1DV{3r:
v !qG<
v ,SD~
v ErG<
v FcVNDn!5Mns5
v 7(N1"z(f8V
}Gz!q{m3r,qrCZ{mDj<3rkCZm>V{D.yxF5D}5
3r`,#
CCSID k{m3r;p#f,byI*;{m3rTCZ;,zk3D}]#{m3r
D*;MGXBEPZmPD`E,Tc*?vV{R=!1D{m(5#
{m3rgN0l Query/400
1KPi/1,Query/400 PD8v(e=h9C!qD{m3r47(nsa{#{
m3rCZTB!O:
v 1z9CBPbT+;vD~PD SBCS"*E= DBCS rq;= DBCS V{VN
km;vD~PDV{VNHOT+D~,S=;p1:
– EQ(HZ)
– NE(;HZ)
– GT(sZ)
– LT(!Z)
– GE(sZrHZ)
– LE(!ZrHZ)
v 1z9C EQ"NE"GT"LT"GE"LE"LIKE"NLIKE"LIST"NLIST M RANGE
HHObT4!qyZ SBCS"*E= DBCS rq;= DBCS V{VN5DG<1
": 1Z08(&m!n1A;ODTyPV{HO9C{m3r!n;h* NO 1
(TgZf> 2 "Pf 3 D"PfPDi/45G1!hC),Query/400 ;
T EQ"NE"LIST"NLIST"LIKE M NLIKE HO9C{m3r,2;+d&
CZ DBCS VNM#?PD SBCS V{#
v 1z*ErG<!q SBCS"*E= DBCS rq;= DBCS V{VN1
v 1z* SBCS"*E= DBCS rq;= DBCS V{VN(en!5Mns5c\/
}1
!q Query/400 {m3r
*!q{m3r,XkKb}]TNV==fZZD~P#}g,g{s4M!4 SBCS
V{,1fZZV{VNP,zXkv(Gq+s4M!4V{,HT}#xPKV
vs,zMIT!q\zzZ{a{D{m3r,rITT(e{m3r#
!q{m3r
1Er"!qG<",SD~"iRn!5Mns5T07(XF8V
N1"z1,TV{VN9C!qD{m3r#
dk!q,404P1|#
{m3r
!n . . . . . . . . 1 1=.yxF
2=Query/400 "o
3=(e3r
4=*;m
5=53Er3r
TZ!n04=9C*;m1:
m . . . . . . . . . . __________ {F"4 F4 qCPm
b . . . . . . . . . __________ {F"*LIBL"4 F4 qCPm
Z Query/400 P9C.yxF{m3r
j<{m3r*.yxF{m3r#TNNx(D CCSID,yPV{/V{(V8}V
MXbD)<;3h;v.yxF5#b)V{kdX*D.yxF5F*zk3#
zk3T>*;v 16 X 16 DXs,gm3Py>#
m 3. zkmgN$wD>}. ZsPPD5G.yxF5D0k?V#?PnOfD5G.yx
F5Dsk?V#KmP!4D a ;Z ’81’X,s4D A ;Z ’C1’X#b;G;v>},5J
Dm|,yPV8}VV{MXbV{#
0 1 2 3 4 5 6 7 8 9 A B C D E F
0
1
2
3
4
5
6
7
8 a
9
A
1z9C.yxF{m3r1,ZzkmPDV{T.yxF5D}r(r#.yx
F{mDC&G|xVs!4V8#
*i4.yxF{m3r,Z0!q{m3r1A;O!q!n 3((e{m3r)"
404P1|#0(e{m3r1A;MvVK#4 F14(.yxF3r)#Query/400
T.yxF{m3rT>V{kdrE#
g{!qK.yxF{m,"M=}]bD~Dvc\dvPy#fDn!5Mns
5I\;,ZZr!rT>(fPD`&5,499C`,Dw5 CCSID KPi/#
v1n!5rns5VND5*;*w5 CCSID Tcr!rT>1,E"zKiN#
Z Query/400 P9CzyZzDoT{m3r
zI\*!q Query/400 *zyZza)D{m3r,9V{}]\4;VTzyCD
oT|P'DNr4xPEr#Z"@=z,a)D{m3r(}.yxFb)G
Query/400 "o#bV3rks`} Query/400 oT3r;y,?;Ts!4V8(g
A k a)ErZ;p,r*|G2mkd{V8(5;,D{m(5#
Z Query/400 PT(e{m3r
zI\k*(eT:D{m3rT9V{}]y]zDX(h*4Er#
}g,zP;v=;}VDM'JEVN,|,}Kdns5 99,ZKVNP 99 Ts
Dn*V8M—A1"A2 H#zk*+V8nEZ}Vnsf#IT(eT:D{m3
r,TcTKX(i/V8}]zZ}V}]sf#
*(ezT:D{m3r,Z0!q{m3r1A;OD{m3r!na>Pdk 3 "
404P1|#
!q{m3r
1Er"!qG<",SD~"iRn!5Mns5T07(XF8V
N1"z1,TV{VN9C!qD{m3r#
dk!n,404P1|#
{m3r
!n . . . . . . . . 3 1=.yxF
2=Query/400 "o
3=(e3r
4=*;m
5=53Er3r
z+4=B;vA;:0(e{m3r1A;#
(e{m3r
CCSID. . . . . . . . . . . . . . : 37
(;= . . . . . . . . . . . . . . _ V{
*?vV{dkrE (0-9999),404P1|#
(9C`,DrE+V{{mZ;viP# )
9C3|/@V{Pm#P)V{;\T>Z3)UKO;rK,;)rET_I\
;T>V{#4 F11 MI4=?vV{D.yxF5,49V{;\T>ZzDUK
O#zIT9C(;=a>ZPmPlYiR=X(DV{#(g{z*@V{D.y
xF5RzD|L'VC&\,MITdkV{D.yxF5rdkV{>m# )
*T(e{m3r,IZk*|D3rDG)V{T|DrE#?vV{XkP;v
rE#zIT*=vr|`vV{8(`,DrE—Tb)V{4PYw1,+,H
T}|G#
1z4zy*D3rXB`EV{s,404P1|#V{DPmMaTzy8(D
3rT>#7#UWV{ (’40’X) T;ZZ;;#*XB+b)V{Tv? 10 DB3
r`E,4 F20#9C F20 XB`EIT9Z+48(B3rdC|]W#XkYN4
04P1|47ObGz*9CD3r#1zKvKA;1,V{MTv? 10 XB`
E#
Z Query/400 P!q*;m
g{zDi/h*D3r4ZIC{m3rPa),R4(C'(eD{m3r;\
zzZ{Da{,zI\"V9C*;m+IT*zDi/4(}7D3r#*;m
(kC'(eD{m3r`F)4(4CZ*;}]#Zf> 2 "Pf 3 .0D"P
fP4(DNN*;mD CCSID <* 65535#
g{z*9C*;m,Z0!q{m3r1A;O!q!n 4#dkm{M|,zy*
DmDb#g{z*C Query/400 *zP>VfDm,+bjCZma>"4 F4#T
BG0!q*;m1A;>}:
dk!n(Mmkb),404P1|#
1=!q
Opt m b D>
_ __________ _________
_ QASCII QSYS EBCDIC A ASCII *;m
_ QEBCDIC QSYS ASCII A EBCDIC *;m
_ QLA10025S QSYS LATIN1 CCSID 37 2mS(
_ QLA10025U QSYS LATIN1 CCSID 37 (;S(
_ QRMASCII QSYS EBCDIC A ASCII D RM/COBOL *;m
_ QRMEDCDI QSYS ASCII A EBCDIC D RM/COBOL *;m
_ QSYSTRNTBL QSYS !4As4*;m
_ QA3BA69A3R QUSRSYS CHRID(*N 1009) A CHRID(1150 1025) *;
PP...
F4=a> F11=vT>{F F12=!{
F19=B;i
Z Query/400 P!q53Er3r
zIT8(i/9CkX(oT`XD53a)DEr3r#?VoTP=vEr3
r:
v ;vGZmPD?vV{<P(;(5D3r#
v m;vG`vV{_P2m(5D3r#
*T>0!q53Er3r1A;,Z0!q{m3r1A;O!q!n 5 "404
P1|#
dk!n,404P1|#
Er3r. . . . . . . . 1 1=w5KP
2=(;D
3=2mD
ZBPiv1;9CoT ID:
v z!qw5KPw*Er3r!n,R
v ZKPZw5DEr3rG *HEX r|{D*;m#
(;G8?vV{<P(;(5#2mG8;)V{2m`,D(5#}g,Z"o
D2m3rP,V8Ds!4T2m`,D(5#
>BDZ~?Vhv`-}VVNDDV=(#r*E"D}VVN4Sjcf"Z
}]bD~P,zITdxP`-Tc|GvVZi/(frA;P1cZDA#
zI8(TBPXZr!MT>D(fPgNT>PDE":
v ?Ps_DUq}
v PO=jbDkG
v PPVNDs!
Query +vTZzr}]bD~"Mj8Ddv1y8(DNNPq=#+G,g{z
Ts9CCi/4zI(f,r9Cz8(DPq=#
Query 9CZzr}]bD~"Mvc\dv1*i/8(DPjb(v8VVN)"
`-MVNs!#vc\dv+ZZ13B Z Query/400 (fP!qdv`MMdvq
=Phv#
Query/400 (fPDPd`
g{#{|DVNDPd`,dk 0 A 99 .dD;v}5,T8>#{vVZCVN
PDs_DUq}#
": g{Z09Ci/1A;O9C1SO"!n4+i/}]O"=V&mD5,
OfficeVision/400 `-wI\a|DZ;PDd`#g{z*(fDZ;vVN8(
YZ 5 vUqDPd`,C`-w+vTz8(Dd`,"ZO"Di/DZ;P
s_ek=vUq#
?vPjbj+4UzdkDN=vVZ(fP#?vjbI$o}P(?P 20 vV
{),RI9CZ{DNNV{(N{TBA;O INIT VNDjb)#
8((fPq=
dkE",404P1|#
Pjb: *NONE"TkDD>P
P
VN d` Pjb Len Dec `-
LASTNAME 0 U 30
INIT 2 {0 2
Pd{
u4
STARTTIME 2 6 *
p<
1d
W?
F3=Kv F5=(f F10=&m/0;A F12=!{
F13=<V F16=`- F18=D~ F23=$"M
g{#{yPPjb<knBfDjbPTk,rXkTbV==ZA;Odk?v
jb#
g{|DKjb,+Vv(9C-4Djb,r>}zdkDjb#Z(fP9C-
4D(1!D)jb,|ZzBN5XAKA;1T>#g{#{|Da{VNDj
b,IZ0(ea{VN1A;O|D|,gZ5B Z Query/400 P(ea{VNPy
v#
Query/400 (fPD$HM!};
D~P?vVNZ;NT>D$HGVN(eP(eD$H#?va{VNZ;NT
>D$HG Query *zFcD$H,r_GzZ0(ea{VN1A;OD Len PP
dkD5#?v}]`MD$H<P;,D,e:
v TZ SBCS V{VN,$HGCVNPDV{\}#
v TZ(;= DBCS"*E= DBCS rq;= DBCS VN,$HGCVNPDVZ\
},|(FvMFkV{#
v TZ<N DBCS VN,$HGCVNPD DBCS V{\}#ZT>rr!CVN1
9CDFvMFkV{;|(Z Len 5.P#
v TZ}VVN,$HG!}csR=_D;},+;|(!}crNNd{`-V
{(guR{E)
#
g{8($H,P'D$H5*:
v TZ SBCS V{VN,* 0 A 32 766
v TZ9u"x;r~xFN=D}VVN,* 0 A 31
v TZ!cVN,* 0 A 9(%+H)r 0 A 17(++H)
D~P?v}VVNZ;NT>D$HM !};}kZCVN(ePy(eD`,#
?va{VNZ;NT>D$HM!};}G Query *zFcD5,r_GzZ0(e
a{VN1A;OD Len M Dec PPdkD5#
TZ}VVN,Dec PPD}58>!}cR_D;}#
|D Dec 5v0lCVNZi/(fPDT>#;|DVN(ePD5J5#g{#{
|Da{VND5J!};},&Z0(ea{VN1A;OxP|Dx;&K1|
D#
TZ}VVN,IT!};}dkT:D5(0 A 31),+;\dksZCVN$HD
Dec 5#
zI\2#{+;vVNCZErr(f8V,+;#{|vVZi/(fP#g{
Z08((fPq=1A;O+VN$H(Len a>)|D*c,G4Z"MA}]b
D~Dc\dvP+;r!"T>r9CCVN#CVNTCZEr"G<!q"(
f8VM8VD>ek(PXji,N{`&DBZ)#
": Zq=/}LZd;\|D(fOVNDNr#g{z7(h*|DdvPVN
DNr,rXk5XA0(ei/1A;"!q!q"ErVN!n(N{Z6B Z
Query/400 P!q"ErVN)#
`- Query/400 (fPD}VVN
z&<GDZ;V`-}VVND=(G;*dkNN`-!n,C Query *zwvv
(#+G,g{K=(;\a)zh*Ddva{,I9C>BPV[DDV`-!
nPD;V#
Query 9C0!q(fPq=1A;OD`-P48>GqQ*i/PDNN}VVN
(eKNN}VVN`-#g{TVNT>GE (*),mwZCVNDi/(eP8(K
`-2G5;+9CG)5Z(fP`-CVN5#TZv9C1!5`-DV{V
NM}VVN,KPGUWD# (1!5r-<5I\ZD~(eP,rZI Query 9
CD53a)D1!5P) #
g{#{`-}VVN — 2MG,8(+Cwi/(e;?VD}VVN`-5,+
bj(;=CVN"4 F16(`-)xk0(e}VVN`-1A;#!vZzZKA
;wvD!q,Query +T>J1DA;Tczhv`-(eDd`?V#Z;P*i
/(ePD3VN#f}5`-2G51,5JCZCVND`-WH4T-<VN
(e(ZD~(eP)rns4T53a)D1!5#
(e Query/400 (fPD}VVN`-
0(e}VVN`-1A;Jmz`-NN}VVN(?N`-;vVN)#+;\`
-!cVN#
VN . . . . . . . :
D> . . . . . . . :
jb 1 . . . . . . :
jb 2 . . . . . . :
jb 3 . . . . . . :
$H . . . . . . . :
!} . . . . . . . :
y> . . . . . . . : -9,999.99_____________________________________________
_______________________________________________________________________________
_______________________________________________________________________________
_________________________________________
dk!n,404P1|#
`-!n . . . . . . 1 1=}V`-!n
2=UZr1d`-!n
3=`-k
4=`-V
0(e}VVN`-1A;Jmz8(#{CZ`-}VVND`-`M#`-7(
VND5gNZi/(fPT>#bGCZ(e`-D=vA;PDZ;v;T>D
Z~vA;DZ]!vZZZ;vA;O!qDv`-!n(1 A 4)
#}g,g{!q
!n 2,+xkJmz8(#{ZUZVNP9CDVtV{`M#
0(e}VVN`-1A;OT>DG*`-D}VVND{F"CVNk(fPX
DE"T0CVND`-y>5,C5+k10*|(eD`-5;pvVZ(f
P#CVNG4 F16(`-)1Z08((fPq=1A;ObjyZDGvVN#
?v`-!nhvgB:
1=}V`-!n
T>0hv}VVN`-1A;,ZCA;OzIhvCVND8v`-tT#I
!q*Cw!}c"';Vt{":EMuR{EDV{,"I8(gN&mc5
M0<c#
2=UZr1d`-!n
T>0hvUZ/1dVN`-1A;,ZCA;OI!qCZUZr1d5DV
tV{#
3=`-k
T>08(`-k1A;,ZCA;OI!qCZ`-VND`-kM^N{(g
{PD0)#
4=`-V
T>08(`-V1A;,ZCA;OI(eT:DCZCVND`-V(5)
#
g{Z08((fPq=1A;OD`-PPT>GE (*),mwQ-ZKi/P*CV
N(eK`-2G5#g{C&T>GE,rCVN10`-D5Ja{T>ZKA
;ODy>VNP,R`-D`MI10Z`-!na>P8(D`-!n8w#g
{C&;PT>GE,ry]ZVN(erZ Query Y(D53a)D1!5P8(D
`-4ZK&`-y>VN#
ZZ;Nxk0(e}VVN`-1A;&mNN}VVN1:
v ZD>A!}VNPTC}VVNT>D5kZ08((fPq=1A;OTK,
;}VVNT>D5`,#
v y>T>CVND10`-(e,T>CVNy\]IDns}5(+?* 9)
#g{
y>Gy]10!qD}VVN(e`-D(Z `-!n a>P8(D!n 1 A
4),Cy>9T>gNT>K}5#
v g{Z`-VNPD}51"zms,r9C J `-k`-Cy>,RZT>`-D
y>D,1T>vmE"#
v `-!n5GZi/(ePns8(D5"kD~(ePDVN(e`XD5(g
{bGD~PD;vVN)r_G 1(g{0f=n<48>5)#
(#,ZZ;Nxkd{Dv}VVN`-A;(Z0(e}VVN`-1A;D`
-!na>Pj6)1,T>D5GSi/(ePH0#fD5"D~PDVN(e
T053a)D1!5(4K3r)P!CD#Query 9C`-k J w*`-!n 3 D
1!5,9CU`-Vw*`-!n 4 D1!5#
hv Query/400 (fPD}VVN`-
g{7(C Query *zxP`-;\a)yhDa{,I8(T:D`-tT#IZ
0hv}VVN`-1A;O8(#
hv}VVN`-
VN . . . . . . :
dk!n,404P1|#
KA;Jmz8(#{CZ}VVND`-XT#`-7(CVND5Zi/(fP
gNT>(g{ZCVND`-!n* 1 1KP(f)
#zI!q*Cw!}c"';
KA;T>*`-D}VVN{T0+Z(fP9CD}VVN`-2G5M1!
5#T>D`-5I\4T IDDU r53a)D`-5w#
g{z>}KA;ODa>PDyP5"404P1|,+?5+;hC* Query Y(
D53a)D1!5#b)5kZ;N(ea{VN1yCD1!5`,;rK,9
CbV=(,I*D~PDVN8(ka{VNyCD`,`MD`-,TcZ(f
Pa);BD`-#
*}%K}VVNDyP`-2G,4 F16(}%`-)#S08((fPq=1A;O
D`-PP}%GE (*),"SVN(er53a)D1!5P!C+CZi/(fPK
VND`-5#
Query/400 (fPD!}c
dk#{CwKVNPD!}cDV{!nE#!nEMV{T>gB,,1T>}
5 245.87 D`-a{>}:
!n >} !n,e
1= . 245.87 !}cGdc
2= , 245,87 !}cG:E
3= : 245:87 !}cG0E
4= $ 245$87 !}cG@*{E
5= ^ 24587 ;9C!}c
Query/400 (fPD';Vt{
dk#{CwKVNPD';Vt{DV{!nE#!nEMV{T>gB,,1T
>}5 1515109 D`-a{>}:
!n >} !n,e
1= . 1.515.109 Vt{Gdc
2= , 1,515,109 Vt{G:E
3= ' 1'515'109 Vt{G2E
4=Uq 1 515 109 Vt{GUq
5=^ 1515109 ;9CVt{
dk Y r N 48>KVNGq9C:E#
Y=G
ZVNPD5*:1T>:E#K{EIZ}5Ds_rR_(r=_),RIV
pT?_w;,(e#(fPyP:E<<CUd#9CBf=va>4(e:E
D 1 A 6 vV{#
(I+;va>#t*UW#g{byv,ZVNDG;`;T
>{ER;<C(fPDUd#
N=q
ZVNPD}5*:1;T>:E#g{TB=va>|,:E(e,|G+#f
ZKi/P+;9C#
27.03 D:5s:ED;)>}gB:
{E `-D:5
- -27.03
CRAMT CRAMT27.03
CR AMT CR AMT27.03
CRDT:_ CRDT: 27.03
ns;v>}D`kXk|,B._,r*s:EV{DRKPUq#
s:ED;C!vZZ*f;0<c1Zf;*!nP8(D5#
v g{z8(!n 1(UW)r!n 2(GE),r:EGL(D;|\GT>ZVN
Dns_,Zf;+?0<cDyPGEDs_#}g,Z;vPK;$HDVN
P,27.03 D`-5+G -****27.03 r − 27.03#
v g{8(!n 3(!/uR{E),r:EF/(r!/),!vZ|f;`Yv0
<c,Tc|tZ}5PZ;vP'}VDs_(g −27.03),r_tZsuR{E
Ds_(g −$27.03)#
Query/400 (fPDR:E
dk#{vVZKVNP:5R`Cw:ED 1 A 6 vV{#I9CNNIr!rT
>DV{#ZV{.PI9CUqrB._ (_),+g{#{Uq;Zm>:EDV{.
RK,Xk9CB._#R:ED>}* 27.03−"27.03CR AMT M 27.03 CRDT#
dk Y r N 8>KVNGq9CuR{E#
Y=G
ZVNPuR{Ek}5;pT>#C{EIZ}5Ds_rR_(rZ=_),
RIVpT?_w;,(e#g{;PZTBDf;*a>(0<cD)P8(!
n 3(!/uR{E),rsuR{E(g{9CD0)vVZCVNPD;vL
(;C#+G,g{9C!n 3,NN8(DsuR{E<+G!/{E,!vZ
|f;`Yv0<c#9CBf=va>4(euR{ED 1 = 6 vV{#
N=q
ZVNPuR{E;k}5;pT>#g{Bf=va>|,uR{E(e,|G
+#fZKi/P+;9C#
Query/400 (fPDsuR{E
dk#{vVZKVNP}5s`CwuR{ED 1 A 6 vV{#I9CNNIr!
rT>DV{,+;&9CGE (*)"crNN!}c(gdc)#V{.PI9CUq
rB._ (_),+Gg{#{Uq;Zm>C{EDV{.RK,Xk9CB._#
Query/400 (fPDRuR{E
dk#{vVZKVNP:5R`CwuR{ED 1 A 6 vV{#I9CNNIr!
rT>DV{,+;&9CGE (*)"crNN!}c(gdc)#V{.PI9CUq
rB._ (_),+Gg{#{Uq;Zm>C{EDV{.RK,Xk9CB._#
RuR{E\&Z;vL(D;C#
r! Query/400 (fPDc5
ZKVN|,c51,dk Y r N 48>GT>c9G#t*UW#
Y=G
v=}5 0 1+T> 0#
N=q
+}5 0 +?T>*UW;KVNP;T> 0#
f; Query/400 (fPD0<c
ZKVN|,0<c1,dk Y r N 48>GqC;,DV{+df;#0<cGv
VZ}5PZ;vP';(1 A 9)s`,r_vVZ!}cs_(g{C}5!Z 1
D0)DG)c#}g,ZK;}VN 000027.03 PPDv0<c,xZK;}VN
000000.03 PPyv0<c#
Y=G
Cd{V{(UqrGE)rC!/uR{E4f;0<c#
N=q
T>yP0<c#(g{f;0<cMf;*a>|,}5,r+d#fZKi/
P+;9C#
)
Query/400 (fPDf;*!n
g{Zf;0<ca>PdkK Y,rdk#{C4f;KVN5PNN0<cDV{
r{ED!nE#
1=UW
9CUq4f;0<c( 27.03 M .03)#
2=GE
9CGE (*) 4f;0<c(****27.03 M ******.03)
#
3=!/uR{E
9CuR{E4f;0<c#C{E!/TcvVZ}5PZ;vP';s`(}
g,$27.03 M $.03)#
hv Query/400 (fPDUZ/1dVN`-T>
g{*|,UZr1d5Di/!qK}VVN,Query +a);vrcD=(48(
r|DCZC`-}LPDVtV{#
0hvUZ/1dVN`-1A;Jmz8(#{CZ|,UZr1d5D}VVN
DVtV{`M#`-57(UZr1dVND5Zi/(fPgNT>(g{9C
!n 2 w*KVND`-!n)#
hvUZ/1dVN`-
VN . . . . . . :
dk!n,404P1|#
Z;Ni4KA;1,T>D`-5GH0#fZi/PD5"D~5wDVN(e
PD5r_G53a)D1!5#
zI|DT>D`-5r>}|#g{>}C5,r9C53a)D1!Vt{5
(f"Z QDATSEP 535P),g{z5XAKA;+T>|#*9CKUZ/1d
`-54`-CVN,XkZ0(e}VVN`-1A;O8(`-!n 2#
| TZ?v1YD;(c5d*UW),NN;cy;D}<+Zs_*';vUZ/
| 1d;#g{s_D0<}VGc,rCUqf;|(}g,g{zDUZ/1dV
| t{G1\,r5 000829 d* 0/08/29)
#*T>;PXO0<cDUZ,T0<cr
| GE9C`-V!n#
Query/400 (fPDUZ/1dVt{
dk#{ZKVNPCwUZr1dVt{DV{D!nE#!nEMV{T>g
B,,1T>}5 100863 D`-a{>}:
!n >} !n,e
1= . 10.08.63 Vt{Gdc
2= / 10/08/63 Vt{G1\
3= : 10:08:63 Vt{GVE
4= - 10-08-63 Vt{G,V{
5= , 10,08,63 Vt{G:E
*}%K}VVNDyPi/(eD`-5(TZK`-!nMyPd{!n),4
F16(}%`-)#
8( Query/400 (fPD`-k
08(`-k1A;Jmz8(#{9CDv`-krC'(eD`-5w4`-}
VVNPD?v5#z!qD`-kr`-5w7(Zi/(fPgNT>8(VN
D5(g{ZCVND`-!n* 3 1KP(f)
#TZ3)`-k,9I8(^N{
Cw`-D;?V#
*}%K}VVNDyPi/(eD`-5(TZK`-!n MyPd{!n),4
F16(}%`-)#
Query/400 (fPD`-k
| T#{CZ`-KVNP5D`-kr`-5wdkj6|GDV{#zI*`-z
| k8(TB}VrV8PDNN;v:1 A 4"A A D"J A Q r W A Z#r_I
8(NN;vC'(eD`-5w:5 A 9#
| s`}`-kT>ZBmP#d{`-k(W"X"Y M Z)T0C'(eD`-5w
| (5 A 9)PZ<ms#
| -- QDECFMT 535PD5:--
| `- r! :E UW I J
| k :E 5 5 5
| 1 G ^ .00 r 0 ,00 r 0 0,00 r 0
| 2 G ^ UW UW UW
| 3 q ^ .00 r 0 ,00 r 0 0,00 r 0
| 4 q ^ UW UW UW
| A G CR .00 r 0 ,00 r 0 0,00 r 0
| B G CR UW UW UW
| C q CR .00 r 0 ,00 r 0 0,00 r 0
| D q CR UW UW UW
| J G - .00 r 0 ,00 r 0 0,00 r 0
| K G - UW UW UW
| L q - .00 r 0 ,00 r 0 0,00 r 0
| M q - UW UW UW
| N G - .00 r 0 ,00 r 0 0,00 r 0
| O G - UW UW UW
| P q - .00 r 0 ,00 r 0 0,00 r 0
| Q q - UW UW UW
| ": TZyPb)`-k,\GT>!}c,"R\GVF0<c#
| Z}VVN`-Zd"zms1r;Pd{`-5IC1,Query + J `-kCw1!
`-k#g{"zms,rT>vmE"09C J zkzID`-a{#
TZ(eP;P8(`-kDVN,ZzZ;Ni4KA;ODCVN1,`-k J T
>*1!5#
d{`-kM`-5wgB:
m 4. `-k X >}
Z?m>(gN
q= $H/!};} 5J5 4`-Dm> f")
x; 7 549134 0549134 X’F0F5F4F9F1F3F4’
9u 7 549134 0549134 X’0549134F’
~xF 7 549134 0549134 X’008610E’
x; 5/2 -319.34 3194N X’F3F1F9F4D5’
9u 5/2 -319.34 3194N X’31945D’
~xF 5/2 -319.34 3194N X’000F8337’
| v `-k Y VF}Ay;$rK;$UZVNDns_Dc,"RVF_;$UZV
NDns_=vc#|2ZB"UMj.dek1\ (/)#1\D;C!vZVNPD
;}:nn/n"nn/nn"nn/nn/n"nn/nn/nn"nnn/nn/nn M nn/nn/nnnn#
v `-k Z S}VVN}%yPSuE"VF0<c#
v `-5w 5 A 9 GC'(eD`-k#I(e|GT9Cd{V{rV{iO4`
-}VVN#
TZ`-k N A Q,:EZ}5Ds_;TZd{D`-kM`-5w,:EZ}5
DR_#
(}g,IZ`
XkZK&8(`-k,r4 F12 5XA0(e}VVN`-1A;#
-!nP8(!n 4 ,SEZ08(`-V1A;O(ezT:D`-V#)
v Ikb)`-kPNN;v;p9CD(;uR{EGZ53a)D535
QCURSYM P(eDGvuR{E#
| v g{*VN8(KUZ/1d`-k Y,CVNXkG}AK;$#
| v g{|DK`-kD(e(Z Query b?jI),b)|D+43Z9CC`-kD
| yPi/(fP#
Query/400 (fPI!D`-k^N{
| *8(D`-kdk#{CwI!^N{DV{#g{zZ`-ka>P8(K`-
| k W A Z PD;vr`-5w 5 A 9 PD;v,r;\ZKa>P8(I!^N
| {#
| 1=GEnd
| +GE (*) CwndV{4f;KVND0<c;}g,****27.03#
| 2=!/uR{E
| Z QCURSYM 535P8(DuR{E+CwKVND`-k^N{#}g
| $27.03 PD@*{E ($)#
08(`-V1A;Jmz8(r|D#{CZ`-}VVND`-V#`-V7(
Zi/(fPgNT>8(VNDyP5(g{ZKVND`-!n* 4 1KP(f)
#
I9C;v`-V4`-CVNDyPj85,"Rg{*CVN8(K\Fc\/
},rI9Cm;v`-V4`-CVNDc\\F5#
TZ;PZ(eP8(`-VDVN,}Z2EPDUWV{.+T>*dj85`
-VD1!5#
*;}%CZKVNDc\\FD`-V,>}c\\FD`-Va>#g{z#{
}%*KVN(eD=v`-V,4 F16(}%`-)
#"b F16 +}%ZyPDv`
-!nP(eD+?`-5,x;vvGK!nPD`-5#
Query/400 (fPD`-V
| dk#{CwKVN`-VDV{.#CV{.XkC}E}p4R`-V|,DU
| q}XkHZCVNPD;},bIA;OT>D$HVNv(#ekcrGEw*
| `-VDZ;vV{T@9XO0<c#
}g,g{zD`-V*
'0 / / '
VN . . . . . : jb 1 . . . . . :
$H . . . . . : jb 2 . . . . . :
!} . . . . . : jb 3 . . . . . :
dkE",404P1|#
(+`-VC}E}p4# )
(?vUqI;;}Vf;,?v '&' I;vUqf;#)
(b)vGy>;;G1!5#
)
c\\FD
`-V . . . . . ' , , , 0. -'
}g,g{*(e;v|,.;;"^!};DVND`-V,R*+:ECw';
Vt{"C CR m>:5,zD`-V&G ' , , , &CR',R(fPD5+T>*
27,345,838,789 CR(g{|G:5)#
TZQZ08((fPq=1A;Oq=/*.;r.;;D.;g0Ek,I(e '0(
)& - ' w*d`-V#
Query/400 (fPc\\FD`-V
g{Z0!q(fc\/}1A;O8(K!n 1(\F)4!CKVNDc\\F,
Xkdk#{CwKVNDc\\F`-VDV{.#CV{.XkC}E}p4,
RTCVNPD?v};Xk<P;vU;,SOHZA;%?T>DVN$H`v
D}vUq,n`* 31 ;#*Z(fa{P8(Uq,9C (&) {E#
}g,g{z#{*^!};D 8 ;VN\5(e;vc;$D`-V,R#{+:E
Cw';Vt{,CR m>:5,rzD`-V&G ' , , , &CR',(fPD5+T>
* 27,345,838,789 CR(g{|G:5D0)
#
g{zZK&;P8(`-V,xZ0!q(fc\/}1A;O8(\FCVN,
r9C J `-k4`-CVNDc\\F#
TZ8(c\/}D?vVN,Query +Fcc\5"+d|(x(fP#Query ZK
i/(eD?v(f8V&(8V6p 1 A 6)T0Z(fax&(8V6p 0)Fc
b)c\5#?V`MDc\Z(fPT%@;PT>,hvTu4T>Zc\5s
_(N{Z12B (e Query/400 (f8V)#
]( 12 .10 1.20
8S 2 8.50 17.00
1_ 1 2.00 2.00
]$ 6 .05 .30
Z Z Smith 3F}]
TOTAL 21 20.50
MAX 12 8.50 17.00
COUNT 4
Z?v(eD(f8V&Fc?vVN(P)D?vc\/}a{,"+dT>*c
\5(`FZ!F),Z(fax&+dT>*nsDc\(nU\F)#(+9C
0(e(f8V1A;Iq=/X(D8V6pTVFc\E"#ZbVivB,x
P8V1,+9CUWPMI\|(8V5D8VD>(g{(eD0)#)
c\/}a{(g{(eD0)IC+?}Vdv`M(T>"r!M}]b)M=
Vdvq=(j8Mc\)T>,;P;v}b:g{(fGTj8q="M=}]
bD~,r;\|(b)c\a{#
Query/400 (fPc\/}D`M
Z0!q(fc\/}1A;O,IdkBP;vr`v!nDEkT8(+CZV
NDc\/}`M#g{!nTVND`MP',Ifb*Nb`vVN8(Nb`
v!n#g{*T;vVNdk`v!n,IT4NNNrdk#+G,b)c\Z
(fPvVDNrkK&PvD`,,R;\|D:
1=\F
TK8V6r{vP(vJCZ}VVN)T>VNP}5D\M#vTU5,}
GyP5<GU5,rK1\F*U5#
ZT\F"=y5"n!5Mns5c\/}Fcc\51,+9C-<D$HM!
};5(VN(ePD)xPVNFc,x;9CZ08((fPq=1A;D Len M
Dec PP*CVN8(D}5(g{PD0)
#mb,Zb)FcPICakrXO,b
!vZzZ08(&m!n1A;O8(DZ](N{Z14B 8( Query/400 &m!
n) #
!q(fc\/}
dk!n,404P1|#
1=\F 2==y5 3=n!5 4=ns5 5=F}
----!n----- VN
5 _ _ _ _ ITEM
1 4 _ _ _ QUANTITY
4 _ _ _ _ ITEMCOST
1 4 _ _ _ ITEMTOT
W?
KA;T>ICZ(fDyPVN(|(a{VN)#b)VN+4Z(fPT>D3
rPv:
v g{Z0!q"ErVN1A;O!qKb)VN,|G+T8(DNrP>ZA
;O(|(a{VN)#
v g{;PZ0!q"ErVN1A;O!qVN,Ci/PDyPVN+4TBN
rT>:
1. yPErVN(g{PD0)4dErEH6Nr#
2. ;P!qw*ErVNDNNa{VN#
3. yPd{VN,4|GZ!(D~9CDG<q=(ePfZDNr#WHPv
Z;vD~PDVN,SEPvZ~vD~PDVN,@K`F#
c\ Query/400 (fPDP
*i/!qD{m3r(N{Z9B Z Query/400 P!q{m3r)a0li/(eD
;,?V#g{*i/PD;vr`v SBCS"*E= DBCS Mq;= DBCS V{V
N!qn!5rns5!n,r9C!qD{m3r("Z(fOT>D}5#Z3
)ivB,UWGn!5rns5(g{G<;|,}]+ZCVNPPUW)"C
Zi/dv#
Query/400 (fPPc\5D;C
ZPvi/Dj8E"D(fP,Z(fax1M/r?v(f8Vs,c\51S
T>Z8(DPBf#ZvPvc\E"D(fP,Z(f8VD8VVNDNNP
.s,c\51ST>ZPjbBf#ZZ13B Z Query/400 (fP!qdv`MM
dvq=PhvK8(Gh*j8E"9Gc\E"#
?V`MDc\T>Z%@DPO#?vc\DhvTu4
(TOTAL"AVG"MIN"MAX r COUNT);Zc\5Ds_,"IAY;vUqk
C}5t*# (;\|DKE"D<Vrb)c\5T>DNr# )
}g,g{zP;va{VN TOTDUE,#{Z(fOT>d\FMns5,"R#{Z
(fPP>yPG<DF},r(fq=&`FZ:
&UJc\
Jones B D 5.00
Kagy R L 25.39
Vine S S .00
Johnson J A 140.28
Alison J S 36.36
Henning G K 1,900.50
Stevens K L 6.90
Wilson T N 15.00
Doe J W .00
FINAL TOTALS
TOTAL 2,129.43
MAX 1,900.50
COUNT 9
ZTi/!qD?iG<xP(f8V1,8VD>(g{PD0)+T>Z;vU
P.s#TZi/P9CD?V`MDc\/},8VD>s<T>%@;P#Z?
vc\/}PPT>DG/}{,T0Z(f8V&9CC/}TyPVNFcD+
?c\5#
(e Query/400 (f8V
Z0(e(f8V1A;O,!q#{Cw8VVND?vVN,"*d8(C4X
FD8V6p#I(e`oyv8V6p(`E* 1 A 6),"I8(`v8VVN4
XFNN8V6p,;G;\*yP9CD8V6p8(,}Ev8VVN#
}g,zIT:*(e*8VVNDyPEvVNv8(;v8V6p;*}v8V
VND?;v<(e}v8V6p;r_(en`yv8V6p,;vVNCwev
6pD8VVN,x+DvVNCZ;v6p#
g{*,;8V6p(eK`v8VVN,NN;v8VVND|D+<B8(D8
V6pEkzzBD8V(ri|D)6p#K8V6p|D<B Query ZdvP|(
!1Dc\5#
Z;v6pD8V+T/<BZyP|M8V6pD8V(nMD6p_Pn_DE
k) #}g,g{(eK+?yv8V6p,Z6p 4 "zDXF8V2a?FZ6p
5 M 6 xP8V,RG}v6p(6 A 4)P?;6pD8VD>Mc\5+|(Z(
fDG;&#
8V Er
6p EH6 VN
1 1 COMPANY
2 2 DIVISION
3 3 REGION
4 4 DEPARTMENT
5 5 EMPLOYEE
W?
}g,g{z*4+>"V+>"Xx"?EPD1$4T;i=J1dG<Er,
b1I\Mh*(eev(f8V6p#ZbVivB&8(TBD8V6p:
v 8V6p 1 = +>
v 8V6p 2 = V+>
v 8V6p 3 = Xx
v 8V6p 4 = ?E
v 8V6p 5 = 1$
I9CPmPT>DNNVN4(e(f8V;+Zs`}ivB,;&+ErVN
Cw8VVN#(#,8V6p&k8(xVNDErEH6D3r`,#2MG,
&+I8(Dn_8V6p(6p 1)8(x_DErEH6E(dP 1 2Gn_
D),&+8V6p 2 8(xM;cDEH6E,&+yCDnM8V6p8(x|M
DErEH6E#
g{8(3vVN*8VVN,xCVN2;GErVN,r(fPI\avVnb
D(f8V,r*g{CVN;GEr=hD;?V,&ik,;iDG<I\;P
Vi=;p,Sx<BnbD8V#
&mA}]bD~Dj8dv1vT8V(e#PX8V(eMc\/}gNCZA
}]bD~Dvc\dvDji,kN<Z1623D:Z Query/400 (fP9(BDd
vD~(e;#
TZr!rT>Dvc\dv,+T>;P8V5x;G8ViD8ZP#TZr!
rT>Dj8rvc\dv,Z?v(f8V&vVTB;nr`n:
v +c\E"kP}]V*D;PUWP#
v *C8V6p(eDNN8VD>,|(ZCD>P(eDNN8V5#
v Z0!q(fc\/}1A;O8(DNNc\(\F"=y5"n!5Mns
5"F})#!T;PT>8V5rc\5DP#
v m;vUWP,r_g{r!(f,ITNN8V6p8(r!c\E".s*<
B3#
g{;P8((f8V,Query +Z(fPp;r!rT>+?G<,R;SNNUq
rD>#
vTZr!dv,Query VFr!(e*8VVNDVNZ`,DVNE"#2MG5,
Z;iG<P8VVNDZ]`,1,r;r!CiZ;vG<PDCVN#CiP
yPd{G<;r!CVNDX4Z]#
+G,TZ?3%?DZ;vG<,<YNr!+?(fVNPD yPE"TcZD
A#
Query Yhzh*ZNNc\.sSOUWP,}Gz8(BD3#g{vT>CE"
x;r!,Query +vTB3ks#
IZPq=D(fP;T>8VVN,TZ(fD8VD>P9Cd5#2MG5,
g{Z08((fPq=/1A;O3vVND Len PP8( 0,rZ(fP;vVC
TBGPXxP(f8VD=S<GBn:
v TZ SBCS"*E= DBCS"q;= DBCS V{VNPD SBCS }],49VNP
DV{I\;,,2I\;axP(f8V#}g,g{{m3r+?vs4V8
M!4V84w_P`,D5(Aa"Bb"Cc H),G4g{VNPD(;|DGS A
|D* a,r;a"z(f8V#(;T DBCS VNPD DBCS V{}]9C{m
3r#)
v TZ}VVN,VNPD5J}]CZ7((f8V,x;GC}]D`-q=#
v TZUZ"1dM1dAGVN,jzH'57((f8V#
v TZV{M}VVN,?vVND-<(es!CZ7((f8V,x;GI\Q
Z08((fPq=1A;O8(DNNQ|DDs!#
v g{R=U5,+dVi=;p#
TBGT>U5Dy>(f8V:
m 5. y>D~}]
VN 1 VN 2
1 AZ
1 AZ
2 XY
2 U5
3 U5
U5 AB
m 6. xU5Dvc\(f
VN 1 VN 2
1
MIN AZ
MAX AZ
2
MIN XY
MAX XY
3
MIN –
MAX –
MIN AB
MAX AB
FINAL TOTALS
MIN AB
MAX XY
TZ}8V6p 0 TbDyP8V6p,I8(C(fZX((f8V"zsGqxA
B3#TZ?v8V6p(1 A 6),2I8(Gq*VFc\/}5#9I8(kN
Nc\E";pT>rf;c\E"D8VD>(g{PD0)#8VD>vVZP}
].s"NNc\5.0D;PO#
q=/(f8V
8V6p . . . . . . . . . : 1
dk!n,404P1|#
(+ &field ExD>PTek8V5#)
xAB3 . . . . . . . . . N Y=G,N=q
VFc\ . . . . . . . . . N Y=G,N=q
8VD> . . . . . . . . . +>
6p VN 6p VN
1 COMPANY 4 DEPARTMENT
2 DIVISION 5 EMPLOYEE
3 REGION
Z Query/400 (fPxAB3
dk Y r N 4*K8V6p8(ZK8V6pD(f8V"z.sGqSB3*<r
!#ZxAB;3.0,r!K8V6pDc\E"r8VD>(g{PD0)#
Ka>vJCZr!D(f,TZT>D(frvT|#TZ8V6p 0,;T>Ka
>#
Y=G
TZK8V6p"zD?v(f8V,Z103Or!NNc\5.s,Query +
xAB3#
N=q
K8V6pD(f8V"z1,Query ;xAB3#xGx}Z0(er!zdv1
A;O8(DP}SO;v=SP(N{Z13B Z Query/400 (fP!qdv`M
Mdvq=)#
Z Query/400 (fPVFc\
dk Y r N *K8V6p8(GqVFc\5(g{!qKNNc\/}D0)
#g{
;h*6p 0(nU\F)Dc\5,I\*E}b)5#
Query/400 (fPD8VD>
dk#{ZK8V6pD?v(f8V&vVDNND>#CD>I$o 40 vV{#
CD>vVZK(f8VDNNc\P.0#
I\aC=:
Totals for Glendale CA
g{dkK8VD>:
&FINIT&MINIT &LNAME
I\aC=:
JY Clarke
"bVN{s&z;vUq#}bDivG;vVN{.sIzZ~vVN{#gZ
~v>}Py>,Pd{u4VN &MINIT zZ{Vu4VN &FINIT .s,Pd;P
Uq#V{ /"- r : 2IzZVN{.s#2IZVN{01SdkV{#
VN{ITGs4"!4rlON=:&LNAME"&lname r &Lname#%tVN5(g
Glendale)a2DUq#2%tVN50DUq#
4Z(fPPvVD==T>ekD5#
v &C*}VVN8(DNN`-rq=#
v U5T>*F[E (-)#
v f;V{CZ8>ms4,#
g{r!(f;;m,Query +vr!CD>D;?V#+G,8VD>PDVN5f
;G+?|(r+?E}#g{;Pc;Udr!{v5,r;r!C5#
g{(ei/1;P9CK(e=h,Query zIDdv+T>ZA;O"9Cj8q
=#
g{8(*r!dvr+df"Z}]bD~P,Query +T>=SA;TczI(e
r!zr}]bD~XT#
": g{Tz&m==KPi/,r+dv"MAr!z,498(KA;dv`
M#
2=r!z
r!i/Ddv,RICj8rc\q=4r!#g{!qK!n,rZ404
P1|1T>0(er!zdv1A;#ZCA;O,I8(*9CDr!zMr
!dvDd{XT#9T>kr!dv`XDd{A;#
": g{Tz&mN=KPi/,I\+dv"MAkzy8(D;,Dr!z,
b!vZz&mD1!r!z5w#
3=}]bD~
+i/DdvEx}]bD~#g{!qK!n,rZ404P1|1T>0(e
}]bD~dv1A;#ZCA;O,I8(*CZf"dvDD~{MI1{,
T0G+CdvmSAD~rI19Gf;CD~rI1PDVf}]#
}]bD~dvDj8Mc\q=<kT>rr!Ddv;,:
v TZA}]bDj8dv,+vT(f8VMc\/}dv(g{Zi/P(
eD0);xv+!qDG<Ex}]bD~#mb,g{8(+dvEx}
]bD~,rvTPFXa>PD5;;aFX}]bdvG<#vT(fP
q=#
v TZA}]bDc\dv,Query +T?v(eD(f8VzI;vG<,|(
8V6pc (0) D;vG<#9C\FVNOD`-5#
!qdv`MMdvq=
dk!n,404P1|#
dv`M . . . . . . . . 1 1=A;
2=r!z
3=}]bD~
dvq= . . . . . . . . 1 1=j8
2=vc\
PFX . . . . . . . . . N Y=G,N=q
FXmH . . . . . . . ___ Uq,1-378
;3ODG< . . . . . _ Y=G,N=q
Query/400 (fDdvq=
dkTB;v!nDEkT!q#{CZi/Ddvq=#I8(GTj8q=9G
c\q=4zI(fDdv#j8q=|(Zi/P!qD+?G<MQ(eDNN
c\E"#c\E"I(f8V"\F"=y5"ns5"n!5rF}iI#
1=j8
TZT>Mr!Ddv,(f,1|,!qD}]G<M+?c\E"#TZ}]
bD~dv,v+!qDG<ExD~P;;|(c\E"#
2=vc\
(f+v|,Z(f8VM(fax(nU\F)&a)Dc\E"#
Query/400 (fPDPFX
dk Y r N 8>ZdvG<PDyPVN;\EZ(fPD;PO1GqFX(fD
P#PFX5CZT>Mr!Ddv;1dv"MA}]bD~rO"= OfficeVision r
DisplayWrite 4 D>D5xPr!1,vTb)5#
Y=G
ZdvG<$H,}(fDmH1+FX?vdvG<D}](Z(fDB;PO
Lx)#g{3vVN;\EkP2,r+{vVN,,|sfDd{VN;p*
AB;P#g{T*FVNq=/DP+,}FXmH,rS(fPOzCVN,
}G|GV{VN,R+CPZFXmH&XOs+T>d5DAY;vV{(;
v SBCS VZrDv DBCS VZ)#
Query/400 (fPDFXmH
vTZT>rr!Ddv,I8(;v8>(fPPDnsmHD5#dk 1 A 378 .
dD;v}5,r_#tKa>*UW#
g{dvG<D+?VN;\Ex(fD;v8(mHDPP,r,}8(mHDV
NSB;P*<#g{+Ka>#t*UW,Zo=8(DA;rr!zDnsmH
1xPFX#
g{8(DmH+!,3)Pjb"VNrc\/}5I\;XOrS(fPOz#
g{"zbyDJb,IZK&xP|D,r_Z08((fPq=1A;OT Pd
`rPjba>xP|D#*i4I\"zKJbDVN,4 F13(<V)
#T?vvm
DVNT>vmE"#
Query/400 (fP;3ODG<
1I\"zPFX1,I8(Gq#{h9Zr!D(fPg3r!G<#dk Y r N
8>Gq#{+?vG<+?EZ(fPD,;3O#
Y=G
+?vG<D+?VN;pEZ,;3O#g{103O;Pc;D#`Ud4]
I|D+?VN,rZB;3OT>rr!{vG<#
N=q
ZS|;3Da2&*<DG<+4h*V*,"ZB;3D%?Lx#ZIEk
{3Dns;vj{VN.sV*,CG<Pd{VNLxZB;3Or!#
| (e Query/400 (fPDr!zdv
0(er!zdv1A;G8vr!zdv(eA;PDZ;v,IC4(eZDo
T0C24==r!(f#KA;CZj6r!zMr!zP9CDr!=(=E)
D3)r!XT,|(r!=D$HMmH"?3ODp<MU9r!P,T0?v
r!DG<.dDPd`#
dk!n,404P1|#
r!=s!
$H . . . . . . . . ___ UW,1-255
mH . . . . . . . . 132 UW,1-378
P` . . . . . . . . . 1 1,2,3
r!(e . . . . . . . N Y=G,N=q
9I8(r!(f1Gqr!i/(e#g{*r!,ZKA;O8(D5+JCZ
i/(fMi/(eDr!#
g{C09Ci/1A;OD!n 6(vr!(e)4r!(e,r_g{,18(}
]bdvMr!(e(+(fExD~P"r!(e),b)5M;JC#
Query/400 (fPDr!zh8
8(CZr!i/(fDr!zh8#g{ZKa>Pdk *PRINT,r9C108(x
w5Dr!zr!(f#g{#{Z;,Dr!zOr!(f,dk*9CDGvr
!zh8D{F#
": g{Tz&mN=KPi/,I\+dv"MAkz8(D;,Dr!z,b!
vZz&mD1!r!z5w#
Query/400 (fPD=Es!
bia>8(CZr!i/(fDr!zC=D$HMmH#g{+b)a>#t*
UW,y9CD$HMmH5GZ QPQUPRFIL r!zh8D~(|G Query 9CD
(;Dr!zh8D~)P8(DG)5#;\Cm;vh8D~2GKD~#
r!=$H
dk;v 1 A 255 .dD}5,T8>*9CDr!zC=OICD?3P},
r_#tKa>*UW#K$H&Gr!=>mD$H#
r!=mH
dk;v 1 A 378 .dD}5,T8>*9CDr!zC=OICD?Pr!P
(V{)},r_#tKa>*UW#g{8(K;vHr!=|mDmH,
Query T+zI(f,++Z(fRKXONN,}r!=mHDVN#g{8(
D5sZ 132,Query +Z4(DYQzD~P?F?"gV{} (CPI) 5* 15,
r!zVe5* *CPI#
b;a0l0T>(f1A;OT>D(fmH#
g{#{vS(fDs_`(s_X;ZZ 1 r!P),rxk08((fPq
=1A;,"Z*Z(fPT>DZ;vVNDPd`a>Pdk;v|sD5#
Query/400 (fPDp<P
dk;v 1 A 255 .dD}5,8>*Z(fD?3Or!DZ;P#!vZZKi
/(ePd{X=(eDZ],3jb"PjbrB;vG<DZ;P+r!Zp<
PO#
g{#tKa>*UW,p<P*Z 6 P#g{8(Kp<PE,C5;\sZU9P
5,R!ZrHZr!=$H5#
Query/400 (fPDU9P
dk;v 1 A 255 .dD}5,8>*Z(fD?3Or!Dns;P#32rG<
(rG<D;?V,g{G<FXD0)+r!ZKU9PO,b!vZZKi/(
ePd{X=(eDZ]#g{8(KU9PE,C5XksZp<P5,R!Zr
HZr!=$H5#g{U9PsZr!=$H,Query +9CHZCr!=$H5D
U954r!(f#
Query/400 (fPDP`
dk;v}5(1"2 r 3),8>#{CZ(fDG<dDP``M#K5XF}FX
PTbyPP.dDdt?(UP}),FXP\G%6P`#g{PFXGn/D
RGXhD,9C}5 2 r 3 I9(f|WZDA#Yh1!5* 1,"r!%6P
`D(f#
1 C%6P`r!(Pd;PUWP)
2 C+6P`r!(PdP;vUWP)
3 C}6P`r!(PdP=vUWP)
r! Query/400 (fPD(e
dk Y r N 8>Zr!i/(f1Gq#{r!;]i/(e#N(q)*1!5#
Y=G
ki/(f;pr!;]i/(e#Zr!(f.0r!K(e#
N=q
r!(f1;r!i/(e#
8( Query/400 (fPDYQzdv2G
0(eYQzdv1A;Gm;vCZLx(ei/(fr!XTDr!zdv(e
A;#I8(CZr!zDr!=(=E)`MM*r!D(f]}#9I8(YQ
zXT:GqYQzdv,T0Gq+dRpZdvSPOTsYr!#
g{8(K*r!i/(fMi/(e,KA;OD5JCZb=_#
jIKA;;a<Bi/"4KPRr!(f#9Xk9C0KvKi/1A;(N
{Z15B KvMKP Query/400 i/)
#
(eYQzdv
dk!n,404P1|#
YQzdv . . . . . . _ UW,Y=G,N=q
]} . . . . . . . . . 1 UW,1-255
Rp . . . . . . . . . _ UW,Y=G,N=q
KPi/1,|+4((f"+dw*YQzr!zD~"MAdvSP#I8(;
*IwHrr!dv,r_+dRpZdvSPO1=Ts3v1d+dME#
Y=G
YQz(fDdv"+d"MAdvSP#N1r!(fIZr!zh8D~
QPQUPRFIL P8(DwH57(#}g,Z CRTPRTF(4(r!zD~)|nD
SCHEDULE N}O8(wH5#
N=q
;YQz(fDdv;Z?vdvG<IC11S+d"MAr!zxPr!#;
(i9CK!n(N=q);g{ZKP1r!z;IC,K!nI\a<Bm
s#
g{8(Zi/KP1YQzi/Ddv,r+(f4(*YQzr!zD~"+d
"MAdvSP#I8(;*IwHrr!YQzD~,r_8(+d RpZdvS
PO1=Ts3v1d+dMExPr!#
Y=G
+(fDdvw*YQzr!zD~RpZdvSPO#1=TsMEKYQzD
~xPr!1,Er!(f#
N=q
;Rp(fDdv;;*IwH14r!#
(e Query/400 (fDr!dvbf3
08(bf31A;Gm;vCZLx(ei/(fr!XTDr!zdv(eA
;#ZKA;O,I8(Gq*(fr!bf3,"I8(Zbf3Or!A`DP
D>#
8(bf3
dk!n,404P1|#
r!bf3 . . . . . . Y Y=G,N=q
bf3jb
_____________________________________________________________________________
_____________________________________________________________________________
_____________________________________________________________________________
_____________________________________________________________________________
(e Query/400 (fPD3<M3E
08(3<M3E1A;GCZ(ei/(fr!XTDns;vr!zdv(eA
;#ZKA;O,I8(GqZ(fDyP3(}bf3b)Or!3<M3E#9
I8(Gr! Query 9CD3<E"j<f>,9Gvr!zT:D3<r_,1r!
b=_#j<3<vCZ?3DZ 1 vjbPO;||,53UZM1d"103kM
ZK&*Z;vjbP8(DNND>#
g{8(T:D3<D>r3ED>,IZ3<M/r3EP9C}vXbzk,b
)zk+953UZ"531dM10D(f3k<7Xr!ZD>Pz#{D;
C#a)b)zkTcI9C|Gzfj<D3<,"4zDh*xPq=/#
&date 53UZ,Tw5Dj<UZq=r!#
&time 531d,Tw5Dj<1dq=r!#
&page
(fD103k,;r!jb(I8(T:Djb)#CUqf;0<c,r
! 1 A 9999 D5(;r!';Vt{)#+G,r*3fVNv*D;,y
T 9999 3TsDyP3<T>0<c(T8>Zb 4 vr!};0fP;v
1 ;Pr!;Z 10 000 3T>* 0000,Z 10 001 3T>* 0001,@K`
F)#
IZ3<M3ED>P#{DNN;C9Cb)zk,"RI`N9C#
dk!n,404P1|#
(dk &date"&time M &page,r!qj<3<#)
r!j<
3< . . . . . . . . Y Y=G,N=q
3<
_____________________________________________________________________________
_____________________________________________________________________________
_____________________________________________________________________________
3E
_____________________________________________________________________________
9Cj<3<1,|+T/q=/"R:
v ZsO=T>(r!D)1053UZM1d
v ZRO=T>(103D)3jbM3k
(e Query/400 (fA}]bD~Ddv
0(e}]bD~dv1A;CZ8(9CDv}]bD~4f"zDi/dv#r
*Z0!qdv`MMdvq=1A;O8(K!n 3(}]bD~),yTT>KA
;#ZKA;O,I8(D~MD~I1D{F,"8>i/dvG4(BDD~r
I1,9G+dmSAVfDI1,r_f;VfDD~rI1#
*f"DdvITGi/!qDG<(g{8(KdvDj8q=),2ITGZi
/P(eD(f8VMc\/}5zIDc\E"#9I8(f"i/dv1Gq*
r!i/(e#
TZ}]bD~dv,+vT3)(fXT(!\I\QZKi/(eP(eK|
G)#g{TsZ0!qdv`MMdvq=1A;O|Ddv`Mrdvq=,IT
4-48(D9Cb)(eDXT#
i/zID}]4UZi/P8(VND3r#fZ}]bD~P#g{ksKj8
dv,+;P*i/!qVN,r+!(G<DyPVNEx}]bD~P,szN
NQ(eDa{VN#
(e}]bD~dv
dk!n,404P1|#
(r!D(eT>dvD~G<<V#)
D~PD}] . . . . . 1 1=B(D~,2=f;D~
3=B(I1,4=f;I1
5=mSAI1
TZBD~:
(^ . . . . . . . . *LIBCRTAUT *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
D> . . . . . . . . ______________________________________________
r!(e . . . . . . . N Y=G,N=q
Z(ei/T+ddvEx}]bD~P1,k<GBPBn:
v }G9CPmxP!q,qrK1;liZKA;O8(DD~{Mb{Gqf
Z,r_zGqP(9C|G#ZKPi/1lib)n?#2liCD~T7#
|G}]bD~#
v ZKPS3vD~q!}]Di/1,Query/400 ;\+}]ExCD~#d;I8
(;vQ!qw*Ki/DdkD~DD~,+g{;9CD~!q2Gr;\K
PCi/#
Z Query/400 (fP9CVfDdvD~(e
I+IUVND5Ex;IUVNP#v=DZ;vU5+<BaxdvDms#
I+UZ"1dr1dAGVNPD5ExNN`,}]`MDVNP,x;X#D
q=rVt{D;,#
Zi/(ensr!DG<q=T>VfdvD~DVNXT#
Z Query/400 (fP9(BDdvD~(e
dkD~(ePD;)q=MVN(eE"4-y4F,;)ZCZ(e?Vdv(
eDc(P9C,;)r;vT#
49zDi/vT;vD~PDG<xPErr!q,+Z4(rf;D~1 Query/400
y4(DdvD~(e\I\kdkD~(e;`,#Query/400 v4(omD~,R
Z9(q=(e1";9C?vdkVN(ePDyPZ]#}g,;S}CDVN
*F$"M#
49a{VNDmo=G;vD~PDVN{,*Ca{VN(eDdvVN2k;
}CVND;,#ZCZIza{(eDc(P+<G}]`M"s!"|L;5
(DBCS S`M)MIU\&#;*FPjb"D>"`-"U51!5H#
#fZi/(ePDq=2GCZvc\dv(e#*(ea{VNx8(DPj
b"s!Mmo=CZj8dv(eT0(Z;;2G1)c\dv(ePD8VV
N#
Query/400 4(I\bX4"43Zc\dvPyC/}TJDVN{#
y]dkVN{MI*;Dc\/}jb4(c\/}VNDD>MPjb#8(D
CCSID !vZ{F"TDX=#i/(e CCSID CZa{VN,!1DD~q=(e
CCSID CZD~VN#
TZa{VNMc\/}VN,tTD8(f0\`Z],x;vGS`XDdkD
~VN4FE",j8M8VVNDs`}tT4Gby#
i4gN4(D~x;5JKP$i/D;V=(G9C;a<BmSG<DG<!
q44(|#;sIT>BD~Dq=(e,Ti4|Gq{O*sr|D*_Pz
#{DtT#T>q=(eG7(3)8(tT(g*d$VNVdD$H)D(;
=(#|Dq=(eG8(X(tT(gU5DW!1!5)D(;=(#
8( Query/400 (fDdv}]bD~
D~: *8(f"i/dvD}]bD~,IdkD~{"9CQ-T>D{Fr4 F4
(a>)4i4VfD~{Pm#g{*9CVfDD~,IST>DPmP!qz
k*DG;v#g{*4( B D~,8(DD~{Z#{f"BD~DbP;&f
Z#PXji,N{=<A. Query/400 k Query/36 Dxp#
4PBPdP;nYw:
v dk*|,i/dvD}]bD~D{F#
v #tT>DD~{#+G,g{CD~{G QQRYOUT,zI\*|D|;r*
QQRYOUT Gd{KIT9CDD~#{GI\9CKD~"f;zD}],r_z
I\f;{GD}]#
v +bjEZD~a>P,Z0!qD~1A;O4 F4(a>)i4Z8(DbrbP
mPzP(9CD+?D~DPm#
g{*9CVfDD~,ISCPmP!qzk*DG;v#
g{*4(BD~:
– &i$z*9CDD~{;ZCPmP#(+G,k"bzv4=P(9CDD
~,MVZuAP4fZDICD~{8(DD~,Z5JKPKi/.0I4
(CD~#G1,g{IC{F8(DD~fZZz8(DbP,z+aC=;
vvmE",xzXk|DKi/(erf;VfDD~#
)
– D~{XkTV8V{(A A Z"$"# r @)*<,RdsIzn`EvV8}
VV{(A A Z"0 A 9"$"#"[@0000]"."r _);}g,NAMEADDR r
INVEN_12#
r* AS/400 53Os`}53a)DTsT Q *7,yTzDD~{;&T Q
*7#mb,g{zP53;Z9Cd{oTDzR,zI\;k9C $"# r
@,r*|GI\G;I*;DV{#
r_,+bjEZKa>P,4 F4 PvD~PDI1,"SPmP!q;v;+G,
g{*4(BI1,&9CPmP;PT>D{F#
+i/}]ExVfD~Px;xPf;1,Ci/}]Dq=XkkVf}]bD
~DG<q=(ef]#*f],TBu~Xk*f:
v b=Vq=XkP`,DVN}#
TZf;VfD~rI1P}]DNN!n,TBiv2XFGqIf;C}]#g
{"zTBiv,r;\f;D~rI1PD}]:
v d{D~!vZKD~D(e#}g,;\f;d{_-}]bTd*y!Dom
}]bD~PD}]#I9C0T>}]bX51(DSPDBR) |ni43vD~kd
{D~DX5#
v T*f;DD~,z;PXhD(^#
v CD~;GomD~r_|P`vq=(e#
v dvD~{rI1{kZi/P9CDNN!(D~{rI1{`,#
TZyP!n,g{D~;fZZ8(DbP,Query +T<4(CD~#
BmT>TZ?v$(eD(^`M,ITD~4P24Yw:
(^ ' 4( f; mSB mSA f;
`M ' BD~ D~ I1 I1 I1
--------- ' -------- -------- ------- ------ -------
*ALL ' G G G G G
*CHANGE ' G q q G q
*USE ' G q q q q
*EXCLUDE ' G q q q q
Query/400 (fA}]bD~Dvc\dv
Z!qKvc\dv1,"MA}]bD~D}]GBPdP;V:
v g{;P!qc\/}M(f8V,dvG|,i/!qDG<F}D%vG<#
v g{!qKc\/}x;P!q(f8V,dvG|,c\/}5D%vG<#
v g{!qK(f8Vx;P!qc\/},dvG|,?v(f8VD(f8V5
DG<#
v g{!qKc\/}M(f8V,dvG|,?v(f8VMnU\FD(f8V
5Mc\/}5DG<#
*|CXmbA}]bD~Dvc\dv,+c\}]bD~dvk,;i/Dr!
(f`HO#zID}]G`,D(g{;PVFc\),+}]D<V;,#g{
r!;vi/Di/(e,1+dv"MA}]bD~,r|(G<q=<V#
?vdvA}]bD~Dvc\G<PDE"_PTBq=:
v ?vG<DZ;P|,8V6pEk#
v ?vG<DZ~P|,gv8>w#
v ?vG<DZ}P*<5J}]#
8V6pG;v 0 A 6 .dD}5,|j6dvAG<D;,(f8V6p#0 j6
nU\F(c\)G<#Ek 1 A 6 j6(f8V,"T&ZkC(f8VX*D6
pEk#
gv8>w8>}]N1Z>G<D;vr`vVNPgv#g{;P"zgv,8
>w;C*UW#g{NNFcDVNgv,rT>GE (*)#gvDVNC_PC`M
Ms!DVNDns5nd(Zr!rT>D(fP,C5T>*;.GE *****)#
4VN+dv}]Vi,(f8V5szCVNDNNc\/}5#+EH6H10
8V6pMD8VVND}]1wGU5#g{dvD~PDT&VN;IU,
Query/400 +9CU51!5(gTZV{}]*Uq)#4TB3rT>rr!c\}
]:\F"=y5"n!5"ns5MF}#g{TVNxP\F,Query +rVN$
HmS 3 ;T]I\F(n` 31 ;) #F}c\5G 7 vV{$,"RGx;.x
}g,YhzP;vdkD~,||,yP]D1$K1E"#z*hC;vi/,
ks?vXMPD1$D\F$J"=y$JM1$}#Ci/+y]=vVN:
CITY M COUNTY Er#*b)VN(e(f8V,"T?vXD0$J1VNs\F"
=y5MF}#
g{QKPKi/"!qKvc\dv,TB_uG<+"MA}]bD~:
2 Los Angeles Arcadia 00007000000 03500000 0000002
2 Los Angeles Glendale 00009000000 04500000 0000002
1 Los Angeles ......... 00016000000 04000000 0000004
2 Orange Costa Mesa 00006000000 03000000 0000002
2 Orange Irvine 00008000000 04000000 0000002
1 Orange ......... 00014000000 03500000 0000004
0 ......... ......... 00030000000 03750000 0000008
| | | | | | |
Break level ID (1) | | | |
| | | | | |
Overflow indicator (1) Total salary (11.2) |
| | | |
County (11) | Average salary (8.2)
| |
City (10) Count (7.0)
VN5ws2(EPD}5GdvVN$HM!};}#UW8V5T>*;.d
c#"bgv8>wP*UW,8>yP}]<OJ#
": =y5DXOrak;O*Ggv#
ZOfD>}P,i/,18(Kc\/}M(f8V#g{Ki/H;P8(c\
/}V;P8((f8V,dv+aG|,i/!(G<DF}D%vG<(8V6
p 0)#}g:
0 0000008
g{Ki/8(Kc\/}x;P8((f8V,dv+aG|,i/!(G<Dc
\/}5D%vG<(8V6p 0)#}g:
0 00030000000 03750000 0000008
g{Ki/8(K(f8Vx;P8(c\/},dv+aG?v8(D(f8VD
G<#ZOfZ;v>}P,|G;Pc\/}D0yvG<#}g:
2 Los Angeles Arcadia
2 Los Angeles Glendale
1 Los Angeles ........
2 Orange Costa Mesa
2 Orange Irvine
1 Orange ........
Query/400 &m!nDC>
08(&m!n1A;OICD}V&m!nozzXFi/dvD+HM<7T#
P1zI\*szDi/dvG#+7,}g,g{z*Fc'6xM'DE{{
"#P1zI\;XDzDa{Gq.V+7,}g,g{zDi/Fc%j:rz
+>z7[5,} $10,000 DM'D|FYVH#
dk!n,404P1|#
9Cak . . . . . . . . . . . . . UW,Y=G,N=q
vT!}
}]ms . . . . . . . . . . . UW,Y=G,N=q
vTV{
f;/f. . . . . . . . . . . . Y Y=G,N=q
TyPV{HO
9C{m3r. . . . . . . . . . Y Y=G,N=q
Z Query/400 &mZdak}VVN5
IXFZi/KP1Gak9GXO}VVNFcrVN$H|DDa{#g{Z
08(&m!n1A;ODaka>Pdk Y,rZi/KP1+akyP}VVNF
ca{(g{PX*D0)#g{ZCa>Pdk N,ri/KP1+XOyP}VVN
Fca{(tPX*)#
Gq!qak}VVNFc!vZz*sa{+7=24LH#*<,h*7(ak
rXO+gN0la{#g{zDi/9C8vK(r}(Kc,}VVNFcDa
{I\fz!qaka{9GXOa{xwT;,#bGr*ZxPFc1VNI\
"z`NakrXO#}g,M'Da7pnKT{"JaC=by;va{,|D
!};Hzh*rJmPD9`#g{PX*,ITa{xPakrXO,byaZ
a{P}k;v !ms#YhY+Ka{S=d{M'D`FFcP#yPD!ms
*<~S*OsDms#KmsI\HOOXr;+OX,!vZz!qKak9G
XO,a{I\`nOs#
": g{*}Vmo=4(Da{VN+!^(]Ia{D{}?V(!}cs_D
}5),r;\FcCa{""z.xF}]ms#49Zaka>P8( N,"
ZvT.xF}]msa>P8( Y,g{v=.xF}]ms,Query +#9&
m#ak!nMvT.xF}]ms!n&\vJCZIFcD}V}]#PX
vT.xF}]ms!nD|j!5w,N{Z2463D:Z Query/400 P8(&m
!n;#
";vvTa{VN4PakMXO,9T0!q(fc\/}1A;OD=y5M
\Fc\/}4PakMXO,"Z08((fPq=1A;OXh}VVN$H
(gSev!};|D*}v!};)14PakMXO#
Z Query/400 &mZdvT.xF}]ms
(}ZvT.xF}]msa>sdk Y r N,I8>Zi/KP1Gq#{ Query v
T|Z}VVNPR=DNNms#}g,x;r9u.xF}VVNPD A(.yx
F C1)G;vms#g{!qKvT}VVNPDms,r+ A |D* 1(.yxF
F1)#g{!qK;vT}VVNPDms,+T>vmE"rZdvP+CVN5T
>*SE(++++)
#zC=Dms!vZCVNGgN9CD#
II Query v(ZKPi/1GqvT|Z}VVNPR=DNNms#g{+08(
&m!n1A;ODvT.xF}]msa>#t*UW,Query +y]Ci/KPy
ZD737(GqvT.xF}]ms#g{Z AS/400 73PKPi/,;vTms#
g{Z System/36 73PKPi/,vTms#
Gq!qvT.xF}]ms!vZzD}]Gq|,a<B.xF}]msD}
5#g{i/yCD~PDx;r9u}VVN|,4}#bM*x;r9u}]D
}],zI\#{(ei/vT.xF}]ms#}g,ZC'+a>#t*UW
1,3)&CLr+UW4xx;VN#mb,3)1SD~+yPG<hC*.y
xFD 40#
vT.xF}]msaa_T\I>,g{D~;|,bV}]r&\bbyv#g
{(ei/;vT.xF}]ms,|IKPC|l#
Z Query/400 &mZdvTV{f;/f
0vTV{f;1a>Jmz8(Z+}]r{m3rS;v CCSID *;*m;v1
Gq&vTV{f;/f#
Z Query/400 &mZdTyPV{HO9C{m3r
TyPV{HO9C{m3ra>Cz8(Gq&!{^F!({m3rD9C#
Y=G
TyPV{HO9C!qD{m3r#!qK!n1,A HZ a,g{|G2mk
bTr}]`M^XD3rP3v{m(#
N=q
;T EQ"NE"LIST"NLIST"LIKE M NLIKE bTr DBCS VNPD SBCS }
]r#?9C!qD{m3r#TZSf> 2 "Pf 3 T0D"Pf4-Di/
rS System/36 *;4Di/,bG1!5#
ax Query/400 i/(e
ZjI4(i/"ZdP;v(eA;O4K F3(Kv)1,+T>TBP>D=vA
;.;#g{4xS OfficeVision r DisplayWrite 4 Lrxk Query,rT>0Kv
Ki/1A;#
KvKi/
dk!n,404P1|#
#f(e . . . . . . . Y Y=G,N=q
KP!n . . . . . . . 1 1=;%=KP
2=z&mKP
3=;KP
TZQ#fD(e:
i/ . . . . . . . . __________ {F
b . . . . . . . . QGPL {F"4 F4 qCPm
D> . . . . . . . ____________________________________________
(^ . . . . . . . . *LIBCRTAUT *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
dk!n,404P1|#
#f(e . . . . . . . Y Y=G,N=q
O"!n . . . . . . . 1 1=9C;,Di/
6=}]1SO"
7=Pm}]5w
8=`1>}]5w
TZQ#fD(e:
i/ . . . . . . . . __________ {F
b . . . . . . . . QGPL {F"4 F4 qCPm
D> . . . . . . . _________________________________________
(^ . . . . . . . . *LIBCRTAUT *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
ISTO;vA;#fB4(Di/rTH0#fDi/D|D#
#f Query/400 i/(e
Z#fi/(e1,,1#f(eDyP5#+|#fZz8(DbP,"+dmf
* *QRYDFN `MDi/(eTs#g{bGBTs,zMGd5P_,"RzI8(
d{D)C'IC24==9CzDi/#sd{Ts;y,I9C0T>Ts5
w1(DSPOBJD) |n4T>PXi/(eDE"#
*#fB4(Di/,dki/{( i/a>)Mb{(ba>)(g{P4Z09
Ci/1A;O4PKYwD0)#*T>bPm,+bjEZba>O"4 F4(a
>)
#
g{*#fTH0#fDi/D|D,^ha)i/{rb{;b){F&CQ-Z
CA;O#g{*|Di/{rb,rCC{FMb4(BDi/,x-HDi/#
V;d#
hv Query/400 i/(e
2IdkPXi/D;)hvD>#1KD>T>Zi/PmPrr!Z(fDbf
3O1,|+a>zCi/P24C>#}g,^[N1T>D>P,D><T>Z
09Ci/1A;O#
I8(z#{3hd{C'TKi/(eTsD(^`M#Z0KvKi/1A;r
0Kv}]/D>O"1A;O8(DZ]7(d{C'gN9CCi/#Z4(i
/s#f|1,0KvKi/1A;M0Kv}]/D>O"1A;OD1!(^*
*LIBCRTAUT#
zI8(D5*:
*LIBCRTAUT
b4((^y]*4(CTsDbPD CRTAUT 58((^#C(^ITG
*ALL"*CHANGE"*EXCLUDE"*USE rZ(m{#d{C'9CCi/D~D
\&!vZ8(D(^#
*CHANGE
|D(^Jmd{C'TCTs4PyPYw,+G)v^ZyP_rITsfZ
(^MTs\m(^XFDYw}b#C'ICNN=(|Dr9CCi/(e,
+;\T|xP4F">}r#fT|D|D#
*ALL
+?(^Jmd{C'TCTs4PyPYw,+G)v^ZyP_rIZ(m\
m({XFDYw}b#C'ITCi/4PNNYw(|(>}|),+;\+
d*CxBDyP_r_|D(^`M#
*EXCLUDE
E}(^h9d{C'TCi/(e4PNNYw#}Ga)KX(D(^`M,
qr;PCi/D5P_E\9CCi/(e#
*USE
9C(^Jmd{C'KPCi/r_T>rr!i/(e#C';\4FCi/
(e,2;\#fTC(eD|D#I!qCi/xP|D"T;,D{F#f#
Z(m{
g{8(Z(m{,d(^+CZXFC'TCi/Df!(#Z|Di/1,
Query +T>+C(^Xb5x;GZ(m{#Z4(i/1I8(Z(m;+;
\TVfi/hCZ(m#PXji,N{ Security - Reference ;i#
TZ?v$(eD(^`M,BmT>ITCi/4P24Yw#
(^ ' |D 4F >} T> r!i/ KP |D
`M ' i/ i/ i/ i/ (e i/ (^
--------- ' ------ ----- ------ ------- ---------- ----- ---------
*ALL ' G G G G G G q
*CHANGE ' q q q G G G q
*USE ' q q q G G G q
*EXCLUDE ' q q q q q q q
#f Query/400 i/1}]rD>O"i/<GBn
g{;P#fCZ+}]rD>O"x OfficeVision r DisplayWrite 4 D5Di/,
k<GTBBn:
v g{Z0KvD>/}]O"1A;OTO"!na>8( 6,ra*'BDi/(
er|D#
v ;\ZO"!na>P8( 7 r 8 4+X}]VN5w#
*KPi/,zI4PBPN;Yw:
v Z4("T>r|Di/14 F5((f)#b+KPCi/"T>(f#
v Z0i/1K%O!q!n 2(KPVfi/)#
v Z0KvKi/1A;ODKP!na>Pdk 1(;%=KP)r 2(z&mK
P)#
v Z09Ci/1A;OD!na>Pdk 8(z&mKP)r 9(KP)#
v 9C0KPi/1(RUNQRY) |n#
KvKi/
dk!n,404P1|#
#f(e . . . . . . . Y Y=G,N=q
KP!n . . . . . . . 1 1=;%=KP
2=z&mKP
3=;KP
TZQ#fD(e:
i/ . . . . . . . . __________ {F
b . . . . . . . . QGPL {F"4 F4 qCPm
D> . . . . . . . _______________________________________
(^ . . . . . . . . *LIBCRTAUT *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
v1;%=KP1,E\;#fi/(exKPi/"qC(f#(Xk#fi/E\
Tz&m==KP|#)+G:
v g{*4(i/"!q;#f|,r|vKP;N,;s*'#*#fi/,h*
TbMi/a>a)}5#i/{ZCbPXkG(;Di/{#g{;G,Query
+"v;vE",/JGq#{f;VfDi/#
v g{*Tz&m==KPi/,ZKPi/0Xk+d#fZG QTEMP DbP#
v g{*|Di/"!q;#f|,G4|+;#fG)|D,Rv1"4KPi/
1E9CB|DDrBdkD5#2MG5,g{|DKVfD(e,(f+vT
>;Nb)|DDa{#g{YNKP(f,+y]-4D(ezza{#
*#fB|DDi/,^ha)b{Mi/{;g{a)K,-4Di/#V;
d,"CzyvD|D4(Bi/#dkCZ#fi/Db{#;\Tba>8(
5Jb{r *CURLIB#+G,g{z#{Hi4bPmTcSP!q;vb,4PT
BYw:+bjFAKa>,dk;vXbb{(g *LIBL)r`tb{(9Cq=
ABC*),;s4 F4(a>)#
g{!q;%=KPi/,ZKP!na>Pdk 1(;%=KP)"404P1|#
Query ZA;OT>(f"Zr!zOr!(fr_+i/D}]Ex}]bD~P#
PX!qdvh8Dji,N{Z13B Z Query/400 (fP!qdv`MMdvq=#
I*;|,NN}]DD~I14(i/#g{KPi/,r(fP;T>NN}
],2;Z}]bD~PExNN}]#+G,IZ0KvKi/1A;O4 F13(<
V)4liz(fD<V#
S09Ci/1A;KP Query/400 i/
S09Ci/1A;,;\KPH0#f}Di/#i/j+4U(eKP#g{#
{|DPXdvh8DNNhC,XkWH|Di/,;sKP|#
*S09Ci/1A;KPi/:
1. !q!n 8(z&mKP)+i/a;=zDC'r*mDw55wP8(Dw5S
P#
2. !q!n 9(KP);%=KPi/#
3. dki/D{F#g{;*@i/D{F,Z203D:SPmP!q Query/400 i
/{;+f_zgNi4i/{Pm#
4. dkf"i/DbD{F#Query Yh|f"ZON Query $wT0yCDbPr
10bP#g{;P10b,Query Yh|f"Z QGPL P#I|DYhDb{#
g{;*@b{,Z213D:* Query/400 i/!qb;+f_zgNT>b{P
m#
5. 404P1|#
9Ci/
dk!n,404P1|#
Query T>(f"r!(fr+}]Ex}]bD~P,b!vZZ0!qdv`MM
dvq=1A;O8(DZ]#PX!qdvh8Dji,N{Z13B Z Query/400 (
fP!qdv`MMdvq=#
PX RUNQRY |n"dN}"gN9C|M3)>}Dji,N{;i#
ZKP#fDi/1,zI\C;=Z{Da{#TBPmPDn?I/,0lgN
KPi/r_gNq=/}]:
v w5DoT ID rEr3r(g{i/S10w5q!|GD0)k(ei/1;
,#
v w5UZDq=#
v CoT}V`-D1!5#
v 53!};&m5#
|D Query/400 i/(e
IZ09Ci/1A;O9C!n 2(|D)4|DH0#fDi/#IZCA;Oa
)i/Mb{,r_ISPmP!qi/#(PX9CPmDji,N{Z143D:Z
Query/400 P9CPm;#)
|Di/k4(i/8uG,;}L#Z0(ei/1A;O!qz#{|Ddi/
(e5D(e=h#T>(e=hA;1,Q-n4KG)a>#*|Di/,zh
*vD+?$wMG|Dr>}a>PD5#
jI|Di/1,IKP|"#f|"KP"#f|,HH#
+G,g{ZKPMbT|DDi/sv(#t|D,I>}-44|DDi/#
IT Query/400 i/xPD|D
(#,ITi/xP=V|D#I|D:
v (fD}],(}|DG<M/rVN!q
v (f(rdv)DXT,(}|Dq="c\r(f8V
i/ . . . . . . : QRY1 !n . . . . . . . :|D
b . . . . . . . : QGPL CCSID . . . . . : 37
Opt i/(e!n
> 8(D~!q
_ (ea{VN
_ > !q"ErVN
_ !qG<
_ !qErVN
_ !q{m3r
_ > 8((fPq=
_ !q(fc\/}
_ (e(f8V
_ !qdv`MMdvq=
_ 8(&m!n
10*i/(eD!ns_aT>;v >#I|Db)!n"(e=SD!n#ISK
A;4h*!qNb`v!n#dP?v!n0d`XDA;QZ0fDBZPhv
}#
?v!n<P|T:DT&A;,Zb)A;OIxPX(D|D#y!!nDA;
4|GZ0(ei/1A;OvVDNrT>#
g{v(;h*Q-(eD!n,4PBPYw:
1. Z0(ei/1A;O!qC!n#
2. >}TC!nA;jIDNNa>#
g{Zzi4!nA;sv(;|DdODNNZ],vh404P1|x;|DN
NZ]"Lx#g{|DKCA;,Vv(Cd#t-4,4 F12(!{)#
g{v(;k#fT0;A;yvD|D,4 F3 ax^)"T0KvKi/1A;O
D#f(ea>dk N(q)#
1zZA;O$w1,I40oz1|i4*zozE",CE"rLhvgN*C
!n8(!n#9I4 F5 r F13 i4b)|DgN0li/zzD(f#
S0KvKi/1A;,I4PBfdP;nr=nYw:
v #fi/(e0zyvD|D#
v 9CyvD|DKPi/#
KvKi/
dk!n,404P1|#
#f(e . . . . . . . Y Y=G,N=q
KP!n . . . . . . . 1 1=;%=KP
2=z&mKP
3=;KP
TZQ#fD(e:
i/ . . . . . . . . __________ {F
b . . . . . . . . ________ {F"4 F4 qCPm
D> . . . . __________________________________________
(^ . . . . . . . . *LIBCRTAUT *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
I|Di/"bMD>a>DNNiO#g{#fi/(e,b)|DPTB'{:
i/{M/r i/{M
b{|D b{;d
Vfi/;d Vfi/|D
CB{FM/rZ;,DbP4(KBi/ Bi/(ef;Vf(e
D>M(^JCZBi/ D>M(^JCZi/DB(e
g{*f;i/,;\8(Z(m{(^;Xk9CdP;vXb{F(*CHANGE"
*ALL"*EXCLUDE r *USE)rUW(;|D)#
g{!q;#fi/(e,TBPa>D|DPTB'{:
|DDa> '{
i/{ ^
b{ ^
D> g{!qKPi/Rr!zG!qDdvh8,D>+r!Z
bf3O#
(^ ^
|D Query/400 i/D{m3r
|D09C{m3r1&m!nDhCI|DzDa{#g{+C&m!nhC*
0G1,r EQ"NE"LIST"NLIST"LIKE M NLIKE bT+HOV{{m5#g{
+C!nhC*0q1,b)bT+HO.yxFV{`k#
4F Query/400 i/(e
P\`-r*4Fi/#TBG3)n#{D4F:
v SpKDbP+i/4FAzDb#
v 4Fz#fZbTbPDi/,TC;,D~"G<q=Mi/&\?~xPT
i#1zP;v#{9CDi/1,I+d4FxzDbP,"+-4DGv#t
ZbTbP)x;=Ti#
v 4Fi/,TcITdxP|Dx;XDd-4Di/#
v (}+i/4FAd{b,;sS-4DbP>}Ci/,4X|{i/r+i/
FAm;vb#
IZ09Ci/1A;O9C!n 3(4F)44FH0#fDi/#IZCA;Od
ki/D{F(M|Db{),r_ISi/PmPZ#{4FDi/Tdk 3#(PX
9CPmDji,N{Z143D:Z Query/400 P9CPm;#)
404P1|s,vV04Fi/1A;#(ZTBA;PdkK3)y>E"#)
4b . . . . . . . . . . : TESTLIB
dk!n,404P1|#
*X|{4FDi/,|D0?ji/1{F#
4i/ ?ji/
ACCTRECFEB __________
INVENTFEB __________
MAILADDR __________
PAYROLLFEB __________
*+1>Ex;|,-<i/DbP,Z?jba>Pdk;,Db{#g{;*@
&SU1>Db{,I9C F4(a>)SPmP!q;vb#
*+1>Exk-~`,DbP,;*Z?jba>PdkNNZ]#
;sZf;i/a>P!q;v!n:
v g{#{C1>f;bP,{Di/,dk Y#
v g{#{vZbP;fZ,{Dd{i/1E+i/4F=bP,Za>P#t N#
*X|{i/,Z ?ji/PPdkB{F#g{+1>Ex-4i/yZDbP,
XkdkC1>DB{F#g{+1>EZ;,DbP,IX|{|,r_9C-4
Di/{#
g{ Query Z4Fi/1"Vms,rT>}Z4FDi/DPm,"ZA;DW?T
>vmE"#vmDi/avA"T>ZPm%?#ZPmPCi/.0D+?i/
Q-4F#I4PTBdP;nYw:
v 4 F9(4;),;C404P1|#!{+?#`i/(|(vmDi/)D4F}
L#
v 4 F20(!{vmD4F),;C404P1|#;4FvmDi/#*Lx4F#
`Di/,404P1|#g{4Fd`3vi/1"Vms,rT>m;vms
E","YNT>Pm,+Ci/vAT>PZZ;;#
b)NqG09Ci/1A;OD!n,Z>BDd{!ZPxPKhv#
I(}TB=(>}H0#fDi/:
v 9C0>}i/1(DLTQRY) |n#PX9C DLTQRY |nDji,N{;i#
v Z0i/1K%O!q!n 3(>}i/) #|+T> DLTQRY(>}i/)|no
zA;#PX9C DLTQRY |nDji,N{;i#
v Z09Ci/1A;O9C!n 4(>}) #IZA;Odki/{(M|Db{),
r_ISi/PmPZ#{>}Di/Tdk 4# (PX9CPmDji,N{Z143
D:Z Query/400 P9CPm;#
);s404P1|#vV07O>}i/1A;#
7O>}i/
4b . . . . . . . . : MYLIB
404P1|7O!q04=>}1 #
4 F12 5XT|DzD!n#
i/
ACCTRECJAN
INVENTJAN
MAILADDR
PAYROLLJAN
TESTQUERY1
TESTQUERY2
KA;T>z!q>}Di/{#(OfDA;T>3)y>E"#)P8liG)
{F#
g{7O*>}PvDi/,404P1|#>}b)i/#g{Si/Pm!q
K*>}Di/,Z5XA09Ci/1A;1;Y|(Q>}Di/{#
g{zv(;#{>}dP;vT>Di/,4 F12(!{);>}NNi/5XA
09Ci/1A;#TT>i/Pm,RI|DzD!q#
g{T>i/"v(*|D|,Xk5XA09Ci/1A;"9C!n 2(|D)#I
r!ZT>i/14=DE",49CE"Dq=;,2Ir!#N{Z1893D:r
! Query/400 i/(e;#I\Ir!;\|DrT>Di/D(e#
IZ09Ci/1A;O9C!n 5(T>)4T>H0#fDi/#IZCA;Od
ki/{(M|Db{),r_ISi/PmPZ#{T>Di/Tdk 5#(PX9C
PmDji,N{Z143D:Z Query/400 P9CPm;#)
404P1|s,vV0(ei/1A;#*i/(eDyP!nDs_T>;v >#
*i4b)!nGgN(eD,zI4PBPN;Yw:
1. 9C F21 i4yP!n(uAG);P*Ki/(eD!n)DA;#
2. Zz*i4D!nTD Opt PPdk 1#
ZT>i/1,I4 F5 4i4g{KPCi/T0T>rr!(f1,(faG24
y#
1i4j;v!nDA;"<8i4B;v!nDA;1,404P1|#i4Ky
P!qD!nA;s,5XA0(ei/1A;#IYNi4b)`,D!n,r!
qT>;,D!n#17(T>jKi/(e1,zI4PBPN;Yw:
1. y]h*4tIN F12 5XA09Ci/1A;#
2. g{S09Ci/1A;ODPmP!qK`vi/,I4 F3 9Cd`Di/#g
{9CjZCA;O!qDyPi/,z+5XA09Ci/1A;#
": g{TON9CrT>i/T4|DKD~(e,rI\^(T>i/#|Di
/rD~(eI\T>Ci/#ZT>12I\;\9C3v|nM&\|,r
*|G;Z4(r|Di/1EIC#
I9CTBNN;V=(r!i/(e:
v Z09Ci/1A;O9C!n 6(r!(e) #IZCA;Odki/{(M|Db
{),r_ISi/PmPZ#{r!d(eDi/{Tdk 6# (PX9CPmDj
i,N{Z143D:Z Query/400 P9CPm;#)
v Z0(er!zdv1A;rZ0(e}]bD~dv1A;O8(r!(e,;
sKPi/#b)A;ZZ 13 BPhv#
v Z9C0KPi/1(RUNQRY) |nKPi/18(r!(e#PX RUNQRY |
nDji,N{Z1793D:9C RUNQRY |nKP Query/400 i/;#
Z09Ci/1A;O!q!n 6(r!(e)"404P1|1,"4r!i/(e#
* Query/400 i/(er!DE"
r!dv|(BPE":
v ?3%?Djb#KjbP>yC53DE"T0(eDr!1d#
v i/{M CCSID#
v b{#
v PXi/DNND>#
v #?tT(!}cVt{"UZq=MVt{"1dq=MVt{)
#
v &m!n#
v {m3rE"#
v wV/f#
v D~j6{#TZ?vD~j6{,r!dv|(BPZ]:
– D~{
– b{
– D~I1{
– *D~!qDG<q=
v g{9CK`vD~,9CD,SbTM,S`M#
v NNa{VN"|GDmo="$Hk!};MPjb#
v G<!qbT#
v !qDVN"|GD3r"ErEH6kEr`MMNND>#
v Pq=Mc\#
v NN(f8V#
v !qDdv`M:
– g{*r!(f,rT>r!zE"#
– g{*+dvEx}]bD~P,rT>}]bD~E"MVN<V#
v !qDdvq=:j8rvc\,T0FX5w#
}PXi/(eDE".b,g{i/zIA}]bD~Ddv,9+r!G<q=
<VD5w#
Query/400 i/(eDr!G<q=E">}
BfGKPi/1Ir!Di/(e(}]bdvD~DG<q=<V)D;vX(
?VD>}#v1Z*}]bD~dv(ei/,RrKCi/rC}]bD~"M
vc\dv1,Er!TBT>DE"#
": (fOyT>DGq=/.sr!Ddv$H,x;GZ?}]bVN$H#
+C$HSO*<;C;\C=B;VND*<;C#
v TZG}VVN,Dec PT>|,ZCPPD}]`M:
UWm>($V{
V m>d$V{(SBCS r DBCS)
J m>(;= DBCS
O m>*E= DBCS(lOM)
E m>q;= DBCS
G m><N DBCS
L m>UZ
T m>1d
Z m>1dAG
v U5PT>VNGIU (Y) 9G;\(UW)#
v }]`MPT>?vVND}]`M#
v D>PT>?vVND"b(g{PD0)#g{CVNCZc\/},T>DD>
r*VN{(;PNNmSDEk),szc\/}D`M#
v CCSID P(g{T>D0)Zm>`v CCSID 1T>,"T>?vVND CCSID#
Query/400 P9C;,G<q=DD~
I9CP`VG<q=DD~;+G,?N;\9C;VG<q=#g{z*hFD
&CLr*s,1&m,;D~PD;,G<q=,&<G9C RPG/400 r
COBOL/400* LrhFoT#
}g,g{M'{9C;VG<q=,x?vM'&6pn9C,;D~PDm;V
G<q=,%vi/r;\r!&6pn,} $500 D+?M'D{F#*KC Query
S=VG<q=P!qG<,!q5 — M'{FM&6pn — XkfZZ;VG<
q=P(2MG5,omELG<Xk,143M'{FM&6pnVN)#
": I(}+D~M|T:,S,Z%vi/P5Vbc#+G,b)G<q=Xk
+<|,;v+2VN#PX,SD~Dji,N{Z443D:Z Query/400 i/
P,SD~;
Query/400 PDD~2m<GBn
Z Query S;vD~4((f1,d{&CLrIA!"|BCD~,xR=vr|`
v Query (eI,1}C,;D~#
Z Query/400 P2G}]bD~
g{9C0C}]bD~2G1(OVRDBF) |n2G}]bD~,r;\$bzDi/
KPa{#Query Jmz9C OVRDBF |n,+I\a"zJb,r**;2GD~
!qDG<q=MD~I1I\^(kBD~T&#
Z Query/400 P,SD~
TZ,SDD~(,SD`M):
v `M 1 ,Sk Query/36(Z System/36 O)D`,#
v `M 2 ,S!qwD~PD+?G<MND~PkwG<%dDG<#
(|!q%d
n#)
v `M 3 ,Sv!qwD~PkND~;P%dnDG<#
(|!q}bn#)
Z Query/400 P9CGErVNDVNxP(f8V
CZErDVNZ(fPI\G;PbeD,rKzI\#{9C;GErVNDV
Nw*8VVN#}g,|,J~j)M'{F?VDVNICw8VVN,x+N
b8(D(2G(;D)M' ID CZEr#r*M'{G8VVN,yTI+|ek
8VD>rExvc\}]bD~P#
Query/400 PDa{VN$HM!};}
Query Z(fP4(a{VN1,+7(|DT>$HM!};}#b)5{Os`}
C'D*s#TB8Z(iC'&ZN10gN8($HM!};#PXx;=DE
",N{Z1263D:Query/400 (fPD$HM!};;MZ883D:Query/400 PD
$HM!};};#
Z Query/400 P&mT>$HM!};}Da>
Z3)ivB,Query *a{VN7(D$HHh*Ds#}g,TZa{VN
RESULT10:
a{VN -------- 5MYw} -------- <V
RESULT10 9 + 9 + 9 + 9 + 9 999999
RESULT11 N1 + N2 + N3 + N5 + N5 99999
Zf0m`sVNDFcP,(}+mo=V*8?V,??Vw*%@Da{VN
Fc,I|CXXFa{#;sIZmo=P9Cb)a{VN4Fcz*Da{V
N#I8(Pda{VND$HM!};4+nUa{VND$Hu=n!#
}g:
X12 = (1.2998 − P − Q)/((R + S) * (T − U)) + 6
*;sOfGyZ;v=hP(ea{VN X12,IZTB}v=hPjI|:
X12PART1 = 1.2998 − P − Q
X12PART2 = (R + S) * (T − U)
X12 = X12PART1/X12PART2 + 6
Query/400 PCZZ?}5FcD$HM!};}
BP+=(e Query ZT}Va{VNxP!}Fc1Z?9CDns$HM!};
}#ns$HM!};};Xk Query 8(DT>$HM!};}T&#{E p M d
m>Z;vYw}D$HM!};}#{E p1 M d1 m>Z~vYw}D$HM!}
;}#
Query/400 PDS(Mu(
a{VNDns$H:
min(31,max(p-d,p1-d1)+max(d,d1)+1)#
ns!};}:
max(d,d1)#
Query/400 PDK(
a{VNDns$H:
min(31,p+p1)
ns!};}:
min(31,d+d1)#
31
ns!};}:
31-p+d-d1#
(ea{VN
9CVN{"#?MKc{dk(e,404P1|#
Kc{: +"-"*"/"SUBSTR"||"DATE...
< 7. 9C1!5D!}+H
9CVN{"#?MKc{dk(e,404P1|#
Kc{: +"-"*"/"SUBSTR"||"DATE...
< 8. |D!}+H
Z Query/400 P!qG<(vTVNs!4)
*vTs!4!qG<,4PTBYw:
v T(e{m3r,T9s4V8M!4V8P`,D(#
v T2m{m(9C53Er3r#
9XkZ0!q&m!n1A;P+TyPV{HO9C{m3r!nhC* YES#g
{r*3)-r;\hCK!n,Xk9C EQ(HZ)bTfzng RANGE r LE
(!ZrHZ)M GE(sZrHZ)DiO#(b;PZ;f0 DBCS }]1EP
'#)
EnTxp
TBPmj6K System/36 k AS/400 53;,DEn,"TyPEnD;,xPKb
M:
S}L Z System/36 Oi/GbPDS}LI1#Z AS/400 53O,i/G;vb
Zf"DF*i/(e (*QRYDFN) D(;Ts`M#mbbVd/\X*,
r*9CS}LD3) System/36 |nZ AS/400 53OI\^(9C#
D~ Z AS/400 53OD~f"ZbP,rKh** Query/400 8(b{TciR
D~#x System/36 ;ZbPf"D~#
YwTxp
TBPmj6K System/36 k AS/400 53;,DYw,"TyP?nDYwxpxP
KbM:
4SD~
g{;P4SS System/36 (FD IDDU (eDD~,zTITKD~KPi
/#;},CD~+T>*%VND~(4,g{kTKD~KP1!i/,
KD~4p4MsGyPVN;pKP) #
D~ ID
Z Query/36 P,D~ ID GS A = E D;vV8#g{ Query/36 i/(
F= AS/400 53,G4*Ci/!qDD~DyPD~ ID #V;d#Z
Query/400 O*i/!qDyPD~_Pz8(D 1 = 3 vV{DD~ ID,
r_|1!* Tnn,dP nn Z 01 = 32 .d#
,SD~
Z Query/36 P,zIn`,SevD~,"R;Jm;V`MDD~,S(%
dDG<) #Z Query/400 P,zIn`,S 32 vD~,"RJm}V`MD
D~,S:
v %dDG<
v 9CwD~D%dG<
v 9CwD~D;%dG<
g{53OQP;vD~|,I9CD}],zIT1Sx=4(i/b;Z#g{
z;XD9CD}]`M,I4(9C QGPL bP}]Di/#>=<ns;ZZ224
3D:Query/400 i/70:4(_6i/;hvKK70#
!qBPdP;n:
1. 9C}](e
;s404P1|#
7. WH|{D~(e,yT!q!n 3(D~)
#({F SYSDIC vVZTBA;OD
}]Jda>P;zZA;O4=DGUU4(D}]JdD{F,rGzON
9CD}]Jd{#I|D}]Jd#)
!q(e`M
dk!n,404P1|#
(e`M . . . . . . . . . . 3 1=VN
2=G<q=
3=D~
;s404P1|#
8. 14=09CD~(e1A;1,!q!n 1(4()"|{BD~(e#
(RGQ
9C NAMEADDR w*D~(e{D>}#)
9CD~(e
Jd . . . . . . . . . : SYSDIC
dk!n(MD~(e),404P1|#
1=4( 2=|D 3=4F 4=>}
6=r! 7=X|{ 8=T>9C.&
D~
Opt (e
;s404P1|#
9. 1z4=04(D~(e1A;1,!q!n 2(4(%;q=)"S\53a)
#IZD>a>Pd
DG<q={(539CD~(e{"+V8 R mS=a2)
kr*hvE",gA;y>#;*Z$"Ma>P8(NNZ]#
(e . . . . . . . . . . : NAMEADDR Jd . . . . . . . . : SYSDIC
dk!n,404P1|#
G<q=
!n . . . . . . . . . 2 1=4(M/r!qq=
2=4(1!q=
"!qVN
TZ0!n 2=4(1!q=1:
q= . . . . . . . . default____ {F
!qX|VVN
3r . . . . . . . . N Y=G,N=q
$"M . . . . . . . . _ 1=!q,4=}%
;s404P1|#
10. VZzIT4(VN(e,|G+IzUU|{DG<q=(e9C#ZVNa
>Pdk LASTNAME,|{Z;vVN(e#9CA;OQa)DrE 10#]1;
*404P1|#
4(M!qVN(e
(e . . . . . . . . : NAMEADDRR Jd . . . . . . . . : SYSDIC
dkrE (0-99999),(MVN),404P1|#
dkVN,4 F6 4(#
rE VN ax rE VN ax rE VN ax
10 LASTNAME
dkE",404P1|4(#
VN`M(s!). . . : 1=V{ (1-32766)
2=}V(1-31,!}; 0-31)
3=DBCS(4-32766,lO;1-16383,<N)
4=UZ/1d(^s!)
d{!n . . . . . . : Y=G
-------VN--------- !} d{
{F `M s! ; !n D>
LASTNAME 1 15 __ _ U
FIRSTNAME 1 10 __ _ {
ADDRESS1 1 20 __ _ X7DZ 1 P
ADDRESS2 1 20 __ _ X7DZ 2 P
CITY 1 15 __ _ GP
STATE 1 2 __ _ ]
ZIP 1 9 __ _ J~`k
AMOUNT 2 6 2 _ pn
12. 1zQjI8(VNXT1,404P1|#YNT>04(VN(e1A;,
K1zDVNQ4(#
4(VN(e
dkE",404P1|4(#
VN`M(s!). . . : 1=V{ (1-32766)
2=}V(1-31,!}; 0-31)
3=DBCS(4-32766,lO;1-16383,<N)
4=UZ/1d(^s!)
d{!n . . . . . . : Y=G
-------VN--------- !} d{
{F `M s! ; !n D>
;TA;xPNN|D,404P1|#
13. 1z4=04(M!qVN(e1A;1,
dkrE (0-99999),(MVN),404P1|#
dkVN,4 F6 4(#
rE VN ax rE VN ax rE VN ax
rE VN ax
10 LASTNAME 15
10 FIRSTNAME 25
10 ADDRESS1 45
10 ADDRESS2 65
10 CITY 80
10 STATE 82
10 ZIP 91
10 AMOUNT 95
i$VN{T}7D3rEP#(1rE`,1,ZA;ODVN{DEP7(Z
G<P9CD3r#)g{VND3r;}7,dkXhDrET8>}7DE
P,;s404P1|#1VN4}7D3rEP1,;TA;xPNN|D,
404P1|#
14. SEz+4=09CD~(e1A;,
9CD~(e
Jd . . . . . . . . . : SYSDIC
dk!n(MD~(e),404P1|#
1=4( 2=|D 3=4F 4=>}
6=r! 7=X|{ 8=T>9C.&
D~
Opt (e
;TA;xPNN|D,4 F3(Kv)
#
VZjIK4(hv}]bD~D(e#PX4(D~"+}]dk=D~PD
5wZBf8Zhv#
Query/400 i/70:4(}]bD~
jI4(XhDD~(es,zIC09C}]bD~1A;4(}]bD~#IS
w IDDU K%rdk0C IDDU 9C}]bD~1(WRKDBFIDD) |n,xkKA;#
?N5X=KA;1dk;vBD~{,MI4(h*DNb`D~#b)D~{I
\PH03h|G((^VP_)D(^6#b0lzI8(D(^#
*4(}]bD~,4PTBYw:
1. S IDDU K%!q!n 3(9C}]bD~),rZ|nPOdk WRKDBFIDD#
9C}]bD~
dk!n(M}]bD~),404P1|#
1=4( 2=dk}]
3. 404P1|#T>,BD~{0db{D04(}]bD~1A;#
ZKA;O,*D~(e8( NAMEADDR,*Jd8( SYSDIC(rzZ>=<0;Z
P4(DJd{),"*d{KTKD~_PD(^8( *CHANGE#
4(}]bD~
D~ . . . : NAMEADDR b . . . . . . : YOURLIB
dk!n,404P1|#
`X(eE":
(^ . . . . . . . . . . . . *CHANGE *LIBCRTAUT"*ALL"*CHANGE
*USE"*EXCLUDE
Z(m{
4. 404P1|4(KD~#KD~4(s,53T/+KD~4S=|DD~(
e#
4 F3(Kv)5X= IDDU K%#
Query/400 i/70:dk}]
*+}]dkD~,4PTBYw:
1. S IDDU K%!q!n 3(9C}]bD~),rZ|nPOdk WRKDBFIDD#
2. Z09C}]bD~1A;O,8(!n 2(dk}]),*D~{8( NAMEADDR,
*b{8(zDb#
9C}]bD~
dk!n(M}]bD~),404P1|#
1=4( 2=dk}]
3. 404P1|#T>09CD~PD}]1A;#
LASTNAME:
FIRSTNAME:
ADDRESS1:
ADDRESS2:
CITY:
STATE:
ZIP:
AMOUNT:
4. dkZTBA;OT>DE",+;*404P1|#Zdkpn.s,WH4
0;P1|,;s404P1|#
9CD~PD}] == . . . . : ENTRY
q= . . . . . : NAMEADDR D~ . . . . : NAMEADDR
LASTNAME: SIMPSON
FIRSTNAME: FRANK
ADDRESS1: 1722 ORANGE STREET
ADDRESS2:
CITY: RIDGEWAY
STATE: CA
ZIP: 72430
AMOUNT: 9998
5. YNT>09CD~PD}]1A;,+GVN*UW,zILxmS|`}]#
6. Lx+TB}]mS=09CD~PD}]1A;:
ax}]dk
&mDG<}
mS}? . . . . : 10
|D}? . . . . : 0
>}}? . . . . : 0
dk!n,404P1|#
ax}]dk . . . . . . . . Y Y=G,N=q
^hZKA;OvNN|D#404P1|#
8. T>09C}]bD~1A;#
9C}]bD~
dk!n(M}]bD~),404P1|#
1=4( 2=dk}]
A;W?DE"f_zD~PD}]Q|D#
9. 4 F3(Kv),z+4=t/K%#
T/r!siG<,T>zdkDyP}]#
NAMEADDR |,{FkX7"|(TBE":
v U
v {
v X7 1
v X7 2
v GP
v ]
v J~`k
v pn
Zz4("#fi/.s,1|fZ1KP|,;s|Di/"YNKP|#
Query/400 i/70:4(i/
Z>70P,z4(;vi/,Ci/ZA;O4E"ZD~PfZDNrP>
NAMEADDR D~PDyPE"#
>70*sz+4(Di/#fZbP#zI\#{9CT:Db#g{z;Pbr
;*@gN4(b,I/:p53bDK1#
1. ZNN|nPOdk WRKQRY,xk09Ci/1A;#
2. Z09Ci/1A;O,T!na>dk 1(4(),Ti/a>dk xxxQRY(9
CzDU{u4x;G xxx),Tba>dkzDb{#
9Ci/
dk!n,404P1|#
!n . . . . . . . . 1 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP,9=KP
i/ . . . . . . . . KJOQRY {F"4 F4 qCPm
b . . . . . . . . YOURLIB {F"*LIBL"4 F4 qCPm
3. 404P1|#T>0(ei/1A;#
i/ . . . . . . : KJOQRY !n . . . . . . : CREATE
b . . . . . . . : YOURLIB CCSID . . . . . . : 37
Opt i/(e!n
1 8(D~!q
_ (ea{VN
_ !q"ErVN
_ !qG<
_ !qErVN
_ !q{m3r
_ !q(fPq=
_ !q(fc\/}
_ (e(f8V
_ !qdv`MMdvq=
_ 8(&m!n
8(D~!q
dk!n,404P1|#4 F9 8(=SDD~!q#
W?
F3=Kv F4=a> F5=(f F9=mSD~
F12=!{ F13=<V F24=d{|
dk!n,404P1|#4 F9 8(=SDD~!q#
6. 404P1|#08(D~!q1A;YNT>,"ZA;W?T>E"0!q
D~,r404P1|7O#1#
8(D~!q
dk!q,404P1|#4 F9 8(=SDD~!q#
7. 404P1|#vV0(ei/1A;,"ZA;W?T>E"0!q!n,r
4 F3 #frKPi/#1#
i/ . . . . . . : KJOQRY !n . . . . . . : CREATE
b . . . . . . . : YOURLIB CCSID . . . . . . : 37
Opt i/(e!n
_ > 8(D~!q
_ (ea{VN
_ !q"ErVN
_ !qG<
_ !qErVN
_ !q{m3r
_ !q(fPq=
_ !q(fc\/}
_ (e(f8V
_ !qdv`MMdvq=
_ 8(&m!n
KvKi/
dk!n,404P1|#
#f(e . . . . . . Y Y=G,N=q
KP!n . . . . . . . 1 1=;%=KP
2=z&mKP
3=;KP
TZ#fD(e:
i/ . . . . . . . . KJOQRY {F
b . . . . . . . YOURLIB {F"4 F4 qCPm
D> . . . . P>M'{FMX7
(^ . . . . . . . . *CHANGE *LIBCRTAUT"*ALL"*CHANGE"
*EXCLUDE"*USE
Z(m{
11. 404P1|#fi/(eTs"KPi/#
i/zID(fT>ZzDA;O:
W?
F3=Kv F12=!{ F19=rs F20=rR F21=Vn F22=mH
4 F20(R)i4(fDR`#
12. 4 F3(Kv)#T>09Ci/1A;#
;uE"T>ZA;W?,7OQI&&mKi/#
9Ci/
dk!n,404P1|#
!n . . . . . . . . _ 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP 9=KP
i/ . . . . . . . . KJOQRY {F"4 F4 qCPm
b . . . . . . . . YOURLIB {F"*LIBL"4 F4 qCPm
Query/400 i/70:|Di/
g{z#{(f;|(S!Z7W92G]DM',h*|Di/TcvP>G;]
DM'#
1. Z09Ci/1A;OT!na>dk 2(|D)
#
9Ci/
dk!n,404P1|#
!n . . . . . . . . 2 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP 9=KP
i/ . . . . . . . . KJOQRY {F"4 F4 qCPm
b . . . . . . . . YOURLIB {F"*LIBL"4 F4 qCPm
4. 404P1|#T>0(ei/1A;#
5. T!qG<a>dk 1#
(ei/
i/ . . . . . . : KJOQRY !n . . . . . . : CHANGE
b . . . . . . . : YOURLIB CCSID . . . . . . : 37
Opt i/(e!n
> 8(D~!q
_ (ea{VN
_ !q"ErVN
_ !qG<
_ !qErVN
_ !q{m3r
_ !q(fPq=
_ !q(fc\/}
_ (e(f8V
_ !qdv`MMdvq=
_ 8(&m!n
6. 404P1|#T>0!qG<1A;#
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
W?
F3=Kv F12=!{ F19=rs F20=rR F21=Vn F22=mH 80
9. 4 F20 T>(fDR_?V#
T>(f
(fmH . . . . . : 117
(;=P . . . . . . . . . ______ F;=P . . . . . . . . _____
P ....+....1....+....2....+....3....+....4....+....5....+....6....+....7...
ADDRESS2 CITY STATE ZIP AMOUNT
000001 EMMERSON LA 71282 .25
000002 APT 43 EMMERSON LA 71282 .45
000003 VD EMMERSON LA 71282 9.38
****** ******** (fax ********
W?
F3=Kv F12=!{ F19=rs F20=rR F21=Vn F22=mH 80
(fDns;P#
10. 4 F3(Kv),F12(!{)r404P1|5X=0!qG<1A;#;s4 F3
(Kv) #T>0KvKi/1A;#
dk!n,404P1|#
#f(e . . . . . . Y Y=G,N=q
KP!n . . . . . . . 1 1=;%=KP
2=z&mKP
3=;KP
TZ#fD(e:
i/ . . . . . . . . KJOQRY {F
b . . . . . . . YOURLIB {F"4 F4 qCPm
D> . . . . . . P>M'{FMX7
(^ . . . . . . . . *CHANGE *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
I9CKA;KPzQvK|DDi/#2I!q9i/|DI*@CTDrv
Tb;NP'#r*zI\;Yh*vP>7W92G]M'D(f,2mz^
hv@C|D#xRr*zQ9C F5 KPKi/"4=(f,z;#{YNKP
Ki/#
11. nd0KvKi/1A;,gBy>:
KvKi/
dk!n,404P1|#
#f(e . . . . . . N Y=G,N=q
KP!n . . . . . . . 3 1=;%=KP
2=z&mKP
3=;KP
TZ#fD(e:
i/ . . . . . . . CEBQRY {F
b . . . . . . . YOURLIB {F"4 F4 qCPm
D> . . . . . P>M'{FMX7
(^ . . . . . . . . *CHANGE *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
12. 404P1|#T>09Ci/1A;#
dk!n,404P1|#
!n . . . . . . . 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP 9=KP
i/ . . . . . . . CEBQRY {F"4 F4 qCPm
b . . . . . . . YOURLIB {F"*LIBL"4 F4 qCPm
Query/400 i/70:4(_6i/
ZTB>}P,9C0T>Ts5w1(DSPOBJD) |n4({* QRYFILE DD~#K
D~|,10$tZ QGPL bPDyPTsD5w#;s,9C8v Query D(e=
h!n,4(;vS QRYFILE qCE""4(T>CE"D(fDi/(e#
1. C'Nq
2. l+RNq
3. ;c53Nq
4. D~"bMD~P
5. LrhF
6. (E
7. (er|D53
8. Jb&m
9. T>K%
90. "z
!qr|n
===> DSPOBJD OBJ(QGPL/*ALL) OBJTYPE(*ALL ) OUTPUT(*OUTFILE) OUTFILE(QGPL/QRYFIL
E)
F3=Kv F4=a> F9=lw F12=!{ F13=C''V
F23=hCu<K%
(C) COPYRIGHT IBM CORP. 1980, 1991.
2. Z|nPOdk WRKQRY,;s404P1|#
1. C'Nq
2. l+RNq
3. ;c53Nq
4. D~"bMD~P
5. LrhF
6. (E
7. (er|D53
8. Jb&m
9. T>K%
90. "z
!qr|n
===> WRKQRY
#;sZi/a>Pdk;
3. T>09Ci/1A;#ZCA;O!q!n 1(4()
v{F,"Zba>Pdk;v{F,8(f"zDi/Db#404P1|#
dk!n,404P1|#
!n . . . . . . . . 1 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP 9=KP
4. Z0(ei/1A;O,(}Z?v(e=hsfdk 1,!q(e=h:!q"
ErVN"!qG<"!qErVN"8((fPq="!q(fc\/}M(
e(f8V#("b8(D~!qQ-*z!(#)404P1|#
(ei/
i/ . . . . . . : QNAME !n . . . . . . : CREATE
b . . . . . . : YOURLIB CCSID . . . . . . : 37
Opt i/(e!n
1 8(D~!q
(ea{VN
1 !q"ErVN
1 !qG<
1 !qErVN
!q{m3r
1 8((fPq=
1 !q(fc\/}
1 (e(f8V
!qdv`MMdvq=
8(&m!n
i/+4UA;PZ0(ei/1A;PDNrT>!qD(e=hA;#
5. Z08(D~!q1A;40(ei/1A;sT>DZ;vA;O,ZD~a
>Pdk QRYFILE,"Zba>Pdk QGPL#I1Mq=a>Q-nC#404
P1|#
dk!n,404P1|#4 F9 8(=SDD~!q#
vVE"0!qD~,r404P1|7O#1#
8(D~!q
dk!n,404P1|#4 F9 ImS#
YN404P1|#
6. B;vT>DA;G0!q"ErVN1A;#
rE VN rE VN rE VN
ODDCEN ODCCEN ODSV02
ODDDAT ODCDAT ODSV03
ODDTIM ODCTIM ODSV04
ODLBNM ODOBOW ODSV05
ODOBNM ODSCEN ODSV06
ODOBTP ODSDAT ODSV07
ODOBAT ODSTIM ODSV08
ODOBFR ODSCMD ODSV09
ODOBSZ ODSSZE ODSV10
ODOBTX ODSSLT ODSVMR
ODOBLK ODSDEV ODRCEN
ODOBDM ODSV01 ODRDAT
PP...
": Xk!qEr+@]DVN#
!q"ErVN
404P1|#i/XB2EA;ODVN,Tcz!qDVN4z8(DNr
T>ZPmW#9T>0404P1|7O#1E"#
YN404P1|#
7. B;vT>DA;G0!qG<1A;#ZK&8(#{Z(fP|(D)G
<#
!qG<
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
W?
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
W?
8. VZ4 F5((f)T>(f#0T>(f1A;vV,T>zDi/(f,|yZ
z=?0*9y(eDi/#(ZA;O4=DE"!vZ10Z53OD QGPL
PDTs#z4=DI\kTBA;PT>D;!`,# )
T>(f
(fmH . . . . . : 100
(;=P . . . . . . . . . F;=P . . . . . . . .
P ....+....1....+....2....+....3....+....4....+....5....+....6....+....7...
b Ts Ts Ts D>5w
`M tT s!
000001 QGPL *PGM CLP 14,336 B & R >} - Z 2 3
000002 QGPL *PGM CLP 16,384 B & R 5} - Z 2 3
000003 QGPL *FILE PF 8,192
000004 QGPL *FILE PF 1,024 1!4}]
000005 QGPL *FILE PF 1,024 1!4}]
000006 QGPL *FILE PF 16,384 1!4}]
000007 QGPL *FILE DKTF 2,560 1!mL}]
000008 QGPL *FILE DKTF 2,560 1!4mL
000009 QGPL *FILE PF 1,024 1!4}]
000010 QGPL *FILE PF 140,288 RSTS36FLR |n
000011 QGPL *FILE PRTF 2,048 1!YQzdv
000012 QGPL *FILE PRTF 2,048 1!YQzr!
000013 QGPL *FILE PRTF 2,048 1!YQzr!
000014 QGPL *FILE PF 38,912 DSPOBJD DdvD~
000015 QGPL *FILE PF 16,384
PP...
F3=Kv F12=!{ F19=rs F20=rR F21=Vn F22=mH 80
ZA;W?DR`,vVPP...E"#bm>(fZ]^(+?T>ZA;O,
rKg{z#{i4(f+?Z],I9C-3|r F20(rR)M F19(rs)
4/@(f(HITSsrR,2ITSO=B)#1i4j(fs,4 F3(K
v)5X=0!qG<1A;#
dkHO,404P1|#8( OR Tt/?vBi#
bT: EQ, NE, LE, GE, LT, GT, RANGE, LIST, LIKE, IS, ISNOT...
W?
PP...
F3=Kv F5=(f F9=ek F11=vT>{F
F12=!{ F13=<V F20=Xi F24=d{|
Z0!qG<1A;O404P1|#
9. B;vT>DA;G0!qErVN1A;#ZK&8(#{ Query 9CD)VN
4+*(f!qDG<Er#g{#{WH4Ts`M,;s4Tss!TG<
Er,rZ ODOBTP Tdk 1,Z ODOBSZ Tdk 2,gBy>#
!qErVN
Er
EH A/D VN D> Len Dec
ODLBNM b 10
1 ODOBTP Ts`M 8
ODOBAT TstT 10
2 ODOBSZ Tss! 10 0
ODOBTX D>5w 50
W?
404P1|#i/XB2EA;ODVN,Tc*Er!qDVN4z8(D
NrT>ZPmW#9T>0404P1|7O#1E"#
Er
EH A/D VN D> Len Dec
1 A ODOBTP Ts`M 8
2 A ODOBSZ Tss! 10 0
ODLBNM b 10
ODOBAT TstT 10
ODOBTX D>5w 50
W?
YN404P1|#
10. B;vA;G08((fPq=1A;#ZK&8(Pd`"PjbT0d{(
fq=!n#
8((fPq=
dkE",404P1|#
Pjb: *NONE"TkDD>P
P
VN d` Pjb Len Dec `-
ODLBNM 0 b 10
ODOBTP 2 Ts 8
`M
ODOBAT 2 Ts 10
tT
PP...
dkE",404P1|#
Pjb: *NONE"TkDD>P
P
VN d` Pjb Len Dec `-
ODLBNM 0 b{ 10
ODOBTP 2 Ts 8
`M
ODOBAT 2 Ts 10
tT
PP...
404P1|#
11. z4=DB;vA;G0!q(fc\/}1#(}ZKA;O8(!n,IZ(
fPT!qDVNc\—4TZ!qDVN,zI8(Z(fP|(\F"=y
5"n!5"ns5T0(r)F}#
!q(fc\/}
dk!n,404P1|#
1=\F 2==y5 3=n!5 4=ns5 5=F}
W?
dk!n,404P1|#
1=\F 2==y5 3=n!5 4=ns5 5=F}
W?
404P1|#
12. B;v*T>DA;G0(e(f8V1A;#ZCA;O8(#{9CD)V
Nw*8VVN#(f8VCZZ?N(f8VVND5|D1+(f.V*8
vG<i#
(e(f8V
8V Er
6 EH VN D> Len Dec
ODLBNM b 10
10 ODOBTP Ts`M 8
ODOBAT TstT 10
20 ODOBSZ Tss! 10 0
ODOBTX D>5w 50
W?
8V Er
6 EH VN D> Len Dec
ODLBNM b 10
1 10 ODOBTP Ts`M 8
ODOBAT TstT 10
20 ODOBSZ Tss! 10 0
ODOBTX D>5w 50
W?
404P1|#
13. ZB;vA;0q=/(f8V1O,*z(eD(f8V8(Z{Dq=#"
b8V6a>PD5*c#I9C8V6 0 +yP8(Dc\/}DnUc\5r
!Z(fDa2#TZK>},;*ZKA;OvNN|D#;k404P1
|#
q=/(f8V
8V6 . . . . . . . : 0
dk!n,404P1|#
(ZD>Pdk &field Tek8V5#
)
VFc\ . . . . . . . . . N Y=G,N=q
8VD> . . . . . . . . . nU\F
6p VN
1 ODOBTP
8V6p . . . . . . . : 1
dk!n,404P1|#
(ZD>Pdk &field Tek8V5#
)
xAB3 . . . . . . . . . N Y=G,N=q
VFc\ . . . . . . . . . N Y=G,N=q
8VD> . . . . . . . . . Ts`MD8VD>
6p VN
1 ODOBTP
404P1|#
QjIzH0!qDyP(e=h,rK0(ei/1A;YNvV#(zH0!
qD(e=hVZCs`D > {Em>#)
(ei/
i/ . . . . . . : QNAME !n . . . . . . : CREATE
b . . . . . . : YOURLIB CCSID . . . . . . : 37
Opt i/(e!n
> 8(D~!q
(ea{VN
> !q"ErVN
> !qG<
> !qErVN
!q{m3r
> 8((fPq=
> !q(fc\/}
> (e(f8V
!qdv`MMdvq=
8(&m!n
ZA;W?DR`,vVPP...E"#bb6E(fD+?Z]^(T>ZA;
O#9C-3|r F20(rR)M F19(rs)/@(f(SsrRMSOrBy
I),Ti4(fPD8VMc\#
1i4j(f1,4 F3(Kv)5X=0(ei/1A;#
(ei/
i/ . . . . . . : QNAME !n . . . . . . : CREATE
b . . . . . . : QGPL CCSID . . . . . . : 37
Opt i/(e!n
> 8(D~!q
(ea{VN
> !q"ErVN
> !qG<
> !qErVN
!q{m3r
> 8((fPq=
> !q(fc\/}
> (e(f8V
!qdv`MMdvq=
8(&m!n
4 F3(Kv)
#
15. T>0KvKi/1A;#g{;#{#fi/rYNKP|,ZKA;O+ #
f(ea>|D* N(q),+KP!na>|D* 3(;*KP)#
dk!n,404P1|#
#f(e . . . . . . . N Y=G,N=q
KP!n . . . . . . . 3 1=;%=KP
2=z&mKP
3=;KP
TZ#fD(e:
i/ . . . . . . . QNAME {F
b . . . . . . . QGPL {F"4 F4 qCPm
D> . . . . . . .
(^ . . . . . . . *CHANGE *LIBCRTAUT"*CHANGE"*ALL
*EXCLUDE"*USE
Z(m{
404P1|#
16. 09Ci/1A;vV,T>E"0i/!n&mI&jI1#
9Ci/
dk!n,404P1|#
!n . . . . . . . . 1=4(,2=|D,3=4F,4=>}
5=T>,6=r!(e
8=z&mKP 9=KP
i/ . . . . . . . . QNAME {F"4 F4 qCPm
b . . . . . . . . QGPL {F"*LIBL"4 F4 qCPm
>=<PDE"V*BP8Z:
v i/&mi\
v D~(eM}]
v (ei/
v 9C,SKc
v d{a>M<I
v i/4,E"
Query/400 i/&mi\
i/&m|(BPWN:
v i$i/"@@lwksD}]DnQ=(
v TK}]4Pdk/dv (I/O)
v TksDq=T>C}]
i/-#;f4PTOWNTa)I\DnLl&1d#
ZKPi/DZ;WN4E/WNP,Query 7(&mi/Dnl==#zz;vf!
F.,"9C|4Pi/D5J I/O#
Query/400 PD|X3rf!76
|X3rf!76hvA!}]bD~PDG<DNr#9C04(_-D~1
(CRTLF) |n"Z}]hv5w (DDS) P8(X|V44(f!76#
ZE/Zd,Query 9CVfD|X3rf!76,TqCi/+5XDs<G<}#
E/>mh*KE"#xR,gPI\,Query 9CVfDf!7644PXhD I/O#
!vZ_eiv,Query I\!q9(Y1f!764jIi/ks#
g{;PVfDf!76,Query XkA!?vD~PD?vG<,7(CG<Gqz
ci/PD5,r_9(;uY1f!76(Yg Query h*D0)
#b)!nI\s
?{D&m%*"I/O Mf"w,"I\<BO$Dl&1d#
Z Query/400 P!q/T%f!76
9C CRTLF |n"Z DDS P8(!q/T%bT44(f!76#
8(!q/T%bT,T9|G%d;vr`vi/PD?Vr+?!qbT#8(
VfDf!76IDxT\,r* Query ;XYiRr9(ICDf!76#
9C!q/T%f!769IZ!(ei/D1d,r*Zf!76P8(D!qM
ErbT;h*Zi/(ePX4#
":
49;PZi/>mD8(D~!q?VPXpa=!q/T%f!76,i/
TI9C|#;},g{!q/T%f!76GC DDS PD0/,!q1
(DYNSLT) X|V4(D,rkG!q/T%f!76`HT\4qDF#
g{!q/T%f!76G!qj<D,/,rI9C|#}g,g{!qj<
8(KYw76 'X GT 45' RfZ;u!q/T%f!76(_-D~),|P!
q 'X GT 40',G4KVfD_-D~I\;E/w!P#
Z Query/400 P4(f!76D<GBn
"GyPf!76<IIyPi/9C,rK&4(-#9CDf!76,y=-#
9CG8IKPs?FcD;vi/9C,r_II2m,;uf!76D8vi/
9C#*7( Query I9CD)f!76T0gN(ei/TDxT\Dd{;ca
>,N{Z2423D:(e Query/400 Di/;#
4(n!}?Df!76\X*,-rgB:
v T}]bPVNDNN|D2+<B|BCVN|XDyPf!76#s?Df!
76+OX0lT\#
v g{s?f!76kD~;p#f,8]k4-1dI\ssvS#
>Z}a)a>.b,9P=v;cT8O,PzZz7(GqITX(D~9Cf
!76:
v g{i/ZD~P!qDG<},}\}D 20%,(#|;TCD~9Cf!76#
|+3rf!G<#;},g{Ci/|,ErbT,I9CVfDf!76,r
4(Y1f!76(49 20% D8>Gf5D)
#E/w;c!q9C3rA!DG
<x;Gf!7645VEr#
v i/;c;T!D~4(M9Cf!76#d;K&y8D:!;(e*Ps< 1000
vG<DD~,+b";Gfr,;G;cT8O#+G,g{i/PfZErb
T,rI9CVfDf!76,r_*CD~4(;uY1f!76#E/w;c
!q9C3rA!DG<x;Gf!7645VEr#
Query/400 PDf!F.
1#fi/(e(^[|GBi/(e9G^D}Di/(e)1,43f!}]D
nQ=(Df!F.+ki/(e;p#f#
g{Cf!F.P',Query 9CCF.f!}]#bI<BT\syHa_(k;9
Cf"Df!F.xKPi/`H),r*ZKPf"Di/1,Query ;Xi$f!
76#;x,g{Ki$v<&m1dD;!?V,G4TZ3)i/xT,T\D
DFI\;G4wT#
g{Cf!F.^',Query +"TiRCZf!}]DnQf!F.,RT\I\\
=0l#
ZTBivB,;9C#fDf!F.:
v 2G|(UZ"1dr1dAG}]Ddvq=
v 2GSA;=r!zr}]bD~Ddv`M,r`4
v 9CH0"PfDi/
v 2GdkD~(OVRDBF |n)
v 9CKPi/ (RUNQRY) |n2GD~!q
v Z_P;,zRoTD53OKP_PoT3r{mDi/#bJCZ0+{m3
rCZyPV{HO1&m!nhC* NO Div#
v KPS(5|DDi/rZKPZ!qD{m3rD CCSID P|DDi/#bJC
Z0+{m3rCZyPV{HO1&m!nhC* NO Div#
v IZ53Lr|D (PTF),OS/400 ?HxPKX(#
": Z3)ivB,1z404P1|#fi/1,#fi/y(1dI\,}$Z
1d,r*53}Z*Ci/(ef!F.#;},;)*i/(eKf!F
.,vpi/l&1dM53\el&1d<IssuL,XpGi/*-#K
P1|*wT#
Z Query/400 P|Bf!F.
*|BQ#fi/Df!F.,TCi/dk|D!n"YN#f|#(^hvNN|
D#
)bJm Query |Bf!76T43yP|D#g{zPs?Q#fi/,bPz
ZKbD)i/\D)f!76|DD0l#byZT;ur`uf!76|D1,
z;X|DM#fyPi/#
;|BQf"i/Df!F.,443TON#fi/T4>}r4(Df!76#
1 Query i$f!F."XBE/1,|+G<b)|D#!\XBE/IR=f!}
]D|C=(,+Zf!F.P;T/|BbV|CD=(#bb6EBNKPCi
/1,+YNxPXBE/,r*f!F.T43#fi/1!qD-<=(#
Query/400 PDD~(eM}]
>ZPv(eD~MD~PD5J}]D<GBn#
Query/400 PDD~(e
"b AS/400 53OD}]bD~ZD}VVN(eG9Cx;.xFq=9G9u.
xFq=#AS/400 539C9u.xFq=4PcuKc#
Z AS/400 53O4(BD~1,+}VVN(e*9uVN,Rb)VND$Hh*
f}vV{#g{VND$H*<},+;9CVNPZ;vVZD0D;,+53
TlibD;T7#4"zgv#g{VN*f}$H,r;xPKli#1}VV
N*<}$H1,53+9C|`D&m1d#
Query/400 DD~}]<GBn
S System/36 (FDD~I\"z.xF}]ms#System/36 &CLrP1Z}VV
NPEkUqx;G0<c(Z AS/400 53O&m1b)Uq<Bvm) #&j6"#
}.xF}]msTqCnEDi/T\#PXji,N{:(e Query/400 Di
/;#
(e Query/400 Di/
>Za)Z%v}]bD~O(er|Di/Da>M<I#f0`vD~DYwZ
Z2473D:Z Query/400 P9C,SKc;Pv#
>ZPDE"k0(ei/1A;`X#PXji,N{Z303D:Z(e Query/400
i/1!q(e=h;#
hFr|Di/1D Query/400 T\
ZhFr|Di/1,4BP==.;i4i/Da{:
v Z0(ei/1A;O4 F5((f)KPCi/,"T>$(D(fa{#
v Z0(ei/1A;O4 F13(<V)i4<VD>},|(Pjb"y>j8G
<"NN(f8VD>T0*Ci/(eDNNc\/}#
*K|lXS;vA;P;=B;vA;,!?;*i4xD>DPm#*lw?v
VNDD>,i/+9CnbD&m%*1d,9I\9C3) I/O#Kb,T>?v
VNDD>+9?vA;OIT>DVN}|Y,byh*/@|`A;4lwzh
*i4DVN#i/"D~"I1Mq=Pm2,yfZbViv#
Z Query/400 P(ea{VN
4SsrRDNrSOru%jGDVx1d#bI\<B;,a{#}g,SO 1
MONTH + 1 DAY I\C=kSO 1 DAY + 1 MONTH j+;,Da{,}g:Jan 28 + 1
DAY + 1 MONTH C=Pda{ Jan 29,nUa{ Feb 28# Jan 28 + 1 MONTH +
1 DAY C=Pda{ Feb 28,nUa{ Mar 1#
+}Va{VN(e*f}$HxG<}$H,I5M9Cb)VN1y(D53&
m%*1d#PXji,N{Z2413D:Query/400 PDD~(eM}];#
\b(e9C;c}Da{VN#d;53I&m_PbVivDi/,+?v;c
}Kc<B53xPms&m,b+s?{D&m%*1dM\el&1d#
\b(e<BgvivDa{VN#1VN$Zd8(D$H1,+"zgv#1"
zgv1,Query Z(fOC ‘+’ V{T>b)a{VN#
Z Query/400 P!q"ErVN
K!nJmzXFD)VNvVZ(fP,T0vVZ(fG<ZDN&#*@9 Query
xP;X*DEL I/O,v!qyhDVN#xR,nbD;X*VN9(fIATO
n#g{#{9Cs`}VN,9C F21(+!)T>yPVN,;sSG)VNP>
}z;k*DrE#
\b9Cd$VNMIUVN#b=VtT<h*=S&m#
Z Query/400 P!qG<
9CkVff!76DX|VVN%dDVN8(G<!qbT,r4(k-#9C
DG<!qbT%dDf!76#g{G<!qbTPAYP;?Vk3Vff!7
6DWvX|VVN%d,Query +T<9CCf!76#
g{|`D!qbTk,;f!76PD|`X|VVN%d,T\+C=Dx#b
Jmf!76uY!qDG<}#}g(YN9CD~ X),g{G<bT* A EQ 3
AND B EQ 5 AND D GT 8,I9Cf!76iRkyP}v5%dDG<#
g{z-#ksX(Di/,<G9CkCi/%dD!q/T%bT4(f!7
6#PXKwbDji,N{Z2403D:Z Query/400 P!q/T%f!76;#
VfDf!76vCZf0Z!qbTP8(D`,VND OR u~#
Z Query/400 P!qErVN
Zs`}ivB,18(ErVN1,Query h*f!764T!qDG<Er#g{
f!76;fZ,Query aZKPZ4(Y1f!76,r9CEr4+G<(r#1
E/w7(Er}PLrIa)|CDT\1,r9CEr}PLr#g{9CKY
1f!76,Zi/QjIKPs+>}|,rKi/D?NKP<h*YN9(f
!76#IZK-r,&<U<GCi/Gqf}h*ErVN#
<G*z-#9CDi/T0f!769(1d,$Di/4(kErbT%dDf
!76#g{i/DyPErVNkf!76D_;X|VVN%d,i/+T<9
CVfDf!76#byzI\b*9CErbTDi/9(}`Df!76#
4PK`Yw.0*<GBPBn:
v T-<D~DNN|D;aT/43ZErD~P,}Gz{C3V=S,$4x
P#IZK-r,zI\#{+K!nD9Cv^ZG);#|DDD~#
v g{ZErD~PD4ErVNO9(f!76,Query 9CKf!76+<BG<
44ErDNr5X#}GZCD~PDErVNO9(f!76,qr&^FZ
ErD~O9(f!76#
Z Query/400 P!q{m3r
9CK!n8(f;{m3r#}g,zI\#{|Di/,TcyP!4V8EZ
s4V8.0#g{8(f;{m3rxi/|,V{ErX|V,r Query ;\9C
Vff!76,xRXk9(f!7644PEr#
9Cw5KP{m3r!nIni/(QO$1dKP#
g{;h*{m3r,r;*9C|#g{i/v|,}VVN,+G.yxFD1
!{m3r|D*.yxF#
(;S(Er3rmI\h*H2mS(m|YD&m,r*TZ;f0@@`TN
rDHO,IvT|#
Z Query/400 P8((fc\/}
f!76^zZDxc\/}DT\,rK;Xv*K`M/}x<G4(f!7
6#;},g{Zi/P8(K!qrErbTT0c\/},kb)5%dDf!
76I\PzZDxi/D\eT\#
g{vTi4i/a{DZ;vA;r0~vA;PK$,I!qi4dv=A;x
;G=r!zr}]bD~Da{#Query !la)}]DZ;vA;,rKS$w>
Oi4;vA;;cHH}i/zIdv=r!zr}]bD~DyPa{*lC
`#
;},g{#{i4D}]ZyQwG<D)2,I\*(H$Z|$D1d4T>
G)G<#g{=S}];ZD~\?sD?V,1rB-3f!|`}]1(49
Z;vA;\lT>)2h*H$Z|$D1d#g{ Query Zlw}].0Xk9(
sDf!76,r*(QO$1dE\4=Z;vA;#
Z Query/400 P8(&m!n
08(&m!n1A;ODX|!nGGqvT.xF}]ms(PX.xF}]m
sD5w,N{Z2413D:Query/400 PDD~(eM}];)#g{vT.xF}]
ms,r Query ;\9CCD~DNNVff!76,xRg{i/h*D0,Xk9
(;uf!76,"Rh*=S&m4&mP.xF}]msDNNVN#
g{;vT.xF}]ms,Query Zv=.xF}]ms1r#9&m#;},g{
Query Z&mZd;Pv=NN.xF}]ms,|I9CVfDf!76"}#KP#
": T.xF}]msDbV&mv0l9C}VVNDi/#v9CV{VNDi
/;\K!n0l#
18(GqvT.xF}]ms1,PTB!n:
v Y(G)m>vT.xF}]ms#
v N(q)m>;vT.xF}]ms#
v 9 vT.xF}]msVNt*UW,m> Query r!q Y r!q N,b!vZz
KPCi/yZD73#
g{i/Z System/36 73PKP,Query 9C Y,"vT.xF}]ms#g{i
/Z System/38 73r AS/400 73BKP,Query 9C N,;vT.xF}]ms#
r*Z System/36 P<UvT.xF}]ms,rK System/36 739C Y#r*Z
System/36 73P9C Y(1!5)1;\9Cf!76,Yg9C1!5,w73
.dDT\nlI\\s#
zI\#{<G{}.xF}]msT7#I9CVfDf!76,"{}&mb)
msyhD=S&m#9C AS/400 53ICD Programmer’s Tool Kit PRPQ#g{
;\{}!}ms,zI\#{!q Y(rZ System/36 73P9C RUNQRY T+ Y
hC*1!5),9i/KPC|l#49PX*9(BDf!76,b2HoO.
xF}]msh*OYD1d#
,SDX|En.;GwD~MND~DEn#wD~G,SP9CDZ;vD~,
xND~GG),S=wD~DD~#
(e,Si/1,I!qTB}V,SKc.;:
!n 1—%dDG<
v1k?v8(DND~<%d1,E!qwD~PD;vG<#
!n 2—9CwD~D%dG<
^[GqkNNND~P%d,<!qwD~PD;vG<#wG<D!q!
vZZ0!qG<1A;O8(D!q/T%j<#v!qzcG)j<Dw
G<#TND~8(D!q/T%j<I\<BwD~PDG<;;!q#
!n 3—9CwD~D;%dG<
v1kyPND~<;P%d1,E!qwD~PD;vG<#
Query/400 P,SKcDT\a>
TZyP,SKc,Query h*T,SPD?vND~9Cf!76#g{;PICD
f!76fZ,Query Zh*1a9(|G#rK,g{X(D,Si/-#KPr_
8v,Si/9C`,DErr,S!qbT,<G9(kb)5%dDf!76,
by Query ^h?NKPi/1<*9(f!76#
9(f!764%dz-#9CD,S!qbTG#X*#f!76&1kSND~
P!qDVN%d#}g,g{,S!qbTG T01.A EQ T02.A,rh* T02.A Df
!76#TZ!n 1 ,S,Query I\v(*;D~DNrxR2Z?*;,S!qD
NrT%dBNr#ZbVivB,I\;9CH04(Df!76#;}TZ!n 2
r!n 3 ,S,Query ;*;D~DNr,rKkND~OD,S!qbT%dDVf
f!76&1TC,SGI9CD#
1D~4Sn!=nsEr1,i/KP'Jn_#ZKivB,n!b6ESKD
~P!qnYDG<CZ,S#!\bI\GPnYG<DD~,3)ivB2I\
9C;v\sDD~(YgSCD~;!qK8vG<)#
g{Z,SsD~1v=OXDT\Jb,"T\bK`Yw,r9C!qbTTu
Y*,SDG<}#
g{h*,SsD~RI9CG<!qbT,kTh*G<!qD;vr`vD~K
P Query,"+dvEk;v}]bD~(Z0!qdv`MMdvq=1A;OD!
n 3)
#9CKdvD~kd{D~,S#;},K=(I\<B9C:I;}],r*
=}]bD~Ddv=9CKD~D,Si/KP1,I\QI*If>#xR,r
*KdvD~;Pf!76(}G9(|G),g{h*,Query XkZKPZ9(;
v#
Query/400 Dd{a>M<I
>ZPv<Z(zz9C Query Dd{a>M<I#
Query/400 Dz&m
<Ga;G)z;"Lh*da{Di/xPz&m#}g,zITsE9CDr!
(fDi/\JOa;xPz&m#b9zDUKI4Pd{Nqx;XH}i/j
IKP#xR,g{a;;v(#9Cs?J4Di/xPz&mx;G;%=K
P,-}J1w{D53IT|CXZ`vw5.d=b53J4(&m%*1d"
f"w"I/O)#
Query/400 T\w{
J1w{D53H49CT\w{D53a)CC`D{eT\#;},ZJ1w{
53zczDh*1,Pm`rX*<G#PXji,N{ Work Management ;i#
Kb,Performance Tools for AS/400 ;i5wKgN`XMKb{e53T\#N<b
)8OIozDx{e53T\#
gPI\,*\b9(;h*Df!76,&^FX(i/D}?#7(D)i/n
#9C,;s*b)i/4(f!76"#fi/(e#bys`}C'IZKL(
Di//ObYw,l&1dM{e53T\<*CZ?vC'<TX(==KPi
/Div#
&<GSVCDD~P}%49CD}],+|GEZ%@#fDD~P#b++s
uY Query QwVCD~r*b)D~9(f!76yhD1dMJ4#
"bZwT==BT>DT\E/E"(KPi/.09C STRDBG)
#b)E"I\
PzZz7(gN|Di/(eT9|KPC|l#
Query/400 wT==E"
1 Query/400 ZwT== (STRDBG) BKP1,"vT\E/E"#ZwT==BK
P1,9IqCngE/E"T0oOj8JO(T43POw5Dms)HE"#
g{C'T<;%=KPi/x;^Fbyv,+vV;uvmE"#
C'ZTBiv1;\;%=KPi/:
v RUNQRY |nD(^|DIC';YTdP(^#bI\0lC'z&mKPD\
&(N{BfPXJm;vr`vC'_P;,KP\&D"M)#
v RUNQRY |nQ|D*;Y'V;%=KP#
*@9C';%=KPi/:
v 9C0|D|n1(CHGCMD) |nS ALLOW(JmKP)N}}% *INTERACT#
Z RUNQRY P;Jm ALLOW(*PGM)#
v |D RUNQRY |nD(^,8wD)C'TK|nP(^#
CCSID G;v=VZ(^{E){},|(;j6`k=8M;Tr`TV{/Mzk
3#I*?vi/(e"}]VNM{m3r8( CCSID#2I*D~G<q=(eP
Dvpn?(gVNDPjb"D>5w"`-Vr$"M)8( CCSID#
DATABASE DATABASE
C1 C2 C3 CCSID 37-99 D9 E5 AA
CONVERSION
(HEX) (HEX)
CCSID-37 CCSID-99
Without CCSID Conversion
CCSID-99
A B C A B C
Q H 9
???
RV2N403-3
Query/400 6pN1h*}]"{m3rMD>D*;,"4PK*;#g{*;'\,
53+(*z#zI\^(&mi/rKP#fDi/,b!vZyf0D
CCSID#CCSID HOIzzBPDViv:
v |Gj+%d,5w;PX**;#
Query/400 PD CCSID jG
BPx?w{DTs|,i/&m9CD CCSID jG#?;nS|,nLPd
CCSID,jGPGED}b#GE8>CTsPdT:D CCSID jG#}GPXp|
D,x?w{Dn?SC'r*mrw5PLPd CCSID#2(EPD}m>"M,b
MgN7(Cn?D CCSID 5#
v i/(e ( 1, 6) *
2GPjb ( 5)
2G`-V ( 5)
mo=PD#? ( 8)
G<!qbT5PD#? ( 8)
a{VN{ ( 5)
"C{E ||
mo=P0 50 P,Cwa{VND> ( 5)
a{VNPjb ( 5)
8VD>
nU\FD>(IZ8V6 0 R=)
bf3D>
3<D>
3ED>
{m3r(C'(eDr*;mD2sr53Er3r) ( 2, 7, 8) *
v *;mM53Er3r
{m3r ( 8 9) *
v Query C'r*m
{m3r(C'(eD1!3r)( 7, 8) *
v |,$dCoT3rD Query LrTs#4,|,0!q{m3r1A;O!n 2 D
3rD#i#
{m3r(TZoT)( 7, 8) *
v w55w ( 8) *
}](Zr!zrT>:exP)
{m3r(w5)*
v D~(e *
– D~G<q= ( 8) *
Query/400 oT3r
TBG Query/400 'VDoT3r#
m 9. oTzk3 CCSID
zRrf> zk3 CCSID
":
1. MNCS m>`zV{/
2. NLV m>zRoTf>
T> Query/400 i/
BmT>w5Mi/ CCSID D;,iOgN0lT>i/,T0gN&m#?#g{
xL(w5)CCSID Mi/(e CCSID %d,g{dPNN;vC CCSID 65535 j
G(;*;),r_g{i/(e4jG,rIT>i/(e#Zm10 P,37 G"o
CCSID x 65535 Gh9*;D CCSID#
37 37 37
65535 37 37
37 65535 65535
65535 ^jG 65535
37 ^jG 65535
|D Query/400 i/
g{xL(w5)CCSID Mi/(e CCSID %d,g{dPNN;vC CCSID 65535
jG(;*;),r_g{i/(e4jG,rI|Di/(e#
m11T>N1I|Di/T0gN&m#?#
37 37 37
65535 37 37
37 65535 37
65535 ^jG 65535
37 ^jG 37
37 500 ^(|D
Z Query/400 PqCPD>DTsPm
1 Query q!i/"*;m"D~rbDD>5w1,;4P*;,r*b)D>5w
;\C CCSID jG#
g{hvD>4T>ZPmA;P,4 F11#
Z Query/400 P(e{m3r
g{{m3r CCSID kzDw5 CCSID ;%dx;P;v CCSID * 65535,Zu
</0(e{m3r1A;.0*+{m3r CCSID *;*zDw5 CCSID#g{*
;m^(*;,r^[ZvTV{f;a>PD!qG24,<;9C|#
g{zZ4(r|D{m3r"Z0!q{m3r1A;O!q!n 3,Query/400 +
Yhz*<&mBD3r#Query/400 i4TBPm,"!q;h**;rI*;*z
Dw5 CCSID(;CV{f;)DZ;vVf3r#
v H0*Ki/(eD3r
v i/C'Dr*mPDC'(e1!3r
v 53DoT3r
v .yxF3r
}g,g{H0;P*i/(e3r,r9CoT3r4u</0(e{m3r1A
;,"*;i/C'Dr*mPD1!3r,bGavVXZf;V{9CD/f#
1^(*;H0*Ki/(eD3r1,Query/400 +Z0!q{m3r1A;O/f
z#(}Z0(e{m3r1A;O4 F15(oT3r)r F16(9C1!5),IK
b*N;P9CoT3rrC'(eD1!3r#
Z Query/400 PqCPD>Dq=rI1Pm
g{I1rq=D>5w^(*;*w5 CCSID,aT>UW#
g{hvD>4T>ZPmA;P,4 F11#
#f Query/400 i/(e
19(f!F.ki/;p#f1,I\h**;#bI\<BH04lb=Df]
TJb,"*sz7O#fPmsDi/(e#
KP Query/400 i/
^(*;*w5rD5 CCSID D?v5D?v;C+r!rT>*;vSE (+)#^
(*;DD>V{.D?v;C+r!rT>*;vc (.)#+vT^(*;D`-V
(DC`-k J)#^[CZKPi/D=(GD;V,<+"zKiv#
1dv"M=VfD~P1,}]MD>y;*;#g{SU}]DVNP;,D
CCSID,dv&mZmSNNG<.0+#9,"T>;uoOE"#
g{44PNNYw4<BX(f!F.(N{Z2403D:Query/400 PDf!F
.;),G4ZD~;f;IDD~q=;h*6pli+_P;,D CCSID XT1,
zI\aU=ms#
Z Query/400 PKP1!i/
ZTD~KP1!i/1,w5rD5 CCSID T0d{*;I\'\#}g,KD~
I\G_-D~,|f0=_P;, CCSID DVND"C,r_zI\Z9CxP;
f]{m3r1!5Di/r*m#
m12T>ZKP1N1I|DG<!qT0gN&m#?#
37 37 37
65535 37 37
37 65535 37
65535 ^jG 65535
37 ^jG 37
37 500 ;Jm
Z Query/400 P+}]O"=l+D5
9C OfficeVision +}]O"=V&mD5,Z+}]Si/+M= OfficeVision 1;
*;|#
BPwb(}i/(ena);)b=fDE"#PXX(DjGn?TDE",N
<Z2613D:Query/400 PD CCSID f]T<GBn;#
TZ"C{E,Idk:
v =vz_#
v CCSID 37 P=vz_D.yxF5 (’4F4F’X)#
v Zi/D CCSID P_P.yxFm> 4F D=vV{#
g{f0={m3r,h*1+|*;*T}]s5yCD CCSID#g{Z*;{m3
r1"z*;ms,+4=vmE"#v1i/KP1EPvmE"#
g{f0={m3r,h*1+|*;*s5}]yCD CCSID#g{Z*;{m3r
1"z*;ms,+4=vmE"#v1i/KP1EPvmE"#
q=D> w5 ^(*D~!q8(q=#oO=ms"T>
Z08(D~!q1"0|DD~!q1r
0D~!q4,1A;O#
I1D> w5 I1D>Z0!qI11A;OT>*UW#
-<Pjb w5 ^(*D~!q8(q=#
-<`-V w5 ^(*D~!q8(q=#
{m3r w5 ^(9C3r4u</0(e{m3r1A;
(ZKivB,f;V{\Gw*ms&
m)#s{!vZ{m3rD4Mz4PDY
w#
(3r4)
s{
(C'(eD)
/f.s,ZT>==BF}a>
(C'(eD)
/f.s,Z|D==BZ;NT>
1Sd{4u</a>
(oT3r)
\x F15 ks
(C'(eD1!5)
\x F16 ks#
(w53r)
\x F17 ks#
{m3r VN ^(4P,SDHO#oO=ms,"T>Z
08(gN,S1A;O,r8>Z0(ei
/1r0KvKi/1A;O#
VN 2 VN 1 ^(4P,SDHO#oO=ms,"T>Z
08(gN,S1A;O,r8>Z0(ei
/1r0KvKi/1A;O#
VN 2/#? VN 1 ^(Izmo= CCSID#oO=ms,"T
>Z0(ea{VN1A;O,r8>Z0(
ei/1r0KvKi/1A;O# (1
Query (e#?LP|DC'Dw5 CCSID
1I\"z# )1
{m3r #? ^(4PG<!qDHO#oO=ms,"T
>Z0!qG<1A;O,r8>Z0(ei
/1r0KvKi/1A;O# (1 Query (
e#?LP|DC'Dw5 CCSID 1I\"
1
z# )
{m3r VN ^(4PG<!qDHO#oO=ms,"T
>Z0!qG<1A;O,r8>Z0(ei
/1r0KvKi/1A;O# (1 Query (
e#?LP|DC'Dw5 CCSID 1I\"
z# )
VN 2/#? VN 1 ^(4PG<!qDHO#oO=ms,"T
>Z0!qG<1A;O,r8>Z0(ei
/1r0KvKi/1A;O#(1 Query (
e#?LP|DC'Dw5 CCSID 1I\"
1
z#)
VN 2/#? VN 1 19(f!F.1^(FcX|VVNDmo
=#\xK#fks;C'XkYNa;k
s,TkB"VDms;p#f#1
1. 1zZ08(&m!n1A;O8(;vTV{f;/f1,I\"zKiv#
VN 2 VN 1 ^(4P,SDHO#Q\xKPks#
VN 2/#? VN 1 ^(4PG<!qDHO#Q\xKPks#
1
}]brr!zdvDKPks'\#TZT
>Ddv,KPksLx,+yPD5Mc\
yT>*f;V{ (+++)#
{m3r w5 ^(*;m4TVNxP8V"sn!5rn
s5#r!zdvDKPks'\#TZT>
Ddv,KPksLx,+yPD5Mc\y
T>*f;V{ (+++)#
": TZ=A;Ddv,Query 9C%voOE"/fziR;h*DcM*'D`-VD>#
1zr!(f1,;P/f#
1. 1zZ08(&m!n1A;O8(;vTV{f;/f1,I\"zKiv#
VN 2 VN 1 ^(4P,SDHO#KPax(dv4j
1
I)#
VN 2/#? VN 1 ^(4PG<!qDHO#KPax(dv4
jI)#1
VN 2/#? VN 1 ^(FcErDa{VN5#KPax(45
XG<) #1
VN 2/#? VN 1 ^(Fca{VN5,CZG<!q(bTD
VNrbT5I\"zKms) #KPax
(dv4jI) #1
VN 2/#? VN 1 ^(FcdvDa{VN5#TCVND5T
0NNsxD8V"n!5rns5T>rr
!f;V{.#=}]bDdvax(dv4
jI;I\mSK?Vx;GyPG<)#1
VN}] w5 ^(+!qDVN5*;*w5 CCSID,r
K^(T>rr!|#TCVND5T0NN
sxD8V"n!5rns5T>rr!f;
V{.#1
{m3r w5 ^(*T>rr!x*;D5xP8V"sn
!5rns5#r!DKPksax(dv4
jI) #TCVND5T0NNsxD8V"
n!5rns5T>rr!f;V{.#1
{m3r VN ^(T9Cw5 CCSID 65535 DC'DT>
rr!dv,r=}]bDvc\dvxP8
V"sn!5rns5#=r!zr}]bD
dv4jI#TCVND5T0NNsxD8
V"n!5rns5T>rr!f;V{.#
1
1. 1zZ08(&m!n1A;O8(;vTV{f;/f1,I\"zKiv#
A A G G G G
A 65535 G G1 G1 G1
65535 A G G G G
A B G q1 q1 q1
65535 ^jG G G G G
A ^jG G G1 G1 G1
1. ;"v/frksaxE"#
w} 269
[H] /} (x)
SECOND (x)
G< (x)
!qbT (x)
/} Td?fr 81 C AND M OR ,S 105
SUBSTR(S.) 64 DBCS LIKE 104
c\
TIME DBCS NLIKE(;`F) 104
(f 245
o(<b 82 EQ(HZ) 99, 100
(fOD;C 143
Td?fr 82 GE(sZrHZ) 99, 100
c\P 143
TIMESTAMP GT(sZ) 99, 100
F} 141
o(<b 82 IS(G) 99
`M 141
Td?fr 82 ISNOT(;G) 99
=y5 141
VALUE 65 LE(!ZrHZ) 99, 100
T\Fv 245
VARCHAR 66 LIKE(`F) 99, 103
\F 141
VARGRAPHIC 67 LIST(Pm) 99, 101
ns5 141
YEAR LT(!Z) 99, 100
n!5 141
o(<b 83 NE(;HZ) 99, 100
CCSID(`kV{/j6{) 261
Td?fr 83 NLIKE(;`F) 99, 103
F}c\
O" NLIST(GPm) 99
U5 141
i\ 7 RANGE(6') 99, 100
=y5c\
Pd`l# 125 G<q= 195
U5 141
}]/D> 7 r!>} 190
UZ"1dM1dAG5 141
O" Query }] (e 3
S.
V&mD5 7 *D~!q!q
Td?fr 63
vT.xF}]ms 171 0!qG<q=1A; 42
\Fc\
c\/} 08(D~!q1A; 37
U5 141
(f 245 G<!q
UZ"1dM1dAG5 141
c\P 143 CCSID(`kV{/j6{) 260
n!5c\
F} 142 G<!qbT
U5 141
`M 141 (e 239
CHAR
Pc\5 T\Fv 243
o(<b 77
(fOD;C 143 OR u~ 244
Td?fr 77
=y5 142 F}c\/}
DATE
T\Fv 245 U5 142
o(<b 77
\F 141 YQzdv2G 156
Td?fr 77
ns5 142 f]T
DAY
n!5 142 *; 261
o(<b 78
CCSID(`kV{/j6{) 261 lii/a{ 12
Td?fr 78
uR{E r*m
DAYS
o(<b 79 `-D}VVN 132 Query/400 23
Td?fr 79 |
r! 14
[J]
DIGITS
o(<b 64 &\ 12
Td?fr 64 6p,8V 145 |X3rf!76
HOUR G< (e 239
o(<b 79 ;%d 247, 249 +}]O"=l+D5
Td?fr 79 (e 3 CCSID *; 259
MICROSECOND %dD 247 5r
o(<b 80 *i/7(Nr 111 TG<Er 111
Td?fr 80 !q ;%=&m
MINUTE bT 98, 99 ^F 251
o(<b 80 ,S>} 105 ;%=}](e5CLr (IDDU)
Td?fr 80 1! 95 (e 207
MONTH CCSID(`kV{/j6{) 259 i\ 5
o(<b 81 OfficeVision X*Pm 108 >}
Td?fr 81 !qbT 4( IDDU (e 207
SECOND }% 107 }]Jd 5
o(<b 81 mS 107 w(53)K% 207
w} 271
{F (x) %dG<,S ';Vt{
a{VN 60 9C?vG< 45 }VVN 131
`t 14 (F
=y5c\/}
}VVN 62 N A N-1 249
U5 142
Xbb 15 (Fi/(e
UZ"1dM1dAG5 142
|n ^F 205
i/ A;
0<c
>} 15 4(M!qVN(e (IDDU) 209, 210 f; 133
KP 15 4(D~(e (IDDU) 208
x;.xFVN 241
4(m (CRTTBL) 118 4(VN(e (IDDU) 210
(^
4(}]bD~ 5 SD~(e*'DVN 56
2+T 165
t/i/ (STRQRY) 11, 15 (e(f8V 145
i/}]bD~dvD 165
>}i/ (DLTQRY) 15, 187 (ei/ 30
3hd{KTzDi/ 175
9Ci/ (WRKQRY) 11, 15 (er!zdv 154
1!
C}]bD~2G (OVRDBF) 195 (eYQzdv 157
i/DG<!q 95
KPi/ (RUNQRY) 15, 179 (ea{VN 60
i/DVN!qMEr 91
CRTTBL(4(m) 118 (e}]bD~dv 161
*i/7(G<Nr 111
DLTQRY(>}i/) 15, 187 (e}VVN`- 128
{m3r
OVRDBF(C}]bD~2G) 195 (e{m3r 121
#f 117
Query/36 }LDH'|n 205 4Fi/ 185
1!5 12
RUNQRY(KPi/) 15, 179 q=/(f8V 149
{m3r
STRQRY(t/i/) 11, 15 hvUZ/1dVN`- 134
.yxF 255
WRKQRY(9Ci/) 11, 15 hv}VVN`- 130
7O>}i/ 187 7O!q
|{<(
9C}]bD~ (IDDU) 212 4(r|Di/(e 38
a{VN
`oT73 60 9CD~(e (IDDU) 208, 211
KvKi/ 173, 177
*i/dv!q 151 [R]
[N] 53Er3r 124 U>$5j< (JIS)
T>(f<V 13 UZM1dxin2
Z?}5Fc T>D~!q 44
UZ
$HM!};} 197 !q(fc\/} 142
HO 100
!q"ErVN 91
#?
!qI1 42
[P] !q(e`M (IDDU) 208
G<!qbT 99
q=Vt{ 69
Er !qG< 96
/}
i/ 91 !qG<q= 43
CURRENT(DATE) 83
i/DVN 91 !qErVN 111
Er<GBn 114
,SDND~ 52 !qdv`MMdvq= 152
}]`M 69
3r !qD~ 39
5w 68, 69
Query/36 k Query/400 Dxp !q{m3r 119
cuKc 73
!q*;m 122
204 u! 73
VN 8((fPq= 126
+}V*;*UZ 74
U5 114 8(`-k 135
}VUZ,9C 74
UZ"1d"1dAG 8(`-V 138
114 vS 73
gN9CD>} 112 8(&m!n 169
T>q= 22, 71
*i/!q 111, 244 8(bf3 158
5
T\Fv 244 8(,S`M 45
$H 127
EH6E 111 8(gN,SD~ 46
AS/400 q= 69
{m3r<GBn 114 8(D~!q 35
DATE /} 77
8(}rr5r 111 8(3<M3E 159
EUR 69
CCSID(`kV{/j6{) 260 IDDU w(53)K% 207
ISO 69
Er DBCS V{}] 117 JIS 69
z&m
T\Fv 248
[Q] LOCAL 69
USA 69
!qi/Nq 17 t/ Query 11 UZVx1d 76
w} 273
}]`M
UZ 68
+VZV{/ (DBCS)
[W]
=(EV{ 13
1d 68 {EV{ 4 (;= DBCS VN 13
1dAG 68 Ud*s 13 D>,8V 150
Dec P ErV{}] 117 D~
E 191 }]m>( 13
J 191 j6{ (ID)
sNDV 4
L 191 Zi/(eP9C 38
FvV{ 63
O 191 Query/36 k Query/400 Dxp
FkV{ 63
T 191 203
V{#?
V 191 N 45
FvV{ 63
Z 191 Si/P>}D~!q 38
FkV{ 63
}]hv5w (DDS) (e 3
3r 91 `VG<q= 195
i\ 5
}]D~5CLr (DFU) 5 {m 2G 195
Ti/|D 184 2m 195
}]/D>O"
1! 91 X5}]b 5
#fi/1 175
hC1! 117 a9>} 3
`1>O"
.yxF 119 ,S
5w 9
53Er 123 ND~Erfr 52
CZX*PmO" 108
!q*;m 122 9CwD~!q%dDG< 50
X*PmO"
C'(eD 121 *w,SErND~ 52
>} 108
C> 117 !q 49
!qG< 108
oT 120 !q;%dDwD~G< 51
i\ 7
8(,S!q 44
PmO"
Query/36 k Query/400 Dxp
(e 9
8(O"!n 176
[T] 203
4S
1SO" Xbb{ 15
Query/36 k Query/400 Dxp
(e 9
a> 203
09Ci/1A; 9
(;= _- 5
}5
09Ci/1A; 20 _-D 57
Fc
5w 12 dv=}]b
$HM!};} 197
8(i/{ 18 Query/36 k Query/400 Dxp
VN
8(b{ 18 204
$HM!};} 197
S/ }]b
}V
09Ci/1A; 20 4(>} 211
mo= 61
a>k<I *i/dv(e 161
#?
*i/dv!q 151
G<!qbT 99 9C Query 239
*i/mS 37
9Cfr 62 mS *i/!q
Kc{ 61
G<!qbT(HO) 107 0!qD~1A; 39
VN
a{VN 89 08(D~!q1A; 35
`- 128
D~!q 37 om 5
$HM!};} 88
<N DBCS VN 13, 47 T>i/D!q 43
&mZdvTms 171
!qD~I1
hv`- 130 "C
08(D~!q1A; 37
}VUZ,9C 74 ^F 63
w 45
Z&mZdak 170 "Pf^F 249
0!qI11A; 41
Za{VNP9C 62 V{#?
0!qG<q=1A; 42
*;*UZ 74 *s 63
08(D~!q1A; 37
}Vmo= LIKE"NLIKE #=
ID(j6{) 38
a{VN 62 XbV{ 104
Query/36 k Query/400 Dxp 203
}Vq= Kv
D~!q
x;.xF 241 Query/400 11, 173
9u.xF 241 CCSID(`kV{/j6{) 260
}VVN 241, 242 D~ ID(j6{) 38
w} 275
{m3r 91, 117, 118, 256 (x) S}L VN (x)
.yxF 119, 120 Query/36 k Query/400 Dxp 203 1dAG
53Er3r 123 Td?fr mo= 68
T\Fv 245 /} 9Ca{VN 68
!q 117, 119 "C 63 }V
"o1! 119 VS 80 `- 128
0li/ 118, 172 k 81 Za{VNP9C 62
C> 117 j 83 *i/Er 243
oT3r 120 U 78 *i/!q 243
*;m 122 1d 82 !q
T(e 121 1dAG 82 1! 91
CCSID(`kV{/j6{) 120 }V 64 5G<!qbT 98
1!5 255 l} 79 V{
.yxF 255 "k 80 9Ca{VN 62
C'(eD 256 !1 79 Query/36 k Query/400 Dxp
oT 256 B] 81 204
{m3r 264 char 77 DBCS 4, 47
*;m 256 DATE 77 mo= 62
{m3rMHO SUBSTR /} 64 $H(<N) 126
EQ 118 r!DG<q= 190
VN
GE 118 =(E 13
(fPD$HM!}; 126
GT 118 ,SbTDfr 47
HO 96
LE 118 ,SbT(<N)Dfr 47
`-
LIKE 118 (F(<N) 249
(e}V 128
LIST 118 !qG< 97
hv}V 130
LT 118 FvMFkV{ 13
i/DEr 91
NE 118 VN|{<( 4
i/D!q 91
NLIKE 118 0T>(f<V1A; 13
S(fPT% 128
NLIST 118 LIKE HObT 104
SD~(e*'
RANGE 118 NLIKE(;`F)HObT 104
*<|DrT>i/ 57
{m3rgN0l Query/400 118 V{
D~!q}LZd 57
{m3r0l 118 mo=
(e 3
'V a{VN 62
!c 13
UCS2 6p 1 V{/ 4 #? 62
a{
5 G<!qbT 98
4( 59
HO 97 {F 62
(e 60
U5 VN 62
|{ 60
G<!qbT 99 V{HO 172
a>M<I 243
1! 97
!}+H 198 V{#?
5$H
DBCS 195 yw 98
UZ 127 9Cfr 62, 63
Query/36 k Query/400 Dxp
1d 127 FvV{ 62
204
1dAG 127 FkV{ 62
U5 13
1SO" 9
{F V{/'V
wG<
}V 62 UCS2 6p 1 4
!q/T%j< 45
Er V{a{VN
wD~ gN9CD>} 112
4(fr 62
(e 247 *i/!q 111, 244
CZD~,SKc 45 V{}]
T\Fv 244
*;m 0T>(f<V1A; 13
8(}rr5r 111
{m3r!q 122 UZ V{f;/f 171
CCSID(`kV{/j6{) 122 mo= 68 V{VN 255
4,E" 9Ca{VN 68 P'HO 48
Query/400 250 1d S.
S/a> mo= 68 >} 64
09Ci/1A; 20 9Ca{VN 68 Query/36 k Query/400 Dxp 204
w} 277
DBCS(+VZV{/) (x) L"T r Z (x)
,SbTDfr 47
G ,SbT 47
ErV{}] 117 GE(sZrHZ)HObT 99, 100, 172
}]m>( 13 GG(+VZ G) 13
sNDV 4 GT(sZ)HObT 99, 100, 172 M
FvV{
FkV{
63
63
H MICROSECOND /}
o(<b 80
V{#? HOUR /}
Td?fr 80
FvV{ 63 o(<b 79
MINUTE /}
FkV{ 63 Td?fr 79
o(<b 80
0T>(f<V1A; 13
Td?fr 80
LIKE HObT 104
MONTH /}
NLIKE(;`F)HObT 104 I o(<b 81
DDS(}]hv5w) IBM 7^j< (EUR) Td?fr 81
i\ 5 UZM1d 69
Dec P IBM USA j< (USA)
}]`M
UZM1d 69 N
ID(j6{)
E 47, 191 NE(;HZ)HObT 99, 100, 172
D~ 38
G 47 NLIKE(;`F)HObT 99, 103, 172
Zi/(eP9C 38
J 47, 191 NLIST(GPm)HObT 99, 172
Query/36 k Query/400 Dxp 203
L 191
IDDU(;%=}](e5CLr)
O 47, 191
T 191
(e 207 O
i\ 5
V 191 OfficeVision
>}
Z 191 +}]O"=V&mD5P
4( IDDU (e 207
Dec VN `1>O" 9
}]Jd 5
X*PmO" 108
zk w(53)K% 207
i\ 7
E 127 IS(G)HObT 99, 100
PmO" 9
J 127 ISNOT(;G)HObT 99, 100
1SO" 9
L 127 ISO(zJj</i/)
t/ Query/400 11
O 127 UZM1d 69
*X*Pm!qG< 108
T 127
OO(+VZ 0) 13
V 127
OR ,S
Z 127 J G<!qbT 105
DFU(}]D~5CLr) 5
JIS(U>$5j<) OR u~
DIGITS /} UZM1d 69 8(!qbT 244
o(<b 64 JJ(+VZ J) 13 OVRDBF(C}]bD~2G)|n 195
Td?fr 64
DisplayWrite 4
L
O"}] LE(!ZrHZ)HObT 99, 100, 172
Q
i\ 7 LIKE(`F)HObT 172 Query
t/ Query/400 11 `F#= 99, 103 70 207
DBCS 104 Query i\
DisplayWrite 4 M 5
LIKE #= En 3
+}]O"=V&mD5P
G DBCS V{ 104 }]rD>O" 7
1SO" 9
*E= DBCS 104 Query/36 k Query/400 Dxp
DLTQRY(>}i/)|n 15, 187 <N DBCS 104 YwT
(;= DBCS 104 ,SD~ 203
LIST(Pm)HObT 99, 101, 172 I,SDD~} 203
E LOCAL 1dj< ,S`M 203
UZM1d 69 |n 203
EE(+VZ E) 13
LT(!Z)HObT 99, 100, 172 V{VNDns$H 203
EQ(HZ)HObT 99, 100, 172
L"T r Z Query/400
EUR(IBM 7^j<) jGDVx1d K%
UZM1d 69 (e 75 xk 11
S *CURLIB Xbb{ 15
*EXCLUDE (^ 165, 175
SECOND /}
o(<b 81 *LIBCRTAUT (^ 165, 175
Td?fr 81 *LIBL Xbb{ 15
STRQRY(t/i/)|n 11, 15 *QRYDFN(i/(e)
SUBSTR(S.)/}
Ts 5
U5 64
*USE (^ 165, 175
o(<b 64
Td?fr 64 *USRLIBL Xbb{ 15
SUBSTR(S.)Kc{ ||("C)Kc{ 63
U5 64
o(<b 64
Td?fr 64
DBCS VN
a{VN 195
T
TIME /}
o(<b 82
Td?fr 82
TIMESTAMP /}
o(<b 82
Td?fr 82
w} 279
280 Query/400 D9C V4R5
IBM
Printed in China