ca.portal.admin

Re: Technique for changed a chained set to sorted chained set

Discussion created by ca.portal.admin on Oct 31, 2009
i do not know if altering the set followed by an unload/reload would
work but
being a one-time thing - you could do the following:

disconnect all members from all set occurrances (using a temp schema if
necessary), saving off owner symbolic key, member (new) symbolic key,
member dbkey
make schema change
sort output file by owner symbolic key (ascending) , member symbolic
key (descending)

for each record in sorted extract file
find xxxxx dbkey is
connect to xxxxxxxx set


this would allow to to build the set from back to front for each set
occurrance

others can enhance this - just something i thought of off the top of my
head at halftime

GO BUCKEYES!!!!!

William M. Allen, Jr. wrote:
Hello All:



Can you share with me your method for converting a chained set to a
sorted
chained set?



William M. Allen, Jr.

ARCH Consulting Associates, Ltd.

(704) 641-0296


------_=_NextPart_001_01CA5B8A.73E66637
Content-Type: application/x-zip-compressed;
name=""udmsmdis.ZIP""
Content-Transfer-Encoding: base64
Content-Description: udmsmdis.ZIP
Content-Disposition: attachment;
filename=""udmsmdis.ZIP""

UEsDBBQAAAAIANk9Yjvi5d4wMAsAAAAqAAAMAAAAdWRtc21kaXMudHh07Rppc9u68Xtm/B/QyZtK
SmCPKFk+PrB5PCCbMQ8VpBy7XzI66FjPkuih5Je4v767AEmDh2ynSTuZaTFjSQb2APbC7pKEZCNy
IpeRlu2EVuD7zIqIxzyTccKZFXA7JEMeeCQy+BmLSMiisLX35t3+Dw0gkHOvsW1vOlWOxPHz/2zz
QEFuL5PZZElWyTwmyXr5+BeyeZhuZrfxakJWD5stmcbk/mENE3PyV7JcrO/ieecn7H5se6EHOych
bCsiXVIfsM3i9zh0/DPyjnKtp8yGxiWDI2iHVOt1lHmX4yfAAvyAqEOl6RoSakAlnWaoMMqhTtpc
63calvr0sI2cOo0E8s30n92MKT6ZH/HSTipQb71gFBErBF3ruQQpZ2ehfs1CyvxLfRwyriD87gU2
I/ihm0ZkndO/j4OISXCbmeMz8etTwC+Ais67KmoYWlpPnWEf0caaBuzRNOyRwT0wxxBnuucqqaHj
O6E6Y5jMt8np6Sm1x96IhhEb7b0pTt9AwhWf/JB2UdRPkiZk5FgXZDwigrthc8W4fwt9Y0SGOqC5
utbt0jPdD86YT891wWsfcVwnjNr8UFWs5Vrw2W2D/Rx2qH7e6rZyZsjEZT75G+l+UNUn9l3IQBl+
UDe5Q9pDjiqYCWIA6mBSQL1m+Pk+YT/FCnqxAgiu7Rng5Zy6l/ph9/SoboInILkaadu0zPGQ8hPy
NCqkfzOEFfUO6WgcnnOd95XFYATSIG0gM3RcGoyj0TjqPK2wq4gbYDWwyOokR8FIklPZrf6cwedm
M7tfT1Yx1Wet3NRbqk2ZDlhQODZD61yHmEVDy9TBZCPuqnox0HD4EeWRzzgPC/NVvep3zgz7mhjw
pQeffPym45FtRExnV5YLcrpkr6FZJir2BxcAkqROIKiDlICs8SpiFXpgyDDgeNoJHfuBAmUFYz8i
yG7vDbe1MAKGjV4YmBFayNABNrR02mybNRfQrVb3uEXFxozofQ9XwHH3g+E+4tUcAP2cVAY6ejAk
HwPzgByUY1717OpmDctiI7ytLti1jgEafgWvRC5khaIvCUvKCvXdRApMtywFGZWFUD2TE2UcoKxR
0GRnxLPh2xpzDqGmQcDPHj7TlA/e839FPaOoQjNPKniXA5fNHXIgHf6EAAFhp1tkcI0ChtGicZpu
tpMtriR3Nbmm2iq5I+Uxm6TpIyRXB41EtYrWJmk8IetkS+B7/tjEIJ0/lhl8SWrAL1pF+YySdmHQ
yjgL8GYRlkhgtZRcFEy0kwoT3P80eVjPFejpOiZi/zMQYZXHJo7J11sQK6wlaWMYhQshjWf/tUha
TOb2oboy3DPw9e8wn4pPrnnBBZiv5nG4eMo3EJwzTifpj99AklU61zbb1RRkWoi+wSMLu210Z+97
3Rk8rFG0z/hz2Sll4IUrvxJ2s8CbzT5zyYnQ+aPOvN7tzD/Fl+frX8+Xe0cVJlDB8vEoYjbUkDa7
qme9hTp2sJJF6Y/GjfWqGjb+F+OGL+JGYTj/0bghg0Yu96agsf4lgkYRJZrCgWyOqIaAQWETbxWg
2RILDqgzNE0bFEGhZoLJnVo9mZMlfKZwJAYUP+Mf1OZOIJzun5N7sopX0zjd3C7uSXK/XZRChhTx
fLERMgbCZL4h3dtXqco6Z1Dw2p5LYD7g2ECJxmGTQOeLsCmpeuoXKdnS7F58blPYFNXvW4enLWV1
usbD3izWCyj0r61AlLgN4s7z5XpAUA3s2T6CTO3IE/lGqOL3N1QdmU9n04ebdr/XofKnAuFdYrQB
v79y/Xa3J+v5br/XArcxHahOueNeE5wh5nXEwiZU7tjtLrYCbrJWgB9EUD8zuxGYWW3tpEOLACxi
bdYLJL7hsSYs8BjBIs+gy1jCsxS0Z0tyEKGkiRW5rO/rqEXpXSwUdvOJR01284k7USmayK7CkdBZ
2QNJbfyozq4adPbTNSYjBMyBW36nvjwV59fWVhFRXqctJWWq3NZnQWBn4aecFSArflQlCo5wIbgb
Iky8jnvWMTumsrWzAypv9B1TV+8NBkqfD+LkPmy6DegdtTjc2ZE8UTuSRZn8qqbmPF7G25jE98tk
hrfNzeLba43AcoOQ5V20Th2rrv9CMNi8dZ3oVdJgwcd9VFj42n1l3T0XKmO1tZevhNehW7rMd253
5wGr53hfdDgxgTRsjj0JDfuijg/2DOzcEa6+znyku7pudBWJSNNt82N5BC+4ZEAzYhxu2gjyVAVr
7I8uEAssrn3aof1ee0AlHqwYcPsifCuUnlZKbQNhLgLz/Qm9ag2LzvHQuSLROSP/CPyGRuhzoQGF
j8d2lHxeeDepZLIv20r/uE1zAYhRJOmihijcI/P5YWsfSponmZGiSZSdvOT3IqqT9Jjqk3aczBQu
8XpOkhsyg8x+CylRKVgIly60qgw/oMDGjxx//GqBSStzw3p2IVdetFd2xTB4PvcIQj7u0frK+VSL
4ywacz9/KEW5pauPUN5CXueIdncaQxL6Gf9kdljLAGfLBZFAN8svdNZ6VLvfWVGEy6XCNY9iXTWK
ZWA1Dqs/n+HwdZuQFike03GE2y7WX0gYb0kgtnxwcKBivL1ZJfM/7if4BFGZXoqqLe3RVCPl8QUo
TebzFG1jmUzm8RyfQz4sY7TEDxn2JMPWem2alp7yPWxwOzeLKcyX5JZl8445gBsL1geqBqYoOMQq
ye3tzvvgWJWkQMPVqiiX4jPtI7tNuiZP42YB1QSRT1QPMLvAE9dPsUlpCva3SZdJci8ZwKgYRHaw
kA/ALQFlkEm0dBR5QFxstIwj9TwSitTPI3klX9fIBh/DFCswF6fka4yl992HGt/t7WLzWcIU4zHe
NIpqky6mqqjWCZU2sU62t7EqpFma4aQ9Uh7YMbjBjgE+yU7uwYQmKf7bKW1NeIuUbYNIBqpIlAPs
UPIAd56UlDy7vcsEA16iHjbTbgLaHUChp2i3WbUBH/RAtUk6yA6aNMgYVxt1e6geRELtZAYbRT4l
3eLZcWGHWmGFKKNRrQMkWvaAXK3r+NsWqaM4pLTqGh6AF5Dy2KnhmoKTXQru1xSM29ih3lM8warB
h2VBTxZrUm4fZDpegY5P996sXtSxxwd90PEqHWRHbdIxLDequFcKRwhU54RxXVDAHdNvrW4/T0JW
k7s460bgSx+T9cNk2SiBVcXAC/1JIdQVdwoGTsoju/Wr9iRUtaqqairJNBQNk+WSzBPAgpAQU7DE
eF1+XmxjrgIX/GELazG4kYrXOeQlrp0M5Zwoq+XcsM5Hvk0CCWpevhWV3XeghBbmeTlnG1t1j+Ld
miygz5YnuS4I7DTLedUz4BSswCy3BY1sBYpfTPdMA9MYljVwQyK6Y2BWSE0+RytwRu7g6cWFbBwI
ylmxvoOy7NeGFcoqzm7KpnjqqVDGHwX1/HUoE7JHu6CsiVcPXqKMScjLlEVvq6Cs4uymDAV0nXLx
4kJOGTPuJ2moODsoQwosf0sokUuXgfJkWmalSoHjPCmxa7laH/xXRVXgoTQrVVP5KbTGs2IZpEL1
AQhtDcsVdf5UTNeInlb2UU58s4wZfK3oRuTyOWy914Cg77i1+S7y96Jd872jyvyglafOkLOSOYp4
1vLV3bpRwM/KEWLEHUjqRRG890aWoIIq9iFsGzs8et5/CQFZH4XUMyw+1Ecetu2Hnn5pCs3k21QQ
pTJ2Ig6N2j7ELvI3ekBsohELOXNGXIjRctX3ceSA4FLtRkngqxqo0Az6sgIFRlGjiSDfQ7Joae4m
Ccf+XpL4+OI5kmJd0lS1agWja6jgZP9OmYdc3rTD0kTIKxNBdcITEyXyqBhClRkmglteEu29+RdQ
SwECFAAUAAAACADZPWI74uXeMDALAAAAKgAADAAAAAAAAAABACAAAAAAAAAAdWRtc21kaXMudHh0
UEsFBgAAAAABAAEAOgAAAFoLAAAAAA==

