****************************************************************** * CardDemo - Transaction List *********************************************************************** * Copyright Amazon.com, Inc. or its affiliates. * All Rights Reserved. * * Licensed under the Apache License, Version 2.0 (the "License"). * You may not use this file except in compliance with the License. * You may obtain a copy of the License at * * http://www.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, * software distributed under the License is distributed on an * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, * either express or implied. See the License for the specific * language governing permissions and limitations under the License ****************************************************************** COTRN00 DFHMSD CTRL=(ALARM,FREEKB), - EXTATT=YES, - LANG=COBOL, - MODE=INOUT, - STORAGE=AUTO, - TIOAPFX=YES, - TYPE=&&SYSPARM COTRN0A DFHMDI COLUMN=1, - LINE=1, - SIZE=(24,80) DFHMDF ATTRB=(ASKIP,NORM), - COLOR=BLUE, - LENGTH=5, - POS=(1,1), - INITIAL='Tran:' TRNNAME DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=4, - POS=(1,7) TITLE01 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=YELLOW, - LENGTH=40, - POS=(1,21) DFHMDF ATTRB=(ASKIP,NORM), - COLOR=BLUE, - LENGTH=5, - POS=(1,65), - INITIAL='Date:' CURDATE DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(1,71), - INITIAL='mm/dd/yy' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=BLUE, - LENGTH=5, - POS=(2,1), - INITIAL='Prog:' PGMNAME DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(2,7) TITLE02 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=YELLOW, - LENGTH=40, - POS=(2,21) DFHMDF ATTRB=(ASKIP,NORM), - COLOR=BLUE, - LENGTH=5, - POS=(2,65), - INITIAL='Time:' CURTIME DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(2,71), - INITIAL='hh:mm:ss' DFHMDF ATTRB=(ASKIP,BRT), - COLOR=NEUTRAL, - LENGTH=17, - POS=(4,30), - INITIAL='List Transactions' DFHMDF ATTRB=(ASKIP,BRT), - COLOR=TURQUOISE, - LENGTH=5, - POS=(4,65), - INITIAL='Page:' PAGENUM DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(4,71), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=TURQUOISE, - LENGTH=15, - POS=(6,5), - INITIAL='Search Tran ID:' TRNIDIN DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=16, - POS=(6,21) DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(6,38) DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=3, - POS=(8,2), - INITIAL='Sel' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=16, - POS=(8,8), - INITIAL=' Transaction ID ' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=8, - POS=(8,27), - INITIAL=' Date ' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=26, - POS=(8,38), - INITIAL=' Description ' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=12, - POS=(8,67), - INITIAL=' Amount ' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=3, - POS=(9,2), - INITIAL='---' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=16, - POS=(9,8), - INITIAL='----------------' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=8, - POS=(9,27), - INITIAL='--------' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=26, - POS=(9,38), - INITIAL='--------------------------' DFHMDF ATTRB=(ASKIP,NORM), - COLOR=NEUTRAL, - LENGTH=12, - POS=(9,67), - INITIAL='------------' SEL0001 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(10,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(10,5) TRNID01 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(10,8), - INITIAL=' ' TDATE01 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(10,27), - INITIAL=' ' TDESC01 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(10,38), - INITIAL=' ' TAMT001 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(10,67), - INITIAL=' ' SEL0002 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(11,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(11,5) TRNID02 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(11,8), - INITIAL=' ' TDATE02 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(11,27), - INITIAL=' ' TDESC02 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(11,38), - INITIAL=' ' TAMT002 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(11,67), - INITIAL=' ' SEL0003 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(12,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(12,5) TRNID03 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(12,8), - INITIAL=' ' TDATE03 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(12,27), - INITIAL=' ' TDESC03 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(12,38), - INITIAL=' ' TAMT003 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(12,67), - INITIAL=' ' SEL0004 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(13,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(13,5) TRNID04 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(13,8), - INITIAL=' ' TDATE04 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(13,27), - INITIAL=' ' TDESC04 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(13,38), - INITIAL=' ' TAMT004 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(13,67), - INITIAL=' ' SEL0005 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(14,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(14,5) TRNID05 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(14,8), - INITIAL=' ' TDATE05 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(14,27), - INITIAL=' ' TDESC05 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(14,38), - INITIAL=' ' TAMT005 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(14,67), - INITIAL=' ' SEL0006 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(15,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(15,5) TRNID06 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(15,8), - INITIAL=' ' TDATE06 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(15,27), - INITIAL=' ' TDESC06 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(15,38), - INITIAL=' ' TAMT006 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(15,67), - INITIAL=' ' SEL0007 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(16,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(16,5) TRNID07 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(16,8), - INITIAL=' ' TDATE07 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(16,27), - INITIAL=' ' TDESC07 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(16,38), - INITIAL=' ' TAMT007 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(16,67), - INITIAL=' ' SEL0008 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(17,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(17,5) TRNID08 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(17,8), - INITIAL=' ' TDATE08 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(17,27), - INITIAL=' ' TDESC08 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(17,38), - INITIAL=' ' TAMT008 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(17,67), - INITIAL=' ' SEL0009 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(18,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(18,5) TRNID09 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(18,8), - INITIAL=' ' TDATE09 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(18,27), - INITIAL=' ' TDESC09 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(18,38), - INITIAL=' ' TAMT009 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(18,67), - INITIAL=' ' SEL0010 DFHMDF ATTRB=(FSET,NORM,UNPROT), - COLOR=GREEN, - HILIGHT=UNDERLINE, - LENGTH=1, - POS=(19,3), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,NORM), - LENGTH=0, - POS=(19,5) TRNID10 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=16, - POS=(19,8), - INITIAL=' ' TDATE10 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=8, - POS=(19,27), - INITIAL=' ' TDESC10 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=26, - POS=(19,38), - INITIAL=' ' TAMT010 DFHMDF ATTRB=(ASKIP,FSET,NORM), - COLOR=BLUE, - LENGTH=12, - POS=(19,67), - INITIAL=' ' DFHMDF ATTRB=(ASKIP,BRT), - COLOR=NEUTRAL, - LENGTH=50, - POS=(21,12), - INITIAL='Type ''S'' to View Transaction details from the- list' ERRMSG DFHMDF ATTRB=(ASKIP,BRT,FSET), - COLOR=RED, - LENGTH=78, - POS=(23,1) DFHMDF ATTRB=(ASKIP,NORM), - COLOR=YELLOW, - LENGTH=48, - POS=(24,1), - INITIAL='ENTER=Continue F3=Back F7=Backward F8=Forwar- d' DFHMSD TYPE=FINAL END * * Ver: CardDemo_v1.0-70-g193b394-123 Date: 2022-08-22 17:02:43 CDT *