home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS018.DSK / MENULITE.SMM < prev    next >
INI File  |  1992-09-01  |  13KB  |  706 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _macro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     PostScript Printer
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Toggle between long and short menus.
  19.     Lotus WPD Inside Sales
  20.     Intermediate
  21.     Global Variables, AddMenus
  22.     autorun
  23.     715375291
  24.     60
  25.     679254902
  26.     382
  27.     4
  28.     118
  29.     932
  30.     4
  31.     4
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     0
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [tag]
  54.     New
  55.     5
  56.     [fnt]
  57.         Arial
  58.         240
  59.         255
  60.         16385
  61.     [algn]
  62.         1
  63.         1
  64.         216
  65.         0
  66.         0
  67.     [spc]
  68.         33
  69.         273
  70.         1
  71.         0
  72.         0
  73.         1
  74.         100
  75.     [brk]
  76.         4
  77.     [line]
  78.         8
  79.         0
  80.         1
  81.         0
  82.         1
  83.         1
  84.         1
  85.         10
  86.         10
  87.         1
  88.     [spec]
  89.         0
  90.         0
  91.         
  92.         0
  93.         1
  94.         1
  95.         0
  96.         16
  97.         0
  98.         0
  99.     [nfmt]
  100.         272
  101.         1
  102.         3
  103.         .
  104.         ,
  105.         $
  106.     New
  107.     0
  108.     0
  109. [lay]
  110.     Standard
  111.     513
  112.     [rght]
  113.         15840
  114.         12240
  115.         1
  116.         720
  117.         1080
  118.         1
  119.         1252
  120.         720
  121.         2
  122.         1
  123.         0
  124.         1
  125.         1
  126.         2
  127.         1
  128.         720
  129.         11520
  130.         14
  131.         1
  132.         720
  133.         1
  134.         1440
  135.         1
  136.         2160
  137.         1
  138.         2880
  139.         1
  140.         3600
  141.         1
  142.         4320
  143.         1
  144.         5040
  145.         1
  146.         5760
  147.         1
  148.         6480
  149.         1
  150.         7200
  151.         1
  152.         7920
  153.         1
  154.         8640
  155.         1
  156.         9360
  157.         1
  158.         10080
  159.     [hrght]
  160.     [lyfrm]
  161.         1
  162.         11200
  163.         0
  164.         0
  165.         12240
  166.         1252
  167.         0
  168.         1
  169.         3
  170.         1 0 0 0 0 0 0
  171.         0
  172.         0
  173.         1
  174.     [frmlay]
  175.         1252
  176.         12240
  177.         1
  178.         1440
  179.         0
  180.         1
  181.         360
  182.         1440
  183.         0
  184.         1
  185.         0
  186.         1
  187.         1
  188.         0
  189.         1
  190.         1440
  191.         10800
  192.         0
  193.     [txt]
  194. @Header@
  195. @Header@
  196. >
  197.     [frght]
  198.     [lyfrm]
  199.         1
  200.         13248
  201.         0
  202.         14760
  203.         12240
  204.         15840
  205.         0
  206.         1
  207.         3
  208.         1 0 0 0 0 0 0
  209.         0
  210.         0
  211.         2
  212.     [frmlay]
  213.         15840
  214.         12240
  215.         1
  216.         1440
  217.         360
  218.         1
  219.         14940
  220.         1440
  221.         0
  222.         1
  223.         0
  224.         1
  225.         1
  226.         0
  227.         1
  228.         1440
  229.         10800
  230.         0
  231.     [txt]
  232. @Header@
  233. @Header@
  234. >
  235. [elay]
  236. [l1]
  237.     0
  238. [pg]
  239.     4
  240.     47 0 50 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  241.     94 0 65 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  242.     141 0 15 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  243.     150 0 0 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  244. [edoc]
  245. <:#284,10800>
  246.  
  247. <:#284,10800>'Hugh Marlor - 7/18/91
  248.  
  249. <:#284,10800>'This macro adds to the View Menu the option of a toggle between 
  250.  
  251. <:#284,10800>'the menu bar shipped with AmiPro 2.0 and a short version
  252.  
  253. <:#284,10800>define IsOKToRun(menuname)    GetInfo(217, 24, %1);
  254.  
  255. <:#284,10800>
  256.  
  257. <:#284,10800>FUNCTION MENULITE()
  258.  
  259. <:#284,10800>IF IsNewWave()
  260.  
  261. <:#284,10800>    Message("Macro not available while running under HP NewWave.")
  262.  
  263. <:#284,10800>    Exit Function
  264.  
  265. <:#284,10800>ENDIF
  266.  
  267. @Subhead@<:#284,10800>result=IsOKToRun(SaveAs)
  268.  
  269. @Subhead@<:#284,10800>if result !=1 exit function
  270.  
  271. @Subhead@<:#284,10800>endif
  272.  
  273. <:#284,10800>declare Back()
  274.  
  275. <:#284,10800>declare Toggle()
  276.  
  277. <:#284,10800>declare OpenFile()
  278.  
  279. <:#284,10800>
  280.  
  281. <:#284,10800>AllocGlobalVar("set",1)
  282.  
  283. <:#284,10800>AllocGlobalVar("NewBar",1)
  284.  
  285. <:#284,10800>
  286.  
  287. <:#284,10800>MacFile = GetRunningMacroFile$()            'Get the name of this macro file.
  288.  
  289. <:#284,10800>
  290.  
  291. <:#284,10800>ShowBar(1)  'make sure default is displayed
  292.  
  293. <:#284,10800>DeleteMenuItem(1,"&View","Short &Menus")
  294.  
  295. <:#284,10800>AddMenuItem(1,"&View","Short &Menus","{MacFile}!ChangeMenu()")
  296.  
  297. <:#284,10800>
  298.  
  299. <:#284,10800>END FUNCTION
  300.  
  301. <:#284,10800>
  302.  
  303. <:#284,10800>
  304.  
  305. <:#284,10800>Function ChangeMenu()
  306.  
  307. <:#284,10800>
  308.  
  309. <:#284,10800>MacFile = GetRunningMacroFile$()            'Get the name of this macro file.
  310.  
  311. <:#284,10800>'MacFile = GetRunningMacroFile$()            'Get the name of this macro file.
  312.  
  313. <:#284,10800>
  314.  
  315. <:#284,10800>short=GetGlobalVar$("set")
  316.  
  317. <:#284,10800>
  318.  
  319. <:#284,10800>if (short=1)        'Then short menu already built
  320.  
  321. <:#284,10800>    Call Toggle()
  322.  
  323. <:#284,10800>    exit function
  324.  
  325. <:#284,10800>endif
  326.  
  327. <:#284,10800>
  328.  
  329. <:#284,10800>BarID=AddBar()  'BarID for Short Menu Bar
  330.  
  331. <:#284,10800>SetGlobalVar("NewBar",BarID)  'Save BarID for Short Menu
  332.  
  333. <:#284,10800>
  334.  
  335. <:#284,10800>IF (BarID <;> 0)                    'If it was added,
  336.  
  337. <:#284,10800>    AddMenu(BarID, "&File")            'Add a File menu to it.
  338.  
  339. <:#284,10800>    AddMenuItem(BarID,"&File", "&New<:f240,BArial,255,0,0>...<:f>", New, "Begin a new document")
  340.  
  341.     AddMenuItem(BarID,"&File","&Open<:f240,BArial,255,0,0>...    ^O<:f>", "{macfile}!OpenFile()","Open a Document")
  342.  
  343. <:#284,10800>    addmenuitem(BarID,"&File","-","")
  344.  
  345. <:#284,10800>    AddMenuItem(BarID,"&File","&Save    ^S",Save,"Save Document")
  346.  
  347. <:#284,10800>    AddMenuItem(BarID,"&File","Save &As...",SaveAs,"Save as new name")
  348.  
  349. <:#284,10800>    AddMenuItem(BarID,"&File","&Revert to Saved",Revert)
  350.  
  351. <:#284,10800>    AddMenuItem(BarID,"&File","-","")
  352.  
  353. <:#284,10800>    AddMenuItem(BarID,"&File","&Print...    ^P",FilePrint)
  354.  
  355. <:#284,10800>    AddMenuItem(BarID,"&File","Printer Se&tup...",PrintSetup)
  356.  
  357. <:#284,10800>    addmenuitem(BarID,"&File","-","")
  358.  
  359. <:#284,10800>    AddMenuItem(BarID,"&File","E&xit","{MacFile}!Close_Ami()","Exit AmiPro")
  360.  
  361. <:#284,10800>
  362.  
  363. <:#284,10800>    AddMenu(BarID,"&Edit")
  364.  
  365. <:#284,10800>    AddMenuItem(BarID,"&Edit","&Undo<:f240,BArial,255,0,0>    ^Z<:f>",Undo)
  366.  
  367. <:#284,10800>    AddMenuItem(BarID,"&Edit","Cu&t<:f240,BArial,255,0,0>    ^X<:f>",Cut)
  368.  
  369. <:#284,10800>    AddMenuItem(BarID,"&Edit","&Copy<:f240,BArial,255,0,0>    ^C<:f>",Copy)
  370.  
  371. <:#284,10800>    AddMenuItem(BarID,"&Edit","&Paste<:f240,BArial,255,0,0>    ^V<:f>",Paste)
  372.  
  373. <:#284,10800>    AddMenuItem(BarID,"&Edit","-","")
  374.  
  375. <:#284,10800>    AddMenuItem(BarID,"&Edit","Find && &Replace...    ^F",FindReplace)
  376.  
  377. <:#284,10800>    AddMenuItem(BarID,"&Edit","&Go To...    ^G",GoToCmd)
  378.  
  379. <:#284,10800>
  380.  
  381. <:#284,10800>    AddMenu(BarID,"&View")
  382.  
  383. <:#284,10800>    AddMenuItem(BarID,"&View","&Full Page<:f240,BArial,255,0,0>    ^D<:f>",FullPageView)
  384.  
  385. <:#284,10800>    AddMenuItem(BarID,"&View","&Custom    ",CustomView)
  386.  
  387. <:#284,10800>    AddMenuItem(BarID,"&View","-","")
  388.  
  389. <:#284,10800>    AddMenuItem(BarID,"&View","&Layout Mode    ",LayoutMode)
  390.  
  391. <:#284,10800>    AddMenuItem(BarID,"&View","&Draft Mode    ^M",DraftMode)
  392.  
  393. <:#284,10800>    AddMenuItem(BarID,"&View","-","")
  394.  
  395. <:#284,10800>    AddMenuItem(BarID,"&View","View &Preferences...",ViewPreferences)
  396.  
  397. <:#284,10800>    
  398.  
  399. <:#284,10800>    AddMenuItem(BarID,"&View","Long &Menus","{macfile}!Back")      
  400.  
  401. <:#284,10800>
  402.  
  403. <:#284,10800>    AddMenu(BarID,"&Text")    
  404.  
  405. <:#284,10800>    AddMenuItem(BarID,"&Text","&Font...",FontChange)    
  406.  
  407. <:#284,10800>    AddMenuItem(BarID,"&Text","-","")
  408.  
  409. <:#284,10800>    AddMenuItem(BarID,"&Text","&Normal    ^N",NormalText)
  410.  
  411. <:#284,10800>    AddMenuItem(BarID,"&Text","&Bold    ^B",Bold)
  412.  
  413. <:#284,10800>    AddMenuItem(BarID,"&Text","&Italic    ^I",Italic)
  414.  
  415. <:#284,10800>    AddMenuItem(BarID,"&Text","&Word Underline    ^W",WordUnderline)
  416.  
  417. <:#284,10800>    
  418.  
  419. <:#284,10800>    AddMenu(BarID,"&Style")
  420.  
  421. <:#284,10800>     AddMenuItem(BarID,"&Style","&Modify Style...    ^A",ModifyStyle)
  422.  
  423. <:#284,10800>    AddMenuItem(BarID,"&Style","-","")
  424.  
  425. <:#284,10800>     AddMenuItem(BarID,"&Style","&Use Another Style Sheet...",UseAnotherStyle)
  426.  
  427. <:#284,10800>
  428.  
  429. <:#284,10800>    AddMenu(BarID,"&Page")
  430.  
  431. <:#284,10800>    AddMenuItem(BarID,"&Page","&Modify Page Layout...",ModifyLayout)
  432.  
  433. <:#284,10800>    AddMenuItem(BarID,"&Page","-","")
  434.  
  435. <:#284,10800>    AddMenuItem(BarID,"&Page","&Page Numbering...",PageNumber)
  436.  
  437. <:#284,10800>    AddMenuItem(BarID,"&Page","&Line Numbering...",LineNumber)
  438.  
  439. <:#284,10800>    
  440.  
  441. <:#284,10800>    AddMenu(BarID,"F&rame")
  442.  
  443. <:#284,10800>    AddMenuItem(BarID,"F&rame","&Create Frame...",AddFrame<:f240,BArial,255,0,0>DLG<:f>)
  444.  
  445. <:#284,10800>    AddMenuItem(BarID,"F&rame","&Modify Frame Layout...",FrameLayout)
  446.  
  447. <:#284,10800>    
  448.  
  449. <:#284,10800>    AddMenu(BarID,"Too&ls")
  450.  
  451. <:#284,10800>    AddMenuItem(BarID,"Too&ls","&Spell Check...",SpellCheck)
  452.  
  453. <:#284,10800>    AddMenuItem(BarID,"Too&ls","Ta&bles...",Tables)
  454.  
  455. <:#284,10800>    AddMenuItem(BarID,"Too&ls","-","")
  456.  
  457. <:#284,10800>    AddMenuItem(BarID,"Too&ls","&Drawing...",DrawingMode)
  458.  
  459. <:#284,10800>    AddMenuItem(BarID,"Too&ls","&Charting...",ChartingMode)
  460.  
  461. <:#284,10800>    AddMenuItem(BarID,"Too&ls","-","")
  462.  
  463. <:#284,10800>    AddMenuItem(BarID,"Too&ls","<:f240,BArial,255,0,0>Smart &Icons...<:f>",<:f240,BArial,255,0,0>IconCustomize<:f>)
  464.  
  465. <:#284,10800>    
  466.  
  467. <:#284,10800>    AddMenu(BarID,"&Window")
  468.  
  469. <:#284,10800>    AddMenuItem(BarID,"&Window","&New Window",NewWindow)
  470.  
  471. <:#284,10800>    AddMenuItem(BarID,"&Window","&Tile",TileWindow)
  472.  
  473. <:#284,10800>    AddMenuItem(BarID,"&Window","&Cascade",CascadeWindow)
  474.  
  475. <:#284,10800>    
  476.  
  477. <:#284,10800>    AddMenu(BarID,"&Help")
  478.  
  479. <:#284,10800>    AddMenuItem(barID,"&Help","&<:f240,BArial,255,0,0>Contents<:f>",Help)
  480.  
  481. <:#284,10800>    AddMenuItem(BarID,"&Help","-","")
  482.  
  483. <:#284,10800>    AddMenuItem(BarID,"&Help","&About Ami Pro...",About)
  484.  
  485. <:#284,10800>    
  486.  
  487. <:#284,10800>    ShowBar(BarID)                    'Show the newly created menu bar.
  488.  
  489. <:#284,10800>    short = 1  'set flag that you already created shortmenu bar
  490.  
  491. <:#284,10800>    SetGlobalVar("set",short)
  492.  
  493. <:#284,10800>ENDIF
  494.  
  495. <:#284,10800>END FUNCTION
  496.  
  497. <:#284,10800>
  498.  
  499. <:#284,10800>FUNCTION Close_Ami()
  500.  
  501. <:#284,10800>
  502.  
  503. <:#284,10800>AppClose("")
  504.  
  505. <:#284,10800>
  506.  
  507. <:#284,10800>END FUNCTION
  508.  
  509. <:#284,10800>
  510.  
  511. <:#284,10800>FUNCTION OpenFile()
  512.  
  513. <:#284,10800>
  514.  
  515. FileOpen
  516.  
  517. <:#284,10800>
  518.  
  519. <:#284,10800>END FUNCTION
  520.  
  521. <:#284,10800>
  522.  
  523. <:#284,10800>
  524.  
  525. <:#284,10800>FUNCTION BACK()
  526.  
  527. <:#284,10800>ShowBar(1)                        'Restore the original Ami Pro menu  bar
  528.  
  529. <:#284,10800>FreeGlobalVar(1)
  530.  
  531. <:#284,10800>END FUNCTION
  532.  
  533. <:#284,10800>
  534.  
  535. <:#284,10800>FUNCTION TOGGLE()
  536.  
  537. <:#284,10800>    BarID=GetGlobalVar$("NewBar")  'Grab BarID from Global Variable
  538.  
  539. <:#284,10800>    ShowBar(2)
  540.  
  541. <:#284,10800>END FUNCTION
  542.  
  543. @Y<*">@<:#284,10800>
  544.  
  545. >
  546.  
  547. [Embedded]
  548. 00009464
  549. >
  550. [macsum] 6
  551. MENULITE 0 0 3 6
  552. ChangeMenu 331 0 4 30
  553. Close_Ami 2968 0 1 127
  554. OpenFile 3005 0 1 133
  555. BACK 3038 0 1 140
  556. TOGGLE 3077 0 2 145
  557. [macse]
  558. 14 MENULITE
  559. 0 1317
  560. 13
  561. 11 00000109
  562. 0 3 "Macro not available while running under HP NewWave."
  563. 6 0
  564. 15
  565. 9
  566. 0 1313 217 24 104
  567. 13
  568. 8 1
  569. 6 1
  570. 5 1
  571. 18 1
  572. 11 00000178
  573. 6 0
  574. 15
  575. 9
  576. 0 271 "set" 1
  577. 0 271 "NewBar" 1
  578. 0 802
  579. 13
  580. 8 2
  581. 0 514 1
  582. 0 520 1 "&View" "Short &Menus"
  583. 0 516 1 "&View" "Short &Menus" "{2}!ChangeMenu()"
  584. 6 0
  585. 15
  586. 9
  587. 14 ChangeMenu
  588. 0 802
  589. 13
  590. 8 1
  591. 0 265 "set"
  592. 13
  593. 8 2
  594. 6 2
  595. 5 1
  596. 18 0
  597. 11 00000105
  598. 16 Toggle
  599. 6 0
  600. 15
  601. 9
  602. 0 513
  603. 13
  604. 8 3
  605. 0 264 "NewBar" "{3}"
  606. 6 3
  607. 5 0
  608. 18 3
  609. 11 00002625
  610. 0 515 "{3}" "&File"
  611. 0 516 "{3}" "&File" "&New..." 101 "Begin a new document"
  612. 0 516 "{3}" "&File" "&Open...    ^O" "{1}!OpenFile()" "Open a Document"
  613. 0 516 "{3}" "&File" "-" ""
  614. 0 516 "{3}" "&File" "&Save    ^S" 103 "Save Document"
  615. 0 516 "{3}" "&File" "Save &As..." 104 "Save as new name"
  616. 0 516 "{3}" "&File" "&Revert to Saved" 105
  617. 0 516 "{3}" "&File" "-" ""
  618. 0 516 "{3}" "&File" "&Print...    ^P" 111
  619. 0 516 "{3}" "&File" "Printer Se&tup..." 112
  620. 0 516 "{3}" "&File" "-" ""
  621. 0 516 "{3}" "&File" "E&xit" "{1}!Close_Ami()" "Exit AmiPro"
  622. 0 515 "{3}" "&Edit"
  623. 0 516 "{3}" "&Edit" "&Undo    ^Z" 151
  624. 0 516 "{3}" "&Edit" "Cu&t    ^X" 153
  625. 0 516 "{3}" "&Edit" "&Copy    ^C" 154
  626. 0 516 "{3}" "&Edit" "&Paste    ^V" 155
  627. 0 516 "{3}" "&Edit" "-" ""
  628. 0 516 "{3}" "&Edit" "Find && &Replace...    ^F" 451
  629. 0 516 "{3}" "&Edit" "&Go To...    ^G" 452
  630. 0 515 "{3}" "&View"
  631. 0 516 "{3}" "&View" "&Full Page    ^D" 201
  632. 0 516 "{3}" "&View" "&Custom    " 202
  633. 0 516 "{3}" "&View" "-" ""
  634. 0 516 "{3}" "&View" "&Layout Mode    " 210
  635. 0 516 "{3}" "&View" "&Draft Mode    ^M" 211
  636. 0 516 "{3}" "&View" "-" ""
  637. 0 516 "{3}" "&View" "View &Preferences..." 206
  638. 0 516 "{3}" "&View" "Long &Menus" "{1}!Back"
  639. 0 515 "{3}" "&Text"
  640. 0 516 "{3}" "&Text" "&Font..." 251
  641. 0 516 "{3}" "&Text" "-" ""
  642. 0 516 "{3}" "&Text" "&Normal    ^N" 253
  643. 0 516 "{3}" "&Text" "&Bold    ^B" 254
  644. 0 516 "{3}" "&Text" "&Italic    ^I" 255
  645. 0 516 "{3}" "&Text" "&Word Underline    ^W" 257
  646. 0 515 "{3}" "&Style"
  647. 0 516 "{3}" "&Style" "&Modify Style...    ^A" 302
  648. 0 516 "{3}" "&Style" "-" ""
  649. 0 516 "{3}" "&Style" "&Use Another Style Sheet..." 304
  650. 0 515 "{3}" "&Page"
  651. 0 516 "{3}" "&Page" "&Modify Page Layout..." 352
  652. 0 516 "{3}" "&Page" "-" ""
  653. 0 516 "{3}" "&Page" "&Page Numbering..." 356
  654. 0 516 "{3}" "&Page" "&Line Numbering..." 359
  655. 0 515 "{3}" "F&rame"
  656. 0 516 "{3}" "F&rame" "&Create Frame..." 414
  657. 0 516 "{3}" "F&rame" "&Modify Frame Layout..." 402
  658. 0 515 "{3}" "Too&ls"
  659. 0 516 "{3}" "Too&ls" "&Spell Check..." 459
  660. 0 516 "{3}" "Too&ls" "Ta&bles..." 457
  661. 0 516 "{3}" "Too&ls" "-" ""
  662. 0 516 "{3}" "Too&ls" "&Drawing..." 411
  663. 0 516 "{3}" "Too&ls" "&Charting..." 412
  664. 0 516 "{3}" "Too&ls" "-" ""
  665. 0 516 "{3}" "Too&ls" "Smart &Icons..." 209
  666. 0 515 "{3}" "&Window"
  667. 0 516 "{3}" "&Window" "&New Window" 525
  668. 0 516 "{3}" "&Window" "&Tile" 526
  669. 0 516 "{3}" "&Window" "&Cascade" 527
  670. 0 515 "{3}" "&Help"
  671. 0 516 "{3}" "&Help" "&Contents" 551
  672. 0 516 "{3}" "&Help" "-" ""
  673. 0 516 "{3}" "&Help" "&About Ami Pro..." 552
  674. 0 514 "{3}"
  675. 5 1
  676. 8 2
  677. 0 264 "set" "{2}"
  678. 6 0
  679. 15
  680. 9
  681. 14 Close_Ami
  682. 0 1027 ""
  683. 6 0
  684. 15
  685. 9
  686. 14 OpenFile
  687. 24 102
  688. 6 0
  689. 15
  690. 9
  691. 14 BACK
  692. 0 514 1
  693. 0 266 1
  694. 6 0
  695. 15
  696. 9
  697. 14 TOGGLE
  698. 0 265 "NewBar"
  699. 13
  700. 8 1
  701. 0 514 2
  702. 6 0
  703. 15
  704. 9
  705. 00009489
  706.