home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 January / pcwk_01_1999_B.iso / Lotus123 / SPANISH / LOTUS022.DSK / COMBCOMM.NTF (.txt) < prev    next >
Lotus Notes Database  |  1997-03-11  |  1MB  |  4,756 lines

  1. Consolidar copias
  2. BABELDB
  3. #1TeamConsolidate
  4. C:\NewGold\spanish\teamcons.ntf
  5. FOLDER_DIRECTORY_OBJECT
  6. CN=Avril Jordan/OU=DUB/O=Lotus
  7. CN=Lotus Notes Template Development/O=Lotus Notes
  8. CN=Martin McDonnell/OU=DUB/O=Lotus
  9. .K[W+l
  10. qSIiL
  11. pMkK<
  12. ##########################################################
  13. ##########################################################
  14. ##########################################################
  15. ##########################################################
  16. ##########################################################
  17. ##########################################################
  18. ##########################################################
  19. ##########################################################
  20. ##########################################################
  21. ##########################################################
  22. ##########################################################
  23. ##########################################################
  24. ##########################################################
  25. MensajeMemoMemo
  26. BodySubjectBlindCopyToCopyToSendToDefaultMailSaveOptionsEncryptSignLogoFrom
  27. CN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes74F3804157A541611F7412FBA6B8AD6DLotus NotesStdR4Mail##################################################
  28. HistoryCUA3
  29. BookNameSessionEditorsSessionTimes
  30. CN=Martin McDonnell/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes############################################
  31. CN=Cathy Pfeiler/O=TCGEMINI2CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  32. Response Form######################################
  33. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes#######################################
  34. ##########################################################
  35. ##########################################################
  36. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes8
  37. 9p&c~Mha###############################################
  38. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes#######################################
  39. $37$34Y
  40. (ID principal)|ConsolidateButton<
  41. $37$34WorksheetTitle$38$17$16$Conflict
  42. $RefV
  43.     0S0E
  44.     0S0E
  45. Temp_Status
  46. Worksheetstatus
  47. Temp_Value
  48. Temp_Status
  49. Temp_Status
  50. Temp_Status
  51.     0R1S2S
  52. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  53. Temp_Value
  54. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  55. #############################################
  56. ##########################################################
  57. ##########################################################
  58. TeamConsolidate
  59. Navegador principal | Main NavigatorG3
  60. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes########################################
  61. Documento con libro de 1-2-3Main
  62. Form BannerHistory1
  63. BookNameSessionEditorsSessionTimesMain_RemarksMasterStatusNameTitleSourceNameAuthor
  64. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes#######################
  65. ##########################################################
  66. ##########################################################
  67. Title
  68. CN=Cathy Pfeiler/OU=CAM/O=LotusCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  69. Form Banner######
  70. ##########################################################
  71. ##########################################################
  72. ##########################################################
  73. ##########################################################
  74. ##########################################################
  75. ##########################################################
  76. ##########################################################
  77. ##########################################################
  78. ##########################################################
  79. ##########################################################
  80. ##########################################################
  81. ##########################################################
  82. .K[W+l
  83. CN=Cathy Pfeiler/O=TCGEMINI2d:\notes\data\teamcons.ntf
  84. CN=Cathy Pfeiler/OU=CAM/O=LotusCN=Cathy Pfeiler/O=TCGEMINI2CN=Beth Brownholtz/OU=CAM/O=LotusCN=Avril Jordan/OU=DUB/O=LotusNavegador principal#################
  85. ##########################################################
  86. ##########################################################
  87. ##########################################################
  88. ##########################################################
  89. ##########################################################
  90. ##########################################################
  91. ##########################################################
  92. ##########################################################
  93. $Modified
  94.     1S2S3S
  95. $TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O
  96.     0SL1S3724
  97. $TITLE
  98. CN=Avril Jordan/OU=DUB/O=Lotus
  99. #########
  100. ColaboradorSecondary
  101. Response FormHistoryC
  102. BookNameSessionEditorsSessionTimesWorkBookNameParentTitleResponse_RemarkContributorEmbeddingEmbeddingDisplayAreaContributorWorksheetTitleNotifyDistributorForContributorsOnlyDistributorCurrentAuthorRestrictedToFormTitleInfoDisplayWorkbookTitle
  103. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes############################################
  104. Por fecha|View By Date
  105.     0S0E
  106. WorksheetTitle"
  107. Title
  108.     3S5S
  109. SessionEditors
  110. Contributor
  111. SessionEditors
  112.     3S4S24S
  113. Temp_Status
  114. Worksheetstatus
  115. StatusX
  116.     1S16S
  117. Temp_Value
  118. Temp_Status
  119. Temp_Status
  120. Temp_Status
  121.     0R1S2S
  122. Datos a
  123. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  124. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  125. Temp_Value
  126. $21$28$26$30$10$Conflict$REF
  127.     L1S1
  128. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  129. ###########
  130. ##########################################################
  131. ##########################################################
  132. ##########################################################
  133. ##########################################################
  134. ##########################################################
  135. ##########################################################
  136. ##########################################################
  137. ##########################################################
  138. ##########################################################
  139. ##########################################################
  140. ##########################################################
  141. ##########################################################
  142. ##########################################################
  143. $31$33Y
  144. Mediante colaborador|View By Contributor^
  145. $31$33WorksheetTitle$34$17$16$Conflict
  146. Contributor
  147.     0S0E
  148. WorkbookTitle
  149.     0S0E
  150. Temp_Status
  151. Worksheetstatus
  152. Temp_Value
  153. Temp_Status
  154. Temp_Status
  155. Temp_Status
  156.     0R1S2S
  157. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  158. Temp_Value
  159. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  160. ##########################################################
  161. ##########################################################
  162. ##########################################################
  163. ##########################################################
  164. ##########################################################
  165. ##########################################################
  166. ##########################################################
  167. ##########################################################
  168. ##########################################################
  169. ##########################################################
  170. ##########################################################
  171. ##########################################################
  172. ##########################################################
  173. ##########################################################
  174. ##########################################################
  175. ##########################################################
  176. ##########################################################
  177. ##########################################################
  178. ##########################################################
  179. ##########################################################
  180. ##########################################################
  181. ##########################################################
  182. ##########################################################
  183. ##########################################################
  184. ##########################################################
  185. ##########################################################
  186. ##########################################################
  187. ##########################################################
  188. ##########################################################
  189. ##########################################################
  190. ##########################################################
  191. ##########################################################
  192. ##########################################################
  193. ##########################################################
  194. ##########################################################
  195. qSIiL
  196. ##########################################################
  197. ##########################################################
  198. ##########################################################
  199. ##########################################################
  200. ##########################################################
  201. ##########################################################
  202. ##########################################################
  203. ##########################################################
  204. ##########################################################
  205. ##########################################################
  206. ##########################################################
  207. ##########################################################
  208. ##########################################################
  209. ##########################################################
  210. ##########################################################
  211. ##########################################################
  212. ##########################################################
  213. pMkK<
  214. Todos los documentos|View by Master Contributor
  215. WorksheetTitle"
  216. Title
  217.     3S5S
  218. SessionEditors
  219. Contributor
  220. SessionEditors
  221.     3S4S24S
  222. Temp_Status
  223. Worksheetstatus
  224. StatusX
  225.     1S16S
  226. Temp_Value
  227. Temp_Status
  228. Temp_Status
  229. Temp_Status
  230.     0R1S2S
  231. Datos a
  232. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  233. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  234. Temp_Value
  235. $12$28$26$31$8$10$Conflict$REF
  236.     L1S1
  237. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  238. Por estado|View By Status
  239. Datos a
  240. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  241. n finalizada
  242. StatusX
  243. WorksheetTitle"
  244. Title
  245.     3S5S
  246. SessionEditors
  247. Contributor
  248. SessionEditors
  249.     3S4S24S
  250. Temp_Status
  251. Worksheetstatus
  252. Temp_Value
  253. Temp_Status
  254. Temp_Status
  255. Temp_Status
  256.     0R1S2S
  257. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  258. n finalizada
  259. Temp_Value
  260. $28$24$22$26$8$10$Conflict$REF
  261.     L1S1
  262. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  263. ####################
  264. ##########################################################
  265. ##########################################################
  266. ##########################################################
  267. ##########################################################
  268. ##########################################################
  269. ##########################################################
  270. ##########################################################
  271. ##########################################################
  272. ##########################################################
  273. ##########################################################
  274. ##########################################################
  275. ##########################################################
  276. ##########################################################
  277. ##########################################################
  278. ##########################################################
  279. ##########################################################
  280. ##########################################################
  281. ##########################################################
  282. ##########################################################
  283. ##########################################################
  284. ##########################################################
  285. ##########################################################
  286. ##########################################################
  287. ##########################################################
  288. ##########################################################
  289. ##########################################################
  290. ##########################################################
  291. ##########################################################
  292. ##########################################################
  293. ##########################################################
  294. ##########################################################
  295. ##########################################################
  296. ##########################################################
  297. ##########################################################
  298. ##########################################################
  299. ##########################################################
  300. ##########################################################
  301. ##########################################################
  302. ##########################################################
  303. ##########################################################
  304. ##########################################################
  305. ##########################################################
  306. ##########################################################
  307. ##########################################################
  308. ##########################################################
  309. ##########################################################
  310. ##########################################################
  311. ##########################################################
  312. ##########################################################
  313. ##########################################################
  314. ##########################################################
  315. ##########################################################
  316. ##########################################################
  317. ##########################################################
  318. ##########################################################
  319. ##########################################################
  320. ##########################################################
  321. ##########################################################
  322. ##########################################################
  323. ##########################################################
  324. ##########################################################
  325. ##########################################################
  326. ##########################################################
  327. ##########################################################
  328. ##########################################################
  329. ##########################################################
  330. ##########################################################
  331. ##########################################################
  332. ##########################################################
  333. ##########################################################
  334. ##########################################################
  335. ##########################################################
  336. ##########################################################
  337. ##########################################################
  338. ##########################################################
  339. ##########################################################
  340. ##########################################################
  341. ##########################################################
  342. (Consolidaci
  343. n interna)|(Internal Consolidate)/O
  344.     0S0E
  345. WorksheetTitle
  346. Title
  347.     3S5S
  348. Temp_Status
  349. Worksheetstatus
  350. StatusX
  351.     1S16S
  352. Temp_Value
  353. Temp_Status
  354. Temp_Status
  355. Temp_Status
  356.     0R1S2S
  357. No distribuido todav
  358. a,Datos solicitados,Consolidado parcialmente,Consolidaci
  359. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  360. n finalizada
  361. Temp_Value
  362. $16$21$22$Conflict$REF
  363.     L1S1
  364. $16ID 
  365.     0S0E
  366. tuloH
  367. WorksheetTitle
  368. Title
  369.     3S5S
  370. $22Estado
  371. Temp_Status
  372. Worksheetstatus
  373. StatusX
  374.     1S16S
  375. Temp_Value
  376. Temp_Status
  377. Temp_Status
  378. Temp_Status
  379.     0R1S2S
  380. No distribuido todav
  381. a,Datos solicitados,Consolidado parcialmente,Consolidaci
  382. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  383. n finalizada
  384. Temp_Value
  385. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  386. #################################################
  387. ##########################################################
  388. ##########################################################
  389. ##########################################################
  390. ##########################################################
  391. ##########################################################
  392. ##########################################################
  393. ##########################################################
  394. ##########################################################
  395. ##########################################################
  396. ##########################################################
  397. ##########################################################
  398. ##########################################################
  399. ##########################################################
  400. ##########################################################
  401. ##########################################################
  402. ##########################################################
  403. ##########################################################
  404. ##########################################################
  405. ##########################################################
  406. ##########################################################
  407. ##########################################################
  408. ##########################################################
  409. ##########################################################
  410. ##########################################################
  411. ##########################################################
  412. ##########################################################
  413. ##########################################################
  414. ##########################################################
  415. ##########################################################
  416. ##########################################################
  417. ##########################################################
  418. ##########################################################
  419. ##########################################################
  420. ##########################################################
  421. ##########################################################
  422. ##########################################################
  423. ##########################################################
  424. ##########################################################
  425. ##########################################################
  426. ##########################################################
  427. ##########################################################
  428. ##########################################################
  429. ##########################################################
  430. ##########################################################
  431. ##########################################################
  432. ##########################################################
  433. ##########################################################
  434. ##########################################################
  435. ##########################################################
  436. ##########################################################
  437. ##########################################################
  438. ##########################################################
  439. ##########################################################
  440. ##########################################################
  441. ##########################################################
  442. ##########################################################
  443. ##########################################################
  444. ##########################################################
  445. ##########################################################
  446. ##########################################################
  447. ##########################################################
  448. ##########################################################
  449. ##########################################################
  450. ##########################################################
  451. ##########################################################
  452. ##########################################################
  453. ##########################################################
  454. ##########################################################
  455. ##########################################################
  456. ##########################################################
  457. ##########################################################
  458. ##########################################################
  459. ##########################################################
  460. ##########################################################
  461. ##########################################################
  462. ##########################################################
  463. ##########################################################
  464. ##########################################################
  465. ##########################################################
  466. ##########################################################
  467. ##########################################################
  468. ##########################################################
  469. ##########################################################
  470. ##########################################################
  471. ##########################################################
  472. ##########################################################
  473. ##########################################################
  474. ##########################################################
  475. ##########################################################
  476. ##########################################################
  477. ##########################################################
  478. ##########################################################
  479. ##########################################################
  480. ##########################################################
  481. ##########################################################
  482. ##########################################################
  483. ##########################################################
  484. ##########################################################
  485. ##########################################################
  486. ##########################################################
  487. ##########################################################
  488. ##########################################################
  489. ##########################################################
  490. ##########################################################
  491. ##########################################################
  492. ##########################################################
  493. ##########################################################
  494. ##########################################################
  495. ##########################################################
  496. ##########################################################
  497. ##########################################################
  498. ##########################################################
  499. ##########################################################
  500. ##########################################################
  501. ##########################################################
  502. ##########################################################
  503. ##########################################################
  504. ##########################################################
  505. ##########################################################
  506. ##########################################################
  507. ##########################################################
  508. ##########################################################
  509. ##########################################################
  510. ##########################################################
  511. ##########################################################
  512. ##########################################################
  513. ##########################################################
  514. ##########################################################
  515. ##########################################################
  516. ##########################################################
  517. ##########################################################
  518. ##########################################################
  519. ##########################################################
  520. ##########################################################
  521. ##########################################################
  522. ##########################################################
  523. ##########################################################
  524. ##########################################################
  525. ##########################################################
  526. ##########################################################
  527. ##########################################################
  528. ##########################################################
  529. ##########################################################
  530. ##########################################################
  531. ##########################################################
  532. ##########################################################
  533. ##########################################################
  534. ##########################################################
  535. ##########################################################
  536. ##########################################################
  537. ##########################################################
  538. ##########################################################
  539. ##########################################################
  540. ##########################################################
  541. ##########################################################
  542. ##########################################################
  543. ##########################################################
  544. ##########################################################
  545. ##########################################################
  546. ##########################################################
  547. ##########################################################
  548. ##########################################################
  549. ##########################################################
  550. ##########################################################
  551. ##########################################################
  552. ##########################################################
  553. ##########################################################
  554. ##########################################################
  555. ##########################################################
  556. ##########################################################
  557. ##########################################################
  558. ##########################################################
  559. ##########################################################
  560. ##########################################################
  561. ##########################################################
  562. ##########################################################
  563. ##########################################################
  564. ##########################################################
  565. ##########################################################
  566. ##########################################################
  567. ##########################################################
  568. ##########################################################
  569. ##########################################################
  570. ##########################################################
  571. ##########################################################
  572. ##########################################################
  573. ##########################################################
  574. ##########################################################
  575. ##########################################################
  576. ##########################################################
  577. ##########################################################
  578. ##########################################################
  579. ##########################################################
  580. ##########################################################
  581. ##########################################################
  582. ##########################################################
  583. ##########################################################
  584. ##########################################################
  585. ##########################################################
  586. ##########################################################
  587. ##########################################################
  588. ##########################################################
  589. ##########################################################
  590. ##########################################################
  591. ##########################################################
  592. ##########################################################
  593. ##########################################################
  594. ##########################################################
  595. ##########################################################
  596. ##########################################################
  597. ##########################################################
  598. ##########################################################
  599. ##########################################################
  600. ##########################################################
  601. ##########################################################
  602. ##########################################################
  603. ##########################################################
  604. ##########################################################
  605. ##########################################################
  606. ##########################################################
  607. ##########################################################
  608. ##########################################################
  609. ##########################################################
  610. ##########################################################
  611. ##########################################################
  612. ##########################################################
  613. ##########################################################
  614. ##########################################################
  615. ##########################################################
  616. ##########################################################
  617. ##########################################################
  618. ##########################################################
  619. ##########################################################
  620. ##########################################################
  621. ##########################################################
  622. ##########################################################
  623. ##########################################################
  624. ##########################################################
  625. ##########################################################
  626. ##########################################################
  627. ##########################################################
  628. ##########################################################
  629. ##########################################################
  630. ##########################################################
  631. ##########################################################
  632. ##########################################################
  633. ##########################################################
  634. ##########################################################
  635. ##########################################################
  636. ##########################################################
  637. ##########################################################
  638. ##########################################################
  639. ##########################################################
  640. ##########################################################
  641. ##########################################################
  642. ##########################################################
  643. ##########################################################
  644. ##########################################################
  645. ##########################################################
  646. ##########################################################
  647. ##########################################################
  648. ##########################################################
  649. ##########################################################
  650. ##########################################################
  651. ##########################################################
  652. ##########################################################
  653. ##########################################################
  654. ##########################################################
  655. ##########################################################
  656. ##########################################################
  657. ##########################################################
  658. ##########################################################
  659. ##########################################################
  660. ##########################################################
  661. ##########################################################
  662. ##########################################################
  663. ##########################################################
  664. ##########################################################
  665. ##########################################################
  666. ##########################################################
  667. ##########################################################
  668. ##########################################################
  669. ##########################################################
  670. ##########################################################
  671. ##########################################################
  672. ##########################################################
  673. ##########################################################
  674. ##########################################################
  675. ##########################################################
  676. ##########################################################
  677. ##########################################################
  678. ##########################################################
  679. ##########################################################
  680. ##########################################################
  681. ##########################################################
  682. ##########################################################
  683. ##########################################################
  684. ##########################################################
  685. ##########################################################
  686. ##########################################################
  687. ##########################################################
  688. ##########################################################
  689. ##########################################################
  690. ##########################################################
  691. ##########################################################
  692. ##########################################################
  693. ##########################################################
  694. ##########################################################
  695. ##########################################################
  696. ##########################################################
  697. ##########################################################
  698. ##########################################################
  699. ##########################################################
  700. ##########################################################
  701. ##########################################################
  702. ##########################################################
  703. ##########################################################
  704. ##########################################################
  705. ##########################################################
  706. ##########################################################
  707. ##########################################################
  708. ##########################################################
  709. ##########################################################
  710. ##########################################################
  711. ##########################################################
  712. ##########################################################
  713. ##########################################################
  714. ##########################################################
  715. ##########################################################
  716. ##########################################################
  717. ##########################################################
  718. ##########################################################
  719. ##########################################################
  720. ##########################################################
  721. ##########################################################
  722. ##########################################################
  723. ##########################################################
  724. ##########################################################
  725. ##########################################################
  726. ##########################################################
  727. ##########################################################
  728. ##########################################################
  729. ##########################################################
  730. ##########################################################
  731. ##########################################################
  732. ##########################################################
  733. ##########################################################
  734. ##########################################################
  735. ##########################################################
  736. ##########################################################
  737. ##########################################################
  738. ##########################################################
  739. ##########################################################
  740. ##########################################################
  741. ##########################################################
  742. ##########################################################
  743. ##########################################################
  744. ##########################################################
  745. ##########################################################
  746. ##########################################################
  747. ##########################################################
  748. ##########################################################
  749. ##########################################################
  750. ##########################################################
  751. ##########################################################
  752. ##########################################################
  753. ##########################################################
  754. ##########################################################
  755. ##########################################################
  756. ##########################################################
  757. ##########################################################
  758. ##########################################################
  759. ##########################################################
  760. ##########################################################
  761. ##########################################################
  762. ##########################################################
  763. ##########################################################
  764. ##########################################################
  765. ##########################################################
  766. ##########################################################
  767. ##########################################################
  768. ##########################################################
  769. ##########################################################
  770. ##########################################################
  771. ##########################################################
  772. ##########################################################
  773. ##########################################################
  774. ##########################################################
  775. ##########################################################
  776. ##########################################################
  777. ##########################################################
  778. ##########################################################
  779. ##########################################################
  780. ##########################################################
  781. ##########################################################
  782. ##########################################################
  783. ##########################################################
  784. ##########################################################
  785. ##########################################################
  786. ##########################################################
  787. ##########################################################
  788. ##########################################################
  789. ##########################################################
  790. ##########################################################
  791. ##########################################################
  792. ##########################################################
  793. ##########################################################
  794. ##########################################################
  795. ##########################################################
  796. ##########################################################
  797. ##########################################################
  798. ##########################################################
  799. ##########################################################
  800. ##########################################################
  801. ##########################################################
  802. ##########################################################
  803. ##########################################################
  804. ##########################################################
  805. ##########################################################
  806. ##########################################################
  807. ##########################################################
  808. ##########################################################
  809. ##########################################################
  810. ##########################################################
  811. ##########################################################
  812. ##########################################################
  813. ##########################################################
  814. ##########################################################
  815. ##########################################################
  816. ##########################################################
  817. ##########################################################
  818. ##########################################################
  819. ##########################################################
  820. ##########################################################
  821. ##########################################################
  822. ##########################################################
  823. ##########################################################
  824. ##########################################################
  825. ##########################################################
  826. ##########################################################
  827. ##########################################################
  828. ##########################################################
  829. ##########################################################
  830. ##########################################################
  831. ##########################################################
  832. ##########################################################
  833. ##########################################################
  834. ##########################################################
  835. ##########################################################
  836. ##########################################################
  837. ##########################################################
  838. ##########################################################
  839. ##########################################################
  840. ##########################################################
  841. ##########################################################
  842. ##########################################################
  843. ##########################################################
  844. ##########################################################
  845. ##########################################################
  846. ##########################################################
  847. ##########################################################
  848. ##########################################################
  849. ##########################################################
  850. ##########################################################
  851. ##########################################################
  852. ##########################################################
  853. ##########################################################
  854. ##########################################################
  855. ##########################################################
  856. ##########################################################
  857. ##########################################################
  858. ##########################################################
  859. ##########################################################
  860. ##########################################################
  861. ##########################################################
  862. ##########################################################
  863. ##########################################################
  864. ##########################################################
  865. ##########################################################
  866. ##########################################################
  867. ##########################################################
  868. ##########################################################
  869. ##########################################################
  870. ##########################################################
  871. ##########################################################
  872. ##########################################################
  873. ##########################################################
  874. ##########################################################
  875. ##########################################################
  876. ##########################################################
  877. ##########################################################
  878. ##########################################################
  879. ##########################################################
  880. ##########################################################
  881. ##########################################################
  882. ##########################################################
  883. ##########################################################
  884. ##########################################################
  885. ##########################################################
  886. ##########################################################
  887. ##########################################################
  888. ##########################################################
  889. ##########################################################
  890. ##########################################################
  891. ##########################################################
  892. ##########################################################
  893. ##########################################################
  894. ##########################################################
  895. ##########################################################
  896. ##########################################################
  897. ##########################################################
  898. ##########################################################
  899. ##########################################################
  900. ##########################################################
  901. ##########################################################
  902. ##########################################################
  903. ##########################################################
  904. ##########################################################
  905. ##########################################################
  906. ##########################################################
  907. ##########################################################
  908. ##########################################################
  909. ##########################################################
  910. ##########################################################
  911. ##########################################################
  912. ##########################################################
  913. ##########################################################
  914. ##########################################################
  915. ##########################################################
  916. ##########################################################
  917. ##########################################################
  918. ##########################################################
  919. ##########################################################
  920. ##########################################################
  921. ##########################################################
  922. ##########################################################
  923. ##########################################################
  924. ##########################################################
  925. ##########################################################
  926. ##########################################################
  927. ##########################################################
  928. ##########################################################
  929. ##########################################################
  930. ##########################################################
  931. ##########################################################
  932. ##########################################################
  933. ##########################################################
  934. ##########################################################
  935. ##########################################################
  936. ##########################################################
  937. ##########################################################
  938. ##########################################################
  939. ##########################################################
  940. ##########################################################
  941. ##########################################################
  942. ##########################################################
  943. ##########################################################
  944. ##########################################################
  945. ##########################################################
  946. ##########################################################
  947. ##########################################################
  948. ##########################################################
  949. ##########################################################
  950. ##########################################################
  951. ##########################################################
  952. ##########################################################
  953. ##########################################################
  954. ##########################################################
  955. ##########################################################
  956. ##########################################################
  957. ##########################################################
  958. ##########################################################
  959. ##########################################################
  960. ##########################################################
  961. ##########################################################
  962. ##########################################################
  963. ##########################################################
  964. O=Lotus Notes
  965. O=Lotus Notes
  966. PURSAFO
  967. |.:#U
  968. O=Lotus Notes
  969. CN=Lotus Notes Template Development/O=Lotus Notes
  970. PURSAFO
  971. Fde!f^^
  972. $ACLDigest
  973. PURSAFO
  974. GraphicButton1
  975.  @  @@ @` @
  976. @@ @@@@@`@@
  977. `@ `@@`@``@
  978. Text1Vistas del libro
  979. Button1Mediante colaborador
  980. Button2Por estado
  981. Button3Por fecha
  982. Button4Todos los documentos
  983. HotspotRectangle1
  984. Todos los documentos
  985. HotspotRectangle2
  986. Por fecha
  987. HotspotRectangle3
  988. Por estado
  989. HotspotRectangle4
  990. Mediante colaborador
  991. O=Lotus Notes
  992. O=Lotus Notes
  993. PURSAFO
  994. |.:#U
  995. O=Lotus Notes
  996. CN=Lotus Notes Template Development/O=Lotus Notes
  997. PURSAFO
  998. Fde!f^^
  999. $ViewMapDataset
  1000. $ViewMapLayout
  1001. PURSAFO
  1002. Avril Jordan
  1003. Avril Jordan
  1004. WorksheetTitle"
  1005. Title
  1006.     3S5S
  1007. SessionEditors
  1008. Contributor
  1009. SessionEditors
  1010.     3S4S24S
  1011. Temp_Status
  1012. Worksheetstatus
  1013. StatusX
  1014.     1S16S
  1015. Temp_Value
  1016. Temp_Status
  1017. Temp_Status
  1018. Temp_Status
  1019.     0R1S2S
  1020. Datos a
  1021. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  1022. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  1023. Temp_Value
  1024. $12$28$26$31$8$10$Conflict$REF$C1$
  1025. Avril Jordan
  1026. Ghgfhg
  1027. Datos a
  1028. n no solicitados
  1029. Datos solicitados
  1030. Preparado para consolidar
  1031. Consolidaci
  1032. n finalizada
  1033. Consolidado en el maestro
  1034. P[Okp
  1035. Iouioiulos documentos|View by Master Contributor
  1036. $12$28$26$30$8$10$Conflict$REF
  1037. WorksheetTitle"
  1038. Title
  1039.     3S5S
  1040. SessionEditors
  1041. $16$21$22$Conflict$REF$C1$
  1042.     0S0E
  1043. WorksheetTitle
  1044. Title
  1045.     3S5S
  1046. Temp_Status
  1047. Worksheetstatus
  1048. StatusX
  1049.     1S16S
  1050. Temp_Value
  1051. Temp_Status
  1052. Temp_Status
  1053. Temp_Status
  1054.     0R1S2S
  1055. No distribuido todav
  1056. a,Datos solicitados,Consolidado parcialmente,Consolidaci
  1057. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  1058. n finalizada
  1059. Temp_Value
  1060. 44942B49E108B0E58025643D006707A0
  1061. jhjgh
  1062. Datos solicitados"
  1063. 840B29D26362ED328025643D00671E85
  1064. Preparado para consolidar
  1065. Consolidaci
  1066. n finalizada"
  1067. B4F1FF770B6BE9578025643D006783F1
  1068. hjgyu"
  1069. 47AE313C4D7982DA8025643D0067977F"
  1070. AF08D574E030B9458025643D0067E142"
  1071. 5F208715A669FC288025643D0067CF1B
  1072. khkh"
  1073. 69495371DAFE9B178025643D0068934C"
  1074. 0F3F8F6DDF581E5F8025643D00687E40
  1075. opi900"
  1076. 660ED53D0C3002688025643D0068C919"
  1077. 3B23670E64B7B7708025643D0068B70F    
  1078. iouioiu"
  1079. AC4D92AE9F0464B78025643D0068F206"
  1080. FF28AEE601B5B1A78025643D006A1A8A"
  1081. 4A664F1FF6351FC28025643D006A03C3
  1082. ghgfhg"
  1083. C3DAC27AD5160C3F8025643D006A8E3C"
  1084. 773A802F2FBC06598025643D006A75D8
  1085. p[okp
  1086. $31$33WorksheetTitle$34$17$16$Conflict$C1$
  1087. Contributor
  1088.     0S0E
  1089. WorkbookTitle
  1090.     0S0E
  1091. Temp_Status
  1092. Worksheetstatus
  1093. Temp_Value
  1094. Temp_Status
  1095. Temp_Status
  1096. Temp_Status
  1097.     0R1S2S
  1098. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  1099. Temp_Value
  1100. $31$33
  1101. Avril Jordan
  1102. P[Okp
  1103. Preparado para consolidar
  1104. Consolidado en el maestrolags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$C1$
  1105.     0SL1S
  1106. PURSAF
  1107. 13/02/97 19:27:47 Avril Jordan/DUB/Lotus deleted Beth Brownholtz/TCGEMINI2
  1108. 09/11/96 02:41:56 PM Beth Brownholtz/CAM/Lotus updated -Default-
  1109. 09/11/96 02:41:52 PM Beth Brownholtz/CAM/Lotus updated [OtherDomainServers]
  1110. 09/11/96 02:41:40 PM Beth Brownholtz/CAM/Lotus added [OtherDomainServers]
  1111. 09/11/96 02:41:33 PM Beth Brownholtz/CAM/Lotus updated LocalDomainServers
  1112. 09/11/96 02:41:29 PM Beth Brownholtz/CAM/Lotus updated [LocalDomainServers]
  1113. 09/11/96 02:41:25 PM Beth Brownholtz/CAM/Lotus added [LocalDomainServers]
  1114. 09/11/96 02:40:11 PM Beth Brownholtz/CAM/Lotus updated LocalDomainServers
  1115. 09/11/96 02:40:04 PM Beth Brownholtz/CAM/Lotus added LocalDomainServers
  1116. 09/11/96 02:39:51 PM Beth Brownholtz/CAM/Lotus updated [-Default-]
  1117. 09/11/96 02:39:40 PM Beth Brownholtz/CAM/Lotus added [-Default-]
  1118. 09/11/96 02:39:28 PM Beth Brownholtz/CAM/Lotus deleted Robin Alvarez/TCGEMINI2
  1119. 09/11/96 02:39:27 PM Beth Brownholtz/CAM/Lotus updated Beth Brownholtz/TCGEMINI2
  1120. 09/11/96 02:39:19 PM Beth Brownholtz/CAM/Lotus added Beth Brownholtz/TCGEMINI2
  1121. 09/10/96 12:32:03 PM Robin Alvarez/TCGEMINI2 updated Robin Alvarez/TCGEMINI2
  1122. 09/10/96 12:32:03 PM Robin Alvarez/TCGEMINI2 added Robin Alvarez/TCGEMINI2
  1123. 09/10/96 12:32:03 PM Robin Alvarez/TCGEMINI2 updated -Default-
  1124. -Default-
  1125. [-Default-]
  1126. LocalDomainServers
  1127. [LocalDomainServers]
  1128. [OtherDomainServers]
  1129. Datos a
  1130. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  1131. n finalizada
  1132. StatusX
  1133. tuloT
  1134. WorksheetTitle"
  1135. Title
  1136.     3S5S
  1137. $22Contributor
  1138. SessionEditors
  1139. Contributor
  1140. SessionEditors
  1141.     3S4S24S$26Estado de la hoja
  1142. Temp_Status
  1143. Worksheetstatus
  1144. Temp_Value
  1145. Temp_Status
  1146. Temp_Status
  1147. Temp_Status
  1148.     0R1S2S
  1149. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  1150. n finalizada
  1151. Temp_Value
  1152. $8Fecha de creaci
  1153. $10Fecha de modificaci
  1154. Crear documento de libro de 1-2-3
  1155. _Categor
  1156. Navegador
  1157. EnvName
  1158. NavigatorState"
  1159.     1S2S
  1160. EnvName
  1161. EnvName
  1162. Main Navigator
  1163. EnvName
  1164.     0R11RS8E13RS20E14S20RS20E30RS8E32RS20E33S39RS20E44RS9E
  1165. Editar documento
  1166. Enviar
  1167. _Remitir
  1168. _Mover a una carpeta...
  1169. _Extraer de una carpeta...
  1170. O=Lotus Notes
  1171. O=Lotus Notes
  1172. PURSAFO
  1173. |.:#U
  1174. O=Lotus Notes
  1175. CN=Lotus Notes Template Development/O=Lotus Notes
  1176. PURSAFO
  1177. Fde!f^^
  1178. $Title
  1179. $Index
  1180. $Formula
  1181. $FormulaClass
  1182. $ViewFormat
  1183. $Comment
  1184. $ACTIONS
  1185. $37$34WorksheetTitle$38$17$16$Conflict$C1$
  1186. $RefV
  1187.     0S0E
  1188.     0S0E
  1189. Temp_Status
  1190. Worksheetstatus
  1191. Temp_Value
  1192. Temp_Status
  1193. Temp_Status
  1194. Temp_Status
  1195.     0R1S2S
  1196. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  1197. Temp_Value
  1198. $37$34
  1199. 44942B49E108B0E58025643D006707A0"
  1200. 840B29D26362ED328025643D00671E85
  1201. Datos solicitados
  1202. Preparado para consolidar
  1203. Consolidado en el maestro"
  1204. B4F1FF770B6BE9578025643D006783F1"
  1205. 47AE313C4D7982DA8025643D0067977F"
  1206. 5F208715A669FC288025643D0067CF1B"
  1207. AF08D574E030B9458025643D0067E142"
  1208. 0F3F8F6DDF581E5F8025643D00687E40"
  1209. 69495371DAFE9B178025643D0068934C"
  1210. 3B23670E64B7B7708025643D0068B70F"
  1211. 660ED53D0C3002688025643D0068C919"
  1212. AC4D92AE9F0464B78025643D0068F206"
  1213. 4A664F1FF6351FC28025643D006A03C3"
  1214. FF28AEE601B5B1A78025643D006A1A8A"
  1215. 773A802F2FBC06598025643D006A75D8"
  1216. C3DAC27AD5160C3F8025643D006A8E3C
  1217.  $6Type<
  1218. Person
  1219. $1FullName/ListNamel
  1220. Person
  1221. Fullname
  1222. EXT37234Lotus123.Workbook
  1223. $27$24$22$26$8$10$Conflict$REF$C1$
  1224. Datos a
  1225. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidation completed
  1226. StatusX
  1227. WorksheetTitle"
  1228. Title
  1229.     3S5S
  1230. SessionEditors
  1231. Contributor
  1232. SessionEditors
  1233.     3S4S24S
  1234. Temp_Status
  1235. Worksheetstatus
  1236. Temp_Value
  1237. Temp_Status
  1238. Temp_Status
  1239. Temp_Status
  1240.     0R1S2S
  1241. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidaci
  1242. n finalizada
  1243. Temp_Value
  1244. Avril Jordan
  1245. Datos solicitados    
  1246. Iouioiu
  1247. Consolidaci
  1248. n finalizada
  1249. Preparado para consolidar
  1250. Opi900
  1251. Consolidation completed
  1252. P[Okp
  1253. MailAddress
  1254. FullName
  1255. CN=Cathy Pfeiler/O=TCGEMINI2CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1256. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1257. Navegador principal | Main Navigator
  1258. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1259. CN=Cathy Pfeiler/OU=CAM/O=LotusCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1260. Mediante colaborador|View By Contributor
  1261. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1262. Todos los documentos|View by Master Contributor
  1263. pMkK<
  1264. (Consolidaci
  1265. n interna)|(Internal Consolidate).
  1266. ColaboradorSecondary.
  1267. Documento con libro de 1-2-3Main.
  1268. MensajeMemoMemo
  1269. CN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1270. dan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1271. pMkK<
  1272. pMkK<
  1273. otus Notes Template Development/O=Lotus Notes
  1274. (Consolidaci
  1275. n interna)|(Internal Consolidate)
  1276. Mediante colaborador|View By Contributor
  1277. MensajeMemoMemo
  1278. Navegador principal | Main Navigator
  1279. Todos los documentosw By Contributor
  1280. Navegador principal | Main Navigator
  1281. Todos los documentos|Vie
  1282. (Consolidaci
  1283. n interna)|(Internal Consolidate)
  1284. Mediante colaborador|View By Contributor
  1285. (Consolidaci
  1286. n interna)|(Internal Consolidate)
  1287. Mediante colaborador|View By Contributor
  1288. (Consolidaci
  1289. n interna)|(Internal Consolidate)
  1290. Mediante colaborador|View By Contributor
  1291. (Consolidaci
  1292. n interna)|(Internal Consolidate)
  1293. Mediante colaborador|View By Contributor
  1294. (Consolidaci
  1295. n interna)|(Internal Consolidate)
  1296. Mediante colaborador|View By Contributor
  1297. Todos los documentos|View by Mx
  1298. Mediante colaborador|View By Contributor
  1299. Todos los documentos|View by Master Contributor
  1300. Mediante colaborador|View By Contributor
  1301. Todos los documentos|View by Master Contributor
  1302. Todos los documentos|View by Master Contributor
  1303. ColaboradorSecondary
  1304. Documento con libro de 1-2
  1305. Todos los documentos|View by Master Contributor
  1306. Documento con libro de 1-2-3Main
  1307. MensajeMemoMemo
  1308. Navegador principal | Main Navigator
  1309. orador|View By Contributor
  1310. w By Contributor
  1311. Main Navigator
  1312. Main Navigator
  1313. s documentosaborador|View By Contributor
  1314. ColaboradorSecondary
  1315. iew By Contributor
  1316. ColaboradorSecondary
  1317. CN=Cathy Pfeiler/O=T=d%
  1318. Mensaj/O=Lotus4
  1319. CN=Cathy Pfeiler/OU=CA
  1320. Navegal | Main Navigator.
  1321. Avril Jordan/OU=DUB/O=Lotus
  1322. Jordan/OU=DUB/O=Lotus
  1323. Navegal | Main Navigator.
  1324. Documento con libro de 1-2-3Main
  1325. Main N
  1326.     0S0E
  1327. tuloT
  1328. WorksheetTitle"
  1329. Title
  1330.     3S5S
  1331. $26Contributor
  1332. SessionEditors
  1333. Contributor
  1334. SessionEditors
  1335.     3S4S24S$30Estado
  1336. Temp_Status
  1337. Worksheetstatus
  1338. StatusX
  1339.     1S16S
  1340. Temp_Value
  1341. Temp_Status
  1342. Temp_Status
  1343. Temp_Status
  1344.     0R1S2S
  1345. Datos a
  1346. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  1347. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  1348. Temp_Value
  1349. $10Fecha de modificaci
  1350. Crear documento de libro de 1-2-3E&
  1351. _Categor
  1352. Navegador
  1353. EnvName
  1354. NavigatorState"
  1355.     1S2S
  1356. EnvName
  1357. EnvName
  1358. Main Navigator
  1359. EnvName
  1360.     0R11RS8E13RS20E14S20RS20E30RS8E32RS20E33S39RS20E44RS9E
  1361. Editar documento
  1362. Enviar
  1363. _Remitir
  1364. _Mover a una carpeta...
  1365. _Extraer de una carpeta...
  1366. O=Lotus Notes
  1367. O=Lotus Notes
  1368. PURSAFO
  1369. |.:#U
  1370. O=Lotus Notes
  1371. CN=Lotus Notes Template Development/O=Lotus Notes
  1372. PURSAFO
  1373. Fde!f^^
  1374. $Title
  1375. $Index
  1376. $Formula
  1377. $FormulaClass
  1378. $ViewFormat
  1379. $Comment
  1380. $ACTIONS
  1381. *CN=Avril Jordan/OU=DUB/O=Lotus
  1382. *CN=Avril Jordan/OU=DUB/O=Lotus
  1383. *CN=Avril Jordan/OU=DUB/O=Lotus
  1384. MensajeMemoMemo
  1385. Navegador principal | Main Navigator
  1386. Documento con libro de 1-2-3Main
  1387. ColaboradorSecondary
  1388. Mediante colaborador|View By Contributor
  1389. Todos los documentos|View by Master Contributor
  1390. (Consolidaci
  1391. n interna)|(Internal Consolidate)
  1392. Main Navigator
  1393. Main Navigator
  1394. s documentos|View by Master Contributor
  1395. CN=Cathy Pfeiler/OU=CA
  1396. CN=Cathy Pfeiler/O=T=d%
  1397. Mensaj/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=Lotus
  1398. Jordan/OU=DUB/O=Lotus
  1399. Navegal | Main Navigator.
  1400. Documento con libro de 1-2-3Main
  1401. Main N
  1402. (Consolit/O=Lotus Notes
  1403. pment/O=Lotus Notes
  1404. Mediante colaborador|View By Con
  1405. (Consolidaci
  1406. n interna)|
  1407. (Consolidaontributor
  1408. onsolidaci
  1409. n interna)|(Internal Consolidate)
  1410. Mediante colabmentos|View by Mx
  1411. Todos los documentos|View 
  1412. Mediante colaborador
  1413. Todos los documentos|View by Master Contributor
  1414. s los documentos|View by Master Contributor
  1415. Colabora
  1416. los documentos|View by Master Contributor
  1417. ajeMemoMemo
  1418. MensajeMemoMemo
  1419. Navegador principal | Main Navigator
  1420. Documento con libro de 1-2-3Main
  1421. ColaboradorSecondary
  1422. Mediante colaborador|View By Contributor
  1423. Todos los documentos|View by Master Contributor
  1424. (Consolidaci
  1425. n interna)|(Internal Consolidate)
  1426. Main Navigator
  1427. Main Navigator
  1428. s documentos|View by Master Contributor
  1429. CN=Cathy Pfeiler/OU=CA
  1430. CN=Cathy Pfeiler/O=T=d%
  1431. Mensaj/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=Lotus
  1432. Jordan/OU=DUB/O=Lotus
  1433. Navegal | Main Navigator.
  1434. Documento con libro de 1-2-3Main
  1435. Main N
  1436. (Consolit/O=Lotus Notes
  1437. pment/O=Lotus Notes
  1438. Mediante colaborador|View By Con
  1439. (Consolidaci
  1440. n interna)|
  1441. (Consolidaontributor
  1442. onsolidaci
  1443. n interna)|(Internal Consolidate)
  1444. Mediante colabmentos|View by Mx
  1445. Todos los documentos|View 
  1446. Mediante colaborador
  1447. Todos los documentos|View by Master Contributor
  1448. s los documentos|View by Master Contributor
  1449. Colabora
  1450. los documentos|View by Master Contributor
  1451. ajeMemoMemo
  1452. tuloT
  1453. WorksheetTitle"
  1454. Title
  1455.     3S5S
  1456. $26Contributor(s)
  1457. SessionEditors
  1458. Contributor
  1459. SessionEditors
  1460.     3S4S24S$31Estado
  1461. Temp_Status
  1462. Worksheetstatus
  1463. StatusX
  1464.     1S16S
  1465. Temp_Value
  1466. Temp_Status
  1467. Temp_Status
  1468. Temp_Status
  1469.     0R1S2S
  1470. Datos a
  1471. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  1472. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  1473. Temp_Value
  1474. $8Fecha de creaci
  1475. $10Fecha de modificaci
  1476. Crear documento de libro de 1-2-3
  1477. NavegadoraH
  1478. EnvName
  1479. NavigatorState"
  1480.     1S2S
  1481. EnvName
  1482. EnvName
  1483. Main Navigator
  1484. EnvName
  1485.     0R11RS8E13RS20E14S20RS20E30RS8E32RS20E33S39RS20E44RS9E
  1486. _Categor
  1487. Editar documento
  1488. Enviar
  1489. _Remitir
  1490. _Mover a una carpeta...2
  1491. _Extraer de una carpeta...
  1492. O=Lotus Notes
  1493. O=Lotus Notes
  1494. PURSAFO
  1495. |.:#U
  1496. O=Lotus Notes
  1497. CN=Lotus Notes Template Development/O=Lotus Notes
  1498. PURSAFO
  1499. Fde!f^^
  1500. $Title
  1501. $Index
  1502. $Formula
  1503. $FormulaClass
  1504. $ViewFormat
  1505. $Comment
  1506. $ACTIONS
  1507. MensajeMemoMemo
  1508. CN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Brian McGauran/OU=DUB/O=LotusLotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1509. CN=Cathy Pfeiler/O=TCGEMINI2CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1510. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1511. Navegador principal | Main Navigator
  1512. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1513. Documento con libro de 1-2-3Main
  1514. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1515. CN=Cathy Pfeiler/OU=CAM/O=LotusCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1516. ColaboradorSecondary
  1517. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1518. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1519. Mediante colaborador|View By Contributor
  1520. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1521. Todos los documentos|View by Master Contributor
  1522. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1523. pMkK<
  1524. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1525. (Consolidaci
  1526. n interna)|(Internal Consolidate)
  1527. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  1528. CN=Martin McDonnell/OU=DUB/O=Lotus
  1529. tus Notes
  1530. (Consolidaci
  1531. n interna)|(Internal Consolidate)
  1532. Mediante colaborador|View By Contributor
  1533. MensajeMemoMemo
  1534. Navegador principal | Main Navigator
  1535. Todos los documentosw By Contributor
  1536. Navegador principal | Main Navigator
  1537. Todos los documentos|Vie
  1538. (Consolidaci
  1539. n interna)|(Internal Consolidate)
  1540. Mediante colaborador|View By Contributor
  1541. (Consolidaci
  1542. n interna)|(Internal Consolidate)
  1543. Mediante colaborador|View By Contributor
  1544. (Consolidaci
  1545. n interna)|(Internal Consolidate)
  1546. Mediante colaborador|View By Contributor
  1547. (Consolidaci
  1548. n interna)|(Internal Consolidate)
  1549. Mediante colaborador|View By Contributor
  1550. (Consolidaci
  1551. n interna)|(Internal Consolidate)
  1552. Mediante colaborador|View By Contributor
  1553. Todos los documentos|View by Mx
  1554. Mediante colaborador|View By Contributor
  1555. Todos los documentos|View by Master Contributor
  1556. Mediante colaborador|View By Contributor
  1557. Todos los documentos|View by Master Contributor
  1558. Todos los documentos|View by Master Contributor
  1559. ColaboradorSecondary
  1560. Documento con libro de 1-2
  1561. Todos los documentos|View by Master Contributor
  1562. Documento con libro de 1-2-3Main
  1563. MensajeMemoMemo
  1564. Navegador principal | Main Navigator
  1565. orador|View By Contributor
  1566. w By Contributor
  1567. Main Navigator
  1568. Main Navigator
  1569. s documentosaborador|View By Contributor
  1570. ColaboradorSecondary
  1571. iew By Contributor
  1572. ColaboradorSecondary
  1573. CN=Cathy Pfeiler/O=T=d%
  1574. Mensaj/O=Lotus4
  1575. CN=Cathy Pfeiler/OU=CA
  1576. Navegal | Main Navigator.
  1577. Avril Jordan/OU=DUB/O=Lotus
  1578. Jordan/OU=DUB/O=Lotus
  1579. Navegal | Main Navigator.
  1580. Documento con libro de 1-2-3Main
  1581. Main N
  1582. l Jordan/OU=DUB/O=Lotus
  1583. Lotus
  1584. l Jordan/OU=DUB/O=Lotus
  1585. Lotus
  1586. l Jordan/OU=DUB/O=Lotus
  1587. Lotus
  1588. l Jordan/OU=DUB/O=Lotus
  1589. Lotus
  1590. Consolidation completed
  1591. Consolidation completed
  1592. *CN=Avril Jordan/OU=DUB/O=Lotus
  1593. Times New Roman
  1594. Utilizaci
  1595. n de Consolidar copias
  1596. ?_?__
  1597. `!b`1
  1598. 7`^///?
  1599. ?b___
  1600. `bOOO
  1601. `<b!R
  1602. Para dise
  1603. adores
  1604. Avril Jordan-
  1605.     Consolidar copias se basa en un archivo .DLL y en una plantilla de base de datos de Notes, con formularios que contienen scripts creados con el lenguaje LotusScript. Estos scripts est
  1606. n asociados con distintas acciones y botones, y utilizan bibliotecas de tipos, objetos, m
  1607. todos y propiedades de 1-2-3. La interfaz de usuario de la base de datos Consolidar copias la proporciona el archivo TCUI10EN.DLL.
  1608.     Consolidar copias utiliza documentos de Notes con hojas de 1-2-3 como objetos incrustados. No es posible sustituir 1-2-3 por otra aplicaci
  1609.     Control de acceso
  1610. Todos los usuarios de una base de datos Consolidar copias reciben, de forma predeterminada, derecho de acceso de Autor para evitar la edici
  1611. n no autorizada en la base de datos y asegurar su correcto funcionamiento. El originador de un libro maestro debe crear el documento maestro. Despu
  1612. s de la consolidaci
  1613. n, a los documentos de respuesta se les asigna el acceso de Lector para evitar cambios posteriores. 
  1614.     El originador puede consolidar documentos de respuesta en el documento del libro maestro, pero si Vd. desea que otros usuarios puedan llevar a cabo la consolidaci
  1615. n, deber
  1616. n disponer de derechos de acceso de Editor o superiores.
  1617.     Sugerencias para las modificaciones
  1618.     Puede utilizar todas las funciones de Consolidar copias sin necesidad de modificar los formularios ni las vistas de la base de datos. Sin embargo, puede agregar formularios, vistas y documentos que se adapten a sus necesidades. Por ejemplo, puede cambiar la interfaz de usuario de modo que un agente pueda comprobar si las hojas distribuidas est
  1619. n marcadas como preparadas para consolidar y, en tal caso, iniciar autom
  1620. ticamente el proceso de consolidaci
  1621.     Scripts
  1622. Para mantener la funcionalidad b
  1623. sica de Consolidar copias, debe prestar atenci
  1624. n si decide editar scripts existentes. Sin embargo, puede agregar nuevos scripts a los formularios para realizar distintas tareas seg
  1625. n sus necesidades. Para obtener m
  1626. s informaci
  1627. n acerca de Lotus Script, consulte la documentaci
  1628. n de LotusScript.
  1629.     Vistas
  1630. Puede agregar o editar las vistas como desee. Sin embargo, la base de datos Consolidar copias contiene dos vistas ocultas: (Consolidaci
  1631. n interna) e (ID principal). Estas vistas son necesarias y no deben eliminarse ni modificarse. 
  1632.     Formularios
  1633. La plantilla Consolidar copias contiene tres formularios: Documento con libro de 1-2-3, documento Colaborador y Mensaje. 
  1634.     Documento con libro de 1-2-3: Es el formulario que contiene el libro maestro. 
  1635.     Nota: 
  1636.     No cambie las opciones del campo Estado, ya que se trata de un campo b
  1637. sico para el correcto funcionamiento de Consolidar copias. 
  1638.     Colaborador: Es el formulario de respuesta que contiene la hoja distribuida. Puede personalizar este formulario si lo desea. Por ejemplo, puede modificarlo para que el libro incrustado no se inicie autom
  1639. ticamente cuando se abra un documento de respuesta. Para ello, abra el formulario Colaborador, acceda a la pesta
  1640. a Iniciar del cuadro de informaci
  1641. n, y anule la selecci
  1642. n de la opci
  1643. n "Iniciar localmente". No cambie las opciones del campo WorkSheetStatus, ya que son necesarias para el correcto funcionamiento de Consolidar copias. 
  1644.     Mensaje: Es el formulario de correo electr
  1645. nico est
  1646. ndar utilizado en la mayor
  1647. a de bases de datos de Notes. 
  1648.     Puede personalizar cualquiera de estos formularios para adaptarlos a sus necesidades. Por ejemplo, si lo desea puede agregar campos adicionales para el nombre del proyecto, fechas l
  1649. mite o costes estimados. 
  1650.     Copia de documentos maestros y documentos de respuesta
  1651. Puede copiar documentos maestros o bases de datos que contengan 
  1652. nicamente documentos maestros, pero debe evitar copiar documentos de respuesta. Los documentos respuesta est
  1653. n vinculados con sus documentos maestros a trav
  1654. s del campo $REF. Por consiguiente, una vez distribuidas las hojas, cualquier copia de un documento de respuesta har
  1655.  referencia al documento maestro original de la base de datos original.
  1656.     Para evitar esta confusi
  1657. n, no utilice el comando Archivo - Base de datos - Copiar para hacer copias de una base de datos Consolidar datos que tenga documentos de respuesta, ni utilice Edici
  1658. n - Cortar y Edici
  1659. n - Pegar para hacer copias de documentos de respuesta.
  1660.     Si desea realizar una copia de la base de datos, por ejemplo, para utilizarla como modelo de una nueva base de datos, h
  1661. galo antes de distribuir las hojas.
  1662.     Nota 
  1663.     Si replica la base de datos, se mantendr
  1664.  la relaci
  1665. n correcta entre los documentos de respuesta y maestro.
  1666.     Conflictos de replicaci
  1667. Si intenta consolidar un documento de respuesta que tenga un conflicto de replicaci
  1668. n, obtendr
  1669.  un mensaje de error. Si desea ver los documentos con conflictos de replicaci
  1670. n. utilice la vista "Por colaborador"
  1671.     Edici
  1672. n de los documentos "Acerca de" y "Uso de"
  1673. Modifique los documentos "Acerca de" y "Uso de la" para que reflejen todos los cambios que haya realizado. Para editar estos documentos, seleccione Dise
  1674. o - Otros.
  1675. Para usuarios
  1676. Generalidades: Distribuci
  1677. n de libros mediante la funci
  1678. n Consolidar copias
  1679.     Consolidar copias permite distribuir hojas de un libro en una base de datos de Lotus Notes para solicitar datos o modificaciones de los colaboradores. Una vez que hayan realizado los cambios, puede volver a consolidar estas hojas en el libro original. 
  1680.     Por ejemplo, imagine que utiliza 1-2-3 para controlar los gastos de un proyecto que involucra a varios departamentos. Puede crear un libro que contenga una hoja para cada departamento. Utilizando esta base de datos, podr
  1681.  distribuir cada hoja al personal de cada departamento. Ellos actualizar
  1682. n y agregar
  1683. n informaci
  1684. n y, a continuaci
  1685. n, podr
  1686.  consolidar los cambios en el libro original. Almacenando el libro en una base de datos de Notes se consigue que la informaci
  1687. n est
  1688.  disponible para todos (incluso para personas que se encuentren en diferentes ubicaciones), permitiendo controlar los cambios que se van produciendo.
  1689.     Distribuci
  1690. n de hojas y consolidaci
  1691. n de cambios en el documento original
  1692. El proceso de distribuci
  1693. n de las hojas de un libro a los colaboradores involucra a un solo distribuidor y a cualquier n
  1694. mero de colaboradores. El proceso general se describe a continuaci
  1695.     Una persona familiarizada con el dise
  1696. o y administraci
  1697. n de bases de datos de Notes ha de configurar una base de datos que contendr
  1698.  los libros maestros y las hojas distribuidas. Esta base de datos debe utilizar la plantilla Consolidar copias, cuyo nombre es TEAMCONS.NTF, que se suministra con 1-2-3. 
  1699.     El originador debe abrir la base de datos en la que se almacenar
  1700.  el libro.
  1701.     En la base de datos, el originador ha de seleccionar Crear - Documento de libro de 1-2-3 y crear un libro nuevo o abrir uno existente. 
  1702.     A continuaci
  1703. n, el originador asignar
  1704.  hojas individuales del libro a uno o m
  1705. s colaboradores, notific
  1706. ndoselo mediante un mensaje de correo electr
  1707. nico.
  1708.     Seguidamente,  los colaboradores abrir
  1709. n la base de datos de Notes y editar
  1710. n las hojas distribuidas. Cuando los colaboradores terminen de agregar datos, marcar
  1711. n sus documentos como preparados para consolidar y volver
  1712. n a guardarlos en la base de datos de Notes.
  1713.     Una vez que los colaboradores hayan marcado sus documentos como "Preparado para consolidar", el originador deber
  1714.  hacer clic en el bot
  1715. n Consolidar datos del libro, al objeto de consolidar los cambios de los colaboradores en el libro maestro.
  1716.     Despu
  1717. s de consolidar los cambios, el originador puede guardar el libro maestro como un archivo 1-2-3 individual o dejar el libro almacenado en la base de datos de Notes.
  1718. Generalidades: Configuraci
  1719. n del libro maestro
  1720.     La utilizaci
  1721. n de la base de datos Consolidar copias no altera el modo normal de utilizaci
  1722. n de 1-2-3. Debido a que los  colaboradores trabajar
  1723. n con una sola hoja a la vez, ciertas funciones de 1-2-3 pierden importancia o utilidad, como por ejemplo las funciones que trabajan con varias hojas. 
  1724.     A continuaci
  1725. n se detalla la informaci
  1726. n que debe tenerse presente a la hora de crear el libro maestro y de trabajar en hojas distribuidas. 
  1727.     Preparaci
  1728. n de cada hoja
  1729. Cuando distribuya hojas de un libro que contiene varias, coloque todos los datos y objetos gr
  1730. ficos que desee distribuir a una persona en una sola hoja. Si un libro contiene macros, resulta m
  1731. s apropiado colocarlas en una hoja independiente. 
  1732. ficos, dibujos, mapas y objetos incrustados OLE
  1733. Durante la consolidaci
  1734. n, si existen hojas distribuidas de forma independiente que contienen gr
  1735. ficos, dibujos, mapas u objetos incrustados con los mismos nombres, no se cambiar
  1736.  el nombre a los objetos que tengan nombres duplicados. No se perder
  1737. n objetos ni datos pero, para evitar confusiones, antes de distribuir una hoja, conviene asignar nombres a los objetos en lugar de aceptar los nombres predeterminados sugeridos por 1-2-3.
  1738.     Versiones y grupos de versiones
  1739. Es una buena idea para evitar versiones 3D en una hoja distribuida. A pesar de que los colaboradores pueden utilizar datos de varias hojas, por ejemplo con c
  1740. lculos de f
  1741. rmulas, 1-2-3 s
  1742. lo consolidar
  1743.  los cambios realizados en la hoja individual distribuida. 
  1744.     Si el originador agrega versiones en el libro maestro mientras se distribuyen las hojas, los datos de dichas versiones se perder
  1745. n durante la consolidaci
  1746.     Los grupos de versiones no se incluyen en una hoja distribuida. 
  1747.     Scripts
  1748. Es posible agregar, editar y consolidar scripts anexos a los objetos gr
  1749. ficos de la hoja actual, pero no otros scripts. 
  1750.     Nota  
  1751.     Si un script est
  1752.  anexado a un rango de una hoja distribuida, no se consolidar
  1753.     Libros bloqueados
  1754. Puede distribuir, editar y consolidar libros bloqueados. El bloqueo se ignora cuando la hoja se vuelve a consolidar en el libro maestro.
  1755.     Libros con protecci
  1756. n mediante contrase
  1757. Debido a que no es posible proteger objetos OLE mediante contrase
  1758. a, no podr
  1759.  proteger libros maestros una vez que se encuentren en Notes.
  1760. Creaci
  1761. n del libro maestro a partir  de un libro existente
  1762.     Antes de empezar, la base de datos de Notes destinada a almacenar el libro debe estar configurada. 
  1763.     Abra la base de datos de Notes en la que desee almacenar el libro 1-2-3. 
  1764.     Haga clic en el bot
  1765. n Crear documento de libro de 1-2-3. 
  1766.     Especifique un t
  1767. tulo para el documento del libro maestro.
  1768.     Seleccione "Utilizar libro de 1-2-3 existente" y especifique el nombre del archivo. 
  1769.     Haga clic en Aceptar. 
  1770.     Seleccione si desea solicitar los datos para el libro ahora o despu
  1771.     Si opta por distribuir el libro ahora, realice los pasos, a partir del n
  1772. mero 3, de la secci
  1773. n "Distribuci
  1774. n de hojas", m
  1775. s adelante en este documento. 
  1776.     Si opta por distribuir el libro m
  1777. s adelante, haga clic en Solicitar datos del libro cuando est
  1778.  preparado.
  1779. Creaci
  1780. n de un libro maestro nuevo
  1781.     Antes de empezar, la base de datos de Notes destinada a almacenar el libro debe estar configurada. 
  1782.     Abra la base de datos de Notes en la que desee guardar el libro de 1-2-3. 
  1783.     Haga clic en el bot
  1784. n Crear documento de libro de 1-2-3.
  1785.     Especifique un t
  1786. tulo para el documento del libro maestro.
  1787.     Seleccione "Crear libro de 1-2-3". 
  1788.     Haga clic en Aceptar. 
  1789.     Prepare e incluya los datos en el objeto del libro de 1-2-3. 
  1790.     Cuando termine de crear el libro maestro, haga clic en el formulario de Notes, fuera del objeto del libro de 1-2-3.
  1791.     Guarde y cierre el documento de Notes.
  1792.     Ahora ya puede distribuir las hojas del libro maestro entre los colaboradores. Si desea m
  1793. s informaci
  1794. n, consulte el tema "Distribuci
  1795. n de hojas".
  1796. Distribuci
  1797. n de hojas
  1798.     Las hojas se distribuyen con objeto de solicitar datos de los colaboradores. La distribuci
  1799. n de hojas las asigna a los colaboradores y convierte cada hoja distribuida en un documento de respuesta subordinado al documento maestro. 
  1800.     Abra el documento de Notes que contenga el libro que desea distribuir. 
  1801.     Haga clic en el bot
  1802. n Solicitar datos del libro. 
  1803.     Seleccione las hojas que desee distribuir arrastrando sus nombres desde la lista "Hojas del libro" a la lista "Hojas a distribuir". 
  1804.     Para seleccionar los colaboradores de cada hoja distribuida, haga clic en la lista Colaboradores y escriba un nombre o haga clic en el bot
  1805. n Direcciones para seleccionar nombres con ayuda de una libreta de direcciones. 
  1806. Puede seleccionar m
  1807. s de un colaborador para cada hoja separando los nombres con una coma (,). Tambi
  1808. n puede utilizar nombres de grupo para especificar varios colaboradores.
  1809.     (Opcional) Seleccione "S
  1810. lo los colaboradores pueden ver las hojas distribuidas" para evitar la visualizaci
  1811. n e inserci
  1812. n de datos por parte de otros usuarios.
  1813.     (Opcional) Para enviar correo electr
  1814. nico a todos los colaboradores, seleccione "Enviar correo con enlace de documento a los colaboradores" y, a continuaci
  1815. n, escriba el mensaje en el cuadro. 
  1816.     (Opcional) Seleccione "Notificar finalizaci
  1817. n por parte de los colaboradores" si desea recibir un mensaje cuando los documentos se marquen como "Preparado para consolidar" o "No consolidar".
  1818.     Haga clic en el bot
  1819. n Aceptar e indique su contrase
  1820. a de correo electr
  1821. nico (si se le solicita).
  1822.     Cuando cierre el documento, aparecer
  1823. n los documentos de respuesta que contengan las hojas distribuidas subordinados al documento maestro y cuyo estado sea "Datos solicitados". 
  1824. Detalles: Distribuci
  1825. n de hojas
  1826. ndo pueden distribuirse hojas
  1827. Puede distribuir hojas desde un documento de libro maestro que tenga un estado de "Datos a
  1828. n no solicitados" o "Consolidaci
  1829. n finalizada". Si un documento de libro maestro tiene cualquier otro estado, el bot
  1830. n Solicitar datos del libro no estar
  1831.  disponible.
  1832.     Despu
  1833. s de distribuir una hoja, no podr
  1834.  distribuirla de nuevo hasta que el documento del libro maestro tenga un estado de "Consolidaci
  1835. n finalizada". Se considera que la consolidaci
  1836. n ha finalizado cuando todas las hojas distribuidas tienen un estado de "Consolidado en el maestro" o "No consolidar". 
  1837. Selecci
  1838. n de una vista
  1839.     En la base de datos Consolidar copias, puede elegir entre varias formas para visualizar los documentos del libro maestro y las hojas distribuidas, que aparecen como documentos de respuesta al documento del libro maestro.
  1840.     Visualizaci
  1841. n del navegador de Consolidar copias
  1842. Puede hacer clic en el bot
  1843. n Navegador para visualizar una l
  1844. nea de botones en el lado izquierdo de la ventana del libro, que reemplazar
  1845.  a los navegadores de Notes est
  1846. ndar. El navegador de Consolidar copias contiene los siguientes botones:
  1847.     Todos los documentos: Muestra todos los documentos de la vista organizados seg
  1848. n el nombre del originador
  1849.     Por estado: Muestra todos los documentos organizados seg
  1850. n el estado de los libros maestros
  1851.     Por fecha: Muestra todos los documentos organizados seg
  1852. n la fecha de modificaci
  1853. n de los libros maestros
  1854.     Por colaborador: Muestra las hojas distribuidas organizadas seg
  1855. n el nombre del colaborador, pero sin mostrar el libro maestro
  1856. Edici
  1857. n de hojas distribuidas
  1858.     Los colaboradores pueden editar las hojas distribuidas 
  1859. Edici
  1860. n de un objeto sin abandonar la aplicaci
  1861. n en la que est
  1862.  incrustado. En su lugar, el men
  1863.  cambia para mostrar comandos propios de la aplicaci
  1864. n servidora. Los objetos incrustados pueden editarse local o externamente.
  1865.     local
  1866. Edici
  1867. n de un objeto incrustado mediante la apertura de la aplicaci
  1868. n servidora. Los objetos incrustados pueden editarse local o externamente.
  1869.     externamente
  1870.     . Cuando se abre un documento que contiene una hoja distribuida, 
  1871. sta se activa para edici
  1872. n local.
  1873.     Modificaci
  1874. n de la hoja localmente:
  1875.     En la base de datos de Notes, abra el documento que contiene la hoja distribuida.
  1876.     Modifique o agregue informaci
  1877. n en la hoja.
  1878.     (Opcional) Incluya sus comentarios en el campo Comentarios. 
  1879.     Guarde y cierre el documento de Notes. 
  1880.     En el cuadro de di
  1881. logo Estado del documento del colaborador, elija la opci
  1882. n que refleje el estado actual del trabajo. 
  1883.     Nota 
  1884.      Si tiene intenci
  1885. n de agregar m
  1886. s cambios posteriormente, seleccione "En progreso".
  1887.     Haga clic en Fin.
  1888.     Modificaci
  1889. n de la hoja externamente:
  1890.     En la base de datos de Notes, abra el documento que contiene la hoja distribuida.
  1891.     Haga clic fuera del objeto del libro de 1-2-3 para desactivarlo.
  1892.     Haga clic en el objeto para seleccionarlo. 
  1893.     Seleccione Libro - Abrir. 
  1894. La hoja aparecer
  1895.  en una ventana de 1-2-3 a tama
  1896. o completo. 
  1897.     Modifique o agregue informaci
  1898.     Seleccione Archivo - Salir y volver para cerrar 1-2-3 y regresar al documento de Notes. 
  1899.     (Opcional) Incluya sus comentarios en el campo Comentarios. 
  1900.     Guarde y cierre el documento de Notes. 
  1901.     En el cuadro de di
  1902. logo Estado del documento del colaborador, elija la opci
  1903. n que refleje el estado actual del trabajo. 
  1904.     Nota
  1905.       Si tiene intenci
  1906. n de agregar m
  1907. s cambios posteriormente, seleccione "En progreso".
  1908.     Haga clic en Fin.
  1909. Detalles: Edici
  1910. n de hojas distribuidas
  1911.     Limitaciones para la edici
  1912. n de hojas distribuidas
  1913. Cuando se edita una hoja distribuida, existen una serie de comandos y funciones de 1-2-3 que no est
  1914. n disponibles.
  1915.     No podr
  1916.  utilizar la opci
  1917. n Edici
  1918. n - Ir a para desplazarse a objetos de otras hojas. 
  1919.     No podr
  1920.  crear ni eliminar hojas. 
  1921.     No podr
  1922.  crear grupos de versiones. 
  1923.     No podr
  1924.  insertar ni borrar l
  1925. neas o columnas pertenecientes a un rango con versiones (a no ser que haya creado la versi
  1926. n en la hoja distribuida).
  1927.     No podr
  1928.  agregar ni cambiar scripts anexos a rangos.
  1929.     Edici
  1930. n de hojas localmente
  1931. Cuando se editan hojas 
  1932. Edici
  1933. n de un objeto sin abandonar la aplicaci
  1934. n en la que est
  1935.  incrustado. En su lugar, el men
  1936.  cambia para mostrar comandos propios de la aplicaci
  1937. n servidora. Los objetos incrustados pueden editarse local o externamente.
  1938.     localmente
  1939.     , los men
  1940. s Archivo y Ventana contienen comandos de Lotus Notes. El comando Archivo - Guardar almacena el documento completo de Notes que contiene la hoja, no s
  1941. lo la hoja. 
  1942. Puede finalizar la edici
  1943. n local haciendo clic en el documento de Notes, fuera de la hoja. Para volver a editar la hoja, haga doble clic en ella.
  1944.     Los datos de 1-2-3 no se guardar
  1945. n hasta que guarde el documento de Notes. 
  1946.     Edici
  1947. n de hojas externamente
  1948. Cuando se editan hojas 
  1949. Edici
  1950. n de un objeto incrustado mediante la apertura de la aplicaci
  1951. n servidora. Los objetos incrustados pueden editarse local o externamente.
  1952.     externamente
  1953.     , el men
  1954.  Archivo contiene comandos de 1-2-3.
  1955.     Preparaci
  1956. n del estado del trabajo
  1957. Cuando guarde una hoja distribuida, un cuadro de di
  1958. logo solicitar
  1959.  al usuario que confirme o cambie el estado del documento. Puede cambiar el estado a "En progreso," "Preparado para consolidar" o "No consolidar".
  1960.     Duplicaci
  1961. n de nombres de rangos
  1962. Cuando se edita una hoja distribuida, todos los nombres de rango propuestos por el Administrador de versiones (por ejemplo, Rango 1) incluir
  1963. n el nombre de la hoja como prefijo (de forma predeterminada, una letra). Si 1-2-3 detecta un nombre de rango duplicado mientras vuelve a consolidar las hojas distribuidas en el libro original, 1-2-3 mantendr
  1964.  el nombre del rango en la primera hoja, pero descartar
  1965.  los nombres de cualquier otro rango con el mismo nombre.
  1966.     Scripts en hojas distribuidas
  1967. Si existe un script anexo a un rango en una hoja distribuida, el script no se consolidar
  1968.     Incrustaci
  1969. n de objetos adicionales
  1970. Es posible incrustar objetos en una hoja distribuida de modo que se vuelvan a combinar en el libro maestro durante la consolidaci
  1971. Consolidaci
  1972. n de hojas distribuidas
  1973.     Una vez que los colaboradores hayan realizado los cambios, podr
  1974.  consolidar las hojas distribuidas en el libro maestro.
  1975.     En la base de datos de Notes, abra el documento que contiene el libro maestro. 
  1976.     Haga clic en el bot
  1977. n Consolidar datos del libro. 
  1978.     Especifique si Notes ha de consolidar 
  1979. nicamente los documentos marcados como "Preparado para consolidar" y si ha de borrar los documentos de los colaboradores una vez consolidados. 
  1980.     Haga clic en Aceptar.  
  1981. Aparecer
  1982.  un mensaje confirmando que los documentos distribuidos se han consolidado satisfactoriamente.
  1983.     (Opcional) Para guardar el documento del libro de 1-2-3 como archivo de libro de 1-2-3, haga clic en el bot
  1984. n Extraer libro de 1-2-3. 
  1985. Detalles: Consolidaci
  1986. n de hojas distribuidas
  1987.     Conflictos de replicaci
  1988. n en hojas distribuidas
  1989. lo es posible consolidar documentos de respuesta originales. Si dos personas editan el mismo documento al mismo tiempo, la segunda persona que guarde el documento originar
  1990.  un conflicto de replicaci
  1991. n. Deber
  1992.  resolver estos conflictos y eliminar el documento objeto del conflicto antes de poder consolidar las hojas distribuidas. 
  1993. nicamente es posible ver los documentos con conflicto de replicaci
  1994. n en la vista "Por colaborador".
  1995.     Control de hojas consolidadas
  1996. Si selecciona "Consolidar s
  1997. lo documentos Preparados para consolidar", se consolidar
  1998. nicamente los documentos cuyo estado sea "Preparado para consolidar". Si las hojas est
  1999. n marcadas como "No consolidar", "En progreso" o "Datos solicitados" podr
  2000.  consolidarlas posteriormente, cuando los colaboradores hayan cambiado su estado. Si no selecciona "Consolidar s
  2001. lo documentos Preparados para consolidar", se consolidar
  2002. n todos los documentos cuyo estado sea diferente a "No consolidar".  
  2003.     Si las hojas est
  2004. n marcadas como "En progreso" y est
  2005.  seleccionada la opci
  2006. n "Consolidar s
  2007. lo documentos Preparados para consolidar", el documento del libro maestro obtendr
  2008.  el estado de "Consolidado parcialmente". Una vez que las hojas restantes se marquen como "Preparado para consolidar" o "No consolidar", podr
  2009.  realizar la consolidaci
  2010. n de nuevo para incorporar los datos restantes. A continuaci
  2011. n, el estado del documento del libro maestro cambiar
  2012.  a "Consolidaci
  2013. n finalizada".
  2014.     Eliminaci
  2015. n de documentos de los colaboradores
  2016. Si selecciona "Eliminar documentos de colaboradores tras la consolidaci
  2017. n", Notes eliminar
  2018.  los documentos de respuesta despu
  2019. s de la consolidaci
  2020. n. Sin embargo, esta acci
  2021. n no eliminar
  2022.  los conflictos de replicaci
  2023. n de los documentos de respuesta. 
  2024.     Si ha seleccionado no eliminar los documentos de los colaboradores, se convertir
  2025. n en documentos de s
  2026. lo lectura para evitar cambios en las hojas que ya hayan sido consolidadas.
  2027. O=Lotus Notes
  2028. O=Lotus Notes
  2029. PURSAFO
  2030. |.:#U
  2031. O=Lotus Notes
  2032. CN=Lotus Notes Template Development/O=Lotus Notes
  2033. PURSAFO
  2034. Fde!f^^
  2035. $Info
  2036. $Body
  2037. Avril Jordan
  2038. DUB/O=Lotus
  2039. *CN=Avril Jordan/OU=DUB/O=Lotus
  2040. History'++LotusScript Development Environment:2:5:(Options):0:66
  2041. '++LotusScript Development Environment:2:5:(Forward):0:1
  2042. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  2043. Declare Sub Initialize
  2044. '++LotusScript Development Environment:2:5:(Declarations):0:10
  2045. Dim addToFields As Integer
  2046. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2047. Private Sub BindEvents(Byval Objectname_ As String)
  2048.      Static Source As NOTESUIDOCUMENT
  2049.      Set Source = Bind(Objectname_)
  2050.      On Event Querysave From Source Call Querysave
  2051. End Sub
  2052. '++LotusScript Development Environment:2:2:Querysave:1:12
  2053. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  2054.      
  2055. REM This script will update the SessionTimes and SessionEditors field with a new element after each edit session.
  2056.      
  2057.      Dim session As New NotesSession        
  2058.      Dim workspace As New NotesUIWorkspace
  2059.      Dim uiDoc As NotesUIDocument
  2060.      Dim currentDoc As NotesDocument
  2061.      Dim dateField As NotesItem
  2062.      Dim nameListItem As NotesItem    
  2063.      
  2064.      Set uiDoc = workspace.CurrentDocument
  2065.      Set currentDoc = uiDoc.Document
  2066.      
  2067.      REM Append the "SessionEditors" field with the current editor of the document.
  2068.      
  2069.      Set nameListItem  = currentDoc.GetFirstItem( "SessionEditors" )         
  2070.      Set dateField        = currentDoc.GetFirstItem( "SessionTimes" )
  2071.      
  2072.      nameArray             = nameListItem.Values
  2073.      dateArray              = dateField.Values
  2074.      
  2075.      If addToFields And (Not uiDoc.IsNewDoc) Then
  2076.           Redim Preserve nameArray(Ubound(nameArray) + 1)
  2077.           Redim Preserve dateArray(Ubound(dateArray) + 1)
  2078.      End If
  2079.      
  2080.      nameArray(Ubound(nameArray)) = session.UserName
  2081.      dateArray(Ubound(dateArray)) = Now
  2082.      
  2083.      If Not uiDoc.IsNewDoc Then
  2084.           nameListItem.Values = nameArray
  2085.           dateField.Values = dateArray
  2086.      End If
  2087.      
  2088.      addToFields = False
  2089.      
  2090. End Sub
  2091. '++LotusScript Development Environment:2:2:Initialize:1:10
  2092. Sub Initialize
  2093.      addToFields = True
  2094. End Sub
  2095. Historia de la hoja
  2096. Historia del libro
  2097.     0S0E
  2098. istory
  2099. Hidden Always
  2100. SessionTimes
  2101. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  2102. SessionEditors
  2103. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  2104. Archivo de origen del libro:
  2105.        
  2106. SourceName
  2107. BookName
  2108. Creado por 
  2109. Editado por 
  2110. SessionEditorsj
  2111. SessionEditors
  2112.  en "
  2113. SessionTimesT
  2114. Domingo
  2115. Lunes
  2116. Martes
  2117. rcoles
  2118. Jueves
  2119. Viernes
  2120. SessionTimesP
  2121. SessionTimesO
  2122. Enero
  2123. Febrero
  2124. Marzo
  2125. Abril
  2126. Junio
  2127. Julio
  2128. Agosto
  2129. Septiembre
  2130. Octubre
  2131. Noviembre
  2132. Diciembre
  2133. SessionTimesN
  2134.  a las 
  2135. SessionTimes
  2136.     20S21R62R69S70S71S72R105S106S130S131S132S133RR140S141R142S143S
  2137. CommentHistory
  2138. * * * FIN DEL DOCUMENTO * * *
  2139. O=Lotus Notes
  2140. O=Lotus Notes
  2141. PURSAFO
  2142. |.:#U
  2143. O=Lotus Notes
  2144. CN=Lotus Notes Template Development/O=Lotus Notes
  2145. PURSAFO
  2146. Fde!f^^
  2147. iWYRW
  2148. $Title
  2149. $Info
  2150. $Body
  2151. $37ID_principal$
  2152. $RefV
  2153.     0S0E
  2154. $34ID_respuesta
  2155.     0S0E
  2156. WorksheetTitleHoja$38Estado
  2157. Temp_Status
  2158. Worksheetstatus
  2159. Temp_Value
  2160. Temp_Status
  2161. Temp_Status
  2162. Temp_Status
  2163.     0R1S2S
  2164. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  2165. Temp_Value
  2166. $17Fecha de modificaci
  2167. $16Fecha de creaci
  2168. Crear documento de libro de 1-2-3X&
  2169. NavegadorXH
  2170. EnvName
  2171. NavigatorState"
  2172.     1S2S
  2173. EnvName
  2174. EnvName
  2175. Main Navigator
  2176. EnvName
  2177.     0R11RS8E13RS20E14S20RS20E30RS8E32RS20E33S39RS20E44RS9E
  2178. _Categor
  2179. Editar documento
  2180. Enviar
  2181. _Remitir
  2182. _Mover a una carpeta...X
  2183. _Extraer de una carpeta...
  2184. O=Lotus Notes
  2185. O=Lotus Notes
  2186. PURSAFO
  2187. |.:#U
  2188. O=Lotus Notes
  2189. CN=Lotus Notes Template Development/O=Lotus Notes
  2190. PURSAFO
  2191. Fde!f^^
  2192. $Index
  2193. $FormulaClass
  2194. $Formula
  2195. $ViewFormat
  2196. $ACTIONS
  2197. Crear documento...&
  2198. _Categor
  2199. Navegador
  2200. Main Navigator
  2201.     0S0E
  2202. Carpetas est
  2203. Main Navigator
  2204.     0S0E
  2205. Editar documento
  2206. Enviar
  2207. _Remitir
  2208. _Mover a una carpeta...n
  2209. _Extraer de una carpeta...    
  2210. O=Lotus Notes
  2211. O=Lotus Notes
  2212. PURSAFO
  2213. |.:#U
  2214. O=Lotus Notes
  2215. CN=Lotus Notes Template Development/O=Lotus Notes
  2216. PURSAFO
  2217. Fde!f^^
  2218. $Title
  2219. $Index
  2220. $Formula
  2221. $FormulaClass
  2222. $ViewFormat
  2223. $Comment
  2224. $ACTIONS
  2225. $31Editor6
  2226. Contributor
  2227.     0S0E
  2228. $33Libro.
  2229. WorkbookTitle
  2230.     0S0E
  2231. WorksheetTitleHoja$34Estado
  2232. Temp_Status
  2233. Worksheetstatus
  2234. Temp_Value
  2235. Temp_Status
  2236. Temp_Status
  2237. Temp_Status
  2238.     0R1S2S
  2239. En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  2240. Temp_Value
  2241. $17Fecha de modificaci
  2242. $16Fecha de creaci
  2243. Crear documento de libro de 1-2-3X&
  2244. NavegadorXH
  2245. EnvName
  2246. NavigatorState"
  2247.     1S2S
  2248. EnvName
  2249. EnvName
  2250. Main Navigator
  2251. EnvName
  2252.     0R11RS8E13RS20E14S20RS20E30RS8E32RS20E33S39RS20E44RS9E
  2253. _Categor
  2254. Editar documento
  2255. Enviar
  2256. _Remitir
  2257. _Mover a una carpeta...X
  2258. _Extraer de una carpeta...
  2259. O=Lotus Notes
  2260. O=Lotus Notes
  2261. PURSAFO
  2262. |.:#U
  2263. O=Lotus Notes
  2264. CN=Lotus Notes Template Development/O=Lotus Notes
  2265. PURSAFO
  2266. Fde!f^^
  2267. $Index
  2268. $FormulaClass
  2269. $Formula
  2270. $ViewFormat
  2271. $ACTIONS
  2272. &Arial
  2273. Form Banner
  2274. wwwwwwwwwwww
  2275. wwwwwwwwwwww
  2276. wwwwwwwwwwww
  2277. wwwwwwwwwwww
  2278. wwwwwwwwwwwwwwwwwwwwwwwww
  2279. wwwwwxwwwwww
  2280. wwwwwxwwwwww
  2281. wxwwppww
  2282. wxwwppww
  2283. wpppwxww
  2284. wpppwxww
  2285. wwwwwxwwwwww
  2286. wwwwwxwwwwww
  2287. wpppwxww
  2288. wpppww
  2289. wwwwww
  2290. wwwwwxwwwwww
  2291. wwwwww
  2292. UUUUUUUUUUUUUUUUUUUUUUUUUUWw
  2293. UUUUXwxww
  2294. wpppwxww
  2295. UUUWwxwwwwww
  2296. wwwwwxwwwwwww
  2297. """(]UUU
  2298. """"""""""""""""""""""/
  2299. """""/
  2300. *""""/
  2301.   @  
  2302.  @@ @
  2303.  `@ `
  2304. @ @@ 
  2305. @@@@@
  2306. @`@@`
  2307. ` @` 
  2308. `@@`@
  2309. ``@``
  2310. aaaaaaaa`
  2311. nd If
  2312.       
  2313. mmmmmmmm     ' get the Um
  2314. FormTitleInfoDisplay
  2315. FormTitleDisplay
  2316. Subject
  2317. TitleX
  2318. O=Lotus Notes
  2319. O=Lotus Notes
  2320. PURSAFO
  2321. |.:#U
  2322. O=Lotus Notes
  2323. CN=Lotus Notes Template Development/O=Lotus Notes
  2324. PURSAFO
  2325. Fde!f^^
  2326. Yg&B    z
  2327. Smf&6-&
  2328. $Info
  2329. $$Script_O
  2330. $$ScriptName
  2331. $Body
  2332. PURSAFO
  2333. &Arial
  2334. Response Form
  2335.   @  
  2336.  @@ @
  2337.  `@ `
  2338. @ @@ 
  2339. @@@@@
  2340. @`@@`
  2341. ` @` 
  2342. `@@`@
  2343. ``@``
  2344. mmmmmmmmm
  2345. FormTitleInfoDisplay
  2346. FormTitleDisplay
  2347. WorksheetTitle
  2348. WorksheetTitleDisplayX
  2349. O=Lotus Notes
  2350. O=Lotus Notes
  2351. PURSAFO
  2352. |.:#U
  2353. O=Lotus Notes
  2354. CN=Lotus Notes Template Development/O=Lotus Notes
  2355. PURSAFO
  2356. Fde!f^^
  2357. $Info
  2358. $$ScriptName
  2359. $Body
  2360. Times New Roman
  2361.     (Cieere esta ventana para ver la base de datos.)
  2362. Acerca de Consolidar copias
  2363. ?_?__
  2364. `!b`1
  2365. 7`^///?
  2366. ?b___
  2367. `bOOO
  2368. `<b!R
  2369. les son la funciones de esta base de datos?
  2370. La base de datos Consolidar copias permite distribuir hojas de un libro de 1-2-3 a los colaboradores para solicitar datos o modificaciones. Despu
  2371. s de que los colaboradores realicen los cambios, podr
  2372.  volver a consolidar estas hojas en el libro original. 
  2373.     Por ejemplo, suponga que utiliza 1-2-3 para controlar los gastos de un proyecto que involucra a varios departamentos. Puede crear un libro que contenga una hoja para cada departamento. Utilizando esta base de datos, puede distribuir cada hoja al personal de cada departamento. Ellos actualizar
  2374. n y agregar
  2375. n informaci
  2376. n y, a continuaci
  2377. n, podr
  2378.  consolidar los cambios en el libro original. 
  2379. n puede utilizar esta base de datos? 
  2380. Los miembros de un equipo que necesiten distribuir o contribuir en una hoja de c
  2381. lculo. 
  2382.     Control de acceso
  2383.     Muy importante:
  2384.      El nivel de acceso debe ser de Autor para todos los usuarios de esta base de datos. De est
  2385.  forma se evitar
  2386. n modificaciones no autorizadas en la base de datos y se asegurar
  2387.  su correcto funcionamiento. 
  2388. El acceso de tipo Autor permite a los usuarios crear documentos y editar documentos creados por ellos o asignados (distribuidos) a ellos, pero no editar documentos distribuidos a otros. De esta forma se evitan conflictos de replicaci
  2389. n debido a que los usuarios s
  2390. lo pueden editar los documentos que les han sido asignados. 
  2391.     Deber
  2392.  tener acceso de Gerente para crear o modificar la lista de control de acceso (ACL). Una vez creada una ACL, Vd. o el dise
  2393. ador podr
  2394. n definir con mayor precisi
  2395. n el acceso a vistas, formularios, secciones o campos concretos de una base de datos. 
  2396. O=Lotus Notes
  2397. O=Lotus Notes
  2398. PURSAFO
  2399. |.:#U
  2400. O=Lotus Notes
  2401. CN=Lotus Notes Template Development/O=Lotus Notes
  2402. PURSAFO
  2403. Fde!f^^
  2404. $Info
  2405. $Body
  2406. PURSAFO
  2407. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2408. CN=Cathy Pfeiler/O=TCGEMINI2CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2409. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2410. Navegador principal | Main Navigator
  2411. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2412. CN=Cathy Pfeiler/OU=CAM/O=LotusCN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2413. Mediante colaborador|View By Contributor
  2414. CN=Avril Jordan/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2415. Todos los documentos|View by Master Contributor
  2416. pMkK<
  2417. (Consolidaci
  2418. n interna)|(Internal Consolidate).
  2419. ColaboradorSecondary.
  2420. Documento con libro de 1-2-3Main.
  2421. (Consolidaci
  2422. n interna)|(Internal Consolidate).
  2423. ColaboradorSecondary.
  2424. Documento con libro de 1-2-3Main.
  2425. pMkK<
  2426. pMkK<
  2427. otus Notes Template Development/O=Lotus Notes
  2428. (Consolidaci
  2429. n interna)|(Internal Consolidate)
  2430. Mediante colaborador|View By Contributor
  2431. MensajeMemoMemo
  2432. Navegador principal | Main Navigator
  2433. Todos los documentosw By Contributor
  2434. Navegador principal | Main Navigator
  2435. Todos los documentos|Vie
  2436. (Consolidaci
  2437. n interna)|(Internal Consolidate)
  2438. Mediante colaborador|View By Contributor
  2439. (Consolidaci
  2440. n interna)|(Internal Consolidate)
  2441. Mediante colaborador|View By Contributor
  2442. (Consolidaci
  2443. n interna)|(Internal Consolidate)
  2444. Mediante colaborador|View By Contributor
  2445. (Consolidaci
  2446. n interna)|(Internal Consolidate)
  2447. Mediante colaborador|View By Contributor
  2448. (Consolidaci
  2449. n interna)|(Internal Consolidate)
  2450. Mediante colaborador|View By Contributor
  2451. Todos los documentos|View by Mx
  2452. Mediante colaborador|View By Contributor
  2453. Todos los documentos|View by Master Contributor
  2454. Mediante colaborador|View By Contributor
  2455. Todos los documentos|View by Master Contributor
  2456. Todos los documentos|View by Master Contributor
  2457. ColaboradorSecondary
  2458. Documento con libro de 1-2
  2459. Todos los documentos|View by Master Contributor
  2460. Documento con libro de 1-2-3Main
  2461. MensajeMemoMemo
  2462. Navegador principal | Main Navigator
  2463. orador|View By Contributor
  2464. w By Contributor
  2465. Main Navigator
  2466. Main Navigator
  2467. s documentosaborador|View By Contributor
  2468. ColaboradorSecondary
  2469. iew By Contributor
  2470. ColaboradorSecondary
  2471. CN=Cathy Pfeiler/O=T=d%
  2472. Mensaj/O=Lotus4
  2473. CN=Cathy Pfeiler/OU=CA
  2474. Navegal | Main Navigator.
  2475. Documento con libro de 1-2-3Main
  2476. Main N
  2477. $Modified
  2478.     1S2S3S
  2479. $TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$C1$
  2480.     0SL1S
  2481. $TITLE
  2482. CN=Avril Jordan/OU=DUB/O=Lotus
  2483. (ID principal)|ConsolidateButton
  2484. Por fecha|View By Date
  2485. Por estado|View By Status
  2486. Form Banner
  2487. CUA3    
  2488. History
  2489. Response Form
  2490. Navegador principal
  2491. TeamConsolidate
  2492. StdR4Mail
  2493.     0SL1S3724
  2494. $TITLE
  2495. CN=Avril Jordan/OU=DUB/O=Lotus
  2496.     0S0E
  2497. WorksheetTitle"
  2498. Title
  2499.     3S5S
  2500. SessionEditors
  2501. Contributor
  2502. SessionEditors
  2503.     3S4S24S
  2504. Temp_Status
  2505. Worksheetstatus
  2506. StatusX
  2507.     1S16S
  2508. Temp_Value
  2509. Temp_Status
  2510. Temp_Status
  2511. Temp_Status
  2512.     0R1S2S
  2513. Datos a
  2514. n no solicitados,Datos solicitados,Consolidado parcialmente,Consolidaci
  2515. n finalizada,En progreso,Preparado para consolidar,No consolidar,Datos solicitados,Consolidado en el maestro
  2516. Temp_Value
  2517. $21$28$26$30$10$Conflict$REF$C1$
  2518. P[Okp
  2519. Avril Jordan
  2520. Datos solicitados
  2521. Preparado para consolidar
  2522. Consolidaci
  2523. n finalizada
  2524. Consolidado en el maestro
  2525. Consolidado en el maestro
  2526. Hjgyu
  2527. Opi900    
  2528. Iouioiu
  2529. ge$ACLDigest$Signature$UpdatedBy$Fonts$$FormPostOpenAction$TypeIconExpireDateReplyDateComposedDate$Info$Flags$Script$$Script_O$$ScriptName$$FormScript$$$FormScript_OFromLogoSignEncryptDefaultMailSaveOptionsSendToCopyToBlindCopyToSubjectbody$Fields$Title$Body$WindowTitle$ACTIONSCreateTime$AUTOLAUNCHWORKBOOKTITLEFormTitleInfoDisplayRestrictedToCurrentAuthorDistributorForContributorsOnlyNotifyDistributorWorksheetTitleContributorEmbeddingDisplayAreaContributorEmbeddingResponse_RemarkParentTitleWorkbookNameSessionTimesSessionEditorsBookName$SCRIPTOBJ_6$SubForms$SCRIPTOBJ_10CreatedTime$ConflictAction$$Master$Master_OAuthorSourceNameTitleNameStatusMasterMain_Remarks$SCRIPTOBJ_7$SCRIPTOBJ_8$SCRIPTOBJ_9$Index$FormulaClass$Collation$Formula$ViewFormat$Collation1$Collation2$Class$ViewMapLayout$ViewMapDatasetIconBitmap$TemplateModTime$TemplateServerName$TemplateFileName$FlagsNoRefresh$DefaultNavigator$DesignVersion$Version$Collection$ViewContainerDontShowWarningMasterName$FILE$OLEOBJINFOForm$RevisionsCategoriesDocumentCommentsRevisionCommentsLastEditorSizeInPagesDocumentClassSizeInCharactersSizeInKDateLastRevisionDateNumberOfEditsEditingTimePageTitlesWORKSHEETSTATUS$REF$$XMB$Licensee$Comment
  2530. Jordan/OU=DUB/O=Lotus
  2531. *CN=Avril Jordan/OU=DUB/O=Lotus
  2532. Times New Roman
  2533. VersionOpt|
  2534.     6S7S9S14S
  2535. $VersionOpt
  2536.     0R1S2S3S
  2537. SavedOnce
  2538.     0R1S2S3S
  2539. PostedDate(
  2540.     0R1S2S3S
  2541. DeliveredDate
  2542.     0R1S2S3S
  2543. $AutoEditMode
  2544.     0R1S2S3S
  2545. MailSaveOptions
  2546.     0R1S2S3S
  2547. VersionOpt
  2548.     0R4S
  2549. Nuevo mensaje
  2550. Subject
  2551. Subject
  2552. Subject
  2553.     4S6S12S13S14S15S17S21S23S25S26S28S
  2554. '++LotusScript Development Environment:2:5:(Options):0:74
  2555. Option Public
  2556. %INCLUDE "lsconst.lss"
  2557. '++LotusScript Development Environment:2:5:(Forward):0:1
  2558. Declare Sub InstantiateObjectVariables(source)
  2559. Declare Sub SaveDialog(SavedDoc)
  2560. '++LotusScript Development Environment:2:5:(Declarations):0:10
  2561. Dim w As NotesUIWorkspace
  2562. Dim s As NotesSession
  2563. Dim db As NotesDatabase
  2564. Dim note As NotesDocument
  2565. Dim newnote As NotesDocument
  2566. Dim Action As Variant
  2567. Dim DoNotClose As Variant
  2568. Dim ContinueSave As Variant
  2569. Dim NewDocument As Variant
  2570. '++LotusScript Development Environment:2:2:InstantiateObjectVariables:1:8
  2571. Sub InstantiateObjectVariables(source)
  2572.      
  2573.      Set w = New NotesUIWorkspace
  2574.      Set s = New NotesSession
  2575.      Set db = s.CurrentDatabase
  2576.      Set note = source.document
  2577.      source.AutoReload = False
  2578.      
  2579. End Sub
  2580. '++LotusScript Development Environment:2:2:SaveDialog:1:8
  2581. Sub SaveDialog(SavedDoc)
  2582.      
  2583.      SavePrompt = Messagebox("
  2584. Desea guardar el documento " & SavedDoc & "?", MB_YESNOCANCEL, "Guardar " & SavedDoc) 
  2585.      Select Case SavePrompt
  2586.      Case IDCANCEL
  2587.           note.MailOptions = "0"
  2588.           DoNotClose = True
  2589.           ContinueSave = False
  2590.           Exit Sub
  2591.      Case IDNO
  2592.           note.SaveOptions = "0"
  2593.           Exit Sub
  2594.      Case IDYES
  2595.           note.SaveOptions = "1"
  2596.      End Select
  2597.      
  2598. End Sub
  2599. }H    Ih
  2600.  Memo'++LotusScript Development Environment:2:5:(Options):0:66
  2601. '++LotusScript Development Environment:2:5:(Forward):0:1
  2602. Declare Sub Postopen(Source As Notesuidocument)
  2603. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  2604. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  2605. Declare Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  2606. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2607. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2608. Private Sub BindEvents(Byval Objectname_ As String)
  2609.      Static Source As NOTESUIDOCUMENT
  2610.      Set Source = Bind(Objectname_)
  2611.      On Event Postopen From Source Call Postopen
  2612.      On Event Querysave From Source Call Querysave
  2613.      On Event Queryclose From Source Call Queryclose
  2614.      On Event Querymodechange From Source Call Querymodechange
  2615. End Sub
  2616. '++LotusScript Development Environment:2:2:Postopen:1:12
  2617. Sub Postopen(Source As Notesuidocument)
  2618.      
  2619.      If note Is Nothing Then Call InstantiateObjectVariables(source)
  2620.      
  2621.      If (note.HasItem("PostedDate") Or note.HasItem("DeliveredDate")) And source.EditMode = False Then
  2622.           Exit Sub  
  2623.      Else
  2624.           If source.InPreviewPane Then
  2625.                Exit Sub
  2626.           Else
  2627.                source.EditMode = True
  2628.           End If
  2629.      End If
  2630.      
  2631.      If source.IsNewDoc Then
  2632.           NewDocument = True
  2633.           EditType = s.GetEnvironmentValue("MailStEd")
  2634. 'EditType 1 = CreateStationery          
  2635.           If EditType = "1" Then
  2636.                note.tmpAction = "SaveAsStationery"
  2637.                note.IsMailStationery = 1
  2638.                Call s.SetEnvironmentVar("MailStEd", "0")
  2639.                note.MailOptions = "0"
  2640.                note.SaveOptions = "1"
  2641.                source.Reload
  2642.                source.RefreshHideFormulas
  2643.           Else
  2644.                'If note.HasItem("ForwardedFrom") Then Call note.ReplaceItemValue("$RefOptions", "1") 
  2645.           End If
  2646.      Else
  2647.           NewDocument = False
  2648.           If note.HasItem("IsMailStationery") Then
  2649.                EditType = s.GetEnvironmentValue("MailStEd")
  2650. 'EditType 2 = EditStationery
  2651.                If EditType = "2" Then 
  2652.                     Call s.SetEnvironmentVar("MailStEd", "0")
  2653.                     note.MailOptions = "0"
  2654.                     note.SaveOptions = "1"
  2655.                Else
  2656. 'Create a doc from Stationery
  2657.                     note.RemoveItem("IsMailStationery")
  2658.                     note.RemoveItem("MailStationeryName")
  2659.                     Call note.ReplaceItemValue("$VersionOpt", "6")              
  2660.                End If
  2661.           Else
  2662.                EditType = s.GetEnvironmentValue("MailStEd")
  2663. 'EditType 5 = EditNewCopy               
  2664.                If EditType = "5" Then 
  2665.                     Call note.ReplaceItemValue("$VersionOpt", "6")
  2666.                     note.tmpAction = "ConvertNewDoc"
  2667.                     Call s.SetEnvironmentVar("MailStEd", "0")
  2668.                     source.reload
  2669.                     source.save
  2670.                End If
  2671.           End If
  2672.           source.Reload
  2673.           source.RefreshHideFormulas
  2674.      End If 
  2675.      
  2676. End Sub
  2677. '++LotusScript Development Environment:2:2:Querysave:1:12
  2678. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  2679.      
  2680.      DoNotClose = False
  2681.      
  2682.      If note Is Nothing Then Call InstantiateObjectVariables(source)
  2683.      
  2684. 'Remove these because they are explicitly set in this event     
  2685.      note.RemoveItem("MailOptions")
  2686.      note.RemoveItem("SaveOptions")
  2687.      
  2688.      Action = note.tmpAction
  2689.      
  2690.      If note.HasItem("IsMailStationery") Then
  2691.           If Action(0) <> "RenameStationery" Then
  2692.                ContinueSave = True
  2693.                Call SaveDialog("Impreso")
  2694.                If ContinueSave = False Then
  2695.                     Continue = False
  2696.                     Exit Sub
  2697.                End If
  2698.           End If
  2699.      End If
  2700.      
  2701.      Select Case Action(0)
  2702.      Case "SaveAsStationery"
  2703.           sName = Inputbox$("
  2704. mo desea llamar a este impreso?", "Guardar como impreso", "-Sin t
  2705. tulo-")
  2706.           If sName = "" Then
  2707.                note.MailOptions = "0"
  2708.                note.RemoveItem("tmpAction")
  2709.                DoNotClose = True
  2710.                Continue = False
  2711.                Exit Sub
  2712.           End If
  2713.           If NewDocument Then
  2714.                note.IsMailStationery = 1
  2715.                note.MailStationeryName = sName
  2716.                note.MailOptions = "0"
  2717.                note.SaveOptions = "1"
  2718.           Else
  2719.                note.SaveOptions = "0"
  2720.                Set newnote = New NotesDocument(db)
  2721.                Call note.CopyAllItems(newnote)
  2722.                ItemList = newnote.Items
  2723.                Forall i In ItemList
  2724.                     If Lcase(Left(i.Name, 3)) = "tmp" Then i.Remove
  2725.                End Forall
  2726.                newnote.IsMailStationery = 1
  2727.                newnote.MailStationeryName = sName              
  2728.                newnote.Form = "Memo"
  2729.                newnote.RemoveItem("PostedDate")
  2730.                newnote.RemoveItem("DeliveredDate")
  2731.                newnote.Save True, True
  2732.                w.ViewRefresh
  2733.           End If
  2734.           Messagebox "Este mensaje se ha guardado como un impreso en su carpeta Borradores. Se crear
  2735.  un nuevo mensaje cada vez que abra este impreso.", 0, "Guardar como impreso"
  2736.      Case "RenameStationery"
  2737.           MailStationeryName = note.MailStationeryName
  2738.           sName = Inputbox$("
  2739. mo desea llamar a este impreso?", "Guardar como impreso", MailStationeryName(0))
  2740.           If sName = "" Then
  2741.                note.MailOptions = "0"
  2742.                note.RemoveItem("tmpAction")
  2743.                DoNotClose = True
  2744.                Continue = False
  2745.                Exit Sub
  2746.           End If
  2747.           note.MailStationeryName = sName
  2748.           note.MailOptions = "0"
  2749.           note.SaveOptions = "1"
  2750.      Case "SaveAsDraft", "SaveAndFile", "SendAndFile", "ConvertNewDoc"
  2751.           note.MailOptions = "0"
  2752.           note.SaveOptions = "1"
  2753.      Case "Send"
  2754.           note.MailOptions = "0"
  2755.           note.SaveOptions = "0"
  2756.      Case "Mailing"
  2757. 'We do not want to do anything if mailing is in process (like from the Send button)
  2758.      Case "ConvertToTask"
  2759.           note.RemoveItem("DeliveredDate")
  2760.           note.RemoveItem("PostedDate")
  2761.           note.SendTo = ""
  2762.           note.CopyTo = ""
  2763.           note.SaveOptions ="1"
  2764.           note.MailOptions = "0"
  2765.           note.Form = "Task"
  2766.           note.AssignState = 0
  2767.           note.ExcludeFromView = "D"
  2768.           Call note.ReplaceItemValue("_ViewIcon", 168)
  2769.      Case Else
  2770. 'If this is a message that was not written by you we do not present the mail dialog          
  2771.           If note.From(0) <> s.UserName Then
  2772.                note.MailOptions = "0"
  2773.                note.SaveOptions = "1"
  2774.                ContinueSave = True
  2775.                Call SaveDialog("Document")
  2776.                If ContinueSave = False Then
  2777.                     Continue = False
  2778.                     Exit Sub
  2779.                End If
  2780.           End If
  2781.      End Select         
  2782.      
  2783.      
  2784.      note.RemoveItem("tmpAction")
  2785.      If note.HasItem("$VersionOpt") Then Call note.ReplaceItemValue("$VersionOpt", "0")
  2786.      
  2787.      source.Reload
  2788.      
  2789. End Sub
  2790. '++LotusScript Development Environment:2:2:Queryclose:1:12
  2791. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  2792.      
  2793.      If DoNotClose Then
  2794.           DoNotClose = False
  2795.           Continue = False
  2796.      End If
  2797.      
  2798. End Sub
  2799. '++LotusScript Development Environment:2:2:Querymodechange:1:12
  2800. Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  2801.      
  2802.      
  2803. End Sub
  2804.     Always Hidden: 
  2805. FromPersona que env
  2806. a el mensaje.
  2807. DefaultLogo
  2808. StdNotesLtrGateway
  2809.     4S9S13S16S18SLogoPerson memo is from.
  2810.     0S0E
  2811.     0S0E
  2812. Encrypt
  2813. MailSaveOptions
  2814.     1S2S3S
  2815. MailSaveOptions
  2816. DefaultMailSaveOptions
  2817.     Remitente:    
  2818. FromDomain
  2819. FromDomain
  2820. FromDomain
  2821. FromDomain
  2822.     7S10S18S19S23S25S28S29S31S33S34S35S41S44S48S51S57S
  2823. FromName
  2824.     0RR1S2S6S
  2825. FromStops
  2826.     0R1S2S6S
  2827. FromName
  2828. FromStops
  2829. FromStops
  2830. FromStops
  2831.     0RR1S2S3S4S10S13S17S20StmpDisplayFrom_Preview
  2832.      con fecha 8
  2833. PostedDateh
  2834. PostedDate
  2835.     7S9S
  2836. tmpDisplayDate_PreviewFecha y hora en que se cre
  2837.  o envi
  2838.  el mensaje.
  2839. StdNotesLtr0
  2840. StdNotesLtr16
  2841.     3S4S6S8S9S10S12S14S
  2842. tmpDate
  2843.     4S5S6S8S
  2844.     Remitente:    
  2845. FromDomain
  2846. FromDomain
  2847. FromDomain
  2848. FromDomain
  2849.     7S10S18S19S23S25S28S29S31S33S34S35S41S44S48S51S57S
  2850. FromName
  2851.     0RR1S2S6S
  2852. FromStops
  2853.     0R1S2S6S
  2854. FromName
  2855. FromStops
  2856. FromStops
  2857. FromStops
  2858.     0RR1S2S3S4S10S13S17S20StmpDisplayFrom_NoLogow
  2859.      con fecha m
  2860. PostedDateh
  2861. PostedDate
  2862.     7S9S
  2863. tmpDisplayDate_NoLogoFecha y hora en que se cre
  2864.  o envi
  2865.  el mensaje.
  2866. ReplyDate
  2867. ReplyTo
  2868.     1S2S3S4S5S6S
  2869. Por favor, responda
  2870. ReplyTo
  2871. ReplyTo
  2872. ReplyDate
  2873.  antes del 
  2874. ReplyDate
  2875.     1S2S5S6S8S10S11S12S14S15S18S19S21S23S24S25StmpDisplayReplyInfoS
  2876. Destinatarios: 
  2877. SendTo
  2878. CopyTo
  2879.   CC:  
  2880. CopyTo
  2881.     1S2S8S13S14S2E17S18S21S22S28S31S
  2882.     Destinatarios:    
  2883. SendTo}
  2884.     0S0E
  2885. SendToLista de personas a las que se va a enviar el mensaje.
  2886.     CC:    
  2887. CopyTo}
  2888.     0S0E
  2889. CopyToLista de personas a las que se va a enviar una copia del mensaje.
  2890. DeliveredDate
  2891. BlindCopyTo
  2892. (CCI: 
  2893. BlindCopyTo
  2894.     3S4S5S6S7S8S10S11S12S16S18S19S21StmpDisplayBlindCopyTo
  2895.     CCI:    
  2896. BlindCopyTo
  2897.     0S0E
  2898. BlindCopyToLista de personas a las que se va a enviar una copia invisible del mensaje.
  2899.     Asunto:    
  2900. PhoneCaller
  2901. LLamada de tel
  2902. fono: 
  2903. PhoneCaller
  2904. Subject
  2905.     7S8S9S11SSubjectMotivo del mensaje.
  2906. PostedDate
  2907. SenderTag
  2908. Moods
  2909.     3S4S5S6S8S9S10S11S14S16S
  2910.     $CONTENT(BEGIN)j
  2911.     $CONTENT(END)
  2912. Editar documento
  2913. Remitir
  2914.     0S0E
  2915. Nuevo
  2916.     0S0E
  2917. Eliminar 
  2918.     0S0E
  2919. _Mover a una carpeta...
  2920. Info. sobre la entrega...
  2921. DeliveryInfo
  2922. Info. sobre la entrega
  2923.     4S5S6S7S8S9S10S12S
  2924. _Remitir
  2925. Responder
  2926. Reply
  2927.     0S0E
  2928. Responder con historia
  2929. Responder con historia
  2930. Este documento est
  2931.  truncado.
  2932.     4S8S10S13S
  2933. Reply with history
  2934. Direcci
  2935. n... 
  2936.     0S0E
  2937. PostedDateh
  2938.     5S6S7S8S
  2939. Cerrar 
  2940.     0S0E
  2941. IsMailStationeryh
  2942. PostedDateh
  2943.     6S7S
  2944. Guardar como borrador
  2945. tmpAction
  2946. SaveAsDraft
  2947.     1S2S3S
  2948. IsMailStationeryh
  2949. PostedDateh
  2950.     4S5S
  2951. Guardar y archivar
  2952.     7S9S
  2953. tmpAction
  2954. SaveAndFile
  2955.     0R1S2S3S
  2956. IsMailStationeryh
  2957. PostedDateY
  2958. PostedDateh
  2959.     4S5S9S10S16S17S18S19S
  2960. Enviar
  2961. PromptValue
  2962. DefaultMailSaveOptions
  2963. Guardar al enviar
  2964. Desea guardar una copia de este mensaje?
  2965. DefaultMailSaveOptions
  2966.     1S2S5S6S8S14S17S
  2967. SaveOptions
  2968. PromptValue
  2969. SaveOptions
  2970. PromptValue
  2971.     0R1S2S5S6S9S14S
  2972. tmpAction
  2973. DefaultMailSaveOptions
  2974. Mailing
  2975.     0RR1S2S3S6S7S9S11S
  2976.     0RR7S9S
  2977. tmpAction
  2978. SaveOptions
  2979. SendAndFile
  2980.     0RR1S2S3S6S7S9S11S
  2981.     0R7S9S
  2982. PostedDateh
  2983. IsMailStationeryh
  2984.     5S6S7S8S10S11S
  2985. Enviar y archivar...V
  2986.     4S11S13S19S
  2987.     0RR7S9S
  2988.     0RR7S9S
  2989. tmpAction
  2990. SendAndFile
  2991.     0RR1S2S3S
  2992.     0R7S9S
  2993. PostedDateh
  2994. IsMailStationeryh
  2995.     5S6S7S8S10S11S
  2996. Opciones de entrega...
  2997. DeliveryOptions
  2998. Opciones de entrega
  2999.     4S8S
  3000. _ViewIcon
  3001. SenderTag
  3002. SenderTag
  3003. SenderTag
  3004. SenderTag
  3005. SenderTag
  3006. SenderTag
  3007. SenderTag
  3008. SenderTag
  3009. SenderTag
  3010. SenderTag
  3011. SenderTag
  3012.     0RR1S2S3S5RS3E6S7S8S9S11S13RS3E14S15S17S19RS3E20S21S23S25RS3E26S27S29S31RS3E32S33S35S37RS3E38S39S41S43RS3E44S45S47S49RS3E50S51S53S55RS3E56S57S59S61RS3E62S63S65S67RS3E68S69S71S73RS3E8
  3013. PostedDateh
  3014.     5S6S7S8S
  3015. Opciones especiales...H
  3016. ReplyDate
  3017. ReplyDate
  3018.     1S2S3S
  3019. ReplyTo
  3020. ReplyTo
  3021.     0R1S2S3S
  3022. (Advanced Options)
  3023. Opciones especiales
  3024.     0R6S10S13S15S
  3025. tmpDisplayReplyInfo
  3026. Por favor, responda
  3027. ReplyTo
  3028. ReplyTo
  3029. ReplyDate
  3030.  antes del 
  3031. ReplyDate
  3032.     0R1S2S3S4S5S8S9S11S13S14S15S17S18S21S22S24S26S27S28S
  3033. DueDateTime
  3034. ReplyDate
  3035. ReplyDate
  3036.     0R1S2S3S6S7S9S11S
  3037. PostedDateh
  3038.     5S6S7S8S
  3039. Guardar como impreso..."n
  3040. tmpAction
  3041. SaveAsStationery
  3042.     1S2S3S
  3043. IsMailStationeryh
  3044.     0S0E
  3045. Convertir en tarea
  3046. ReplyDate
  3047. Imposible convertir en tarea
  3048. No puede convertirse este mensaje en una tarea porque ya tiene asociada una fecha l
  3049. mite.
  3050.     3S4S6S12S18S
  3051. tmpAction
  3052. ConvertNewDoc
  3053. Unavailable
  3054.     0R1S2S3S7S9S
  3055.     0R4S9S13S
  3056.     0R4S
  3057. _Extraer de una carpeta...
  3058. _Categor
  3059. EEnviarQ
  3060. O=Lotus Notes
  3061. O=Lotus Notes
  3062. PURSAFO
  3063. |.:#U
  3064. O=Lotus Notes
  3065. CN=Lotus Notes Template Development/O=Lotus Notes
  3066. PURSAFO
  3067. Fde!f^^
  3068. $Title
  3069. $Info
  3070. $WindowTitle
  3071. $Body
  3072. $ACTIONS
  3073. EmbeddingDisplayArea
  3074. WorkbookTitle
  3075. NoCache
  3076. (Consolidaci
  3077. n interna)
  3078. $RefV
  3079.  - Hoja "
  3080. WorksheetTitle"
  3081.     24S25S26S
  3082. &Arial
  3083. '++LotusScript Development Environment:2:5:(Options):0:66
  3084. Option Public
  3085. '++LotusScript Development Environment:2:5:(Forward):0:1
  3086. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3087. ' UI entry point
  3088. ' * * *  ---> Note to translators: need to change UIDLL_NAME to match the dll name for each country
  3089. Const  UIDLL_NAME =   "tcui10es.dll"
  3090. ' get  is the status of the contribution
  3091. Declare Public Function GetCollectionStatus  Lib UIDLL_NAME  Alias "GetCollectionStatus"  (Byval hInst As Long, pCollectionStatus  As Long) As Long
  3092. '-- * * *  strings to translate * * * 
  3093. Const MSG_OPENING_123 =  "Abriendo objeto de 1-2-3"
  3094. Const MSG_LOTUS_TITLE  = "Lotus 1-2-3 97"
  3095. ' for composing email to Originator
  3096. Const MSG_SHEET = "Hoja"
  3097. Const MSG_READYTOCONS = "marcado como Listo para consolidar"
  3098. Const MSG_BLANK = " "
  3099. Const MSG_IN = "en"
  3100. Const MSG_MARKED = "ha sido marcado como Listo para consolidaci
  3101. ' user sees this when clicking on doclink
  3102. Const DOCLINK_TEXT =         "Siga este v
  3103. nculo para acceder a la hoja.   "                        
  3104. Const MSG_FYI  = "FYI:  "
  3105. Const MSG_NO_EMAIL =  " no se puede notificar mediante correo electr
  3106. nico en este momento."
  3107. ' -- * * * end strings to translate * * * 
  3108. ' Form names
  3109. Const MEMO_FORM = "Memo"
  3110. ' these values match the values defined in Main/Globals (the master document). They should not be changed
  3111. Const STATUS_IN_PROGRESS = "1"
  3112. Const STATUS_READY_CONS = "2"
  3113. Const STATUS_DONT_CONS = "3"
  3114. Const STATUS_DATA_REQUESTED = "101"
  3115.  Secondary'++LotusScript Development Environment:2:5:(Options):0:66
  3116. '++LotusScript Development Environment:2:5:(Forward):0:1
  3117. Declare Sub Terminate
  3118. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  3119. Declare Sub Initialize
  3120. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  3121. Declare Sub Postopen(Source As Notesuidocument)
  3122. Declare Function GetSheetStatus As Long
  3123. Declare Sub SendMailToDistributor
  3124. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3125. Dim DocWasSaved As Integer
  3126. Dim UIDoc As NotesUIDocument
  3127. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3128. Private Sub BindEvents(Byval Objectname_ As String)
  3129.      Static Source As NOTESUIDOCUMENT
  3130.      Set Source = Bind(Objectname_)
  3131.      On Event Queryclose From Source Call Queryclose
  3132.      On Event Querysave From Source Call Querysave
  3133.      On Event Postopen From Source Call Postopen
  3134. End Sub
  3135. '++LotusScript Development Environment:2:2:Terminate:1:10
  3136. Sub Terminate
  3137.      
  3138.      Dim workSpace As New NotesUIWorkspace
  3139.      Dim thisDoc As Notesdocument
  3140.      
  3141.      
  3142.      ' if the document was saved, then put up a status dialog
  3143.      If DocWasSaved Then
  3144.           
  3145.           Set thisDoc = UIDoc.Document
  3146.           
  3147.           ' get sheet status from user
  3148.           Dim status As Long
  3149.           status = GetSheetStatus
  3150.           
  3151.           ' should we notify the distributor if the sheet is complete
  3152.           If thisDoc.NotifyDistributor(0) = 1 Then
  3153.                If Cstr(status) = STATUS_READY_CONS Then
  3154.                     SendMailToDistributor   
  3155.                End If
  3156.                
  3157.           End If
  3158.           
  3159.           ' re-save the document
  3160.           thisDoc.Save True, True
  3161.           
  3162.           'update the view
  3163.           workSpace.ViewRefresh
  3164.           
  3165.      End If
  3166.      
  3167. End Sub
  3168. '++LotusScript Development Environment:2:2:Queryclose:1:12
  3169. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  3170.      
  3171. End Sub
  3172. '++LotusScript Development Environment:2:2:Initialize:1:10
  3173. Sub Initialize
  3174.      
  3175. End Sub
  3176. '++LotusScript Development Environment:2:2:Querysave:1:12
  3177. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  3178.      
  3179.      DocWasSaved = True
  3180.      Set UIDoc = Source
  3181.      
  3182. End Sub
  3183. '++LotusScript Development Environment:2:2:Postopen:1:12
  3184. Sub Postopen(Source As Notesuidocument)
  3185.      
  3186.      ' inform the user (in the status window) that we are opening the 1-2-3 embedding 
  3187.      Print MSG_OPENING_123 
  3188.      
  3189. End Sub
  3190. '++LotusScript Development Environment:2:1:GetSheetStatus:1:8
  3191. Function GetSheetStatus As Long
  3192.      
  3193.      Dim hInst As Long
  3194.      Dim thisDoc As NotesDocument
  3195.      Dim status As Long
  3196.      
  3197.      ' get handle to LotusScript instance
  3198.      hInst = Lsi_info(4)
  3199.      
  3200.      Set thisDoc = UIDoc.Document
  3201.      
  3202.      ' get the existing status, convert it from a string
  3203.      status = Clng(thisDoc.WorkSheetStatus(0))
  3204.      
  3205.      ' if the status is "data requested" then default the dialog to "in progress"
  3206.      If status = Clng(STATUS_DATA_REQUESTED) Then
  3207.           status = Clng(STATUS_IN_PROGRESS)
  3208.      End If
  3209.      
  3210.      ' put up the UI to get the status, the dialog will default to the status passed in
  3211.      GetCollectionStatus hInst, status
  3212.      
  3213.      ' add the status back into the document
  3214.      thisDoc.WorkSheetStatus = Cstr(status)
  3215.      
  3216.      GetSheetStatus = status
  3217.      
  3218. End Function
  3219. '++LotusScript Development Environment:2:2:SendMailToDistributor:1:8
  3220. Sub SendMailToDistributor
  3221.      
  3222.      On Error Goto handler
  3223.      
  3224.      
  3225.      Dim thisDoc As NotesDocument
  3226.      Set thisDoc = UIDoc.Document
  3227.      
  3228.      Dim mailDoc As NotesDocument
  3229.      Set mailDoc = New NotesDocument(thisDoc.ParentDatabase)
  3230.      
  3231.      mailDoc.Form = MEMO_FORM 
  3232.      
  3233.      Set RTItem = New NotesRichTextItem( mailDoc, "Body" )
  3234.      
  3235.      Dim subjectString As String
  3236.      Dim titleString As String
  3237.      
  3238.      '!!! - eabtodo -  make this more efficient by using copyitem calls instead of . notation
  3239.      titleString = thisDoc.WorksheetTitle(0)
  3240.      
  3241.      '  subject = Sheet thisDoc.WorksheetTiltle marked Ready to consolidate"
  3242.      ' subjectString = MSG_SHEET + MSG_BLANK + titleString + MSG_BLANK + MSG_READYTOCONS
  3243.      
  3244.      mailDoc.Subject = MSG_SHEET + MSG_BLANK + titleString + MSG_BLANK + MSG_READYTOCONS
  3245.      mailDoc.SendTo = thisDoc.Distributor(0)
  3246.      
  3247.      Dim linkMessage As String
  3248.      linkMessage = thisDoc.Main_Title(0) + "." + titleString
  3249.      
  3250.      RTItem.AppendText MSG_SHEET + MSG_BLANK + titleString + MSG_BLANK + MSG_IN + MSG_BLANK + _
  3251.      thisDoc.Main_Title(0) + MSG_BLANK + MSG_MARKED
  3252.      
  3253.      RTItem.AddNewLine 2
  3254.      RTItem.AppendText DOCLINK_TEXT 
  3255.      RTItem.AppendDocLink thisDoc, linkMessage      
  3256.      
  3257.      On Error Goto SendError
  3258.      Call mailDoc.Send (False)
  3259.      
  3260.      Goto Done
  3261.      
  3262. handler:
  3263.      Msgbox MSG_ERROR  & Error$    
  3264.      'Resume Next
  3265.      Exit Sub
  3266.      
  3267. SendError:
  3268.      Messagebox MSG_FYI & thisDoc.Distributor(0) & MSG_NO_EMAIL, MB_OK + MB_ICONINFORMATION, MSG_LOTUS_TITLE
  3269.      Exit Sub
  3270.      
  3271. Done:
  3272.      
  3273. End Sub
  3274. }t    Kp
  3275. Hidden
  3276. WorkbookTitle
  3277. WorkbookTitle
  3278. WorkbookTitle
  3279. NoCache
  3280. (Consolidaci
  3281. n interna)
  3282. $RefV
  3283.     0S0E
  3284. FormTitleInfoDisplay
  3285. RestrictedTo
  3286.     0S0E
  3287. RestrictedToMuestra opcionalmente la relaci
  3288. n de usuarios con acceso de lectura al documento.
  3289. CurrentAuthor
  3290. CurrentAuthorMostrar relaci
  3291. n de usuarios que pueden editar el documento
  3292. Distributor
  3293.     0S0E
  3294. DistributorOriginador de la distribuci
  3295. ForContributorsOnly
  3296.     0S0E
  3297. ForContributorsOnlyDocumento restringido 
  3298. nicamente a los colaboradores
  3299. NotifyDistributor
  3300.     0S0E
  3301. NotifyDistributorNotificar al distribuidor el momento de finalizaci
  3302. n del trabajo en esta hoja
  3303. WorksheetTitle
  3304. WorksheetTitle
  3305. Response Form
  3306.   @  
  3307.  @@ @
  3308.  `@ `
  3309. @ @@ 
  3310. @@@@@
  3311. @`@@`
  3312. ` @` 
  3313. `@@`@
  3314. ``@``
  3315. WorksheetTitle
  3316. stributorOri
  3317. FormTitleInfoDisplay
  3318. FormTitleDisplay
  3319. WorksheetTitle
  3320. WorksheetTitleDisplay
  3321. Asignado a:
  3322. Contributor
  3323.     0S0E
  3324. Contributor
  3325. CreateDate
  3326. a las
  3327. CreateTime
  3328. Estado de la hoja:
  3329. WorkSheetStatus
  3330.     4S6S
  3331. WorkSheetStatus
  3332. En progreso | 1Preparado para consolidar | 2No consolidar | 3Datos solicitados | 101Consolidaci
  3333. n cancelada | 102
  3334. Hoja de trabajo del colaborador
  3335.       
  3336. EmbeddingDisplayArea
  3337.       
  3338. ContributorEmbedding
  3339. Comentarios
  3340. Response_Remark
  3341. Informaci
  3342. n del libro
  3343. tulo:
  3344. FormTitleInfoDisplay
  3345. ParentTitle
  3346. Origen del libro:
  3347.               
  3348. WorkBookNameh
  3349. WorkBookName
  3350. SourceName
  3351.     0S0E
  3352. WorkBookName
  3353. Estado del libro :
  3354. NoCache
  3355. (Consolidaci
  3356. n interna)
  3357. $RefV
  3358.     0S0E
  3359. WorkBookStatus
  3360. History
  3361. Historia de la hoja
  3362. Historia del libro
  3363.     0S0E
  3364.  History
  3365. Hidden Always
  3366. SessionTimes
  3367. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  3368. SessionEditors
  3369. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  3370. Archivo de origen del libro:       
  3371. SourceName
  3372. BookName
  3373. Created by 
  3374. Editado por 
  3375. SessionEditorsj
  3376. SessionEditors
  3377.  on "
  3378. SessionTimesT
  3379. Domingo
  3380. Lunes
  3381. Martes
  3382. rcoles
  3383. Jueves
  3384. Viernes
  3385. SessionTimesP
  3386. SessionTimesO
  3387. Enero
  3388. Febrero
  3389. March
  3390. Abril
  3391. Junio
  3392. Julio
  3393. Agosto
  3394. Septiembre
  3395. Octubre
  3396. Noviembre
  3397. Diciembre
  3398. SessionTimesN
  3399.  a las 
  3400. SessionTimes
  3401.     20S21R62R69S70S71S72R105S106S130S131S132S133RR140S141R142S143S
  3402. CommentHistory
  3403. * * * FIN DEL DOCUMENTO * * *
  3404. _Categor
  3405. Editar documento
  3406. Enviar
  3407. _Remitir
  3408. _Mover a una carpeta...    
  3409. _Extraer de una carpeta...
  3410. '++LotusScript Development Environment:2:5:(Options):0:66
  3411. '++LotusScript Development Environment:2:5:(Forward):0:1
  3412. Declare Sub Click(Source As Button)
  3413. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3414. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3415. Private Sub BindEvents(Byval Objectname_ As String)
  3416.      Static Source As BUTTON
  3417.      Set Source = Bind(Objectname_)
  3418.      On Event Click From Source Call Click
  3419. End Sub
  3420. '++LotusScript Development Environment:2:2:Click:1:12
  3421. Sub Click(Source As Button)
  3422.      
  3423.      Dim workSpace As New NotesUIWorkspace
  3424.      Dim UIDoc As NotesUIDocument
  3425.      
  3426.      Set UIDoc = workSpace.CurrentDocument
  3427.      
  3428.      ' close the document, Notes will prompt for whether to save or not
  3429.      UIDoc.Close
  3430.      
  3431. End Sub
  3432. O=Lotus Notes
  3433. O=Lotus Notes
  3434. PURSAFO
  3435. |.:#U
  3436. O=Lotus Notes
  3437. CN=Lotus Notes Template Development/O=Lotus Notes
  3438. PURSAFO
  3439. Fde!f^^
  3440. $Title
  3441. $AUTOLAUNCH
  3442. $Info
  3443. $WindowTitle
  3444. $Script
  3445. $$Script_O
  3446. $$ScriptName
  3447. $$FormScript
  3448. $$$FormScript_O
  3449. $Body
  3450. $ACTIONS
  3451. $SCRIPTOBJ_6
  3452. Nuevo libro por  
  3453. Title
  3454.  por 
  3455.  con 
  3456.  (Sin respuesta)
  3457.  (1 Respuesta)
  3458.  (% Respuestas)
  3459.     4S5S6S10S14S15S17S21S23S24S25S26S30S32S
  3460. &Arial
  3461. '++LotusScript Development Environment:2:5:(Options):0:74
  3462. Option Public
  3463. '++LotusScript Development Environment:2:5:(Forward):0:1
  3464. Declare Public Type Assignment
  3465. Declare Public Type Request
  3466. Declare Function DoRequestAction ()
  3467. Declare Sub Distribute (hWorkBook As Variant, assign As Assignment, requestInfo As Request, parentDB As NotesDatabase, thisDoc As NotesDocument)
  3468. Declare Sub SendMailWithDocLink (parentDoc As NotesDocument, linkDoc As NotesDocument, assigned As Assignment, requestInfo As Request)
  3469. Declare Public Function StringConvert(Byval InitialString As String, ConvertType As Integer) As Variant
  3470. Declare Function ActivateMaster(thisUIDoc As NotesUIDocument) As Variant
  3471. Declare Function GetMasterEmbeddedObject (thisDoc As NotesDocument) As NotesEmbeddedObject
  3472. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3473. ' UI entry points    
  3474. ' * * * --> Note to translators: need to change UIDLL_NAME to match the dll name for each country
  3475. Const  UIDLL_NAME =   "tcui10es.dll"
  3476. ' collect which kind of documents?
  3477. Declare Public Function GetConsolidateInfo Lib UIDLL_NAME  Alias "GetConsolidateInfo"  (Byval hInst As Long, pbCompleteOnly As Long, pbDeleteContributions As Long) As Long
  3478. ' share now or later
  3479. Declare Public Function ShareDocument Lib UIDLL_NAME  Alias "ShareDocument" (Byval hInst As Long) As Long
  3480. ' get  is the status of the contribution
  3481. Declare Public Function GetCollectionStatus  Lib UIDLL_NAME  Alias "GetCollectionStatus"  (Byval hInst As Long, pCollectionStatus  As Long) As Long
  3482. ' which spreadsheet to use, existing or new
  3483. Declare Public Function BrowseForSpreadSheet  Lib UIDLL_NAME  Alias "BrowseForSpreadSheet"  (Byval hInst As Long, pFilename As String,  _
  3484. pNewOrExsisting As Long,  pTitle As String ) As Long
  3485. ' assign worksheets to users
  3486. Declare Public Function AssignWorkSheet   Lib UIDLL_NAME  Alias "AssignWorkSheet"  _ 
  3487. (Byval hInst As Long, pSheetList As Any, pAssignmentList As Any, pNotifyAssigned As Long, pAccessFlag As Long, pMailMessage As String, pNotifyDistrib As Long ) As Long
  3488. ' distributed workbook warning
  3489. Declare Public Function DistributeWarning   Lib UIDLL_NAME  Alias "DistributeWarning"  (Byval hInst As Long, pShowAgain As Long) As Long
  3490. ' -- constants
  3491. ' * * * these constant values should not be changed * * * 
  3492. Const EXISTING_FILE = 1
  3493. Const NEW_FILE = 2
  3494. Const DISTRIBUTE_NOW = 1
  3495. Const DISTRIBUTE_LATER = 2
  3496. Const CANCEL = 0
  3497. Const SUCCESS = 1
  3498. Const FAILURE = 2
  3499. Const STATUS_IN_PROGRESS = "1"
  3500. Const STATUS_READY_CONS = "2"
  3501. Const STATUS_DONT_CONS = "3"
  3502. Const STATUS_DATA_REQUESTED = "101"
  3503. Const STATUS_CONS_IN_MASTER = "102"
  3504. Const NOTIFICATION_PENDING =  "1"
  3505. Const CONTRIBUTOR_NOTIFIED =  "2"
  3506. Const UPDATE_IN_PROGRESS =  "1"
  3507. Const UPDATE_COMPLETE = "4"
  3508. Const IGNORE = "5"
  3509. Const CONSOLIDATED_INTO_MASTER = "6"
  3510. Const NOT_YET_DISTRIBUTED =  "1"
  3511. Const MASTER_DISTRIBUTED = "2"
  3512. Const PARTIALLY_CONSOLIDATED = "3"
  3513. Const CONSOLIDATION_COMPLETE =  "4"
  3514. Const CONVERT_TO_ARRAY = 1
  3515. Const CONVERT_TO_TEXTLIST = 2
  3516. ' -- error codes
  3517. Const WORKBOOK_PASSWORDED      =  257                       ' 0x101
  3518. Const COLLECT_PAGE_NOT_FOUND   =  258                       ' 0x102
  3519. ' -- Strings
  3520. ' -- Form names 
  3521. Const CONTRIBUTOR_FORM = "Secondary"
  3522. Const CONTRIBUTOR_FORM_ALIAS = "Colaborador"
  3523. Const MASTER_FORM = "Main"
  3524. Const MEMO_FORM = "Memo"
  3525. ' -- View names
  3526. Const CONSOLIDATE_VIEW = "(Internal Consolidate)"
  3527. ' -- * * * Strings to be translated * * *
  3528. Const MAIL_SUBJECT = "Se le ha asignado una hoja --> "                               ' header for the subject of the mail with doc link
  3529. Const DOCLINK_TEXT = "Siga este v
  3530. nculo para acceder a su hoja asignada.   "                        ' user sees this when clicking on doclink
  3531. Const MSG_ERROR = "Error: "
  3532. Const MSG_LOTUS_TITLE          =              "Lotus 1-2-3 97"
  3533. Const MSG_SHARING_WORKBOOK = "Compartici
  3534. n de libro de 1-2-3"
  3535. Const MSG_REQUEST_COMPLETE =        "1-2-3 ha distribuido las hojas."
  3536. Const MSG_DISTRIB_PASSWORDED =    "No es posible distribuir hojas desde un libro maestro protegido mediante contrase
  3537. Const MSG_EDIT_PASSWORDED       =    " Esta hoja distribuida no se pude editar debido a que su libro maestro est
  3538.  protegido mediante contrase
  3539. Const MSG_DISTRIBUTING_SHEET    = "Distribuci
  3540. n de hoja " 
  3541. Const MSG_FYI  = "FYI:  "
  3542. Const MSG_NO_EMAIL =  " no se puede notificar mediante correo electr
  3543. nico en este momento."
  3544. ' consolidate complete message.  Used in Consolidate/Click
  3545. Const  MSG_CONSOLIDATE =  |Consolidaci
  3546. n finalizada.|
  3547. Const MSG_DBLCLICK = |Haga doble clic en el libro incrustado para ver los resultados.|
  3548. Const MSG_REPLICATION_CONFLICT = "No se puede realizar la consolidaci
  3549. n mientras existan documentos con conflictos de replicaci
  3550. Const MSG_CONSOLIDATE_ERROR = "Error encontrado durante la consolidaci
  3551. Const MSG_CONSOLIDATING_SHEET = "Consolidaci
  3552. n de hoja "
  3553. Const MSG_CONSOLIDATE_VIEW_NOT_FOUND = "No se puede completar la consolidaci
  3554. n: vista ""Consolidaci
  3555. n interna"" no encontrada."
  3556. Const MSG_CONSOLIDATE_IDS_NOT_FOUND = "No se puede completar la consolidaci
  3557. n: error interno, los ID de Notes no coinciden en la vista."
  3558. Const MSG_CANNOT_OPEN_WRKBOOK = "No se ha podido activar el libro de 1-2-3. Cierre el documento de Notes, vuelva e int
  3559. ntelo de nuevo."
  3560. ' -- * * * End Strings to be translated * * *
  3561. ' --- Data structures
  3562. Public Type Assignment
  3563.      sheetName   As String    ' name of sheet
  3564.      assignedTo  As String     ' names of user(s) 
  3565.      sheetObject As Long  ' handle to 1-2-3 sheet
  3566. End Type 
  3567. Public Type Request
  3568.      sendMail  As Long        ' send email?
  3569.      closedACL As Long      ' acl set to contributor or everyone
  3570.      message   As String       ' message to include in email
  3571.      notifyDistrib As Long      ' notify distributor on completion?
  3572. End Type
  3573. ' -- Global variables
  3574. Dim DB As NotesDatabase
  3575. Dim UIDoc As NotesUIDocument
  3576. Dim hInst As Long
  3577. Dim hWorkBook As Variant
  3578. '++LotusScript Development Environment:2:1:DoRequestAction:4:8
  3579. ' this is a subroutine that implements all the "RequestWorkbook Data" action
  3580. ' but by having it in a subroutine, it can be invoked via the action and by PostOpen
  3581. Function DoRequestAction ()
  3582.      
  3583.      On Error Goto handler
  3584.      
  3585.  '     -- Declarations --          
  3586.      Dim workSpace As New NotesUIWorkspace
  3587.      Dim result As Integer
  3588.      
  3589.      Dim thisDoc As NotesDocument    
  3590.      Set UIDoc = workSpace.CurrentDocument
  3591.      Set thisDoc = UIDoc.Document
  3592.      
  3593.       ' force a save of the document, so the 1-2-3 object get saved before we ask for its list of sheets
  3594.      ' because the user could have activated it before doing the Request and didn't save it yet
  3595.      UIDoc.Save
  3596.      
  3597.      Dim Session As New NotesSession
  3598.      Set DB = Session.CurrentDatabase
  3599.      
  3600.      ' get handle to LotusScript instance
  3601.      hInst = Lsi_info(4)
  3602.      
  3603. ' Get the handle to the Master spreadsheet
  3604.      
  3605.      Set embedObj = GetMasterEmbeddedObject (thisDoc)
  3606.      
  3607.      If Isempty(hWorkBook) Then         
  3608.           Set hWorkBook = UIDoc.GetObject("Master 123 Object")
  3609.           ' activate the Master spreadsheet, hidden
  3610.        '   Set hWorkBook = embedObj.Activate (False)  
  3611.      End If
  3612.      
  3613.  ' make sure we got back a valid handle
  3614.      If Datatype(hWorkBook) <> 9 Then
  3615.           Msgbox MSG_CANNOT_OPEN_WRKBOOK 
  3616.           Goto Done
  3617.      End If
  3618.      
  3619.      
  3620.  ' Ask it for a list of sheets 
  3621.      Dim i As Integer
  3622.      Dim sheetList (256) As String
  3623.      Dim assignmentList(256) As Assignment
  3624.      Dim requestInfo As Request    
  3625.      
  3626.      i = 0
  3627.      Forall sheet In hWorkBook.Sheets 
  3628.           Dim sheetName As String        
  3629.           
  3630.           ' put unhidden sheets in the list
  3631.           If Not sheet.issheethidden Then
  3632.                sheetList(i) = sheet.Name             
  3633.                i = i + 1
  3634.           End If
  3635.           
  3636.      End Forall
  3637.      
  3638.  ' call the UI, which asks the user for the mapping of sheets --> users
  3639.      result = AssignWorksheet (hInst, sheetList, assignmentList, requestInfo.sendMail, requestInfo.closedACL, requestInfo.message, requestInfo.notifyDistrib)
  3640.      
  3641.      ' user cancelled from assign worksheet UI, clear out handle to 1-2-3 workbook. this way if they hit the request button again
  3642.      ' before closing the Notes document, everything will work OK.
  3643.      If result = CANCEL Then
  3644.           hWorkBook = Empty
  3645.           Goto Done
  3646.      Else
  3647.           
  3648.           Forall assigned In assignmentList
  3649.                
  3650.                ' we're done when there are no more sheets
  3651.                If assigned.sheetName = "" Then
  3652.                     Exit Forall
  3653.                     
  3654.                Else
  3655.                     ' distribute each sheet
  3656.                     Call Distribute (hWorkBook, assigned, requestInfo,  DB, thisDoc)
  3657.                     
  3658.                End If
  3659.           End Forall
  3660.           
  3661.           ' inform the user that the request operation is complete
  3662.           Msgbox MSG_REQUEST_COMPLETE, 0 + 64, MSG_LOTUS_TITLE 
  3663.      End If
  3664.      
  3665.      
  3666. JustStatus: 
  3667.      ' change the status of the master document now that it has been distributed
  3668.      ' put the document into edit mode, otherwise we can't update the status
  3669.      If UIDoc.EditMode = False Then
  3670.           UIDoc.EditMode = True
  3671.      End If
  3672.      
  3673.      hWorkBook = Empty
  3674.      thisDoc.Status =  MASTER_DISTRIBUTED
  3675.      thisDoc.Save True, False
  3676.      
  3677.      UIDoc.Reload   
  3678.      UIDoc.RefreshHideFormulas
  3679.      UIDoc.Save
  3680.      
  3681.      ' refresh the view so it gets the new documents and status changes
  3682.      workSpace.ViewRefresh
  3683.      
  3684.      UIDoc.Close
  3685.      Exit Function
  3686.      
  3687. handler:
  3688.      Msgbox MSG_ERROR  & Error$    
  3689.      Goto Done
  3690.      
  3691. Done:
  3692.      
  3693. End Function 
  3694. '++LotusScript Development Environment:2:2:Distribute:1:8
  3695. Sub Distribute (hWorkBook As Variant, assign As Assignment, requestInfo As Request, parentDB As NotesDatabase, thisDoc As NotesDocument)
  3696.      On Error Goto handler
  3697.      
  3698. ' -- Declarations --          
  3699.      
  3700.      Dim newResponse As New NotesDocument (parentDB)
  3701.      Dim convertedArray  As Variant 
  3702.      Dim contributor As NotesItem
  3703.      Dim currAuthor As NotesItem
  3704.      Dim canName As Variant
  3705.      Dim contributorOnly As NotesItem
  3706.      
  3707.       ' notify the user that we are distributing sheet X 
  3708.      Print MSG_DISTRIBUTING_SHEET ;  assign.sheetName
  3709.      
  3710.      newResponse.Form = CONTRIBUTOR_FORM
  3711.      newResponse.WorksheetTitle = assign.sheetName
  3712.      newResponse.WorkbookTitle = thisDoc.Title
  3713.      newResponse.SourceName = thisDoc.SourceName
  3714.      
  3715.      ' convert the list from the ui (comma delimitted) to an array
  3716.      convertedArray = StringConvert (assign.assignedTo,  CONVERT_TO_ARRAY)
  3717.      
  3718.      Set contributor = New NotesItem(newResponse, "Contributor", convertedArray, NAMES)    
  3719.      contributor.IsSummary = True                                    ' so it shows up in a view
  3720.      
  3721.       ' now convert all the name(s) in the contributor field to canonical
  3722.      canName = Evaluate("@Name([Canonicalize];Contributor)", newResponse)
  3723.      newResponse.ReplaceItemValue "Contributor", canName
  3724.      
  3725.      ' first New the current author item to get its AUTHORS flag set, just doing the copy doesn't do it
  3726.      ' assign the contributor(s)
  3727.      Set currAuthor = New NotesItem(newResponse, "CurrentAuthor", canName, AUTHORS)
  3728.      
  3729.      ' then add the distributor as having author acess as well, otherwise they won't even be able to save the document
  3730.      currAuthor.AppendToTextList (thisDoc.Author(0))
  3731.      
  3732.      ' keep track of who created this document
  3733.      Dim distributor As NotesItem
  3734.      Set distributor = New NotesItem(newResponse, "Distributor", thisDoc.Author, NAMES)
  3735.      distributor.IsSummary =True
  3736.      
  3737.      ' should the distributor be notified when the user has completed work on this sheet?
  3738.      newResponse.NotifyDistributor = requestInfo.notifyDistrib 
  3739.      
  3740.      newResponse.WorkSheetStatus  = STATUS_DATA_REQUESTED 
  3741.      
  3742.      ' make a response doc of the current doc
  3743.      newResponse.MakeResponse thisDoc
  3744.      
  3745.       ' by design of the ACL, contributors have Author access to their documents, others can read them only.
  3746.      ' if the distributor wanted a closed ACL, then no one else can read the contributor documents either.
  3747.      newResponse.ForContributorsOnly = requestInfo.closedACL
  3748.      
  3749.      If requestInfo.closedACL = 1 Then
  3750.           ' put contributors names in the readers field, that will define them as who can read the document
  3751.           Set contributorOnly = New NotesItem(newResponse, "RestrictedTo", newResponse.Contributor, READERS)
  3752.           
  3753.           ' add the distributor so s/he can read the document too
  3754.           contributorOnly.Appendtotextlist thisDoc.Author
  3755.           
  3756.      Else
  3757.           ' not restricted, put a * in the readers field, without this there are disappearing response documents in the view
  3758.           Set contributorOnly = New NotesItem(newResponse, "RestrictedTo", "*", READERS)
  3759.           contributorOnly.IsSummary = True                        
  3760.      End If
  3761.      
  3762.      ' create the contributor embedding from a new 1-2-3 workbook
  3763.      Set RTItem = New NotesRichTextItem( newResponse, "ContributorEmbedding")
  3764.      Dim ContribEmbedObj As NotesEmbeddedObject
  3765.      Dim hContributor As Variant
  3766.      
  3767.      Set ContribEmbedObj = RTItem.EmbedObject( EMBED_OBJECT, "Lotus123.Workbook", "", assign.sheetName)
  3768.      
  3769.      ' save the new response document
  3770.      newResponse.Save True, False
  3771.      
  3772.     ' activate the contributor spreadsheet, hidden
  3773.      Set hContributor = ContribEmbedObj.Activate (False)   'activate hidden
  3774.      
  3775.     ' distribute sheetName into the new contributor embedding
  3776.     ' 1-2-3 will automatically close the document
  3777.      hWorkBook.Distribute assign.sheetName,  hContributor.Name             
  3778.      
  3779.      ' save the new response document
  3780.      newResponse.save True, False
  3781.      
  3782.      ' make the contributor a reader of the Master document, they need at least reader access 
  3783.      'or otherwise we won't be able to make this work
  3784.      Dim docReaders As notesitem
  3785.      If thisDoc.DocReaders(0) = "*" Then
  3786.           thisDoc.DocReaders =  ""                           ' just clear it out so appendtotextlist will work the first time
  3787.      End If
  3788.      
  3789.      Set docReaders  = thisDoc.GetFirstItem("DocReaders")
  3790.      Forall contribNames In Contributor.Values              
  3791.           docReaders.Appendtotextlist( contribNames)
  3792.      End Forall
  3793.      
  3794.      ' save the reader field changes to the master document
  3795.      thisDoc.Save True, False
  3796. %END REM
  3797.      
  3798.  ' send an email to the assignees
  3799.      
  3800.      ' if the user wants email sent, then compose one and mail a doc link to this new response
  3801.      If requestInfo.sendMail = 1 Then Goto SendTheMail Else Goto Done
  3802.      
  3803. SendTheMail:
  3804.      Call SendMailWithDocLink(thisDoc, newResponse, assign, requestInfo)
  3805.      Goto Done
  3806.      
  3807. handler:
  3808.      Msgbox MSG_ERROR & Error$    
  3809.      Resume Next
  3810.      
  3811. Done:   
  3812.      
  3813. End Sub
  3814. '++LotusScript Development Environment:2:2:SendMailWithDocLink:1:8
  3815. Sub SendMailWithDocLink (parentDoc As NotesDocument, linkDoc As NotesDocument, assigned As Assignment, requestInfo As Request)
  3816.      
  3817.      On Error Goto handler
  3818.      
  3819.      Dim newDoc As NotesDocument
  3820.      Dim subjectString As String
  3821.      Dim titleString As String
  3822.      Dim contribItem As NotesItem
  3823.      Dim linkMessage As String
  3824.      
  3825.      Set newDoc = New NotesDocument(linkDoc.ParentDatabase)
  3826.      newDoc.Form = MEMO_FORM 
  3827.      Set BodyItem = New NotesRichTextItem( newDoc, "Body" )
  3828.      
  3829.      subjectString = parentDoc.Title(0)
  3830.      titleString = linkDoc.WorkSheetTitle(0)
  3831.      newDoc.Subject = MAIL_SUBJECT + titleString
  3832.      
  3833.      ' cc: distributor?
  3834.      ' newDoc.CopyTo = parentDoc.Author
  3835.      
  3836.      ' send the mail to all of the contributor(s)
  3837.      Set contribItem = linkDoc.GetFirstItem("Contributor")
  3838.      newDoc.CopyItem contribItem, "SendTo"
  3839.      
  3840.      ' compose the doc link popup
  3841.      linkMessage = subjectString + "." + titleString
  3842.      
  3843.      ' compose the body of the email
  3844.      BodyItem.AppendText requestInfo.message
  3845.      BodyItem.AddNewLine 2
  3846.      BodyItem.AppendText DOCLINK_TEXT 
  3847.      BodyItem.AppendDocLink linkDoc, linkMessage      
  3848.      
  3849.      ' send it out
  3850.      Call newDoc.Send (False)
  3851.      
  3852.      Goto Done
  3853.      
  3854. handler:
  3855.      Msgbox MSG_ERROR  & Error$    
  3856.      'Resume Next
  3857.      Exit Sub
  3858.      
  3859.      
  3860. Done:
  3861.      
  3862. End Sub
  3863. '++LotusScript Development Environment:2:1:StringConvert:1:8
  3864. Public Function StringConvert(Byval InitialString As String, ConvertType As Integer) As Variant
  3865.      
  3866.      Const QUOTE = """"
  3867.      Const SEMICOLON = ";"
  3868.      Const COMMA = ","
  3869.      Const COLON = " : "
  3870.      Const BLANK = " "
  3871.      Const RESIZE_UNIT = 20
  3872.      
  3873.      Dim SingleChar As String, MaxStrLen As Integer, LastCharInString As String
  3874.      
  3875.      If InitialString = "" Then          'if the incoming string is an empty string then
  3876.           StringConvert = InitialString    'return back the empty string
  3877.           Goto Done
  3878.      End If
  3879.      
  3880.      Select Case ConvertType
  3881.      Case CONVERT_TO_TEXTLIST:
  3882.           
  3883.           Dim TheFinalString As String
  3884.           
  3885.           'if string is not empty below statements will perform conversion
  3886.           
  3887.           MaxStrLen = Len(InitialString)          'length of the incoming string 
  3888.           TheFinalString = QUOTE                 'Insert quote to begining of string 
  3889.           
  3890.           For StrIndex = 1 To MaxStrLen
  3891.                
  3892.                SingleChar = Mid$(InitialString, StrIndex, 1)   'extract one character of InitalString at a time
  3893.                
  3894.                ' comma or semicolon denote the end of one string
  3895.                If (SingleChar = SEMICOLON) Or (SingleChar = COMMA) Then
  3896.                     
  3897.                     TheFinalString = TheFinalString & QUOTE & COLON & QUOTE   'concatenate quote and colon to string if condition met
  3898.                     LastCharInString = QUOTE 
  3899.                     
  3900.                Else
  3901.                     
  3902.                     ' skip leading spaces (trailing ones are harder and aren't coded here)
  3903.                     If SingleChar = BLANK And LastCharInString = QUOTE Then
  3904.                          Goto NextChar
  3905.                     Else
  3906.                          
  3907.                          TheFinalString = TheFinalString & SingleChar    'concatenate one char at a time
  3908.                          LastCharInString = SingleChar
  3909.                     End If    
  3910.                     
  3911.                End If
  3912.                
  3913. NextChar:
  3914.           Next StrIndex
  3915.           
  3916.           If ConvertType = CONVERT_TO_TEXTLIST Then
  3917.                
  3918.                TheFinalString = TheFinalString & QUOTE         'Close the final quote
  3919.           End If        
  3920.           
  3921.           
  3922.           StringConvert  = TheFinalString
  3923.           
  3924.           
  3925.      Case CONVERT_TO_ARRAY:
  3926.           
  3927.           Redim FinalString(RESIZE_UNIT) As String
  3928.           Dim i, currentBounds  As Integer
  3929.           currentBounds = RESIZE_UNIT 
  3930.           i = 0
  3931.           
  3932.           MaxStrLen = Len(InitialString)    'length of the incoming string 
  3933.           
  3934.           For StrIndex = 1 To MaxStrLen
  3935.                
  3936.                SingleChar = Mid$(InitialString, StrIndex, 1)   'extract one character of InitalString at a time
  3937.                
  3938.                     ' comma or semicolon denote the end of one string
  3939.                If (SingleChar = SEMICOLON) Or (SingleChar = COMMA) Then
  3940.                     
  3941.                     i = i + 1                                           ' for array, bump to next element
  3942.                     
  3943.                     ' if we have reached the end of the allocated array, resize by another chunk
  3944.                     If i  > currentBounds Then
  3945.                          currentBounds = currentBounds + RESIZE_UNIT 
  3946.                          Redim Preserve FinalString(currentBounds) As String
  3947.                     End If
  3948.                     LastCharInString = COMMA
  3949.                     
  3950.                Else
  3951.                     
  3952.                     ' skip leading spaces (trailing ones are harder and aren't coded here)
  3953.                     If SingleChar = BLANK And LastCharInString = COMMA Then
  3954.                          Goto ToNextChar
  3955.                     Else
  3956.                          FinalString(i) = FinalString(i) & SingleChar    'concatenate one char at a time
  3957.                          LastCharInString = SingleChar
  3958.                     End If    
  3959.                     
  3960.                End If
  3961.                
  3962. ToNextChar:
  3963.           Next StrIndex                          ' for loop
  3964.           
  3965.           ' trim the array to just what was needed
  3966.           Redim Preserve FinalString(i) As String
  3967.           
  3968.           StringConvert  = FinalString
  3969.           
  3970.      End Select
  3971.      
  3972. Done:
  3973.      
  3974. End Function            'end of StringConvert
  3975. '++LotusScript Development Environment:2:1:ActivateMaster:2:8
  3976. ' activate the master embedded object, hidden; returns a handle to the running object
  3977. Function ActivateMaster(thisUIDoc As NotesUIDocument) As Variant
  3978.      
  3979.      Dim hMaster As Variant
  3980.      
  3981.      Dim thisDoc As NotesDocument
  3982.      Set thisDoc = thisUIDoc.Document
  3983.      
  3984.      
  3985.      Dim embedObject As NotesEmbeddedObject
  3986.      Set embedObject =  GetMasterEmbeddedObject(thisDoc)
  3987.      Set hMaster = embedObject.Activate (False)
  3988.      Set ActivateMaster = hMaster
  3989.      
  3990. End Function
  3991. '++LotusScript Development Environment:2:1:GetMasterEmbeddedObject:2:8
  3992. ' returns the Notes embedded object for the Master embedding
  3993. Function GetMasterEmbeddedObject (thisDoc As NotesDocument) As NotesEmbeddedObject
  3994.      
  3995.      Dim MasterWorkBook As NotesRichTextItem
  3996.      Dim MasterItem As Variant
  3997.      Dim embedObj As NotesEmbeddedObject
  3998.      Dim embedName As NotesItem
  3999.      
  4000.      Set embedName = thisDoc.GetFirstItem("MasterName")
  4001.      Set MasterItem =  thisDoc.GetFirstItem("Master")
  4002.      Set MasterWorkBook = MasterItem
  4003.      
  4004.      Set embedObj = MasterWorkBook.GetEmbeddedObject(embedName.Text)
  4005.      
  4006.      Set GetMasterEmbeddedObject = embedObj
  4007.      
  4008. End Function
  4009. Contributor
  4010.     0S0E
  4011.  Main'++LotusScript Development Environment:2:5:(Options):0:66
  4012. '++LotusScript Development Environment:2:5:(Forward):0:1
  4013. Declare Sub Postopen(Source As Notesuidocument)
  4014. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4015. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4016. Private Sub BindEvents(Byval Objectname_ As String)
  4017.      Static Source As NOTESUIDOCUMENT
  4018.      Set Source = Bind(Objectname_)
  4019.      On Event Postopen From Source Call Postopen
  4020. End Sub
  4021. '++LotusScript Development Environment:2:2:Postopen:1:12
  4022. Sub Postopen(Source As Notesuidocument)
  4023.      
  4024. ' -- Declarations --      
  4025.      Dim newOrExisting As Long
  4026.      Dim result As Long    
  4027.      Dim Session As New NotesSession
  4028.      Dim theTitle As String
  4029.      
  4030.      Set DB = Session.CurrentDatabase
  4031.      Set UIDoc = source
  4032.      Dim Doc As New NotesDocument(DB)
  4033.      Set Doc = Source.Document
  4034.      
  4035.      ' Only do all the create processing when the document is new
  4036.      If Doc.ISNEWNOTE Then
  4037.           
  4038.           ' get handle to LotusScript instance, needed to pass to all UI calls
  4039.           hInst = Lsi_info(4)
  4040.           
  4041.           ' declare a new field to track whether they want to see the if you edit this warning which 
  4042.            ' is put up on subsequent opens ot this document
  4043.           Dim  DontShowWarning As New NotesItem(Doc, "DontShowWarning", 0)
  4044.           
  4045.           Set RTItem = New NotesRichTextItem( Doc, "Master")
  4046.           Dim EmbObj As NotesEmbeddedObject                        
  4047.           
  4048.           Dim workbookName As String
  4049.           Dim masterName As New NotesItem (Doc, "MasterName", "Master 123 Object")
  4050.           
  4051.           ' get the kind of workbook to embed (new or existing)
  4052.           result = BrowseForSpreadSheet (hInst, workbookName, newOrExisting, theTitle)
  4053.           If result = CANCEL Then
  4054.                ' the user is cancelling the creation of the shared workbook:
  4055.                ' close this document and get out. Note:  it was never saved so we don't have to delete it
  4056.                UIDoc.Close
  4057.                Goto Done
  4058.                
  4059.           Else 
  4060.                ' navigate to the field where we will embed the 1-2-3 object
  4061.                UIDoc.GotoField "Master"
  4062.                
  4063.                ' populate the title field
  4064.                Doc.Title = theTitle
  4065.                
  4066.                ' embedding an existing file
  4067.                If newOrExisting = EXISTING_FILE Then  
  4068.                     
  4069.                     ' save off the filename of the workbook we are creating from
  4070.                     Doc.SourceName = workbookName
  4071.                     
  4072.                     ' create the embedding
  4073.                     Set hWorkBook = UIDoc.CreateObject(masterName.Text, "", workbookName)
  4074.                     
  4075.                     ' for embedding from file, must call GetObject to actually get a handle to the object
  4076.                     Set hWorkBook = UIDoc.GetObject(masterName.Text)
  4077.                     
  4078.                     ' in case of some kind of timeout, keep trying until we get the handle
  4079. tryAgain:
  4080. '                    If Datatype (hWorkBook)  <> 9 Then
  4081.                     ' datatype 13 is IUnknown, datatype 9 is Ole object and nothing
  4082.                     If Datatype (hWorkBook)  = 13 Then
  4083.                          Set hWorkBook = UIDoc.GetObject(masterName.Text)
  4084.                          Goto tryAgain
  4085.                     End If
  4086.                     
  4087.                     ' let the user know what's happening
  4088.                     Print MSG_SHARING_WORKBOOK 
  4089.                     
  4090.                     ' ask 1-2-3 if this document is OK to share
  4091.                     result = hWorkBook.CreateAsShared
  4092.                     
  4093.                     If result <> SUCCESS Then
  4094.                          
  4095.                          ' can't share password-protected workbooks
  4096.                          If result = Hex(WORKBOOK_PASSWORDED) Then
  4097.                               Messagebox  MSG_DISTRIB_PASSWORDED , MB_OK,  MSG_LOTUS_TITLE
  4098.                               ' remove workbook embedding
  4099.                               doc.RemoveItem("Master")
  4100.                               UIDoc.Close 
  4101.                               Exit Sub
  4102.                          End If
  4103.                          
  4104.                     End If      ' if SUCCESS
  4105.                     
  4106.        '             UIDoc.Save
  4107.                     
  4108.                      ' now that the master workbook is embedded, ask the user if they want to distribute now or later
  4109.                     result = ShareDocument(hInst) 
  4110.                     If result = DISTRIBUTE_NOW Then
  4111.                          ' go to it
  4112.                          result = DoRequestAction()
  4113.                     End If
  4114.                     
  4115.                Else
  4116.                     
  4117.                     ' embeddjng  a NEW 1-2-3 object
  4118.                     Set hWorkBook = UIDoc.CreateObject(masterName.Text, "Lotus123.Workbook")
  4119.                     
  4120.                      ' ask 1-2-3 if this document is OK to share 
  4121.                     result = hWorkBook.CreateAsShared
  4122.                     
  4123.                     If result <> SUCCESS Then
  4124.                          If result = Hex(WORKBOOK_PASSWORDED) Then
  4125.                               Messagebox  MSG_DISTRIB_PASSWORDED , MB_OK,  MSG_LOTUS_TITLE
  4126.                               ' remove workbook embedding
  4127.                               doc.RemoveItem("Master")
  4128.                               UIDoc.Close
  4129.                               Exit Sub
  4130.                          End If
  4131.                     End If    ' if SUCCESS
  4132.                     
  4133.         '            doc.Save True, False
  4134.                     
  4135.                End If      ' test for create from new or existing workbook
  4136.                
  4137.           End If      ' user hit OK out of select workbook UI
  4138.           
  4139.           ' get the UI sync'ed up with the backend
  4140.           Doc.Save True, False
  4141.           UIDoc.Reload   
  4142.           
  4143.           ' recompute all fields and save it out
  4144.           UIDoc.Refresh
  4145.           UIDoc.Save
  4146.           
  4147.           hWorkBook = empty
  4148.           
  4149.      End If        ' if this is a new document
  4150.      
  4151. Done:
  4152.      
  4153. End Sub
  4154. -,    #}
  4155. -,    ##
  4156. -,    ##
  4157. -,    #}
  4158. '++LotusScript Development Environment:2:5:(Options):0:66
  4159. '++LotusScript Development Environment:2:5:(Forward):0:1
  4160. Declare Sub Initialize
  4161. Declare Sub Entering(Source As Field)
  4162. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4163. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4164. Private Sub BindEvents(Byval Objectname_ As String)
  4165.      Static Source As FIELD
  4166.      Set Source = Bind(Objectname_)
  4167.      On Event Entering From Source Call Entering
  4168. End Sub
  4169. '++LotusScript Development Environment:2:2:Initialize:1:10
  4170. Sub Initialize
  4171.      
  4172. End Sub
  4173. '++LotusScript Development Environment:2:2:Entering:1:12
  4174. Sub Entering(Source As Field)
  4175.      
  4176.      If UIDoc.EditMode = True Then
  4177.           Dim Doc As New NotesDocument(DB)
  4178.           Set Doc = UIDoc.Document
  4179.           
  4180.           ' warn the user that editting this document is risky after its been distributed
  4181.           If doc.Status(0) = MASTER_DISTRIBUTED Then
  4182.                If doc.DontShowWarning(0) = 0 Then
  4183.                     Dim show As Long
  4184.                     show = doc.DontShowWarning(0)
  4185.                     result = DistributeWarning (hInst, show)
  4186.                     doc.DontShowWarning = show
  4187.                     doc.Save  True, False       ' write it out?
  4188.                End If
  4189.           End If
  4190.      End If
  4191.      
  4192. End Sub
  4193. Section Heading
  4194. Consolidar copias del libro de 1-2-3
  4195. FormTitleInfoDisplay
  4196. Author
  4197. SourceNameh
  4198. SourceName
  4199. Nuevo libro de 1-2-3
  4200.     0S0E
  4201. SourceName
  4202. Form Banner
  4203. wwwwwwwwwwww
  4204. wwwwwwwwwwww
  4205. wwwwwwwwwwww
  4206. wwwwwwwwwwww
  4207. wwwwwwwwwwwwwwwwwwwwwwwww
  4208. wwwwwxwwwwww
  4209. wwwwwxwwwwww
  4210. wxwwppww
  4211. wxwwppww
  4212. wpppwxww
  4213. wpppwxww
  4214. wwwwwxwwwwww
  4215. wwwwwxwwwwww
  4216. wpppwxww
  4217. wpppww
  4218. wwwwww
  4219. wwwwwxwwwwww
  4220. wwwwww
  4221. UUUUUUUUUUUUUUUUUUUUUUUUUUWw
  4222. UUUUXwxww
  4223. wpppwxww
  4224. UUUWwxwwwwww
  4225. wwwwwxwwwwwww
  4226. """(]UUU
  4227. """"""""""""""""""""""/
  4228. """""/
  4229. *""""/
  4230. LotusWP Box
  4231. WP Box
  4232. FormTitleInfoDisplay
  4233. FormTitleDisplay
  4234. Subject
  4235. Title
  4236. Regular Style
  4237. Creado por:
  4238. AUTHOR
  4239.     0S0E
  4240. CreateDate
  4241. a las
  4242. CreatedTime
  4243. Estado:
  4244. Status
  4245.     0S0E
  4246. Status
  4247. Datos a
  4248. n no solicitados | 1Datos solicitados | 2Consolidado parcialmente | 3Consolidaci
  4249. n finalizada | 4
  4250. Libro
  4251. Regular Style
  4252.            
  4253. Master
  4254. Comentarios
  4255. Main_Remarks
  4256. History
  4257. Historia de la hoja
  4258. Historia del libro
  4259.     0S0E
  4260.  History
  4261. Hidden Always
  4262. SessionTimes
  4263. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  4264. SessionEditors
  4265. Obtiene la lista de editores, incluyendo el editor actual del campo CurrentEditor.
  4266. Archivo de origen del libro:       
  4267. SourceName
  4268. BookName
  4269. Created by 
  4270. Editado por 
  4271. SessionEditorsj
  4272. SessionEditors
  4273.  on "
  4274. SessionTimesT
  4275. Domingo
  4276. Lunes
  4277. Martes
  4278. rcoles
  4279. Jueves
  4280. Viernes
  4281. SessionTimesP
  4282. SessionTimesO
  4283. Enero
  4284. Febrero
  4285. March
  4286. Abril
  4287. Junio
  4288. Julio
  4289. Agosto
  4290. Septiembre
  4291. Octubre
  4292. Noviembre
  4293. Diciembre
  4294. SessionTimesN
  4295.  a las 
  4296. SessionTimes
  4297.     20S21R62R69S70S71S72R105S106S130S131S132S133RR140S141R142S143S
  4298. CommentHistory
  4299. * * * FIN DEL DOCUMENTO * * *
  4300. Hidden
  4301. _Categor
  4302. Editar documento
  4303. Enviar
  4304. _Remitir
  4305. _Mover a una carpeta...t
  4306. _Extraer de una carpeta...
  4307. Solicitar datos del libro
  4308. '++LotusScript Development Environment:2:5:(Options):0:66
  4309. '++LotusScript Development Environment:2:5:(Forward):0:1
  4310. Declare Sub Click(Source As Button)
  4311. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4312. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4313. Private Sub BindEvents(Byval Objectname_ As String)
  4314.      Static Source As BUTTON
  4315.      Set Source = Bind(Objectname_)
  4316.      On Event Click From Source Call Click
  4317. End Sub
  4318. '++LotusScript Development Environment:2:2:Click:1:12
  4319. Sub Click(Source As Button)
  4320.      
  4321.      ' Request data for this master document
  4322.      
  4323.      ' call request action sub to do all the work
  4324.      DoRequestAction
  4325.      
  4326. End Sub
  4327. Status
  4328.     1S2S
  4329. Volver a solicitar datos del libro'++LotusScript Development Environment:2:5:(Options):0:66
  4330. '++LotusScript Development Environment:2:5:(Forward):0:1
  4331. Declare Sub Click(Source As Button)
  4332. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4333. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4334. Private Sub BindEvents(Byval Objectname_ As String)
  4335.      Static Source As BUTTON
  4336.      Set Source = Bind(Objectname_)
  4337.      On Event Click From Source Call Click
  4338. End Sub
  4339. '++LotusScript Development Environment:2:2:Click:1:12
  4340. Sub Click(Source As Button)
  4341.      
  4342.      ' Re-request data for this master document
  4343.      
  4344.       ' call request action sub to do all the work
  4345.      DoRequestAction
  4346.      
  4347. End Sub
  4348. Status
  4349.     1S2S
  4350. Consolidar datos del libro'++LotusScript Development Environment:2:5:(Options):0:66
  4351. '++LotusScript Development Environment:2:5:(Forward):0:1
  4352. Declare Sub Click(Source As Button)
  4353. Declare Function PrepareForConsolidate (thisDoc As NotesDocument, thisDocInView As NotesDocument) As NotesView
  4354. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4355. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4356. Private Sub BindEvents(Byval Objectname_ As String)
  4357.      Static Source As BUTTON
  4358.      Set Source = Bind(Objectname_)
  4359.      On Event Click From Source Call Click
  4360. End Sub
  4361. '++LotusScript Development Environment:2:2:Click:1:12
  4362. Sub Click(Source As Button)
  4363.      
  4364.  ' all logic for whether this button should be available or not is done
  4365.  ' in the formula for when to hide the button
  4366.      
  4367.      On Error Goto handler
  4368.      
  4369.  '     -- Declarations --          
  4370.      Dim workSpace As New NotesUIWorkspace
  4371.      Dim result As Integer
  4372.      
  4373.      Dim thisDoc As NotesDocument    
  4374.      Set UIDoc = workSpace.CurrentDocument
  4375.      Set thisDoc = UIDoc.Document
  4376.      
  4377.      Dim responseDoc As NotesDocument
  4378.      Dim view As NotesView    
  4379.      Dim Session As New NotesSession
  4380.      Dim DB As NotesDatabase
  4381.      Dim thisDocInView As NotesDocument
  4382.      Dim done As Integer
  4383.      Dim deleteThisDoc  As Integer
  4384.      
  4385.      Dim totalResponses As Integer
  4386.      Dim totalInProgress As Integer
  4387.      Dim totalCompleted As Integer
  4388.      Dim totalDontConsolidate As Integer
  4389.      
  4390.      Set DB = Session.CurrentDatabase
  4391.      
  4392.      ' see if this document can be consolidated; the function puts up the error if there is one
  4393.      Set view = PrepareForConsolidate(thisDoc, thisDocInView)
  4394.      If view Is Nothing Then
  4395.           Goto Finished
  4396.      End If 
  4397.      
  4398.      ' ask the user which responses they want to consolidate
  4399.      Dim collectStatusStr As String
  4400.      Dim  deleteResponses As Long
  4401.      Dim collectStatus As Long
  4402.      
  4403.      deleteResponses = False
  4404.      collectStatus = True
  4405.      
  4406.      result = GetConsolidateInfo(LSInstance, collectStatus, deleteResponses)
  4407.      collectStatusStr = Cstr(collectStatus)
  4408.      If result = CANCEL Then
  4409.           Goto Finished
  4410.      End If
  4411.      
  4412.      Dim embedName As NotesItem
  4413.      Set embedName = thisDoc.GetFirstItem("MasterName")
  4414.      
  4415.      ' put the document in edit mode, otherwise no changes could be saved to it
  4416.      If UIDoc.EditMode <> True Then
  4417.           UIDoc.EditMode = True
  4418.      End If
  4419.      
  4420.       ' activate the Master spreadsheet, hidden, using the UI document will give better results
  4421.      ' in case the object has already been activated
  4422.      Set hWorkBook = UIDoc.GetObject(embedName.Text)
  4423.      
  4424.      ' start searching for children 
  4425.      Set responseDoc = view.GetChild(thisDocInView)
  4426.      
  4427.      deleteThisDoc = False
  4428.      
  4429.      ' loop through all the children, consolidating only those that meet the user's criteria 
  4430.      While ( Not (responseDoc Is Nothing) And Not done)
  4431.           
  4432.           If  responseDoc.Form(0) = CONTRIBUTOR_FORM Then
  4433.                If collectStatus = 1 Then
  4434.                     If responseDoc.WorkSheetStatus(0) = STATUS_READY_CONS Then
  4435.                          Goto Collect
  4436.                     Else
  4437.                          Goto GoToNext
  4438.                     End If 
  4439.                Else
  4440.                     ' skip do not consolidates and consolidate completed responses
  4441.                     If responseDoc.WorkSheetStatus(0) = STATUS_DONT_CONS Or responseDoc.WorkSheetStatus(0) = STATUS_CONS_IN_MASTER Then
  4442.                          Goto GoToNext
  4443.                     Else
  4444.                          Goto Collect
  4445.                     End If         
  4446.                     
  4447.                End If      
  4448.                
  4449. Collect:
  4450.                'collect the contributor document into this one
  4451.                Print MSG_CONSOLIDATING_SHEET & responseDoc.WorksheetTitle(0)
  4452.                
  4453.                result = hWorkBook.Collect(responseDoc.WorksheetTitle(0), 1)
  4454.                
  4455.                If result = SUCCESS Then
  4456.                     
  4457.                     ' activate the response document's embedding, this will complete the collect operation for this response
  4458.                     Dim WorkSheet As NotesRichTextItem
  4459.                     Dim hWorkSheet As Variant
  4460.                     Dim Item As Variant
  4461.                     Dim WorkSheetEmbedObj As NotesEmbeddedObject
  4462.                     
  4463.                     Set Item =  responseDoc.GetFirstItem("ContributorEmbedding")
  4464.                     Set WorkSheet = Item
  4465.                     
  4466.                     Set WorkSheetEmbedObj = WorkSheet.GetEmbeddedObject(responseDoc.WorksheetTitle(0))
  4467.                     
  4468.                     ' if an error happened while activating the embedding, we'll get a 4005 back
  4469.                     On Error 4005 Goto CantGetHandle
  4470.                     
  4471.                     ' activate the worksheet, hidden
  4472.                     Set hWorkSheet = WorkSheetEmbedObj.Activate (False)  
  4473.                     
  4474.                     If ErrorOnCollect Then
  4475.                          ErrorOnCollect = False
  4476.                          Goto GoToNext             ' skip the rest for this document, it failed, but we want to keep going
  4477.                     End If
  4478.                     
  4479.                     ' remove author access from contributor(s), make the distributor have author access
  4480.                     responseDoc.ReplaceItemValue "CurrentAuthor", responseDoc.Distributor(0)
  4481.                     
  4482.                     ' remove author access from contributor(s), and then make the distributor have author access
  4483.                     responseDoc.RemoveItem("CurrentAuthor")
  4484.                     Dim currAuthor As NotesItem
  4485.                     Dim distributor As NotesItem 
  4486.                     Set distributor = responseDoc.GetFirstItem("Distributor")
  4487.                     Set currAuthor = responseDoc.CopyItem (distributor, "CurrentAuthor")
  4488.                     
  4489.                     ' leave the contributors with read access to their work
  4490.                     ' if the contributors weren't assigned reader access during distribution, then put them on now
  4491.                     If responseDoc.ForContributorsOnly(0)  <> 1 Then
  4492.                          Dim restrictedTo As NotesItem
  4493.                          Set restrictedTo  = responseDoc.GetFirstItem("RestrictedTo")
  4494.                          Dim contributor As NotesItem
  4495.                          Set contributor = responseDoc.GetFirstItem("Contributor")
  4496.                          Forall contribNames In contributor.Values
  4497.                               restrictedTo.Appendtotextlist( contribNames)
  4498.                          End Forall
  4499.                     End If
  4500.                     
  4501.                     responseDoc.WorkSheetStatus = STATUS_CONS_IN_MASTER 
  4502.                     responseDoc.Save True, False
  4503.                     
  4504.                     ' delete response if user requested it (do a delayed delete, otherwise we couldn't use 'responseDoc' anymore
  4505.                     If deleteResponses = 1 Then
  4506.                          deleteThisDoc = True
  4507.                     End If
  4508.                     
  4509.                Else                         
  4510.                     Print MSG_CONSOLIDATE_ERROR  + responseDoc.WorkSheetTitle(0)
  4511.                End If        ' error on collect
  4512.                
  4513.           End If     ' the correct form
  4514.           
  4515. GoToNext:
  4516.           
  4517.           ' count the number of response documents, used for setting status below
  4518.           totalResponses = totalResponses + 1
  4519.           
  4520.           Select Case responseDoc.WorkSheetStatus(0)
  4521.                
  4522.           Case STATUS_CONS_IN_MASTER:
  4523.                totalCompleted = totalCompleted + 1
  4524.                
  4525.           Case STATUS_IN_PROGRESS:
  4526.                totalInProgress = totalInProgress + 1
  4527.                
  4528.           Case STATUS_DONT_CONS:
  4529.                totalDontConsolidate = totalDontConsolidate + 1
  4530.                
  4531.           End Select
  4532.           
  4533.           ' go on to the next response; save the previous one in case it needs to be deleted
  4534.           Dim prevResponse As NotesDocument
  4535.           Set prevResponse = responseDoc
  4536.           Set responseDoc = view.GetNextSibling(responseDoc)
  4537.           
  4538.           If deleteThisDoc = True Then
  4539.                Call prevResponse.Remove (True)                 
  4540.                deleteThisDoc = False
  4541.           End If
  4542.           
  4543.      Wend     ' while more response documents
  4544.      
  4545.      ' now that we are done witht the collect, let 1-2-3 know it
  4546.      hWorkBook.CollectComplete
  4547.      
  4548.      ' change the status for the master document, as long as we processed at least one response
  4549.      ' otherwise, just leave the status what it was when we came in
  4550.      If totalResponses Then
  4551.           If totalCompleted = totalResponses Then
  4552.                thisDoc.Status = CONSOLIDATION_COMPLETE         
  4553.           Elseif totalInProgress Then
  4554.                thisDoc.Status =  PARTIALLY_CONSOLIDATED         
  4555. '          Elseif totalDontConsolidate Then              
  4556.           Elseif totalDontConsolidate And  ((totalDontConsolidate + totalCompleted) = totalResponses) Then
  4557.  '              thisDoc.Status =  PARTIALLY_CONSOLIDATED         
  4558.                thisDoc.Status = CONSOLIDATION_COMPLETE         
  4559.           Else
  4560.                thisDoc.Status =  PARTIALLY_CONSOLIDATED         
  4561.           End If
  4562.      End If
  4563.      
  4564.      thisDoc.Save True, False
  4565.      UIDoc.RefreshHideFormulas
  4566.      UIDoc.Save
  4567.      workSpace.ViewRefresh
  4568.      
  4569.       ' inform the user that the consolidation is complete, and tell them to double click on the embedding to see the results
  4570.      ' this is due to a limitation of the Notes script classes which will not update the rendering of the embedding
  4571.      Dim str1 As String
  4572.      Dim str2 As String
  4573.      
  4574.      str1 = MSG_CONSOLIDATE
  4575.      str2 = MSG_DBLCLICK
  4576.      
  4577.      Msgbox str1 & Chr(13) & Chr(13) & str2, 0 + 64,  MSG_LOTUS_TITLE
  4578.      
  4579.      hWorkBook = empty
  4580.      Goto Finished
  4581.      
  4582. CantGetHandle:
  4583.      ' error happened when activating the response embedding to collect it
  4584.      ErrorOnCollect = True
  4585.      Print MSG_CONSOLIDATE_ERROR  & responseDoc.WorksheetTitle(0)
  4586.      hWorkSheet = empty
  4587.      Resume Next
  4588.      
  4589. handler:
  4590.      Msgbox MSG_ERROR & Error$    
  4591.      Goto Finished
  4592.      
  4593. Finished:
  4594.      
  4595. End Sub
  4596. '++LotusScript Development Environment:2:1:PrepareForConsolidate:4:8
  4597. ' prepare this document for consolidate, including making sure there are no replication conflicts
  4598. ' if there are then we will disallow the consolidate
  4599. Function PrepareForConsolidate (thisDoc As NotesDocument, thisDocInView As NotesDocument) As NotesView
  4600.      
  4601.      Dim view As NotesView
  4602.      Dim responseDoc As NotesDocument
  4603.      
  4604.      ' get the view for conslidating; it must exist
  4605.      Set view = DB.GetView(CONSOLIDATE_VIEW ) 
  4606.      If view Is Nothing Then
  4607.           Messagebox MSG_CONSOLIDATE_VIEW_NOT_FOUND 
  4608.           Goto ErrorDone
  4609.      End If
  4610.      
  4611.      ' search for the document in the view that matches this one; set up the key for searching 
  4612.      ' Note: the order of the keys corresponds to the columns in the view
  4613.      Dim theId As String
  4614.      theId = thisDoc.UniversalID
  4615.      
  4616.      Set thisDocInView = view.GetDocumentByKey(theId)
  4617.      
  4618.      ' make sure the document found _is_ the right one
  4619.      If Strcompare(thisDocInView.UniversalID, thisDoc.UniversalID) <> 0 Then
  4620.           Messagebox MSG_CONSOLIDATE_IDS_NOT_FOUND 
  4621.           Goto ErrorDone
  4622.      Else 
  4623.           
  4624.           ' consolidate is only legal if there are no replication conflicts in any of the children
  4625.           Set responseDoc = view.GetChild(thisDocInView)
  4626.           
  4627.           While ( Not (responseDoc Is Nothing) And Not done)
  4628.                
  4629.                If responseDoc.Form(0) = CONTRIBUTOR_FORM Then
  4630.                     
  4631.                    ' make sure there are no replication conflicts below this one
  4632.                     Dim replicationDoc As NotesDocument
  4633.                     Set replicationDoc = view.GetChild (responseDoc)
  4634.                     
  4635.                     If Not (replicationDoc Is Nothing)  Then
  4636.                          
  4637.                          If replicationDoc.HasItem("$Conflict") Then
  4638.                               
  4639.                               If replicationDoc.Form(0) = CONTRIBUTOR_FORM Then
  4640.                                    Messagebox MSG_REPLICATION_CONFLICT
  4641.                                    Set view = Nothing
  4642.                                    Goto Done
  4643.                               End If 
  4644.                               
  4645.                          End If  ' has conflict
  4646.                          
  4647.                     End If  ' replication doc
  4648.                Else
  4649.                     
  4650.                     If responseDoc.Form(0) = MASTER_FORM  And responseDoc.HasItem("$Conflict") Then
  4651.                          Messagebox MSG_REPLICATION_CONFLICT
  4652.                          Set view = Nothing
  4653.                          Goto Done 
  4654.                     End If
  4655.                End If   ' contributor doc   
  4656.                
  4657.                ' go on to the next response
  4658.                Set responseDoc = view.GetNextSibling(responseDoc)
  4659.                
  4660.           Wend
  4661.           
  4662.      End If
  4663.      
  4664. Done:
  4665.      ' reset the view back to the document we are consolidating into
  4666.      Set view = DB.GetView(CONSOLIDATE_VIEW) 
  4667.      Set thisDocInView = view.GetDocumentByKey(theId)
  4668.      
  4669. ErrorDone:     
  4670.      Set PrepareForConsolidate = view
  4671.      
  4672. End Function
  4673. Status
  4674. NoCache
  4675. ConsolidateButton
  4676. Preparado para consolidar
  4677. En progreso
  4678.     0S0E
  4679. Extraer libro de 1-2-3...
  4680. '++LotusScript Development Environment:2:5:(Options):0:66
  4681. '++LotusScript Development Environment:2:5:(Forward):0:1
  4682. Declare Sub Click(Source As Button)
  4683. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4684. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4685. Private Sub BindEvents(Byval Objectname_ As String)
  4686.      Static Source As BUTTON
  4687.      Set Source = Bind(Objectname_)
  4688.      On Event Click From Source Call Click
  4689. End Sub
  4690. '++LotusScript Development Environment:2:2:Click:1:12
  4691. Sub Click(Source As Button)
  4692.      
  4693.      Dim workSpace As New NotesUIWorkspace
  4694.      Dim hWorkBook As Variant
  4695.      Dim result As Integer
  4696.      Dim embedObject As NotesEmbeddedObject
  4697.      Dim item As Variant
  4698.      Dim MasterWorkBookItem As NotesRichTextItem
  4699.      Dim embedName As NotesItem
  4700.      Dim thisDoc As NotesDocument    
  4701.      
  4702.      Set UIDoc = workSpace.CurrentDocument
  4703.      Set thisDoc = UIDoc.Document
  4704.      
  4705.      ' force a save of the document, so the 1-2-3 object get saved before we try to save it 
  4706.      UIDoc.Save
  4707.      
  4708.      ' get a handle to the embedding
  4709.      Set hWorkBook = UIDoc.GetObject ("Master 123 Object")
  4710.      
  4711.      ' save it out to a file (puts up File SaveAs dialog)
  4712.      result = hWorkBook.SaveToFile()
  4713.      
  4714.      
  4715.      ' old code
  4716.      ' get to the 1-2-3 workbook
  4717. '     Set embedName = thisDoc.GetFirstItem("MasterName")
  4718. '    Set item =  thisDoc.GetFirstItem("Master")
  4719. '     Set MasterWorkBookItem = item
  4720. '     Set embedObject = MasterWorkBookItem.GetEmbeddedObject(embedName.Text)
  4721.      
  4722.      ' activate the 1-2-3 workbook
  4723. '     Set hWorkBook = embedObject.Activate (False)
  4724. '     Set  hWorkBook = Nothing
  4725.      
  4726.      
  4727. End Sub
  4728. Status
  4729.     1S2S2E
  4730. P    P    $
  4731. O=Lotus Notes
  4732. O=Lotus Notes
  4733. PURSAFO
  4734. |.:#U
  4735. O=Lotus Notes
  4736. CN=Lotus Notes Template Development/O=Lotus Notes
  4737. PURSAFO
  4738. Fde!f^^
  4739. $SCRIPTOBJ_10
  4740. $Title
  4741. $Info
  4742. $WindowTitle
  4743. $Script
  4744. $$Script_O
  4745. $$ScriptName
  4746. $$FormScript
  4747. $$$FormScript_O
  4748. $$Master
  4749. $Master_O
  4750. $Body
  4751. $ACTIONS
  4752. $SCRIPTOBJ_6
  4753. $SCRIPTOBJ_7
  4754. $SCRIPTOBJ_8
  4755. $SCRIPTOBJ_9
  4756.