0001 PA
0002 * LIST OF MEMBERS JOINED WITHIN A SPECIFIC DATE RANGE
0003 * WRITTEN BY BOB STUBBS, DATA MANAGEMENT SERVICES, 19 MAR 96
0004 CLEARPROMPTS
0005 CS
0006 DISPLAY
0007 DISPLAY LIST OF MEMBERS WHO JOINED WITHIN A SPECIFIC DATE RANGE
0008 DISPLAY -------------------------------------------------------
0009 DISPLAY
0010 DISPLAY <<A,ENTER BEGINNING DATE (I.E. 01 MAR 96)>>
0011 IF << ENTER BEGINNING DATE (I.E. 01 MAR 96)>> = ‘END’ THEN GO EXIT
0012 DISPLAY
0013 DISPLAY <<A,ENTER ENDING DATE (I.E. 19 MAR 96)>>
0014 IF <<ENTER ENDING DATE (I.E. 01 MAR 96)>> = ‘END’ THEN GO EXIT
0015 DISPLAY
0016 DISPLAY <<A,DO YOU WISH TO CONTINUE (Y/N)?>>
0017 IF <<DO YOU WISH TO CONTINUE (Y/N)?>> # ‘Y’ THEN GO EXIT
0018 SP.ASSIGN HS!NEW.MBRS
0019 SORT CLIENT WITH JOINED GE\
0020 “<<ENTER BEGINNING DATE (I.E. 01 MAR 96)>>“ AND WITH\
0021 JOINED LE “<<ENTER ENDING DATE (I.E. 19 MAR 96)>>“\
0022 BY @ID NAME JOINED HEADING “LIST OF MEMBERS WHO JOINED\
0023 THE CREDIT UNION SINCE\
0024 <<ENTER BEGINNING DATE (I.E. 01 MAR 96)>>\
0025 AND <<ENTER ENDING DATE (I.E. 19 MAR 96)>>\
0026 ‘L’AS OF ‘D’ ‘L’DISTRIBUTE REPORT TO JOHN DOE\
0027 (PARAGRAPH NAME: NEW.MBRS) ‘L’” LPTR
0028 WHICH
0029 CS
0030 EXIT: DISPLAY NEW.MBRS PARAGRAPH TERMINATED
0001 First line must always be PA for Paragraphs.
0002 * designates comment line. This will not affect processing of the Paragraph. Line 0002 should contain a brief description of the Paragraph. Additional comment lines can be added anywhere within the Paragraph to provide any additional information as needed.
0003 * - Additional comment line.
0004 CLEARPROMPTS will reset the data input/output buffer which stores all data input.
0005 CS will clear the screen.
0006 DISPLAY without any text will display a blank line.
0007 DISPLAY with text will display that text.
0008 DISPLAY with text will display that text. (For style, I underline the Paragraph description.)
0009 DISPLAY without any text will display a blank line.
0010 DISPLAY with text will display that text. The text inside the << >> is prompting for input. Since the text is preceded by an A, this will place the data in the input buffer for use later and is stored using the text as the saved name.
0011 This is will test the input. If END is input, the Paragraph will go to the label EXIT and continue from that location.
0012 DISPLAY without any text will display a blank line.
0013 DISPLAY with text will display that text. The text inside the << >> is prompting for input. Since the text is preceded by an A, this will place the data in the input buffer for use later and is stored using the text as the saved name.
0014 This is will test the input. If END is input, the Paragraph will go to the label EXIT and continue from that location.
0015 DISPLAY without any text will display a blank line.
0016 DISPLAY with text will display that text. The text inside the << >> is prompting for input.
0017 This is will test the input. If a Y is not input, the Paragraph will go to the label EXIT and continue from that location.
0018 SP.ASSIGN HS!XXX alters the existing Banner unique name within the spooler command to NEW.MBRS then ‘HOLDS” the report in for viewing within SP.MAINT and suppresses the printing.
0019 The sentence is typed in just as it would at TCL. To continue a recall sentence to the next line, a \ must be at the end of the line.
0020 Continuation of recall sentence. This will extract the data from the buffer using the text saved name ENTER BEGINNING DATE (I.E. 01 MAR 96); 01 MAR 96 The quote will put the data in quotes which is required for recall sentences. To continue a recall sentence to the next line, a \ must be at the end of the line.
0021 Continuation of recall sentence. This will extract the data from the buffer using the text saved name ENTER ENDING DATE (I.E. 19 MAR 96); 19 MAR 96 The quote will put the data in quotes which is required for recall sentences. To continue a recall sentence to the next line, a \ must be at the end of the line.
0022 Continuation of recall sentence and heading. To continue a recall sentence to the next line, a \ must be at the end of the line.
0023 Continuation of heading. To continue a recall sentence to the next line, a \ must be at the end of the line.
0024 Continuation of heading. This will extract the data from the buffer using the text saved name ENTER BEGINNING DATE (I.E. 01 MAR 96); 01 MAR 96 Quotes are not needed as this will appear as text within the heading. To continue a recall sentence to the next line, a \ must be at the end of the line.
0025 Continuation of heading. This will extract the data from the buffer using the text saved name ENTER ENDING DATE (I.E. 19 MAR 96); 19 MAR 96 Quotes are not needed as this will appear as text within the heading. To continue a recall sentence to the next line, a \ must be at the end of the line.
0026 Continuation of heading. The ‘L’ is a line feed and ‘D’ inserts the current date.
0027 Continuation of heading.
0028 WHICH will reset the spooler setting to the terminal’s default setting.
0029 CS will clear the screen.
0030 Go to label. DISPLAY with text will display that text. Paragraph will exit to TCL.
0001 PA
0002 * MAILING LIST OF MEMBERS WITH $100,000 OR MORE ON DEPOSIT
0003 * WRITTEN BY BOB STUBBS, DATA MANAGEMENT SERVICES, 17 OCT 06
0004 CLEARPROMPTS
0005 CS
0006 DISPLAY
0007 DISPLAY MAILING LIST OF MEMBERS WITH $100,000 OR MORE ON DEPOSIT
0008 DISPLAY --------------------------------------------------------
0009 DISPLAY
0010 DISPLAY <<A,DO YOU WISH TO CONTINUE (Y/N)?>>
0011 IF <<DO YOU WISH TO CONTINUE (Y/N)?>> # ‘Y’ THEN GO EXIT
0012 SP.ASSIGN HS!LARGE.FUNDS
0013 TERM ,,1024,0
0014 SELECT CLIENT WITH CLASS = “0”
0015 SELECT CLIENT WITH TOT.DEP GE “100000.00” REQUIRE.SELECT
0016 LIST CLIENT GIVEN NAME ACT.ADDR1 ACT.ADDR2 ACT.CITY ACT.STATE\
0017 ACT.ZIP ACT.CNTRY TOT.DEP HEADING “MEMBERS WITH $100,000\
0018 OR MORE ON DEPOSIT ‘L’AS OF ‘D’ ‘L’PARAGRAPH NAME: LARGE.FUNDS\
0019 ‘L’” NI.SUP REQUIRE.SELECT LPTR
0020 TERM ,,132,60
0021 WHICH
0022 EXIT:
0023 CS
0001 First line must always be PA for Paragraphs.
0002 * designates comment line. This will not affect processing of the Paragraph. Line 0002 should contain a brief description of the Paragraph. Additional comment lines can be added anywhere within the Paragraph to provide any additional information as needed.
0003 * - Additional comment line.
0004 CLEARPROMPTS will reset the data input/output buffer which stores all data input.
0005 CS will clear the screen.
0006 DISPLAY without any text will display a blank line.
0007 DISPLAY with text will display that text.
0008 DISPLAY with text will display that text. (For style, I underline the Paragraph description.)
0009 DISPLAY without any text will display a blank line.
0010 DISPLAY with text will display that text. The text inside the << >> is prompting for input. Since the text is preceded by an A, this will place the data in the input buffer for use later and is stored using the text as the saved name.
0011 This is will test the input. If END is input, the Paragraph will go to the label EXIT and continue from that location.
0012 SP.ASSIGN HS!XXX alters the existing Banner unique name within the spooler command to LARGE.FUNDS then ‘HOLDS” the report in for viewing within SP.MAINT and suppresses the printing.
0014 The sentence is typed in just as it would at TCL.
0015 The sentence is typed in just as it would at TCL.
0016 The sentence is typed in just as it would at TCL. To continue a recall sentence to the next line, a \ must be at the end of the line.
0017 Continuation of recall sentence. To continue a recall sentence to the next line, a \ must be at the end of the line.
0018 Continuation of recall sentence. To continue a recall sentence to the next line, a \ must be at the end of the line.
0019 Continuation of recall sentence. To continue a recall sentence to the next line, a \ must be at the end of the line.
0020 TERM A,B,C,D alters the terminal setting for either the screen display or output (hold file or printer). This is resetting the TERM setting back to its default setting.
0021 WHICH will reset the spooler setting to the terminal’s default setting.
0022 Go to label. DISPLAY with text will display that text. Paragraph will exit to TCL.
0023 CS will clear the screen.
0001 PA
0002 * MEMBER TRIAL BALANCE - CU556
0003 * WRITTEN BY BOB STUBBS, DATA MANAGEMENT SERVICES, 25 MAR 96
0004 CLEARPROMPTS
0005 CS
0006 DISPLAY
0007 DISPLAY MEMBER TRIAL BALANCE - CU556
0008 DISPLAY ----------------------------
0009 DISPLAY
0010 DISPLAY <<A,DO YOU WISH TO CONTINUE (Y/N)?>>
0011 IF <<DO YOU WISH TO CONTINUE (Y/N)?>> # ‘Y’ THEN GO EXIT
0012 CU556
0013 DATA 1
0014 DATA N
0015 DATA
0016 DATA
0017 DATA N
0018 DATA N
0019 DATA 2
0020 DATA F
0021 DATA NO
0022 DATA Y
0023 EXIT:
0001 First line must always be PA for Paragraphs.
0002 * designates comment line. This will not affect processing of the Paragraph. Line 0002 should contain a brief description of the Paragraph. Additional comment lines can be added anywhere within the Paragraph to provide any additional information as needed.
0003 * - Additional comment line
0004 CLEARPROMPTS will reset the data input/output buffer which stores all data input.
0005 CS will clear the screen.
0006 DISPLAY without any text will display a blank line.
0007 DISPLAY with text will display that text.
0008 DISPLAY with text will display that text. (For style, I underline the Paragraph description.)
0009 DISPLAY without any text will display a blank line.
0010 DISPLAY with text will display that text. The text inside the << >> is prompting for input. Since the text is preceded by an A, this will place the data in the input buffer for use later and is stored using the text as the saved name.
0011 This is will test the input. If END is input, the Paragraph will go to the label EXIT and continue from that location.
0012 This is calling the specific program desired.
0013 This is a constant answer to a prompt.
0014 This is a constant answer to a prompt.
0015 This is a constant answer to a prompt. A line with DATA only is a hard RETURN only.
0016 This is a constant answer to a prompt. A line with DATA only is a hard RETURN only.
0017 This is a constant answer to a prompt.
0018 This is a constant answer to a prompt.
0019 This is a constant answer to a prompt.
0020 This is a constant answer to a prompt.
0021 This is a constant answer to a prompt.
0022 This is a constant answer to a prompt.
0023 Go to label.