Changeset 273 for ccr/trunk/p


Ignore:
Timestamp:
Nov 11, 2008, 6:31:54 PM (15 years ago)
Author:
George Lilly
Message:

fix for object id

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLLABS.m

    r272 r273  
    142142 . . S @C0CLB@(0)=@C0CLB@(0)+1 ; INCREMENT COUNT
    143143 . . S C0CLI=@C0CLB@(0) ; INDEX FOR THIS RESULT
     144 . . S @C0CLB@(C0CLI,"RESULTOBJECTID")="RESULT_"_C0CLI
    144145 . . M @C0CLB@(C0CLI)=C0CVAR ; PERSIST THE OBR VARS
    145  . . S @C0CLB@(C0CLI,"RESULTOBJECTID")="RESULT_"_C0CLI
    146146 . . S C0CLOBX=0 ; MARK THE BEGINNING OF A NEW SECTION
    147147 . I C0CTYP="OBX" D  ; SPECIAL CASE FOR OBX3
Note: See TracChangeset for help on using the changeset viewer.