------_=_NextPart_001_01CA5B8A.73E66637
Content-Type: application/x-zip-compressed;
name=""udmsrcon.ZIP""
Content-Transfer-Encoding: base64
Content-Description: udmsrcon.ZIP
Content-Disposition: attachment;
filename=""udmsrcon.ZIP""

UEsDBBQAAAAIAOE9YjuBFSBX0gwAAJFEAAAMAAAAdWRtc3Jjb24udHh0xVtbc5tIFn5PVf5DVyW1
kifYgyTLl61iJwhatiYI2AY5zr6kZImMPZaEC8mTyf76Pd3NpYEGCVvKnqphnG74+tz79EUIxeSP
fAujFsHHhmPb2PCRr5Mr7CMP+x4aEmeMzIFhOTZG+NYnuuG3kEATc+wR+PLtm1+OX0UyxKSpDdwd
JeyZ2Btd2bqPTcoiGtkJw6bu6wPdwyeoQDLERTibLtAynAcoXC1+/BOtn+/Ws/tgOUXL5/UG3QXo
6XkFDXP0D7R4WD0G86MM+KdITU4R0tDEwwS5OhlbI89HDUiGeEERzcExs+dxbE80HIEHDCbDIYxU
RxLEV1KGmPyFPLCmj1TJyyW7yihDzJq8kX2FflFIp1vzYSVJED39BoMPdU6VTveo5tMKkiBaTPPA
IXDZz738UqktnT4BTeHcZvRSRO5+FPGiTTq9poLXIPaU0zYVPIN8KY+JHnt70+OAPbHtk5wS0csR
340d10eGB8lMS7oVgq887Qv2FGzfaCzmGyB+HDsmRvShDXTfuFb+PXF8zPFMPJhcsb8+O+QTDKMR
dQdEzzM63eKLO5MEEf9Ok7eMGupxoJs0HSJkerRDvd/2aQXJpB6O7JF3XfNRLUkQ9QG2TXR5eamY
k7GreD52q78vU4aYOmAs9UuZlMUMe5JTRaVBKIa1OzI+oYnLph+km3KfVNXOmQokIBqWQTvakM1O
jxTtuqUmNQNDsrCN/oXU36RwiCGeFxAHTPbU9ALZDtpOgHhRQIzz46nSbQOT4ssDsBQwCsmJMlpB
gHhZQOTzTDJVK3T6jmknD1fVrsoR9zW7ZohpE9RJYx1KJqJYN9qpenlW87mEqjPuBbhO5Wc1VDlf
Q9EJJYlCS5ZmdMgqJW16r7OU2z1V3Il3TTTSEzodF/ymDQJAYaXkXIv1JPUXytVfGVUP5zpuYaiP
gxHkF28y8IxrDUpYxTMGGuRun1hoB5LNdzr9kpwpxLcxIVnNuZMT/xzt720uIabzmYV4dVZtiJg2
8RyoGelqqaXEYw0s3f6E4B+YtDXvi3cCf56AGfHtUZYSZZZhTkLM8aCYiOnsThMhw0QEGyfIJY6B
PRZJNYiJrSEtgLsKiGw9BS2A5RATySlDdAY+F+5QegRegJV25+wo0WImLDBYOZVIpbapIlPTC2Q7
CpNctx3/uqoEq6gbTODxE/6iAafwB9RzhlYeQE5NohAZ1xgmZXNsIWh3CF0v+RNvO6Lusq99Alwp
E3HWNJyJTZOQXWVnSoeM69Sl9+89+/RwzuT+eTyAh7NMkQalQHGmABdHYzweYAIO74CWwKVqESs8
nDONttLP9XAw1Ks8fBaulncRNM3XtEO2wrCdz4Aa75ddY+R/lpShMj0mH1Htze9mUTBTPOxrdCdr
B5IgzhYzeGqzlnre6beUIIrWm+lGeOFuFcAzfOyIyp8u4BmB8jGM/JX+B2vSkcO85b/TJ7QMlndB
tL5/eELh0+YhXImAfFympLdvAJjqSb3/ObaFZpltE7VWUIZo2PFL+4/jj7phYNePo4TuusBfrKch
4uCL4bBFzv7Xenw3Q1ZD0HxoQ0WK6mL6kLVYtFmpbAnxkWDd/IJ0+J+2Xs+CaBopE9fUfazhW8OC
5cEN3snZTkphwiOOJdnwe86naYyg8G5TaEZxM3N1GKDDOKy2i+fqBkY3I8fSk3Aqk0SL7z0bXHyo
XSiW1u33lSvNdq6wrVxrECvHxDju1K6uKi0d/B08rzb5lxvahUrNlonVUifRVyt3XVR3zvJBHUe1
bnFXiPFxIX1XSp0GuUDNpVbZBmK11ObE3WpqWd201dZqfueyEjFtSvWo9qV6ZJxWk4TH8Q3NAHEO
a58eKSyp1WDkaUsFIebGHalRBYF2MfeBvae7JWagCDsegnXMOhd6Sabo1u7p1HlPVx6FGadSklW0
LnsyRGvsCxyNHYL51O9B3aTbEOKW8xnny1uZZdh2hswydM0G7/oje1Lt49UzoW/rg8LLzW3NvW//
FUW6h6CqLYUNovsf2CHWleOYcfHUcGVA530icRFnl3Cs5bFT4DEKpvMf6K+HcDGlFaScTymP9EmS
ckCgH8FaQffT1XwRoEqq5bFf4DGfwytUWc1jMkkIxFZY4NmmVZNy63jsFPVYqCma6jEpWgR6PY9n
BR5LFYCMy1oeiy75ah67RR4lGbfMZR2PpczakMc02ew/U8SnGedKae/3pYjJPHMunWdAsW0YqvoM
uKICOMzp2sWrT9du8YTNLftfcdWeFBiW4+HkqCCnTN7DO1AVVQ8nOSnYu/ZTn6MHy9Zopw0MgRr5
HHZ+P6aRXNwqyFFT7bPTGNS2PF9xJr478Y9yPd4Xz6q7ctN0uKK+PqQHhGzP2STIGaIOPXYc2ZJ8
kg0HXFkubdp/HuF1v2X5t3671z1S1DY551oZOzcYOPMxgbLbpxsFuyFObPcTRYS01D4/Unrd9qnC
MaGH7jtSrJbHa83ynrsE0RnRJ0P8cKbctobp6fJwdMt24/7jyBQYU1OzgV/AkzoJ1ftIqNI/E1AH
u3aGqqlJjKYe0jtrK4niGaW7M3UbhdWz4bB1DFVFZkxEb7SY1N9itVdUkbLZkKk2dUGBXlqJ75Ah
ZXHIe7YEaSPts2d8Gyl3v+ml0USwPyF2clFMIYamVn9fJgniu7vp4uEQZzBRsA42X+l/fL+3tKc7
Wzwg/tK3xR/KrPWjJXTyPWbWHT4K7XO66YbuW6r4cjJrq9msHY8fPpaGXf5VM+z3TYhaqRCI0Pc2
D6s/kBdskMPkODk5Eb94920Zzv98mtLrnkLzgu72o6irRMVS+Q9Ams7nEQq/oUU4nQdzemn0eRFQ
I8RBs5jGX3e6bSXqHgnAz2vKzreHO2jPKTPetB8N+rC0g/6+eEuD70ZCa06Zid7ORb2xl2hvUXEL
9ox6FHwdrVBG3x6i9Qbxy64nUTBj8pV5XkdKBOGxjhZh+ISywxCZGB7pQ36BT/qx/nKMc3Fop1Se
M1Ee/hYqy8PHCr+v6DCr6TJbAUJbEKHvAVoHweNvpXE39w/rr/ydlGAhKVXVOnq4E1W1ChXuAatw
cx+ISppF8TdRF+UJXkXfwufVnF4yDp/AYaYR/edRjjUWMFy3EpX0RZUIAlQYuU85D3NGnt0/xoqB
mBCFja0bgnX7b9+EgnXlpnVIvwumDaN+LGgo0THtldr2VBSEv1U5GDBKx8nZlspOOyrMCj1IIKlZ
xQ0HwGJWVfB3xuKTtXBtVW2cBiAOWp0sIlA4dVBu6VDEzZqDDvJZVgKYlhfkqHHlZUiLKNl2Dj
y7dvllttPCb9Hth4GfVjUWU2hm6pibu5dERfKo9EszhDoBwrf7fUXlKyLaePQXzESO/jT1fP04VU
A8uCg6f240ooG+4SHBzlKQCTQR4v+hMz1bJoqjsOI9kqmy4WaB7CV5ASAgU8MVgdYkpOryzsv8yP
L16fsbvhBKd3hPjNdrFBSk2LuCtWtMYX4vjFvqwjXuPW3MNoOlxcyJWlI9jz6QZ0vYDZcKlNxU33
C1VYl3Kuj7f8eEK2deHSJyxhiCk7z6bnXkUUkWSFORtftrW7E0mkfiVJeDTZubJhnbaoaXI/JNqF
MsT0Nw08NjoXw9oPKymPyPyCI8rw2KCwAvxU50BFRCOTutdtobzMsdMPR9iCp0PYzYh6RHpuxlms
5pGmjboDuwwx3brJLEObXmEZQONhLEpNKbntymX2YhfXUMVYGSILkgzRBR7VwkcN8yDwGF9XzPOY
/IKM37zy6DELTVy78Sgi7ofH+MJZBY/8/pbXiEcRcT88Gk6dHhNbw1utllnJZI5HEXE/PJoTF23j
kR8FeTvqMb4asEce4+PijMeSDumtPX58sRuPIuJ+eOwUeWT/LOpR/9X51diRx87eeRywY+pt/jho
oMcO+wXC3nhMmzjikO7MFV6Ot+birS26G+yhEglSJ9uSHFE1rE6vl59pBCjUtvInDRLEtCnRY+e1
UrMdZdqUWkYtzoU7kYgItqFNCeL5iwDrpL7sFyEbSp02xRX8C4sUATEtFTN//FDynx0oQ7ST8yUB
sWjsXUiwzNgv5p4Pl5eXjTEzxHQDkG8ozlq2uKdnQU1/VQ2zjbJhDlj4umTEbtJcVf+irI4yxPRE
0DToUbJp2voY03vYiumBGjTXU8a6QYba1VjBjqmbGj/bpNe1h2PtZlBCTLfPc4g8YxRB3XGMMywf
eVRK/UKZRcT09++mV3PLdztliOtnfrczDk3DKv/OzPMMRHVR6hCpMthvJS+b2BqNR5JTLpEooskQ
07OehMdOiUn6yv+Vx/QXBtU8pj9jqOP0kDweMK4Nx4VF1vtdfwdRJAniu+FoYHq5Bo8UGpxiw5g1
HFJOFndKzUe1JEHErFDLOv4HUEsBAhQAFAAAAAgA4T1iO4EVIFfSDAAAkUQAAAwAAAAAAAAAAQAg
AAAAAAAAAHVkbXNyY29uLnR4dFBLBQYAAAAAAQABADoAAAD8DAAAAAA=

