Filter
Top Products
x({FM`MD?~vI4F=P ;|,P`,{FM`MD?~DiP#g{Z
*|,;4F?~DiD1!Qw76PQ-fZ`,{FM`MD?~,r1z4
FC?~1Xk8(a}k *NONE#
zXkT|,y4F?~Di_PA r|BCJ(,RTSU1>Di_P|BCJ
(#
Z4F?~.s,|;alv=C'r*mP#
1z4F_-D~?~1,XkWH 4F|yyZDomD~,r_ComD~Xk
ZSUiPQfZ#g{z}Z4FomD~,rZ DATA N}O8(zGq9k4
FomD~PD}]#
g{zk|Dy4F?~DtT(gC? ~DoTrD>),rZjI4F.s9C
0|D?~E"1(CHGPARTINF) |n#
zk4FD?~
Z CPYPART |nO,8(
4
j<M
?j
j<#
4
E"|(n?"i"`MM?~#
9C FROMPRJ"FROMGRP"FROMTYPE M FROMPART N}#PX CPYPART |
nJmD?~`MDPm,N{=<B. ?~`MT0|Gk|nDX5#
g{zk4FyP`MD?~,r9C FROMTYPE(*ALL),g{zk4FZ
FROMTYPE N}O8(D`MDyP?~,r9C FROMPART(*ALL)#
g{Zz8(DiPR;=zk4FD?~,r9C SCAN N}#SCAN N}8(g
{Z8(DiPR;=y4FD?~,GqQw1!Qw76TR=y4FD?~#
1!5* *YES;b+QwS8(i1=yiD76PDyPi#
zk4(D?~
TOPRJ"TOGRP"TOTYPE M TOPART N}Jmz8(y4(D?~Dn?"i"`
MM?~#g{z;ndb)N},r+9CZ from N}O8(DG){F#g{z
Z FROMTYPE M FROMPART N} O8( K *ALL,r Xk 9C1 !5
TOTYPE(*FROMTYPE) M TOPART(*FROMPART)#
g{-<?~G4I1,r TOTYPE N}XkG4`M#}g,g{-<?~D`M
* RPGSRC(4I1 `M* RPG),rIT+| 4F=`M* RPGSRC"CSRC r
RPGINC D?~P#
1+4?~4F=m;V4`M1,}g,+ RPGSRC 4F= CSRC,r_+ TXTSRC
4F= CBLSRC 1,&8(J1DoT#}g,g{zZ TOTYPE N}O8(
CBLSRC,roT CBL ;8(xC?~;g{zZ TOTYPE N}O8( DDSSRC,
r&8(oT DSPF#TZC'(e`M,8(D1!oTGQ-*y4(?~D`M
(eD"4V83rP>DZ;VoT#
g{-<?~;G OS/400 4I1,rBD?~`MXkf"ZkZ FROMTYPE N}
O8(D?~`M`,DTs`MP#(PX OS/400 4I1`MM`&D0&CLr*
"\mw1?~`MDPm,N{Z503Dm4#)PX CPYPART |nJmD?~`M
DPm,N{:=<B. ?~`MT0|Gk|nDX5;#CPYPART |n9JmC'
(e`M#
Z5B 4(?~ 45