001/* 002 * jPOS Project [http://jpos.org] 003 * Copyright (C) 2000-2026 jPOS Software SRL 004 * 005 * This program is free software: you can redistribute it and/or modify 006 * it under the terms of the GNU Affero General Public License as 007 * published by the Free Software Foundation, either version 3 of the 008 * License, or (at your option) any later version. 009 * 010 * This program is distributed in the hope that it will be useful, 011 * but WITHOUT ANY WARRANTY; without even the implied warranty of 012 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 013 * GNU Affero General Public License for more details. 014 * 015 * You should have received a copy of the GNU Affero General Public License 016 * along with this program. If not, see <http://www.gnu.org/licenses/>. 017 */ 018 019package org.jpos.iso.packager; 020 021import org.jpos.iso.*; 022 023/** 024 * ISO 8583 v1987 BINARY Packager 025 * 026 * @author apr@cs.com.uy 027 * @version $Id$ 028 * @see ISOPackager 029 * @see ISOBasePackager 030 * @see ISOComponent 031 */ 032public class ISO87BPackager extends ISOBasePackager { 033 private static final boolean pad = false; 034 protected ISOFieldPackager fld[] = { 035 new IFB_NUMERIC ( 4, "MESSAGE TYPE INDICATOR", true), 036 new IFB_BITMAP ( 16, "BIT MAP"), 037 new IFB_LLNUM ( 19, "PAN - PRIMARY ACCOUNT NUMBER", pad), 038 new IFB_NUMERIC ( 6, "PROCESSING CODE", true), 039 new IFB_NUMERIC ( 12, "AMOUNT, TRANSACTION", true), 040 new IFB_NUMERIC ( 12, "AMOUNT, SETTLEMENT", true), 041 new IFB_NUMERIC ( 12, "AMOUNT, CARDHOLDER BILLING", true), 042 new IFB_NUMERIC ( 10, "TRANSMISSION DATE AND TIME", true), 043 new IFB_NUMERIC ( 8, "AMOUNT, CARDHOLDER BILLING FEE", true), 044 new IFB_NUMERIC ( 8, "CONVERSION RATE, SETTLEMENT", true), 045 new IFB_NUMERIC ( 8, "CONVERSION RATE, CARDHOLDER BILLING", true), 046 new IFB_NUMERIC ( 6, "SYSTEM TRACE AUDIT NUMBER", true), 047 new IFB_NUMERIC ( 6, "TIME, LOCAL TRANSACTION", true), 048 new IFB_NUMERIC ( 4, "DATE, LOCAL TRANSACTION", true), 049 new IFB_NUMERIC ( 4, "DATE, EXPIRATION", true), 050 new IFB_NUMERIC ( 4, "DATE, SETTLEMENT", true), 051 new IFB_NUMERIC ( 4, "DATE, CONVERSION", true), 052 new IFB_NUMERIC ( 4, "DATE, CAPTURE", true), 053 new IFB_NUMERIC ( 4, "MERCHANTS TYPE", true), 054 new IFB_NUMERIC ( 3, "ACQUIRING INSTITUTION COUNTRY CODE", true), 055 new IFB_NUMERIC ( 3, "PAN EXTENDED COUNTRY CODE", true), 056 new IFB_NUMERIC ( 3, "FORWARDING INSTITUTION COUNTRY CODE", true), 057 new IFB_NUMERIC ( 3, "POINT OF SERVICE ENTRY MODE", true), 058 new IFB_NUMERIC ( 3, "CARD SEQUENCE NUMBER", true), 059 new IFB_NUMERIC ( 3, "NETWORK INTERNATIONAL IDENTIFIEER", true), 060 new IFB_NUMERIC ( 2, "POINT OF SERVICE CONDITION CODE", true), 061 new IFB_NUMERIC ( 2, "POINT OF SERVICE PIN CAPTURE CODE", true), 062 new IFB_NUMERIC ( 1, "AUTHORIZATION IDENTIFICATION RESP LEN",true), 063 new IFB_AMOUNT ( 9, "AMOUNT, TRANSACTION FEE", true), 064 new IFB_AMOUNT ( 9, "AMOUNT, SETTLEMENT FEE", true), 065 new IFB_AMOUNT ( 9, "AMOUNT, TRANSACTION PROCESSING FEE", true), 066 new IFB_AMOUNT ( 9, "AMOUNT, SETTLEMENT PROCESSING FEE", true), 067 new IFB_LLNUM ( 11, "ACQUIRING INSTITUTION IDENT CODE", pad), 068 new IFB_LLNUM ( 11, "FORWARDING INSTITUTION IDENT CODE", pad), 069 new IFB_LLCHAR ( 28, "PAN EXTENDED"), 070 new IFB_LLNUM ( 37, "TRACK 2 DATA", pad), 071 new IFB_LLLCHAR (104, "TRACK 3 DATA"), 072 new IF_CHAR ( 12, "RETRIEVAL REFERENCE NUMBER"), 073 new IF_CHAR ( 6, "AUTHORIZATION IDENTIFICATION RESPONSE"), 074 new IF_CHAR ( 2, "RESPONSE CODE"), 075 new IF_CHAR ( 3, "SERVICE RESTRICTION CODE"), 076 new IF_CHAR ( 8, "CARD ACCEPTOR TERMINAL IDENTIFICACION"), 077 new IF_CHAR ( 15, "CARD ACCEPTOR IDENTIFICATION CODE" ), 078 new IF_CHAR ( 40, "CARD ACCEPTOR NAME/LOCATION"), 079 new IFB_LLCHAR ( 25, "ADITIONAL RESPONSE DATA"), 080 new IFB_LLCHAR ( 76, "TRACK 1 DATA"), 081 new IFB_LLLCHAR (999, "ADITIONAL DATA - ISO"), 082 new IFB_LLLCHAR (999, "ADITIONAL DATA - NATIONAL"), 083 new IFB_LLLCHAR (999, "ADITIONAL DATA - PRIVATE"), 084 new IF_CHAR ( 3, "CURRENCY CODE, TRANSACTION"), 085 new IF_CHAR ( 3, "CURRENCY CODE, SETTLEMENT"), 086 new IF_CHAR ( 3, "CURRENCY CODE, CARDHOLDER BILLING" ), 087 new IFB_BINARY ( 8, "PIN DATA" ), 088 new IFB_NUMERIC ( 16, "SECURITY RELATED CONTROL INFORMATION", true), 089 new IFB_LLLCHAR (120, "ADDITIONAL AMOUNTS"), 090 new IFB_LLLCHAR (999, "RESERVED ISO"), 091 new IFB_LLLCHAR (999, "RESERVED ISO"), 092 new IFB_LLLCHAR (999, "RESERVED NATIONAL"), 093 new IFB_LLLCHAR (999, "RESERVED NATIONAL"), 094 new IFB_LLLCHAR (999, "RESERVED NATIONAL"), 095 new IFB_LLLCHAR (999, "RESERVED PRIVATE"), 096 new IFB_LLLCHAR (999, "RESERVED PRIVATE"), 097 new IFB_LLLCHAR (999, "RESERVED PRIVATE"), 098 new IFB_LLLCHAR (999, "RESERVED PRIVATE"), 099 new IFB_BINARY ( 8, "MESSAGE AUTHENTICATION CODE FIELD"), 100 new IFB_BINARY ( 1, "BITMAP, EXTENDED"), 101 new IFB_NUMERIC ( 1, "SETTLEMENT CODE", true), 102 new IFB_NUMERIC ( 2, "EXTENDED PAYMENT CODE", true), 103 new IFB_NUMERIC ( 3, "RECEIVING INSTITUTION COUNTRY CODE", true), 104 new IFB_NUMERIC ( 3, "SETTLEMENT INSTITUTION COUNTRY CODE", true), 105 new IFB_NUMERIC ( 3, "NETWORK MANAGEMENT INFORMATION CODE", true), 106 new IFB_NUMERIC ( 4, "MESSAGE NUMBER", true), 107 new IFB_NUMERIC ( 4, "MESSAGE NUMBER LAST", true), 108 new IFB_NUMERIC ( 6, "DATE ACTION", true), 109 new IFB_NUMERIC ( 10, "CREDITS NUMBER", true), 110 new IFB_NUMERIC ( 10, "CREDITS REVERSAL NUMBER", true), 111 new IFB_NUMERIC ( 10, "DEBITS NUMBER", true), 112 new IFB_NUMERIC ( 10, "DEBITS REVERSAL NUMBER", true), 113 new IFB_NUMERIC ( 10, "TRANSFER NUMBER", true), 114 new IFB_NUMERIC ( 10, "TRANSFER REVERSAL NUMBER", true), 115 new IFB_NUMERIC ( 10, "INQUIRIES NUMBER", true), 116 new IFB_NUMERIC ( 10, "AUTHORIZATION NUMBER", true), 117 new IFB_NUMERIC ( 12, "CREDITS, PROCESSING FEE AMOUNT", true), 118 new IFB_NUMERIC ( 12, "CREDITS, TRANSACTION FEE AMOUNT", true), 119 new IFB_NUMERIC ( 12, "DEBITS, PROCESSING FEE AMOUNT", true), 120 new IFB_NUMERIC ( 12, "DEBITS, TRANSACTION FEE AMOUNT", true), 121 new IFB_NUMERIC ( 16, "CREDITS, AMOUNT", true), 122 new IFB_NUMERIC ( 16, "CREDITS, REVERSAL AMOUNT", true), 123 new IFB_NUMERIC ( 16, "DEBITS, AMOUNT", true), 124 new IFB_NUMERIC ( 16, "DEBITS, REVERSAL AMOUNT", true), 125 new IFB_NUMERIC ( 42, "ORIGINAL DATA ELEMENTS", true), 126 new IF_CHAR ( 1, "FILE UPDATE CODE"), 127 new IF_CHAR ( 2, "FILE SECURITY CODE"), 128 new IF_CHAR ( 6, "RESPONSE INDICATOR"), 129 new IF_CHAR ( 7, "SERVICE INDICATOR"), 130 new IF_CHAR ( 42, "REPLACEMENT AMOUNTS"), 131 new IFB_BINARY ( 16, "MESSAGE SECURITY CODE"), 132 new IFB_AMOUNT ( 17, "AMOUNT, NET SETTLEMENT", pad), 133 new IF_CHAR ( 25, "PAYEE"), 134 new IFB_LLNUM ( 11, "SETTLEMENT INSTITUTION IDENT CODE", pad), 135 new IFB_LLNUM ( 11, "RECEIVING INSTITUTION IDENT CODE", pad), 136 new IFB_LLCHAR ( 17, "FILE NAME"), 137 new IFB_LLCHAR ( 28, "ACCOUNT IDENTIFICATION 1"), 138 new IFB_LLCHAR ( 28, "ACCOUNT IDENTIFICATION 2"), 139 new IFB_LLLCHAR (100, "TRANSACTION DESCRIPTION"), 140 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 141 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 142 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 143 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 144 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 145 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 146 new IFB_LLLCHAR (999, "RESERVED ISO USE"), 147 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 148 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 149 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE" ), 150 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 151 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE" ), 152 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 153 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 154 new IFB_LLLCHAR (999, "RESERVED NATIONAL USE"), 155 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 156 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 157 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 158 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 159 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 160 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 161 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 162 new IFB_LLLCHAR (999, "RESERVED PRIVATE USE"), 163 new IFB_BINARY ( 8, "MAC 2") 164 }; 165 public ISO87BPackager() { 166 super(); 167 setFieldPackager(fld); 168 } 169}