601,100
562,"NULL"
586,
585,
564,
565,"r[F?Qb3J:k\wrn=t:=a68T@<\;k4L5jpA0Bo<YxLLQSNtr]X6iFgLRqMYCJN_Ij<_>]HzAU=5;5930YMVb5>\Vzo5]>k;q67m9Xle>;30Wkumu6rUxxos=1WxsD3P6o[oPfBR6[k78@8Y`E\7H[]@RNxW[iPBj5\<90<6o<eEPme_2:saCW>q4`:plCo]A^8g?2t_xi@"
559,0
593,
594,
595,
597,
598,
596,
800,
801,
566,0
567,","
588,"."
589,
568,""""
570,
571,
569,0
592,0
599,1000
560,0
561,0
590,0
637,0
577,0
578,0
579,0
580,0
581,0
582,0
572,41

#****Begin: Generated Statements***
#****End: Generated Statements****

vSysPropertiesDim = '}sm_client_properties';
vStatusDim = '}sm_task_status';
vLockFlag = '';
vProp = 'Task Locked Flag';
IF (DIMIX(vSysPropertiesDim, vProp) <> 0);
vLockFlag = ATTRS(vSysPropertiesDim, vProp, 'Default Value');
ENDIF;
IF (vLockFlag @= '');
vLockFlag = 'Locked';
ENDIF;
vLockLong = LONG(vLockFlag);

vStatusIndex = 1;
vStatusCount = DIMSIZ(vStatusDim);
WHILE (vStatusIndex <= vStatusCount);
vStatus = DIMNM(vStatusDim, vStatusIndex);

bCheck = 1;
vStatusLong = LONG(vStatus);
IF (vStatusLong > vLockLong);
IF (SUBST(vStatus, 1 + (vStatusLong - vLockLong), vLockLong) @= vLockFlag);
bCheck = 0;
ENDIF;
ENDIF;

IF (bCheck = 1);
vLockable = ATTRS( vStatusDim, vStatus, 'Lockable');
IF (vLockable @= 'Y');
vTestElement = vStatus | ' ' | vLockFlag;
IF (DIMIX(vStatusDim, vTestElement) = 0);
DIMENSIONELEMENTINSERT(vStatusDim, '', vTestElement, 'N');
ENDIF;
ENDIF;
ENDIF;

vStatusIndex = vStatusIndex + 1;
END;
573,3

#****Begin: Generated Statements***
#****End: Generated Statements****
574,3

#****Begin: Generated Statements***
#****End: Generated Statements****
575,22

#****Begin: Generated Statements***
#****End: Generated Statements****

vStatusIndex = 1;
vStatusCount = DIMSIZ(vStatusDim);
WHILE (vStatusIndex <= vStatusCount);
vStatus = DIMNM(vStatusDim, vStatusIndex);

vStatusLong = LONG(vStatus);
IF (vStatusLong > vLockLong);
IF (SUBST(vStatus, 1 + (vStatusLong - vLockLong), vLockLong) @= vLockFlag);
vRootStatus = SUBST(vStatus, 1, vStatusLong - vLockLong);
IF (DIMIX(vStatusDim, vRootStatus) > 0);
ATTRPUTS(ATTRS(vStatusDim, vRootStatus , 'Locking'), vStatusDim, vStatus, 'Locking');
ENDIF;
ENDIF;
ENDIF;

vStatusIndex = vStatusIndex + 1;
END;

576,CubeAction=1511	DataAction=1503	CubeLogChanges=0	
638,1
804,0
1217,1
900,
901,
902,
903,
906,
907,
908,
904,0
905,0
909,0
911,
912,
913,
914,
915,
916,
917,1
918,1
919,0
920,50000
921,""
922,""
923,0
924,""
925,""
926,""
927,""
