Is anyone maintaining a version with these changes applied? What about
bundling them up as KIDS builds? I don't know what WorldVistA's code
management strategy is, but it seems like a good idea.

Oh, and dare I ask: What about QA?

--- Lloyd Milligan <[EMAIL PROTECTED]> wrote:

> The June 2006 FOIA VistA for GT.M. has a disconnect between
> EVAL^%ZTLOAD1 
> and ORDER^%ZOSV that causes ZTSAVE("NMSP*") to fail.
> 
> Here is EVAL+2^%ZTLOAD1 -
> 
> I ZT1["*",$P(ZT1,"*")'["(" S X="^%ZTSK(ZTSK,.3,",Y=ZT1 D ORDER^%ZOSV
> Q
> 
> 
> Here is ORDER+2^%ZOSV
> 
> I $D(X1("*"))#2 D DOLRO Q
> 
> 
> The problem appears to be that ORDER^%ZOSV is the VAX DSM version and
> 
> ^%ZTLOAD1 is calling the non-VAX DSM version, based on checking 
> ^%ZOSF("OS").  This problem can be corrected by replacing ORDER^%ZOSV
> with 
> the version that ^%ZTLOAD1 expects -
> 
> ORDER ;SAVE PART OF SYMBOL TABLE IN LOCATION SPECIFIED BY X
> 
>  S (Y,Y1)=$P(Y,"*",1) I $D(@Y)=0 F %=0:0 S Y=$O(@Y) Q:Y=""!(Y[Y1)
> 
>  Q:Y="" S %=$D(@Y) S:%#2 @(X_"Y)="_Y) I %>9 S %X=Y_"(",%Y=X_"Y," D
> %XY^%RCR
> 
>  F %=0:0 S Y=$O(@Y) Q:Y=""!(Y'[Y1) S %=$D(@Y) S:%#2 @(X_"Y)="_Y) I
> %>9 S 
> %X=Y_"(",%Y=X_"Y," D %XY^%RCR
> 
>  K %,X,Y,Y1
> 
>  Q
> 
> 
> 
> Lloyd 
> 
> 
> 
>
-------------------------------------------------------------------------
> Using Tomcat but need to do more? Need to support web services,
> security?
> Get stuff done quickly with pre-integrated technology to make your
> job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache
> Geronimo
>
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Hardhats-members mailing list
> Hardhats-members@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
> 


===
Gregory Woodhouse  <[EMAIL PROTECTED]>

"Judge a man by his questions not his answers."
--Voltaire


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members

Reply via email to