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 * customized for VISA's VAP Single Message
026 *
027 * @author apr@cs.com.uy
028 * @version $Id$
029 * @deprecated use Base1* stuff instead
030 * @see ISOPackager
031 * @see ISOBasePackager
032 * @see ISOComponent
033 */
034@Deprecated
035public class VAPVIPPackager extends ISOBasePackager {
036    private static final boolean pad = true;
037    protected ISOFieldPackager fld[] = {
038            new IFB_NUMERIC (  4, "MESSAGE TYPE INDICATOR", true),
039            new IFB_BITMAP  ( 16, "BIT MAP"),
040            new IFB_LLHNUM  ( 19, "PAN - PRIMARY ACCOUNT NUMBER", pad),
041            new IFB_NUMERIC (  6, "PROCESSING CODE", true),
042            new IFB_NUMERIC ( 12, "AMOUNT, TRANSACTION", true),
043            new IFB_NUMERIC ( 12, "AMOUNT, SETTLEMENT", true),
044            new IFB_NUMERIC ( 12, "AMOUNT, CARDHOLDER BILLING", true),
045            new IFB_NUMERIC ( 10, "TRANSMISSION DATE AND TIME", true),
046            new IFB_NUMERIC (  8, "AMOUNT, CARDHOLDER BILLING FEE", true),
047            new IFB_NUMERIC (  8, "CONVERSION RATE, SETTLEMENT", true),
048            new IFB_NUMERIC (  8, "CONVERSION RATE, CARDHOLDER BILLING", true),
049            new IFB_NUMERIC (  6, "SYSTEM TRACE AUDIT NUMBER", true),
050            new IFB_NUMERIC (  6, "TIME, LOCAL TRANSACTION", true),
051            new IFB_NUMERIC (  4, "DATE, LOCAL TRANSACTION", true),
052            new IFB_NUMERIC (  4, "DATE, EXPIRATION", true),
053            new IFB_NUMERIC (  4, "DATE, SETTLEMENT", true),
054            new IFB_NUMERIC (  4, "DATE, CONVERSION", true),
055            new IFB_NUMERIC (  4, "DATE, CAPTURE", true),
056            new IFB_NUMERIC (  4, "MERCHANTS TYPE", true),
057            new IFB_NUMERIC (  3, "ACQUIRING INSTITUTION COUNTRY CODE", true),
058            new IFB_NUMERIC (  3, "PAN EXTENDED COUNTRY CODE", true),
059            new IFB_NUMERIC (  3, "FORWARDING INSTITUTION COUNTRY CODE", true),
060            new IFB_NUMERIC (  4, "POINT OF SERVICE ENTRY MODE", true),
061            new IFB_NUMERIC (  3, "CARD SEQUENCE NUMBER", true),
062            new IFB_NUMERIC (  3, "NETWORK INTERNATIONAL IDENTIFIEER", true),
063            new IFB_NUMERIC (  2, "POINT OF SERVICE CONDITION CODE", true),
064            new IFB_NUMERIC (  2, "POINT OF SERVICE PIN CAPTURE CODE", true),
065            new IFB_NUMERIC (  1, "AUTHORIZATION IDENTIFICATION RESP LEN",true),
066            new IFB_AMOUNT  (  9, "AMOUNT, TRANSACTION FEE", true),
067            new IFB_AMOUNT  (  9, "AMOUNT, SETTLEMENT FEE", true),
068            new IFB_AMOUNT  (  9, "AMOUNT, TRANSACTION PROCESSING FEE", true),
069            new IFB_AMOUNT  (  9, "AMOUNT, SETTLEMENT PROCESSING FEE", true),
070            new IFB_LLHNUM  ( 11, "ACQUIRING INSTITUTION IDENT CODE", pad),
071            new IFB_LLHNUM  ( 11, "FORWARDING INSTITUTION IDENT CODE", pad),
072            new IFB_LLHNUM  ( 28, "PAN EXTENDED", pad),
073            new IFB_LLHNUM  ( 37, "TRACK 2 DATA", pad),
074            new IFB_LLLNUM  (104, "TRACK 3 DATA", pad),
075            new IFE_CHAR    ( 12, "RETRIEVAL REFERENCE NUMBER"),
076            new IFE_CHAR    (  6, "AUTHORIZATION IDENTIFICATION RESPONSE"),
077            new IFE_CHAR    (  2, "RESPONSE CODE"),
078            new IFE_CHAR    (  3, "SERVICE RESTRICTION CODE"),
079            new IFE_CHAR    (  8, "CARD ACCEPTOR TERMINAL IDENTIFICACION"),
080            new IFE_CHAR    ( 15, "CARD ACCEPTOR IDENTIFICATION CODE" ),
081            new IFE_CHAR    ( 40, "CARD ACCEPTOR NAME/LOCATION"),
082            new IFB_LLHECHAR( 25, "ADITIONAL RESPONSE DATA"),
083            new IFB_LLHECHAR( 76, "TRACK 1 DATA"),
084            new IFB_LLCHAR  ( 99, "ADITIONAL DATA - ISO"),
085            new IFB_LLCHAR  ( 99, "ADITIONAL DATA - NATIONAL"),
086            new IFB_LLHBINARY ( 99, "ADITIONAL DATA - PRIVATE"),
087            new IFB_NUMERIC (  3, "CURRENCY CODE, TRANSACTION", true),
088            new IFB_NUMERIC (  3, "CURRENCY CODE, SETTLEMENT", true),
089            new IFB_NUMERIC (  3, "CURRENCY CODE, CARDHOLDER BILLING", true),
090            new IFB_BINARY  (  8, "PIN DATA"   ),
091            new IFB_NUMERIC ( 16, "SECURITY RELATED CONTROL INFORMATION", true),
092            new IFB_LLHECHAR(120, "ADDITIONAL AMOUNTS"),
093            new IFB_LLHBINARY(255, "RESERVED ISO"),
094            new IFB_LLCHAR  (255, "RESERVED ISO"),
095            new IFB_LLCHAR  (255, "RESERVED NATIONAL"),
096            new IFB_LLCHAR  (255, "RESERVED NATIONAL"),
097            new IFB_LLHECHAR ( 14, "NATIONAL POS GEOGRAPHIC DATA"),
098            new IFB_LLHNUM  (  4, "RESERVED PRIVATE", pad),
099            new IFB_LLHNUM  ( 36, "RESERVED PRIVATE", pad),
100            new IFB_LLHBINARY( 59, "PAYMENT SERVICE FIELDS"),
101            new IFB_LLHBINARY(255, "SMS PRIVATE-USE FIELDS"),
102            new IFB_BINARY  (  8, "MESSAGE AUTHENTICATION CODE FIELD"),
103            new IFB_BINARY  (  1, "BITMAP, EXTENDED"),
104            new IFB_NUMERIC (  1, "SETTLEMENT CODE", true),
105            new IFB_NUMERIC (  2, "EXTENDED PAYMENT CODE", true),
106            new IFB_NUMERIC (  3, "RECEIVING INSTITUTION COUNTRY CODE", true),
107            new IFB_NUMERIC (  3, "SETTLEMENT INSTITUTION COUNTRY CODE", true),
108            new IFB_NUMERIC (  3, "NETWORK MANAGEMENT INFORMATION CODE", true),
109            new IFB_NUMERIC (  4, "MESSAGE NUMBER", true),
110            new IFB_NUMERIC (  4, "MESSAGE NUMBER LAST", true),
111            new IFB_NUMERIC (  6, "DATE ACTION", true),
112            new IFB_NUMERIC ( 10, "CREDITS NUMBER", true),
113            new IFB_NUMERIC ( 10, "CREDITS REVERSAL NUMBER", true),
114            new IFB_NUMERIC ( 10, "DEBITS NUMBER", true),
115            new IFB_NUMERIC ( 10, "DEBITS REVERSAL NUMBER", true),
116            new IFB_NUMERIC ( 10, "TRANSFER NUMBER", true),
117            new IFB_NUMERIC ( 10, "TRANSFER REVERSAL NUMBER", true),
118            new IFB_NUMERIC ( 10, "INQUIRIES NUMBER", true),
119            new IFB_NUMERIC ( 10, "AUTHORIZATION NUMBER", true),
120            new IFB_NUMERIC ( 12, "CREDITS, PROCESSING FEE AMOUNT", true),
121            new IFB_NUMERIC ( 12, "CREDITS, TRANSACTION FEE AMOUNT", true),
122            new IFB_NUMERIC ( 12, "DEBITS, PROCESSING FEE AMOUNT", true),
123            new IFB_NUMERIC ( 12, "DEBITS, TRANSACTION FEE AMOUNT", true),
124            new IFB_NUMERIC ( 16, "CREDITS, AMOUNT", true),
125            new IFB_NUMERIC ( 16, "CREDITS, REVERSAL AMOUNT", true),
126            new IFB_NUMERIC ( 16, "DEBITS, AMOUNT", true),
127            new IFB_NUMERIC ( 16, "DEBITS, REVERSAL AMOUNT", true),
128            new IFB_NUMERIC ( 42, "ORIGINAL DATA ELEMENTS", true),
129            new IFE_CHAR    (  1, "FILE UPDATE CODE"),
130            new IFE_CHAR    (  2, "FILE SECURITY CODE"),
131            new IFE_CHAR    (  5, "RESPONSE INDICATOR"),
132            new IFE_CHAR    (  7, "SERVICE INDICATOR"),
133            new IFE_CHAR    ( 42, "REPLACEMENT AMOUNTS"),
134            new IFB_BINARY  (  8, "MESSAGE SECURITY CODE"),
135            new IFB_AMOUNT  ( 17, "AMOUNT, NET SETTLEMENT", pad),
136            new IFE_CHAR    ( 25, "PAYEE"),
137            new IFB_LLHNUM  ( 11, "SETTLEMENT INSTITUTION IDENT CODE", pad),
138            new IFB_LLHNUM  ( 11, "RECEIVING INSTITUTION IDENT CODE", pad),
139            new IFB_LLHECHAR( 17, "FILE NAME"),
140            new IFB_LLCHAR  ( 28, "ACCOUNT IDENTIFICATION 1"),
141            new IFB_LLCHAR  ( 28, "ACCOUNT IDENTIFICATION 2"),
142            new IFB_LLCHAR  (100, "TRANSACTION DESCRIPTION"),
143            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
144            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
145            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
146            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
147            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
148            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
149            new IFB_LLCHAR  ( 99, "RESERVED ISO USE"), 
150            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
151            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
152            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
153            new IFB_LLCHAR  ( 24, "ADDITIONAL TRACE DATA 1"),
154            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
155            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
156            new IFB_LLHBINARY( 99, "INTRA-COUNTRY DATA"),
157            new IFB_LLCHAR  ( 99, "RESERVED NATIONAL USE"),
158            new IFB_LLHNUM  (  4, "RESERVED PRIVATE USE", pad),
159            new IFB_LLCHAR  ( 11, "ISSUING INSTITUTION IDENT CODE"),
160            new IFB_LLCHAR  ( 13, "REMAINING OPEN-TO-USE"),
161            new IFB_LLCHAR  ( 29, "ADDRESS VERIFICATION DATA"),
162            new IFB_LLCHAR  (135, "FREE-FORM TEXT-JAPAN"),
163            new IFB_LLCHAR  ( 99, "SUPPORTING INFORMATION"),
164            new IFB_LLCHAR  ( 99, "RESERVED PRIVATE USE"),
165            new ISOMsgFieldPackager(
166                new IFB_LLHBINARY (255, "FILE RECORD(S) ACTION/DATA"),
167                new F127Packager()
168            ),
169            new IFB_BINARY  (  8, "MAC 2")
170        };
171
172    protected static class F127Packager extends ISOBasePackager {
173        protected ISOFieldPackager fld127[] = {
174            new IFE_CHAR    (1,   "FILE UPDATE COD"),
175            new IFB_LLHNUM  (19,  "ACCOUNT NUMBER", true),
176            new IFB_NUMERIC (4,   "PURGE DATE", true),
177            new IFE_CHAR    (2,   "ACTION CODE"),
178            new IFE_CHAR    (9,   "REGION CODING"),
179            new IFB_NUMERIC (4,   "FILLER", true),
180        };
181        protected F127Packager () {
182            super();
183            setFieldPackager(fld127);
184        }
185    }
186
187    public VAPVIPPackager() {
188        super();
189        setFieldPackager(fld);
190    }
191}
192