如何在datastage routine里面获得一个文件的行数和一个数组的长度?

ynforget

哪位大侠能告诉我在datastage routine里面获得一个文件的行数和一个数组的长度呢?
下面是我的代码，我想获得一个文件的行,然后放到一个数组里面
$INCLUDE DSINCLUDE JOBCONTROL.H
PathName = "/IBM/InformationServer/Server/Projects/rwa/ParameterSets/Path_para/Path_para3.ini"
EtlDate8 = ""
EtlDate6 = "ETLDATE_6="
Dim tmpArray(10)
i = 0
Ans = 0
OpenSeq PathName To FileVar Else
   Ans = 1
   GoTo ErrorExit
End
Loop
   ReadSeq FileLine From FileVar
   On Error
      Ans = 1
      GoTo ErrorExit
   End
   Then
      if(SubStrings(FileLine,0,9)="ETLDATE_8" Then
          EtlDate8 = SubStrings(FileLine,11,Len(FileLine))
          EtlDate6 = EtlDate6:SubStrings(EtlDate8,3,Len(EtlDate)
      End
      if(SubStrings(FileLine,0,9)="ETLDATE_6" Then
          FileLine = EtlDate6
      End
      tmpArray(i) = FileLine
      i = i+1
   End Else
      Exit      
   End
Repeat
CloseSeq FileVar

ErrorExit:
CloseSeq FileVar
Return(Ans)

ynforget

有人知道么????