Re: Don't use Rcldlo.A Ptf is On

"Alex A. Moore" wrote:
> 
> If you can't wait for the PTF ( we ran RCLDLO 1/1/2000 ) here is the patch
> for the adventurous:
> 
> To patch the system to get around this PROBLEM:
> o  STRSST
> o  Option 1 to Start a Service Tool
> o  Option 4 to Display/Alter Dump
> o  Option 1 to Display/Alter Storage
> o  Option 1 for MI Object
> o  Option 14 for Index
> o  Option 1 for Find by Object Name
> o  Type SWILL for the name SUBTYPE: CD and QDOC library name
>    (library in context field), leave library subtype as 01
> 
>   Object:
>     Type . . . . . . . . . :   (0E) - Index
>     Name . . . . . . . . . .   SWILL
>     Subtype  . . . . . . . .   CD   00-FF
> 
>   Context:
>     Name . . . . . . . . . .   QDOC
>     Subtype  . . . . . . . .   01   00-FF
> Type choices, press Enter.
> 
> -  Press Enter on the Display Object Found Information screen
>       where it repeats object name.
> -  For RISC releases, Take Option 1 for Display Unformatted Data
> -  On Control line, if RISC, enter P18 (for IMPI, enter P1A) and
>     F10 to push stack this takes you to the Associated Space of
>     SWILL object.
> -  X/220 from there is a date/timestamp(to get there,
>          enter 220 in the control field and then page down once)
>      or you can
>          add 220 to the address at the top and press enter.
>        Ex: addr 01A3D700 0200 + X'220 = 01A3D700 0420
> 
> Before Image:
>                      Display Storage
> 
> Control ....                 nnnnn, Pnnnn, Lcccc, .cccc, >
> Address ....   01A3D700 0200
> 
> 0200 C3C80200 00000080  00000000 00000000 * CH.............. *
> 0210 00000000 00000000  00000000 00000000 * ................ *
> 0220 00000000 00000000  00000000 00000000 * ................ *
> 0230 00000000 00000000  00000000 00000000 * ................ *
> 0240 00000000 00000000  00000000 00000000 * ................ *
> 
> After Picture:
>                      Display Storage
> 
> Control .....             nnnnn, Pnnnn, Lcccc, .cccc, >
> Address ..... 01A3D700 0420
> 
> 0420 00000000 00000000  00000000 00000000 * ................ *
> 0430 00000000 00000000  00000000 00000000 * ................ *
> 0440 00000000 00000000  00000000 00000000 * ................ *
> 0450 00000000 00000000  00000000 00000000 * ................ *
> 0460 00000000 00000000  00000000 00000000 * ................ *
> 0470 00000000 00000000  00000000 00000000 * ................ *
> 0480 00000000 00000000  00000000 00000000 * ................ *
> 0210 00000000 00000000  00000000 00000000 * ................ *
> 0220 00000000 00000000  00000000 00000000 * ................ *
> 0230 00000000 00000000  00000000 00000000 * ................ *
> 0240 00000000 00000000  00000000 00000000 * ................ *
> 
>   NOTE: In most cases this will actually be offset 420
> -The first 4 bytes at that offset is the date/timestamp that we
>  can change to get around this probem.  It is probably all 0's
>  (meaning the first column is 00000000)  You can change the
>  first character to an 8
> 
>                       Display Storage
> 
> Control . . . . . . .             nnnnn, Pnnnn, Lcccc, .cccc, >
> Address . . . . . . .   01A3D700 0420
> 
> 0420 80000000 00000000  00000000 00000000 * ................ *
>      -
> 0430 00000000 00000000  00000000 00000000 * ................ *
> 0440 00000000 00000000  00000000 00000000 * ................ *
> 0450 00000000 00000000  00000000 00000000 * ................ *
> 0460 00000000 00000000  00000000 00000000 * ................ *
> 0470 00000000 00000000  00000000 00000000 * ................ *
> 0480 00000000 00000000  00000000 00000000 * ................ *
> 0490 00000000 00000000  00000000 00000000 * ................ *
> - Press F11 twice to alter storage and go back to display mode
> - Back out to a command line and they should now be able to
>   create the DLO object
> .
> If the problem is occuring on a QDOC library that is in a user
> ASP, (library QDOC0002, QDOC0003, etc.) the date/timestamp that
> needs to be udpated is at a different location.  The directions
> above take you to the date/timestamp for QDOC.  The
> date/timpestamps for the other QDOC's follow at offsets of x/10,
> so the date/timestamp for QDOC0002 is at x/0230, for QDOC0003 is
> at x/0240, and so on.
> 
> Alex Moore ~ Ellis Hosiery Mills, Inc.
> alexm@ellishosiery.com
>     _    _             __  __
>    / \  | | _____  __ |  \/  | ___   ___  _ __ ___
>   / _ \ | |/ _ \ \/ / | |\/| |/ _ \ / _ \| '__/ _ \
>  / ___ \| |  __/>  <  | |  | | (_) | (_) | | |  __/
> /_/   \_\_|\___/_/\_\ |_|  |_|\___/ \___/|_|  \___|
> 

Wouaaaouuuu.
Impressive.
Repeat your name ;)..

The most funny is :
We don't use rcldlo

:'-)

-- 

Stephane Leon
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---