home *** CD-ROM | disk | FTP | other *** search
/ On Hand / On_Hand_From_Softbank_1994_Release_2_Disc_2_1994.iso / 00003 / s / main.fr$ / main.bin (.txt)
Visual Basic Form  |  1993-01-01  |  12KB  |  350 lines
  1. Analyzer
  2. wwwww
  3. wp|||
  4. wwp|||
  5. wwwp|||
  6. wwwwwwww
  7. Form1%
  8. GrayBackground
  9.     ListTitle
  10. "Slipped Tasks (by Finish Variance)
  11. Title
  12. !Task Most Behind Planned Schedule
  13. Problem
  14. Problem1
  15. AllProblems
  16. AllProblems1
  17. GrayBackground
  18.     ListTitle
  19. %Overcost Resources (by Cost Variance)
  20. Title
  21. Resource Most Over Planned Cost
  22. Problem
  23. Problem2
  24. AllProblems
  25. AllProblems2
  26. GrayBackground
  27.     ListTitle
  28. 'Overworked Resources (by Work Variance)
  29. Title
  30. Resource Most Over Planned Work
  31. Problem
  32. Problem3
  33. AllProblems
  34. AllProblems3
  35. ShowList
  36. More...
  37. ShowList
  38. More...
  39. ShowList
  40. More...
  41. ActiveProject
  42. ActiveProject
  43. WINPROJ|System
  44. ActiveProject
  45. NewViewFile
  46. NewViewFile
  47. WINPROJ|System
  48. ViewFile
  49. ActiveView
  50. ActiveView
  51. WINPROJ|System
  52. ActiveView
  53. ActiveTable
  54. ActiveTable
  55. WINPROJ|System
  56. ActiveTable
  57. ActiveFilter
  58. ActiveFilter
  59. WINPROJ|System
  60. ActiveFilter
  61. ViewFile
  62. ViewFile
  63. WINPROJ|System
  64. ViewFile
  65. FileMenu
  66. &File
  67. FileChange
  68. Change &Project...
  69. FileUpdate
  70. &Update Information
  71. FileExit
  72. E&xit
  73. &Help
  74. L    HelpAbout
  75. &About Analyzer...
  76. Command1_Click
  77. Label1_Click
  78. Picture1_Click
  79. Form_Click[
  80. Index
  81. Picture3_Click^
  82. Pictur
  83. Clicku
  84. Picture1
  85. cture1'
  86. sendz
  87. sendPicture1
  88. Label1_DblClick~
  89. ShowMoreInfoK
  90. Picture1_DblClick
  91. asfsgW
  92. Problem1_Click
  93. Problem1_DblClick@
  94. Form_Paint
  95. Form_MouseDown
  96. Button
  97. Shift!
  98. ProblemNum
  99. Label2_Click
  100. Label2_DblClick
  101. Label3_Click
  102. Label3_DblClick
  103. Problem2_Click$
  104. Problem2_DblClick6
  105. Problem3_Click
  106. Problem3_DblClick
  107. Picture2_Click
  108. Update_Click-
  109. Problem1
  110. LinkMode+
  111.     LinkTopic
  112. LinkItem
  113. Problem2B
  114. Linb!
  115. Problem3x
  116. Update/
  117. Enable
  118. FALSE
  119. Enabled]
  120. Form_Resize
  121. minimU
  122. FALSEEnd:
  123. DblClick
  124. Listt
  125. Problem1_Update0
  126. CaptionR
  127. SysInfo1
  128. PROJNAME
  129. GrayBackground_Click7
  130. GrayBackground_DblClick
  131. Problem_Click
  132. Problem_DblClick
  133. Title_Click
  134. Title_DblClicke
  135. Problem
  136. Get_Which_Projectm
  137. Slipping2
  138. DDECmd
  139. AllProblems
  140. Problemsi
  141. FirstN
  142. CRPosition
  143. TabPosition
  144. Done_Click
  145. About_Click>
  146. AboutBox
  147. Problem2_Update
  148. Linkequest
  149. Problem3_Update
  150. MORE_INFO_ON
  151. NewDoc_Click
  152. Topics
  153.     Form_LoadO
  154. Valuee
  155. AllProblems_Click
  156. FormatSort
  157. Key1l
  158. Descending1
  159. Problem_LinkError
  160. LinkErr
  161.     LinkError
  162. TempLink
  163. syntax_error
  164. ACTIVE_VIEW
  165. ACTIVE_PROJECT
  166. ACTIVE_TABLE
  167. CalendarFile
  168. ViewFileZ
  169. ActiveView
  170. ActiveTable
  171. ActiveFilter
  172. NewViewFileP
  173. Form_LinkError
  174. foanalyzer
  175. DOWN:
  176. CriticalTasks
  177. DDERequest
  178. channel2
  179. channel1C    
  180. Insert
  181. Project
  182. SlippedTasksh    
  183. ActiveFilter_ClickN
  184. ErrorHandling
  185. OvercostRes
  186. OverworkResD
  187. ErrorHandling2
  188. ErrorHandling1`
  189. ErrorHandling3m    
  190. ErrStr
  191. ShowList_Clickr
  192. FileExit_Click
  193. FileChange_Click
  194. FileUpdate_Click
  195. FileUpdateq
  196. ShowList&
  197. HelpAbout_Click
  198. Screen
  199. Width
  200. Heighti
  201. IDListOf
  202. CommaPosC
  203. TabPos2
  204. TabPos1a    
  205. TabPos
  206. CRPos2
  207. CRPos1    
  208. ARGUMENT
  209. REPLACE
  210. ExFile_Path
  211. ExFile_PathChar
  212. ISERR
  213. ExFile_Replace
  214. ExFile_Done
  215. Filename
  216. ListTitle_Click
  217. COLDProblem
  218. ProblemViewR    
  219. ProblemFilter
  220. ProblemSort
  221. FileMenu_Click
  222. Problem_Update
  223. ProblemReq1
  224. ProblemReq2
  225. ProbErrorHandling
  226. ActiveTable_Click
  227. ActiveView_Click
  228. Help_Click
  229. NewViewFile_Click
  230. Null_Click
  231. ViewFile_Click    
  232. Get_Info_From_MSProject
  233. ActiveProject
  234. SetListSeparator
  235. RestoreListSeparator
  236. ShowList_Click
  237. FileChange_Click
  238. FileExit_Click
  239. FileUpdate_Click
  240. HelpAbout_Click
  241. IDListOf
  242.  Takes a DDE selection description string from Microsoft Project, such asn
  243.  "T((1,2,4),(Name,Duration))" and returns the ID or list of IDs in the
  244.  description as a string, such as "(1,2,4)""
  245. Problem_Update
  246.    This subroutine goes to Microsoft Project and gets the data specified
  247.    ProblemXxx$() array. 
  248.    To change the data grabbed from MS Project, change the strings in the
  249.    Get_Info_From_MSProject subroutine for this form.
  250.  Apply the Work Overbudget filter and sort by work variancey
  251. WINPROJ|System
  252.  Link to System topic(
  253.  for executes and selectionS
  254.  Get the list of sorted tasks or resources
  255. SelectAll"
  256.  Select the sorted resources
  257. NumLines
  258.  Request the number of lines
  259.  in the selectiont
  260.  If there aren't any,f
  261.  tell the user and
  262.  disable More... button 
  263.  Otherwise...
  264. Selection"
  265.  Request the description
  266.  of the selectiont
  267.  Parse out the ID's and form request string to get names and variances
  268.  Terminate link to change topict
  269. WINPROJ|
  270.  Link to project topic
  271.  Enable More... button
  272. Get_Info_From_MSProject
  273.  Load ProblemXxx$(3) arrays with correct DDE execute statements 
  274.  and task/resource field numbers
  275.  Note this expects the presence of some views and filters whichw
  276.  are included in the default view file.  If they are not present,s
  277.  the user will get a rather ungraceful alert.  The best way to
  278.  avoid this would be to use the Microsoft Project ViewFileOpen
  279.  command.m
  280. View [Task Sheet]"
  281. Filter Slipping"
  282. FormatSort [Finish Variance] .Ascending1=No"
  283.  Task fields...n
  284. ,(67,1))
  285.  ...67=Finish Variance, 1=Name
  286. View [Resource Sheet]"
  287. Filter [Cost Overbudget]
  288. FormatSort [Cost Variance] .Ascending1=No"
  289.  Resource fields... 
  290. ,(34,1))
  291.  ...34=Cost Variance, 1=Name
  292. View [Resource Sheet]"
  293. Filter [Work Overbudget]
  294. FormatSort [Work Variance] .Ascending1=No"
  295.  Resource fields...a
  296. ,(25,1))
  297. ...25=Work Variance, 1=Name 
  298.  Prepare for LinkRequest
  299.  Center form on screen
  300.  Set the name of the form to reflect the analyzed project,
  301.  without the path informationr
  302. Analyzer - "
  303.  Close to a single pane and remember which view file was open,
  304.  which view, table, and filter were applied and which projecti
  305.  was active.  PaneClose ensures we will be in a master panec
  306.  so filters can be applied.t
  307.  View file before analysis
  308. PaneClose"
  309.  View file after analysiss
  310.  View
  311.  before analysisi
  312.  Table
  313.  Filter
  314.  Project
  315.  Request information to analyze from correct project
  316. WindowActivate .WindowName="
  317.  Reset the original view information in Microsoft Projectj
  318. FileOpen "
  319. View [
  320. Table ["
  321. Filter [
  322. Form_Load
  323. SetListSeparator
  324.  Copy the list separator character from Microsoft Project,
  325.  and replace it with a comma.  This is necessary so that
  326.  LinkRequest statements will be understood by MS Project.j
  327.  This subroutine should be called before any LinkRequestsu
  328.  are performed, and should always be paired with a subsequentq
  329.  call to RestoreListSeparator.
  330.  No Clipboard operations should be made between these twoe
  331.  calls, since the list separator is held there. 
  332. WINPROJ|System
  333. AppExecute
  334.  Prepare MS Project to accept SendKeys
  335. {F10}op{PGDN 4}{F2}{HOME}+{RIGHT}^c{ESCAPE 2}"
  336. AppMinimize"
  337.  Minimize Microsoft ProjectP
  338. OptionsPreferences .ListSeparator=[,]"
  339. RestoreListSeparator
  340.  Restore the list separator character in Microsoft Project
  341.  from the Clipboard.  SetListSeparator should be called before
  342.  calling RestoreListSeparator.
  343.  See SetListSeparator for more information.t
  344. WINPROJ|System
  345. AppExecute
  346.  Prepare MS Project to accept SendKeys
  347. {F10}op{PGDN 4}{F2}{HOME}+{RIGHT}^v{ENTER 2}
  348. AppMinimize"
  349.  Minimize Microsoft Project 
  350.