------_=_NextPart_001_01CA5B8A.73E66637
Content-Type: text/plain;
name=""#fmodjpa.txt""
Content-Transfer-Encoding: base64
Content-Description: #fmodjpa.txt
Content-Disposition: attachment;
filename=""#fmodjpa.txt""

ICAgICAgICAgTUFDUk8NCiZMQUJFTCAgICNGTU9ESlBBICZNT0QNCiAgICAgICAgIEwgICAgIFIx
LFgnMjE4JyAgICAgICAgICAgICBHRVQgVENCDQogICAgICAgICBJQ00gICBSMSwxNSxYJzJDJyhS
MSkgICAgICAgR0VUIEpQQSBTVEFSVA0KICAgICAgICAgQlogICAgJEZNT0QxIyZTWVNORFggICAg
ICAgIEdFVCBPVVQgSUYgTk9ORQ0KJEZNT0QyIyZTWVNORFggQ0xDIDgoOCwxKSwmTU9EICAgICAg
IElTIFRISVMgSVQNCiAgICAgICAgIEJFICAgICRGTU9EMyMmU1lTTkRYDQogICAgICAgICBJQ00g
ICBSMSwxNSwwKFIxKSAgICAgICAgICAgR0VUIExJTksNCiAgICAgICAgIEJOWiAgICRGTU9EMiMm
U1lTTkRYICAgICAgICBMT09QDQogICAgICAgICBCICAgICAkRk1PRDEjJlNZU05EWCAgICAgICAg
R0VUIE9VVCBJRiBOT05FDQokRk1PRDMjJlNZU05EWCBMUiBSMCxSMSAgICAgICAgICAgICAgU0FW
RSBDREUNCiAgICAgICAgIElDTSAgIFIxLDE1LFgnMTAnKFIxKSAgICAgICBHRVQgRU5UUlkgUE9J
TlQNCiRGTU9EMSMmU1lTTkRYIEVRVSAqDQogICAgICAgTUVORA0K

------_=_NextPart_001_01CA5B8A.73E66637--
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: Technique for changed a chained set to sorted chained set
"Trying to attach programs here
UDMSMDIS ( Disconnect the members and store in flat file with DBKeys)
UDMSRCON ( Reconnect members using flatfile with DBKEYs)
#FMODJPA ( macro called by MDIS & RCON to find subschema in JPA during
runtime, so the set option can be dynamically set to Optional from
Mandatory -- so no new schema/subschema needed).

* extract record format...
DBCBUF DSECT ,
DBCXLN DS H EXTRACT REC LENGTH
DS H FILLER
DBCRID DS H SCHEMA RID
DBCREC DS 9H RECORD NAME (MAX PRACTICAL)
DBCDBK DS F SOURCE DB DBKEY (OR ~F-O,~CON)
DBCPFXL EQU *-DBCBUF            DBC RECORD PREFIX LENGTH
DBCDATA DS 999F AMPLE SPACE
*

Vary DB OFF/RET
Execute MDIS
Modify Schema
Restructure DB (If needed (converting to Index, not sorted set))
Execute RCON
Vary DB ON

Regards,
dem

Outcomes