�STORE/RESTORE-HP/3000.MPEXL  4� �������B5152AA  C602403/16/010000���?fS�:�U���U�'JFEDRTND         QCPUB           AICS            MGR             AICS            MGR     AICS    `0�����?fS�=�U���\��	�FEDRTNM         QCPUB           AICS            MGR             AICS            MGR     AICS    `�����?fS�@�U���e�
FEDRTNR         QCPUB           AICS            MGR             AICS            MGR     AICS    `�����?fS�C�U���l5�'JFEDRTNS         QCPUB           AICS            MGR             AICS            MGR     AICS    `0�����?fS�L�U�7�����@FEDRTNT         QCPUB           AICS            MGR             AICS            MGR     AICS    `�����?fS�F�U���sn�1�FEDRTNW         QCPUB           AICS            MGR             AICS            MGR     AICS    `@�����?fS�I�U���I�TFEDRTN1        QCPUB           AICS            MGR             AICS            MGR     AICS    ` �����?fS�O�U��j���NSFFILE         QCPUB           AICS            MGR             AICS            MGR     AICS    `������(���H00000000000000000                            000000STORE  @fedrtn@,nsffile;*v
�����������������)�fS�:�U���U'J'J� ����DISC                             1FEDRTND         QCPUB           AICS                            MGR     AICS    �fS5��^>�5��^>�5��`?5��`?'J0kk'J^	�22  5��`?AICS            'J'J101 000000000 281580417199911101315M9410  0810                  0000                          5290MIZZOU CREDIT UNION      28158041719991110RTRN001000000000  0000                          696281580417000000000665189050000004000               00050921011218         ,           R01  696281580417000000000665189050000002321               00051121012481         ,           R01  696281580417000000000665189050000000400               00051021010840         ,           R01  696281580417000000000665179060000002500               00052121009593         ,           R01  696281580417000000000664369510000024800               00100421009145         ,           R01  696281580417000000000663489000000010300               00000021014446         ,           R01  696281580417000000000663349010000050000               00105301363324         ,           R01  696281580417000000000662649580000001000               00104101364875         ,           R01  696281580417000000000662129550000042000               00102021011860         ,           R01  696281580417000000000660829070000003491               00056521012201         ,           R01  696281580417000000000660349000000003400               00101301360370         ,           R01  696281580417000000000658619540000027500               00209221014140         ,           R01  696281580417000000000657679510000011700               00102221011217         ,           R01  696281580417000000000657629010000020000               00112921013987         ,           R01  696281580417000000000657629010000013900               00109901362622         ,           R01  696281580417000000000654929540000010000               00055101366375         ,           R08  696281580417000000000654179000000003000               00103021010701         ,           R01  696281580417000000000654159570000002041               00064121013033         ,           R01  696281580417000000000653319500000002580               00110401367081         ,           R01  696281580417000000000653319500000001500               00111301366265         ,           R01  696281580417000000000653239550000016000               00055621014825         ,           R01  696281580417000000000653239550000002013               00055921012231         ,           R01  696281580417000000000648699570000008757               00253021010478         ,           R01  696281580417000000000648629540000005000               00208621010670         ,           R01  696281580417000000000642559560000002500               00096221009596         ,           R01  696281580417000000000642559560000000312               00095501363583         ,           R01  696281580417000000000642559560000000274               00095401363580         ,           R01  696281580417000000000642559560000000107               00095101363574         ,           R01  696281580417000000000637269520000002750               00058621009267         ,           R01  696281580417000000000637269520000001472               00058321014525         ,           R01  696281580417000000000637079550000045000               00207821009004         ,           R01  696281580417000000000636959570000001000               00107721012947         ,           R01  696281580417000000000635919090000008767               00131501359222         ,           R01  696281580417000000000633449520000009623               00073721010483         ,           R01  696281580417000000000632749540000004192               00134601360221         ,           R01  696281580417000000000632749540000001000               00133601364910         ,           R01  696281580417000000000629389580000006500               00106101362726         ,           R02  696281580417000000000627139530000005000               00168121013822         ,           R02  696281580417000000000627139530000001526               00168421009046         ,           R02  696281580417000000000627139530000001316               00168621009041         ,           R02  696281580417000000000622159560000002609               00117921011885         ,           R01  696281580417000000000620869520000034500               00178421011856         ,           R01  696281580417000000000616339530000011345               00137801366089         ,           R01  696281580417000000000616339530000007904               00147101359579         ,           R01  696281580417000000000614859520000007046               00375121009470         ,           R01  696281580417000000000613519500000002520               00133801364877         ,           R01  696281580417000000000608109550000004873               00181721011779         ,           R01  696281580417000000000605949540000020000               00188721013159         ,           R01  696281580417000000000602399500000008127               00270121012643         ,           R01  696281580417000000000601469590000031500               00286321014554         ,           R01  696281580417000000000601469590000012563               00289721009843         ,           R01  696281580417000000000593569090000002542               00187121008948         ,           R01  696281580417000000000593569090000002267               00187721014155         ,           R01  696281580417000000000593569090000002000               00184721011355         ,           R01  696281580417000000000593189050000004621               00551021011303         ,           R01  696281580417000000000593189050000002412               00551201359398         ,           R01  696281580417000000000590699530000013908               00137821012850         ,           R01  696281580417000000000587269090000020514               00108321012654         ,           R01  696281580417000000000580559000000018000               00025821008992         ,           R01  696281580417000000000579049000000046606               00141421011681         ,           R01  696281580417000000000574549550000015869               00181621013534         ,           R01  696281580417000000000571889040000050000               00785721014011         ,           R01  696281580417000000000570459530000001301               00204421014175         ,           R01  696281580417000000000570459530000000704               00204321014171         ,           R01  696281580417000000000568419540000001356               00052201366505         ,           R01  696281580417000000000560089590000002300               00153501366279         ,           R01  696281580417000000000560089590000001071               00153621011687         ,           R01  696281580417000000000560089590000000603               00153321009491         ,           R01  696281580417000000000559259070000006775               00140201359191         ,           R01  696281580417000000000557869000000002350               00557701366035         ,           R01  696281580417000000000556719050000023000               00151921011857         ,           R01  696281580417000000000553909560000014000               00270301363292         ,           R01  696281580417000000000534209090000037000               00170521013693         ,           R01  696281580417000000000530959520000004000               00116501359176         ,           R01  696281580417000000000529799010000000995               00162721010928         ,           R01  696281580417000000000526339590000002561               00013721013075         ,           R01  696281580417000000000520599020000002000               00158801365859         ,           R01  696281580417000000000520599020000001000               00160421012680         ,           R01  696281580417000000000512539030000025438               00269801359042         ,           R01  696281580417000000000507339030000040711               00447321013673         ,           R01  696281580417000000000498829040000012370               00729221015256         ,           R01  696281580417000000000489249020000017513               00399001363483         ,           R01  696281580417000000000454879050000042500               00562421014889         ,           R01  696281580417000000000454879050000020000               00576501363615         ,           R01  696281580417000000000454879050000007057               00568621014923         ,           R01  696281580417000000000454879050000006500               00562321014888         ,           R01  696281580417000000000431749060000002385               00648201359211         ,           R01  696281580417000000000411349510000022698               00078021011216         ,           R01  696281580417000000000396109080000097176               00693721015257         ,           R09  696281580417000000000374839040000010000               00227921013977         ,           R01  696281580417000000000285159590000014000               00121901363535         ,           R01  696281580417000000000279619020000025485               00784701364926         ,           R01  696281580417000000000196649030000003098               00085421009335         ,           R01  696281580417000000000196649030000002586               00085321012061         ,           R01  696281580417000000000178139050000002000               00289721012726         ,           R01  696281580417000000000168449040000008353               00422221009493         ,           R01  696281580417000000000168449040000003000               00419121012486         ,           R01  696281580417000000000168449040000001599               00421521011293         ,           R01  696281580417000000000133609020000019795               00131921014385         ,           R01  696281580417000000000101889090000002500               00059721013669         ,           R02  696281580417000000000101889090000002500               00057921013663         ,           R02  696281580417000000000060929000000007500               00000021014543         PERKINS, JAMR11  696281580417000000000035539070000010000               00229621015090         ,           R01  8290000103          000000000000000001189048Robert P Perkins         5738741477281580417      9000001000000000000000000000000000000000000                                                   )���������VfS�=�U���\�	�	�� ����DISC                             1FEDRTNM         QCPUB           AICS                            MGR     AICS    �fS5��|%�5��|%�5��|�5��|�	��
	�����  5��|�AICS            	�QCMACRO   FEDRTNM                                                                                                                                                                                                                                                  10  >***************************************                                                                                                                                                                                                                   20  >***  CREATE SHAREDRAFT RETURN FILE  ***                                                                                                                                                                                                                   30  >***************************************                                                                                                                                                                                                                   40  /LOAD FEDRTNW.QCPUB.CU1                                                                                                                                                                                                                                    50  /PRINTER LP                                                                                                                                                                                                                                                60  LINES=1                                                                                                                                                                                                                                                    70  RIGHT=94                                                                                                                                                                                                                                                   80  !!                                                                                                                                                                                                                                                         90  /PRINT B:F D FEDRTND                                                                                                                                                                                                                                   V��������jfS�@�U���e

� ����DISC                             1FEDRTNR         QCPUB           AICS                            MGR     AICS    �fS5�����5�����5�����5�����


@   5�����AICS            

19991110  j��������)�fS�C�U���l5'J'J� ����DISC                             1FEDRTNS         QCPUB           AICS                            MGR     AICS    �fS5���s*5���s*5���#B5���#B'J0kk
'J^�
00  5���#BAICS            'J'J101 000000000 281580417199911101315M9410  0810                  0000                          5290MIZZOU CREDIT UNION      28158041719991110RTRN001000000000  0000                          696281580417000000000665189050000004000               00050921011218         ,           R01  696281580417000000000665189050000002321               00051121012481         ,           R01  696281580417000000000665189050000000400               00051021010840         ,           R01  696281580417000000000665179060000002500               00052121009593         ,           R01  696281580417000000000664369510000024800               00100421009145         ,           R01  696281580417000000000663489000000010300               00000021014446         ,           R01  696281580417000000000663349010000050000               00105301363324         ,           R01  696281580417000000000662649580000001000               00104101364875         ,           R01  696281580417000000000662129550000042000               00102021011860         ,           R01  696281580417000000000660829070000003491               00056521012201         ,           R01  696281580417000000000660349000000003400               00101301360370         ,           R01  696281580417000000000658619540000027500               00209221014140         ,           R01  696281580417000000000657679510000011700               00102221011217         ,           R01  696281580417000000000657629010000020000               00112921013987         ,           R01  696281580417000000000657629010000013900               00109901362622         ,           R01  696281580417000000000654929540000010000               00055101366375         ,           R08  696281580417000000000654179000000003000               00103021010701         ,           R01  696281580417000000000654159570000002041               00064121013033         ,           R01  696281580417000000000653319500000002580               00110401367081         ,           R01  696281580417000000000653319500000001500               00111301366265         ,           R01  696281580417000000000653239550000016000               00055621014825         ,           R01  696281580417000000000653239550000002013               00055921012231         ,           R01  696281580417000000000648699570000008757               00253021010478         ,           R01  696281580417000000000648629540000005000               00208621010670         ,           R01  696281580417000000000642559560000002500               00096221009596         ,           R01  696281580417000000000642559560000000312               00095501363583         ,           R01  696281580417000000000642559560000000274               00095401363580         ,           R01  696281580417000000000642559560000000107               00095101363574         ,           R01  696281580417000000000637269520000002750               00058621009267         ,           R01  696281580417000000000637269520000001472               00058321014525         ,           R01  696281580417000000000637079550000045000               00207821009004         ,           R01  696281580417000000000636959570000001000               00107721012947         ,           R01  696281580417000000000635919090000008767               00131501359222         ,           R01  696281580417000000000633449520000009623               00073721010483         ,           R01  696281580417000000000632749540000004192               00134601360221         ,           R01  696281580417000000000632749540000001000               00133601364910         ,           R01  696281580417000000000629389580000006500               00106101362726         ,           R02  696281580417000000000627139530000005000               00168121013822         ,           R02  696281580417000000000627139530000001526               00168421009046         ,           R02  696281580417000000000627139530000001316               00168621009041         ,           R02  696281580417000000000622159560000002609               00117921011885         ,           R01  696281580417000000000620869520000034500               00178421011856         ,           R01  696281580417000000000616339530000011345               00137801366089         ,           R01  696281580417000000000616339530000007904               00147101359579         ,           R01  696281580417000000000614859520000007046               00375121009470         ,           R01  696281580417000000000613519500000002520               00133801364877         ,           R01  696281580417000000000608109550000004873               00181721011779         ,           R01  696281580417000000000605949540000020000               00188721013159         ,           R01  696281580417000000000602399500000008127               00270121012643         ,           R01  696281580417000000000601469590000031500               00286321014554         ,           R01  696281580417000000000601469590000012563               00289721009843         ,           R01  696281580417000000000593569090000002542               00187121008948         ,           R01  696281580417000000000593569090000002267               00187721014155         ,           R01  696281580417000000000593569090000002000               00184721011355         ,           R01  696281580417000000000593189050000004621               00551021011303         ,           R01  696281580417000000000593189050000002412               00551201359398         ,           R01  696281580417000000000590699530000013908               00137821012850         ,           R01  696281580417000000000587269090000020514               00108321012654         ,           R01  696281580417000000000580559000000018000               00025821008992         ,           R01  696281580417000000000579049000000046606               00141421011681         ,           R01  696281580417000000000574549550000015869               00181621013534         ,           R01  696281580417000000000571889040000050000               00785721014011         ,           R01  696281580417000000000570459530000001301               00204421014175         ,           R01  696281580417000000000570459530000000704               00204321014171         ,           R01  696281580417000000000568419540000001356               00052201366505         ,           R01  696281580417000000000560089590000002300               00153501366279         ,           R01  696281580417000000000560089590000001071               00153621011687         ,           R01  696281580417000000000560089590000000603               00153321009491         ,           R01  696281580417000000000559259070000006775               00140201359191         ,           R01  696281580417000000000557869000000002350               00557701366035         ,           R01  696281580417000000000556719050000023000               00151921011857         ,           R01  696281580417000000000553909560000014000               00270301363292         ,           R01  696281580417000000000534209090000037000               00170521013693         ,           R01  696281580417000000000530959520000004000               00116501359176         ,           R01  696281580417000000000529799010000000995               00162721010928         ,           R01  696281580417000000000526339590000002561               00013721013075         ,           R01  696281580417000000000520599020000002000               00158801365859         ,           R01  696281580417000000000520599020000001000               00160421012680         ,           R01  696281580417000000000512539030000025438               00269801359042         ,           R01  696281580417000000000507339030000040711               00447321013673         ,           R01  696281580417000000000498829040000012370               00729221015256         ,           R01  696281580417000000000489249020000017513               00399001363483         ,           R01  696281580417000000000454879050000042500               00562421014889         ,           R01  696281580417000000000454879050000020000               00576501363615         ,           R01  696281580417000000000454879050000007057               00568621014923         ,           R01  696281580417000000000454879050000006500               00562321014888         ,           R01  696281580417000000000431749060000002385               00648201359211         ,           R01  696281580417000000000411349510000022698               00078021011216         ,           R01  696281580417000000000396109080000097176               00693721015257         ,           R09  696281580417000000000374839040000010000               00227921013977         ,           R01  696281580417000000000285159590000014000               00121901363535         ,           R01  696281580417000000000279619020000025485               00784701364926         ,           R01  696281580417000000000196649030000003098               00085421009335         ,           R01  696281580417000000000196649030000002586               00085321012061         ,           R01  696281580417000000000178139050000002000               00289721012726         ,           R01  696281580417000000000168449040000008353               00422221009493         ,           R01  696281580417000000000168449040000003000               00419121012486         ,           R01  696281580417000000000168449040000001599               00421521011293         ,           R01  696281580417000000000133609020000019795               00131921014385         ,           R01  696281580417000000000101889090000002500               00059721013669         ,           R02  696281580417000000000101889090000002500               00057921013663         ,           R02  696281580417000000000060929000000007500               00000021014543         PERKINS, JAMR11  696281580417000000000035539070000010000               00229621015090         ,           R01  8290000103          000000000000000001189048Robert P Perkins         5738741477281580417      9000001000000000000000000000000000000000000                                                   )���������r`fS�L�U�7���pp� ����DISC                             1FEDRTNT         QCPUB           AICS                            MGR     AICS    �fS5�����5�����5���:�5���:��@����P�" "  5���:�AICS            �@                 QueryCalc Reports for Credit Unions                                               written by:  Mizzou Credit Union                                                     last update:  11/11/99                                                                                                                                   SHAREDRAFT RETURNS FOR FEDLINE REPORT                                       ---------------------------------------------                                                                                                                                                                                      This file contains important information on the following topics:               **********************************************************************          Report highlights                                                               Files included                                                                  Databases accessed                                                              Download instructions                                                           Restoring files to the HP3000                                                   Customizing the report for the credit union                                     Verifying databases are defined                                                 Updating the database dictionary                                                Troubleshooting common problems                                                 Limited warranty on reports                                                                                                                                                                                                                     Report highlights                                                               **********************************************************************          This report gathers information about returned sharedrafts from the             SDRTRN database.  This information is formatted into a file that can            be downloaded into the FedLine terminal and transmitted to the Federal          Reserve Bank.                                                                                                                                                   Drafts are added to the database using Spectrum's PDSDRADD program.             They may be modified using an RTCH command, or deleted using an RTDL.                                                                                           A template has been created that allows an operator to input the date           of the return items.  This template has been added to a menu that can           be accessed from the front office using a RUN command.                                                                                                                                                                                          Files included                                                                  **********************************************************************                                                                                           1)  FedRtnW  - QueryCalc worksheet                                              2)  FedRtnM  - QueryCalc macro                                                  3)  FedRtnR  - ASCII file which stores the date                                 4)  TFedRtn1 - template which runs the macro                                    5)  FedRtnD  - sample QueryCalc output file                                     6)  FedRtns  - sample ASCII file which is transferred to FedLine                7)  Readme   - this text file of instructions                                   8)  FedRtn.rcl - sample Reflection script to transfer the file                                                                                                 Databases accessed                                                              **********************************************************************          This report uses data from the following databases:                                                                                                                     MEMBRS          [SPECTRUM IMAGE DATABASE]                                       SDRTRN          [SPECTRUM IMAGE DATABASE]                                                                                                                                                                                               Download instructions                                                           **********************************************************************          Although downloading reports from the web site is quite simple, you             may wish to print these instructions before proceeding.  The procedure          outlined below requires the use of: (i) a relatively recent version of          the Reflection terminal emulator and (ii) either Netscape Navigator             3.0 (or greater) or Microsoft Internet Explorer 3.0 (or greater),               running on any version of Windows (3.x, 95, or NT). If you're missing           any of these pieces, the downloading procedure unfortunately will not           work.                                                                                                                                                                Step 1.                                                                         -------                                                                         Click on the desired download link. Store the self-extracting                   file anywhere you wish on your PC. Its residency on your PC                     will only be temporary. At the conclusion of the downloading                    process, after the files have been successfully transferred to                  your HP3000, this file will be deleted.                                                                                                                         Step 2.                                                                         -------                                                                         Once the file has been downloaded, double click on the newly                    downloaded file. When you press the UnZip button, the file will                 unzip itself and automatically build an AICS directory (folder)                 on the C: drive, with a subdirectory (subfolder) labeled                        Reports.                                                                                                                                                        Step 3.                                                                         -------                                                                         You will now find files in the Reports subdirectory.  The files                 include a Readme.txt file, the report and any attendant macros,                 jobs and ancillary files (see above).  These files are stored                   in Reflection's WRQ protocol (LABEL mode) and must be                           transferred back onto your HP3000 in that format. The particular                version of Reflection that was used to originally upload these                  files was 5.21. It would probably be best to use a reasonably                   similar version.                                                                                                                                                Step 4.                                                                         -------                                                                         Using Reflection, restore the files to your HP3000 using the                    procedure outlined below.                                                                                                                                       Step 5.                                                                         -------                                                                         Once the transfer is complete, follow the instructions below to                 setup the report for your credit union.                                                                                                                         Step 6.                                                                         -------                                                                         Once you are satisfied that the report is working, you may                      delete the self-extracting download file as well as the Reports                 subdirectory and its files from your PC's file directory.                                                                                                       Step 8.                                                                         -------                                                                         Congratulations on a successful download. We sincerely hope you                 will find your new QueryCalc report useful!                                                                                                                                                                                                Restoring files to the HP3000                                                   **********************************************************************           1)  Using Reflection, sign onto your HP3000 to the group and account                the files are to be stored to.  You may use any group or account                you choose.  However, the assumption is that files will be                      restored as follows:                                                                                                                                                      DATA.CU1 . . . . . . TEMPLATES                                                 QCPUB.CU1 . . . . . . JOBS                                                                . . . . . . MACROS                                                              . . . . . . WORKSHEETS                                                          . . . . . . ASCII READ FILES                                                    . . . . . . ASCII OUTPUT FILES                                                                                                               NOTES:                                                                          ------                                                                          a)  If this group does not exist, your system administrator can                     create it.  This is a handy way of keeping your QueryCalc                       reports separate from the other files on your system.  The                      capabilities that should be assigned are BA, IA and PH.                         The security should be set to Read/Any, Write/AC, Append/AC,                    Lock/AC, Execute/Any.                                                                                                                                       b)  After due consideration, MCU has adopted the following                          conventions.                                                                                                                                                    1)  We created new groups on the CU1 account for our                                QueryCalc reports.  QCPUB is one such group.  In this                           way, groups are used in the same manner that a                                  subdirectory on a PC is used - to help organize the                             files.  Further, the only thing that is stored in the                           group are QueryCalc reports and their related files.                                                                                                        2)  We have adopted a naming convention in which the last                           letter of the name indicates the type of file (e.g.                             W = Worksheet, M = Macro, J = Job).  The only exception                         to this was that we continued using Summit's convention                         of naming templates with a leading "T".                                                                                                             2)  Using Reflection, transfer the files, using LABEL mode transfer.                                                                                            3)  Once the transfer is complete, you may delete the files and                     directories from your PC hard drive.                                                                                                                                                                                                       Customizing the report for the credit union                                     **********************************************************************          The following steps should be taken to insure the report runs on your           system.                                                                                                                                                          1)  Modify the template (TFEDRTN1).  These steps can be ignored if                  the files were restored to QCPUB.CU1.                                                                                                                           a)  Speak to the DP supervisor.  They may need to do this for                       you.  You will require access to an MPE ":" prompt, access                      to the group.account where the files were stored and access                     to an editor such as QUAD.                                                                                                                                  b)  Change line 6 to logon to the group and account where the                       files were restored.                                                                                                                                        c)  Change the macro line to read the macro from the group and                      account where the files were restored.                                                                                                                      d)  Add any password formatting your system may require.                                                                                                    2)  Modify the MACRO (FEDRTNM).  These steps can be ignored if the                  job was stored to QCPUB.CU1.                                                                                                                                    a)  In QueryCalc, type                                                                     /PROG FEDRTNM                                                                                                                                        b)  Change the line that loads the worksheet to reflect the                         group.account where the worksheet was restored.                                                                                                             c)  Save the macro by typing "K"                                                                                                                                d)  Exit the macro by typing "E"                                                                                                                            3)  Modify the WORKSHEET (FEDRTNW).                                                                                                                                 a)  Load the worksheet.  In QueryCalc, type                                                /LOAD FEDRTNW                                                                                                                                        b)  Change the credit union name.                                                       /S&R "MIZZOU CREDIT UNION" "MY CREDIT UNION NAME" ALL                                                                                                   c)  Change the printer to the name of your postscript printer                              /PRINTER MYPRINTER                                                                                                                                   d)  Page A:                                                                                                                                                        1)  AD29:  Change the routing and transit number to reflect                         to your institutions RTN.                                                                                                                                   2)  AD30:  Change the contact name to the appropriate person.                                                                                                   3)  AD31:  Change the contact phone to the appropriate number.                                                                                               e)  Page B:  This is the File Header Record.  Its layout was                                 taken from the FedLine File Interface Guide (CH-38)                                                                                                   1)  BI1:  Change the identifier to one appropriate for your                         institution.                                                                                                                                                2)  BM1:  Change this to the destination FRB prefix.  This 4                        digit number identifies the FRB as destination point or                         indicates the FRB office where the destination DI is                            located.  For FRB St. Louis, it is 0810.                                                                                                                 f)  Page C:  This is the Batch Header Record.  Its layout was                                taken from the FedLine File Interface Guide (CH-39)                                                                                                   1)  CC1:  Insure the name of your institution is <= 25                              characters.                                                                                                                                              g)  Page D:  These are the Detail Records.  Its layout was                                   taken from the FedLine File Interface Guide (CH-41)                                                                                                h)  Page E:  This is the Batch Control Record.  Its layout was                               taken from the FedLine File Interface Guide (CH-42)                                                                                                i)  Page F:  This is the File Control Record.  Its layout was                                taken from the FedLine File Interface Guide (CH-43)                                                                                                j)  Save the worksheet.                                                                    /SAVE FEDRTNW                                                                                                                                    4)  Create a reflection script to download the file from the host to                the pc.  A sample .rcl file is included.  The important things                  to note are:                                                                                                                                                    a)  Make sure that trailing spaces are not deleted.                                                                                                             b)  The file should be transferred to the directory that                            FedLine uses for importing files (e.g. C:\FLIMPORT)                                                                                                         c)  The source file on the host will be on the group.account                        where the job logs onto.                                                                                                                                                                                                                                                                                                                                                                               Verifying the databases are defined                                             **********************************************************************          Unless you have used the database(s) above in other reports, it would           be prudent to verify they have been defined in your QueryCalc                   dictionary.  The process only takes a few minutes and could save you            some trouble-shooting later.  You can verify the databases are                  defined by attempting to open each of them from within QueryCalc.                                                                                                1)  Get into QueryCalc.  From a MPE prompt, type:                                             RUN QCX.QCPROGS.AICS                                                                                                                              2)  Once a blank worksheet has been loaded, type:                                             @OPENDB databasename/password.                                                                                                                        NOTE:  Most SPECTRUM image databases use "LOOKUP" as the                               password, while HP, QueryCalc and CFO module databases                          use "READER" as the password.  Pseudodatabases can use                          any password assigned by the creator.  Try "LOOKUP" and                         "READER" if you receive a password error.                                                                                                            3)  If the database exists, it will be opened.  If it does not exist,               you will receive the following error message, in which case you                 will need to add the database to your QueryCalc dictionary.                                                                                                     The database DATABASENAME isn't registered in QueryCalc's                       dictionary.                                                                                                                                                                                                                                Updating the database dictionary                                                **********************************************************************          If a needed database does not exist, you will need to add it to the             QueryCalc database dictionary.  The procedure varies only slightly,             depending on the type of database to be added.                                                                                                                                                                                                  Adding an IMAGE database                                                        ------------------------                                                        Most SPECTRUM databases and CFO module databases are IMAGE databases.                                                                                            1)  From a MPE prompt, type:  RUN ADDIMAGE.AICS.QCPROGS;PARM=1234               2)  Type:  A   (to add)                                                         3)  Enter the fully qualified database name.  (e.g. MEMBRS.DATA.CU1)            4)  Enter the password.  (e.g. LOOKUP)                                          5)  Type:  E   (to exit)                                                        6)  Verify the database has been added to your dictionary by                        following the steps above.                                                                                                                                                                                                                 Adding a copy of an IMAGE database                                              ----------------------------------                                              You may want to run reports against a copy of a database.  The most             common example is a copy of the MEMBRS database, created at month-end           after dividends are posted.  This database is typically stored on               REPORT.CU1.                                                                                                                                                      1)  From a MPE prompt, type:  RUN ADDIMAGE.AICS.QCPROGS;PARM=1234               2)  Type:  A   (to add)                                                         3)  Enter the fully qualified database name. (e.g. MEMBRS.REPORT.CU1)           4)  Enter the password.  (e.g. LOOKUP)                                          5)  Enter the database synonym (1-16 chars):  (e.g. REPORT)                     6)  Type:  E   (to exit)                                                        7)  Verify the database has been added to your dictionary by                        following the steps above.                                                                                                                                                                                                                 Adding a QueryCalc KSAM database                                                --------------------------------                                                A database denoted above with [KSAM database created by QueryCalc] was          created and opened by QueryCalc.  These databases are created by                simply calculating a report and printing the results of a detail list           report or a storelist into a database via the /PRINTDB command.  You            do not need to do anything, since the macro which automatically                 calculates this report will build the database(s) for you.  For more            information on these databases, see QUERYCALC, ADDITIONAL DOCUMENTS.                                                                                                                                                                            Adding a pseudodatabase                                                         -----------------------                                                         A database denoted above as [Pseudodatabase . . .] allows you to                "read" a file on the HP3000 as if it were a database.  Many times,              this is simply a flat, ASCII file.  Two files are required in order             to define a pseudodatabase of this type.  The first, is the file to             be read.  The second, is a schema file that "maps" the file for the             dictionary.  For example, it might indicate that the first 20                   characters are for the name, the second 20 for the address, etc.  If            a pseudodatabase is required for this report, both of the required              files have been included in the files downloaded.                                                                                                               The process for adding the database to your dictionary is, once again,          straightforward and simple.                                                                                                                                      1)  From a MPE prompt, type:  RUN ADDKSAM.AICS.QCPROGS;PARM=1234                2)  Type:  A   (to add)                                                         3)  Database schema file:  (e.g. DEFTSTDB.QCPUB.CU1)                            4)  Enter the password.  (e.g. LOOKUP)                                          5)  Type:  E   (to exit)                                                        6)  Verify the database has been added to your dictionary by                        following the steps above.                                                                                 r`�fS�L�U�7���p@@����                                                For additional information on creating and using pseudodatabases, see           QUERYCALC, ADDITIONAL DOCUMENTS.                                                                                                                                                                                                                Troubleshooting Common Problems                                                 **********************************************************************          Q: "When I try to modify the macro, I receive an error message stating              that the macro does not exist."                                             ----------------------------------------------------------------------          A:  You must be signed on to the group and account where the macro was              stored.  Some logon scripts sign you on to specific groups and                  accounts.  If this is not the same group and account where the                  macro was stored, you won't be able to modify it.  You will need                to sign off and then sign back on to the correct group and account                                                                                              Be careful qualifying the macro and then modifying it.  For                     example, you could be logged on to DATA.CU1 and type                              /PROG MYMACRO.QCPUB.CU1                                                                                                                                       The macro would be displayed.  You could make changes to it.                    However, the macro would be saved back to the group and account                 where you are signed on, not the original group and account.  In                the above example, the changed macro would be saved to DATA.CU1.                                                                                                                                                                            Q: "I receive an error message stating that a dataset does not exist                in a database.  However, I am sure the dataset does exist in this               database."                                                                  ----------------------------------------------------------------------          A:  First, verify the database exists in your database dictionary.                  You can do this quickly by closing the database and then                        re-opening it.  If you receive an error telling you that the                    database isn't registered in QueryCalc's dictionary, follow the                 steps listed above to add this database to your dictionary.                                                                                                     If the database is in your dictionary, it may be that the                       database has been modified since the dictionary was last updated.               This typically occurs when a SPECTRUM release is loaded to your                 system. In this case, delete the database from your dictionary                  and then add it back in, following the steps listed above.                                                                                                                                                                                  Q: "I have transferred all of the files to the HP3000.  However, when               I look in the QueryCalc catalog, the report does not show up."              ----------------------------------------------------------------------          A:  Relax.  The file is on your HP3000.  It will not show in the                    QueryCalc catalog until you retrieve and save the file.  To                     retrieve the file, type                                                                /LOAD filename                                                                                                                                           To save the file, type                                                                 /SAVE                                                                                                                                                    Now use the /CAT command and your report will be listed.                                                                                                                                                                                        For macros, type                                                                       /PROG filename                                                                                                                                           To save the file, type                                                                 K filename                                                                                                                                               Now use the /CAT command and your macro will be listed.                                                                                                                                                                                                                                                                     Limited Warranty on Reports                                                     **********************************************************************          *  The reports are distributed "AS IS".  No warranties are made or                 provided by any parties.                                                                                                                                     *  The reports are copyrighted.  Sale or redistribution of the                     reports is strictly prohibited.                                                                                                                              *  The download and/or use of these reports indicates acceptance of                the terms set forth.                                                                                                                                         ���������4.fS�F�U���sn1�1�� ����DISC                             1FEDRTNW         QCPUB           AICS                            MGR     AICS    �fS5��ԫ~5��ԫ~5��נ�5��נ�1�@1���445��נ�AICS            1�1�- V2.00 6 120  199911101999111015:25  9T � %MIZZOU CREDIT UNION �d K T � %Create FRB Share Draft Return File �dN>��$ � %"As Of: "+DAT$6(SYSDATE) �
dAs Of: 11/10/99 5�z$ � %E8+" - Page A" �d FEDRTNW.QCPUB.CU1 - Page A ;�u$ � %"RUN TIME: "+HRS$(12) �d $�$�    6�6�6�6�6�2��sd 3001 acct br01                                           RUN TIME: 3:24 PM-�T � %FILENAME: �5�T � %FEDRTNW.QCPUB.CU1 �0�T � %MACRO NAME: �5�T � %FEDRTNM.QCPUB.CU1 �(.�T � %JOB NAME: �5�T � %TFEDRTN1.DATA.CU1 �./T � %DISK FILE: �ME: "+HRS$(12) �d $�$�$�  6�6�6�6�6�2��sd 3001 acct br01                                           5	T � %FEDRTND.QCPUB.CU1 �E1<T � %INSTRUCTIONS: �.a=T � %1. Macro recalculates worksheet and creates disk file. �%NWT � %2. Download disk file to Fedline PC. �GqT � %3. Transfer file using Fedline. �.�T � %DATABASES: �d $�$�$R  6�6�6�6�6�2��sd 3001 acct br01                                           *�T � %SDRTRN �*�T � %MEMBRS �#*  � �1BT � %SCRATCH DATA �dc)tT � %VALUE �/uT � %DESCRIPTION � 2�>$FB�� � %DAT$2(SYSDATE) �199911101�T � (Today's Date � %DATABASES: �d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           -�TG"N � %281580417 �*?�T � (Routing & Transit Number �6�T � %Robert P Perkins �1�T � (Contact Name �.TH���@ � %5738741477 �2T � (Contact Phone �C��N@ �B %READ("FEDRTNR",AD35:AD35,C,RTX) �ABASES: �d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           ,xTFB�� � %19991110 �0yT � (Report Date �?�n$D��x � %SUB$(D35,3,6)+SUB$(D35,1,2) �s9911190�T � (Report Date �,�T$ � %HRS$(24) �15:240�T � (Report Time �#�  �B �".JT � %PAGE DATA �dd $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           (|T � %PAGE �,}T � %CONTENTS �%�T � %A �U+�T � 'Scratch �T%�T � %B �8�T � 'File Header Record �%�T � %C ��9�T � 'Batch Header Record � � %PAGE DATA �dd $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           %T � %D �CT � 'Return Request Detail Record �%2T � %E �:3T � 'Batch Control Record �%LT � %F �e9MT � 'File Control Record �%T@ � %1 � &T@ � %01 � DATA �dd $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           -T � %000000000 �T(��$G"N � %AD29 �	281580417 2��$FB�� � %DAT$2(SYSDATE) �19991110A��$B�@ � %SUB$(AD37,1,2)+SUB$(AD37,4,5) �1524%	T � %M �&
TA� � %94 �&T@� � %10 �(
TBe@ � %0810 �TA �dd $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           (T � %0000 �%T@� � %5 �9'TB� � %290 �9T � %MIZZOU CREDIT UNION �(��$G"N � %AD29 �	281580417T/��$FB�� � %DAT$2(AD35) �19991110(T � %RTRN �'T@ � %001 � %0810 �TA �dd $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           -T � %000000000 �(
T � %0000 �^��RA� * � %USING SDRTRN.ITEM-FILE, FIND WHEN ENTRY-DATE=[AD35] �J��QD��� * � %REREADING, VAL OF ACCOUNT-SUFFIX � 355390C��RCN  * � %REREADING, VAL OF AMOUNT �D��RB�� * � %REREADING, VAL OF DRAFT-NO �d $�$�$R"  6�6�6�6�6�2��sd 3001 acct br01                                           A��QF*�� * � %REREADING, VAL OF TRACE �21015090G�}Q@ * � %REREADING, VAL OF RETURN-CODE � 01F�cRFB�� * � %REREADING, VAL OF ENTRY-DATE �G�IQ@ * � %REREADING, VAL OF RETURN-CODE � 01I�/QElt� * � %REREADING, VAL OF DRAFT-ACCOUNT �R000003553907 OF DRAFT-NO �d $�$�R"  6�6�6�6�6�2��sd 3001 acct br01                                           (�$G"N � %AD29 �	281580417'�T � %R&T �C��$Elt� � %RJS$("00000000000000000"+A9,17) ��00000000003553907 (T � %ACCT �=��$CN  � %RJS$("0000000000"+A3,10) � 
0000010000* T � %AMOUNT �7��$B�� � %RJS$("000000"+A4,6) �O002296d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           ):T � %DRAFT �	-��$FB�� � %DAT$2(A7) �19991110.TT � %ENTRY-DATE �7��$ � %"R"+RJS$("00"+A8,2) �R01%*nT � %RETURN �9�y$F*�� � %RJS$("00000000"+A5,8) �21015090)�T � %TRACE �� %RJS$("000000"+A4,6) �O002296d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           0�_NC�i� � %INT(A11/100) �b�EQ � %USING MEMBRS.MEMBER-FILE, VAL OF NAME WHEN ACCOUNT=[A17] �>�+$ � %SUB$(A18,1,POS(A18,"/")-1) �?�$ � %SUB$(A18,POS(A18,"/")+1,30) �<��$ � %SUB$(A19+", "+A20,1,12) �, (
T � %NAME �,6) �O002296d $�$�$Q"  6�6�6�6�6�2��sd 3001 acct br01                                           %T@� � %8 �0'TB� � %290 �S[��RA� � %USING SDRTRN.ITEM-FILE, FIND WHEN ENTRY-DATE=[AD35] �7��$A� � %RJS$("000000"+C1,6) �0001030T � %000000000000 �>��$E�� � %RJS$("000000000000"+C2,12) �000001189048 � %NAME �,6) �O002296d $�$�$Q"  6�6�6�6�6�2��sd 3001 acct br01                                           3��$ � %SUB$(AD30,1,25) �Robert P Perkins(��$H���@ � %AD31 �
5738741477(��$G"N � %AD29 �	281580417?��RE�� � %rereading, sum of amount �3%T@� � %9 �0*T@ � %000001 �*T � %000000 � %NAME �,6) �O002296d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           ,T � %00000000 �.T � %0000000000 �0T � %000000000000 �,O 
 ,BXSA2J92dd �-O 
 ,BX C
H'Pd �-5O 
 ,BX C
HPd �-OO 
 ,BX C
HPd �-iO 
 ,LN D.H.2d �,6) �O002296d $�$�$�"  6�6�6�6�6�2��sd 3001 acct br01                                           -�O 
 ,BX C*
H7Pd �-�O 
 ,BX C,
H.Pd �;�O 
 ,LN DZD'Zd �;�O 
 ,LN D.ZD7Zd �';�O 
 ,BX C*
H,Pd �;O 
 ,LN C!
H!Pd �O$$�$�$�6�6�6�6�6�6�6�2��sd 3001 acct br01                                           		

				
	6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6`6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6`6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6`	^EOUDQFS^�@6�6�6�6�6�6�6�6�6�6�6�6�4�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�2�6`<�k<SDRTRN.DATA.CU1              IM)+*%.(�SDRTRN            <MEMBRS.DATA.CU1              IM)+*%.(�MEMBRS            QCREPRTD    10  GROUP 1M    20  D,"696",1;R&T,4;ACCT,13;AMOUNT,30;DRAFT,55;TRACE,61;NAME,78;RETURN,90    30  ENDGROUP
^EODLTMPS^^EOQ$^;k)I{P&*.Ic7'Vv'R]cPm>AzI6�6�6�6�6�4�$�$�$�4�6�6�6�6��6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�2�6`d�sd 3001 acct br01                                                                                                                                                                                                3001                                        5;TRACE,61;NAME,78;RETURN,90    30  ENDGROUP
^EODLTMPS^^EOQ$^;k)I{P&*.Ic7'Vv'R]cPm>AzI6��6�6�6�4�$�$�$�4�6�6�6�6��6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�6�2�6`4.��������pfS�I�U���I� ����DISC                             1TFEDRTN1        QCPUB           AICS                            MGR     AICS    �fS5���
5���
5����5���� MMP�  5����AICS            `                         FRB, ST. LOUIS                Rel 24.00               `              Returned Share Draft File Generation                             `                                                                               ~~Enter File Posting Date (MMDDYY)     _6 DATE {0} [STADATE]                    `                                                                               !JOB TFEDRTN1,MGR.CU1,QCPUB                                                     !COMMENT *********************************************                          !COMMENT ***  SET DATE VARIABLES FOR CURRENT DATE  ***                          !COMMENT *********************************************                          !SETVAR THISDATE '00'+'!HPDATE'                                                 !SETVAR THISMONTH '00'+'!HPMONTH'                                               !SETVAR THISYEAR RHT(HPDATEF,4)                                                 !COMMENT **************************************************                     !COMMENT ***  CHOSEN BUSINESS DATE:   DATE1 = CCYYMMDD  ***                     !COMMENT **************************************************                     !IF [STADATE] > 0                                                               !   SETVAR DYEAR RHT('[STADATE]',2)                                             !   SETVAR DCENT LFT(RHT(HPDATEF,4),2)                                          !   IF !DYEAR = 99                                                              !      IF !DYEAR <> !HPYEAR                                                     !         SETVAR DCENT DCENT-1                                                  !      ENDIF                                                                    !   ENDIF                                                                       !   SETVAR DATE1 DCENT+DYEAR+LFT('[STADATE]',4)                                 !ELSE                                                                           !   SETVAR DATE1 '!THISYEAR'+RHT('!THISMONTH',2)+RHT('!THISDATE',2)             !ENDIF                                                                          !COMMENT                                                                        !COMMENT  ************************                                              !COMMENT  ***  EDIT DATE FILE  ***                                              !COMMENT  ************************                                              !COMMENT                                                                        !ECHO T FEDRTNR>CCARDS                                                          !ECHO C 1/20 TO '' A>>CCARDS                                                    !ECHO C 1/1 TO '!DATE1' A>>CCARDS                                               !ECHO K:U>>CCARDS                                                               !ECHO Y>>CCARDS                                                                 !ECHO E>>CCARDS                                                                 !QUAD<CCARDS                                                                    !COMMENT                                                                        !COMMENT *************************************                                  !COMMENT *** THIS SECTION BUILDS TAG FILE  ***                                  !COMMENT *** FOR FEDLINE TRANSMISSSION.    ***                                  !COMMENT *************************************                                  !COMMENT                                                                        !PURGE OFEDRTNS                                                                 !RENAME FEDRTNS,OFEDRTNS                                                        !BUILD FEDRTNS;REC=-94,10,F,ASCII;DISC=2500,10,1                                !COMMENT                                                                        !FILE QCMACROF=FEDRTNM.QCPUB.CU1                                                !RUN QCX.QCPROGS.AICS                                                           !PAUSE 1                                                                        !FCOPY FROM=FEDRTND;TO=FEDRTNS                                                  !COMMENT                                                                        !COMMENT **********************************                                     !COMMENT ***  E-MAIL: PROCESS COMPLETE  ***                                     !COMMENT **********************************                                     !ECHO SYS>CCARDS                                                                !ECHO ACCT>>CCARDS                                                              !ECHO ' '>>CCARDS                                                               !ECHO >>CCARDS                                                                  !ECHO SD - RETURN FILE BUILD COMPLETE>>CCARDS                                   !ECHO >>CCARDS                                                                  !ECHO >>CCARDS                                                                  !ECHO >>CCARDS                                                                  !ECHO JOB STARTED AT !HPINTROTIME>>CCARDS                                       !ECHO JOB NUMBER !HPJOBNUM>>CCARDS                                              !ECHO !HPJOBNAME FINISHED AT !HPTIMEF ON !HPDATEF.>>CCARDS                      !ECHO OK TO DOWNLOAD FILE TO FEDLINE NOW.>>CCARDS                               !ECHO *>>CCARDS                                                                 !RUN PSENDMAI.PGMS.SPECTRUM;LIB=P;MAXDATA=31232;NOCB;STDIN=CCARDS               !COMMENT                                                                        !TELLOP   ***************************************************                   !TELLOP   ***> SHARE DRAFT RETURNS HAVE FINISHED FOR CU1 <***                   !TELLOP   ***************************************************                   !SET STDLIST=DELETE                                                             !EOJ                                                                            p��������PfS�O�U��j���� ����DISC                             1NSFFILE         QCPUB           AICS                            MGR     AICS    �fS5�����5�����5����5������3�P�
 
  5����AICS            �;***********************************************************************        ;***                         C:\RWIN\NSFFILE.RCL                     ***        ;***                                                                 ***        ;***                DOWNLOAD FRB SHARE DRAFT RETURN FILES            ***        ;***********************************************************************        ;                                                                               ;                                                                               Set DELETE-TRAILING-SPACES NO                                                   LET V9 = 0                                                                      ;                   *********************************                           ;                     PRE-TRANSFER FILE MAINTENANCE                             ;                   *********************************                           ;                                                                               QUIET COMMAND ON                                                                QUIET DISPLAY ON                                                                SET WRITE-CTRLZ NO                                                              TRANSMIT "^M"                                                                   WAIT 00:00:01                                                                   ;                                                                               ;                                                                               ;                   **************************************                      ;                     TRANSFER SHARE DRAFT FILES TO HOST                        ;                   **************************************                      ;                                                                               TRANSMIT "^M"                                                                   WAIT FOR ":^Q"                                                                  CONTINUE                                                                        RECEIVE C:\FLIMPORT\NSF FROM FEDRTNS.QCACCT.CU1 ASCII PURGE                     ;                                                                               ;                                                                               ;                   **********************************                          ;                     POST-TRANSFER FILE MAINTENANCE                            ;                   **********************************                          ;                                                                               QUIET COMMAND OFF                                                               QUIET DISPLAY OFF                                                               TRANSMIT "^M"                                                                   WAIT FOR ":^Q"                                                                  ;                                                                               ;                                                                               CONTINUE                                                                        SET LINE-DRAW-SUBSET YES                                                        DISPLAY "         ^NQ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,H^M^J"       DISPLAY "          ^ND                                              D^M^J"      DISPLAY "          ^ND  ^O SHARE DRAFT RETURN TRANSFER IS COMPLETE.  ^N D^M^J"  DISPLAY "          ^ND                                              D^M^J"      DISPLAY "          ^NA,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,P^M^J"      ;                                                                               WAIT 00:00:04                                                                   RETURN                                                                          STOP                                                                            P�����������������������STORE/RESTORE-HP/3000.MPEXL  4� �������B5152AA  C602403/16/010000�������������������������