.VER 1.3
.INI
PAYEXT_D95A,,D 95A,UN,D95A,Extended Payment Order Message
.PRIVATE EDIdEv
TDVER 
.DATE 8/5/2002 10:33:00 PM
.PUBLIC
.STD ,LS
.SETS
PAYEXT=[!UNH*1,M][!BGM,M][BUS][PAI*1][FCA][!DTM*1,M,4]{:5[RFF*1][DTM*1]}{[!MOA*1,M][CUX][DTM*1,,2][RFF*1]}{:4[FII*1][CTA][COM*1,,5]}{:6[NAD*1][CTA][COM*1,,5]}{:4[INP*1][FTX*1][DTM*1,,2]}{:10[GIS*1][MOA*1][LOC,,2][NAD*1][RCS][FTX*1,,10]}{[PRC*1][FTX*1,,5]{:9999[DOC*1][MOA*1,,5][DTM*1,,5][RFF*1,,5][NAD*1,,2]{:5[CUX][DTM*1]}{:100[AJT][MOA*1][RFF*1][FTX*1,,5]}{:9999[DLI*1][MOA*1,,5][PIA*1,,5][DTM*1,,5]{:5[CUX][DTM*1]}{:10[AJT][MOA*1][RFF*1][FTX*1,,5]}}}{[GIS*1][MOA*1,,5]}}{:5[AUT][DTM*1]}[!UNT,M]
.SEGS
AJT=[!4465,M][1082]
AUT=[!9280,M][9282]
BGM=[C002][1004][1225][4343]
BUS=[C521][3279][4487][C551][4463]
COM=[C076],@M
CTA=[3139][C056]
CUX=[C504][C504][5402][6341]
DLI=[!1073,M][1082],.@M
DOC=[C002][C503][3153][1220][1218],@M....
DTM=[C507],@M
FCA=[!4471,M][C878]
FII=[!3035,M][C078][C088][3207],...*1.
FTX=[!4451,M][4453][C107][C108][3453],....*1.
GIS=[C529],@M
INP=[C849][C522][C850][1229],...*1.
LOC=[!3227,M][C517][C519][C553][5479]
MOA=[C516],@M
NAD=[!3035,M][C082][C058][C080][C059][3164][3229][3251][3207],...*1.*1.*1....
PAI=[C534],@M
PIA=[!4347,M][C212][C212][C212][C212][C212],.@M....
PRC=[C242],@M*1
RCS=[!7293,M][C550][1229]
RFF=[C506],@M
UNA=[1---,M,1][2---,M,1][3---,M,1][4---,M,1][5---,M,1][6---,M,1],@M[1:1:1]@M[1:1:1]@M[1:1:1]@M[1:1:1]@M[1:1:1]@M[1:1:1]
UNB=[S001,M,1][S002,M,1][S003,M,1][S004,M,1][0020,M,1][S005,C,1][0026,C,1][0029,C,1][0031,C,1][0032,C,1][0035,C,1]
UNE=[0060,M,1][0048,M,1]
UNG=[0038,M,1][S006,M,1][S007,M,1][S004,M,1][0048,M,1][0051,M,1][S008,M,1][0058,C,1]
UNH=[!0062,M][S009][0068][S010],.@M..
UNH=[0062,M,1][S009,M,1][0068,C,1][S010,C,1],@M[1:14:1]@M*1.C[1:35:1].C*1
UNS=[0081,M,1],@M[1:1:1]
UNT=[!0074,M][!0062,M]
UNT=[0074,M,1][0062,M,1],@M[1:6:1]@M[1:14:1]
UNZ=[0036,M,1][0020,M,1]
.COMS
C002=[1001][1131][3055][1000]
C056=[3413][3412]
C058=[!3124,M][!3124,M][!3124,M][!3124,M][!3124,M],.+C+C+C+C
C059=[!3042,M][!3042,M][!3042,M],.+C+C
C076=[!3148,M][!3155,M]
C078=[3194][3192][3192][6345]
C080=[!3036,M][!3036,M][!3036,M][!3036,M][!3036,M][3045],.+C+C+C+C.
C082=[!3039,M][1131][3055]
C088=[3433][1131][3055][!3434,M][1131][3055][3432][3436],...+C....
C107=[!4441,M][1131][3055]
C108=[!4440,M][!4440,M][!4440,M][!4440,M][!4440,M],.+C+C+C+C
C212=[7140][7143][1131][3055]
C242=[7187][1131][3055][7186][7186],@M....
C503=[1004][1373][1366][3453]
C504=[!6347,M][6345][6343][6348]
C506=[!1153,M][1154][1156][4000]
C507=[!2005,M][2380][2379]
C516=[!5025,M][5004][6345][6343][4405]
C517=[3225][1131][3055][3224]
C519=[3223][1131][3055][3222]
C521=[!4027,M][!4025,M][1131][3055][4022]
C522=[!4403,M][4401][1131][3055][4400]
C529=[!7365,M][1131][3055][7187]
C534=[4439][4431][4461][1131][3055][4435]
C550=[!7295,M][1131][3055][7294]
C551=[!4383,M][1131][3055]
C553=[3233][1131][3055][3232]
C849=[!3301,M][3285]
C850=[4405][!3036,M],@M+C
C878=[!3434,M][1131][3055][3194][6345]
S001=[0001,M,1][0002,M,1]
S002=[0004,M,1][0007,C,1][0008,C,1]
S003=[0010,M,1][0007,C,1][0014,C,1]
S004=[0017,M,1][0019,M,1]
S005=[0022,M,1][0025,C,1]
S006=[0040,M,1][0007,C,1]
S007=[0044,M,1][0007,C,1]
S008=[0052,M,1][0054,M,1][0057,C,1]
S009=[!0065,M][!0052,M][!0054,M][!0051,M][0057]
S009=[0065,M,1][0052,M,1][0054,M,1][0051,M,1][0057,C,1],@M[1:6:1]@M[1:3:1]@M[1:3:1]@M[1:2:1].C[1:6:1]
S010=[0070,M,1][0073,C,1],@M[1:2:1].C[1:1:1]
S010=[!0070,M][0073]
.ELMS
0001=A,4,4
0002=N,1,1
0004=AN,1,35
0007=AN,1,4
0008=AN,1,14
0010=AN,1,35
0014=AN,1,14
0017=N,6,6
0019=N,4,4
0020=AN,1,14
0022=AN,1,14
0025=AN,2,2
0026=AN,1,14
0029=A,1,1
0031=N,1,1
0032=AN,1,35
0035=N,1,1
0036=N,1,6
0038=AN,1,6
0040=AN,1,35
0044=AN,1,35
0048=AN,1,14
0051=AN,1,2
0051=AN,1,2
0052=AN,1,3
0052=AN,1,3
0054=AN,1,3
0054=AN,1,3
0057=AN,1,6
0057=AN,1,6
0058=AN,1,14
0060=N,1,6
0062=AN,1,14
0062=AN,1,14
0065=AN,1,6
0065=AN,1,6
0068=AN,1,35
0068=AN,1,35
0070=N,1,2
0070=N,1,2
0073=A,1,1
0073=A,1,1
0074=N,1,6
0074=N,1,6
0081=A,1,1
1---=AN,1,1
1000=AN,1,35
1001=AN,1,3
1004=AN,1,35
1073=AN,1,3
1082=N,1,6
1131=AN,1,3
1153=AN,1,3
1154=AN,1,35
1156=AN,1,6
1218=N,1,2
1220=N,1,2
1225=AN,1,3
1229=AN,1,3
1366=AN,1,35
1373=AN,1,3
2---=AN,1,1
2005=AN,1,3
2379=AN,1,3
2380=AN,1,35
3---=AN,1,1
3035=AN,1,3
3036=AN,1,35
3039=AN,1,35
3042=AN,1,35
3045=AN,1,3
3055=AN,1,3
3124=AN,1,35
3139=AN,1,3
3148=AN,1,25
3153=AN,1,3
3155=AN,1,3
3164=AN,1,35
3192=AN,1,35
3194=AN,1,35
3207=AN,1,3
3222=AN,1,70
3223=AN,1,25
3224=AN,1,17
3225=AN,1,25
3227=AN,1,3
3229=AN,1,9
3232=AN,1,70
3233=AN,1,25
3251=AN,1,9
3279=AN,1,3
3285=AN,1,17
3301=AN,1,17
3412=AN,1,35
3413=AN,1,17
3432=AN,1,70
3433=AN,1,11
3434=AN,1,17
3436=AN,1,70
3453=AN,1,3
4---=AN,1,1
4000=AN,1,35
4022=AN,1,70
4025=AN,1,3
4027=AN,1,3
4343=AN,1,3
4347=AN,1,3
4383=AN,1,3
4400=AN,1,35
4401=AN,1,3
4403=AN,1,3
4405=AN,1,3
4431=AN,1,3
4435=AN,1,3
4439=AN,1,3
4440=AN,1,70
4441=AN,1,3
4451=AN,1,3
4453=AN,1,3
4461=AN,1,3
4463=AN,1,3
4465=AN,1,3
4471=AN,1,3
4487=AN,1,3
5---=AN,1,1
5004=N,1,18
5025=AN,1,3
5402=N,1,12
5479=AN,1,3
6---=AN,1,1
6341=AN,1,3
6343=AN,1,3
6345=AN,1,3
6347=AN,1,3
6348=N,1,4
7140=AN,1,35
7143=AN,1,3
7186=AN,1,35
7187=AN,1,17
7293=AN,1,3
7294=AN,1,35
7295=AN,1,17
7365=AN,1,3
9280=AN,1,35
9282=AN,1,35
.CODES
0001=UNOA,UNOB,UNOC,UNOD,UNOE,UNOF
0002=1,2,3
0007=1,4,5,8,9,12,14,18,22,30,31,33,34,51,52,53,54,55,57,58,59,61,63,65,80,82,84,85,86,87,89,90,91,92,103,128,129,144,145,146,147,148,ZZZ
0025=AA,BB
0029=A
0031=1
0035=1
0051=AA,AB,AC,AD,AE,AF,AG,AH,AI,CC,CE,EC,ED,EE,EN,ER,EU,EW,EX,IA,KE,LI,OD,RI,RT,UN
0051=AA:AD,CC,CE,EC:EE,EN,ER,EU,EX,IA,KE,LI,OD,RI,RT,UN
0052=1,2,88,89,90,D,S
0054=1,902,911,912,921,932,00A,00B,01A,93A,94A,94B,95A,95B,96A,96B,97A,97B,98A,98B,99A,99B
0065=APERAK,AUTHOR,BANSTA,BAPLIE,BAPLTE,BOPBNK,BOPCUS,BOPDIR,BOPINF,CALINF,COARRI,CODECO,CODENO,COEDOR,COHAOR,COMDIS,CONAPW,CONDPV,CONDRA,CONDRO,CONEST,CONITT,CONPVA,CONQVA,CONRPW,CONTEN,CONTRL,CONWQD,COPARN,COPINO,COPRAR,COREOR,COSTCO,COSTOR,CREADV,CREEXT,CREMUL,CUSCAR,CUSDEC,CUSEXP,CUSREP,CUSRES,DEBADV,DEBMUL,DELFOR,DELJIT,DESADV,DIRDEB,DOCADV,DOCAMA,DOCAMI,DOCAMR,DOCAPP,DOCARE,DOCINF,FINCAN,FINSTA,GESMES,HANMOV,IFCSUM,IFTCCA,IFTDGN,IFTIAG,IFTMAN,IFTMBC,IFTMBF,IFTMBP,IFTMCS,IFTMIN,IFTRIN,IFTSAI,IFTSTA,IFTSTQ,INSPRE,INVOIC,INVRPT,MOVINS,ORDCHG,ORDERS,ORDRSP,PARTIN,PAXLST,PAYDUC,PAYEXT,PAYMUL,PAYORD,PRICAT,PRODEX,PRPAID,QALITY,QUOTES,RECECO,REMADV,REQDOC,REQOTE,SANCRT,SLSFCT,SLSRPT,STATAC,SUPCOT,SUPMAN,VESDEP
0065=APERAK,AUTHOR,BALANC,BANSTA,BAPLIE,BAPLTE,BERMAN,BMISRM,BOPBNK,BOPCUS,BOPDIR,BOPINF,BUSCRD,CALINF,CASINT,CASRES,CHACCO,CLASET,CNTCND,COACSU,COARRI,CODECO,CODENO,COEDOR,COHAOR,COLREQ,COMDIS,CONAPW,CONDPV,CONDRA,CONDRO,CONEST,CONITT,CONPVA,CONQVA,CONRPW,CONTEN,CONTRL,CONWQD,COPARN,COPAYM,COPINO,COPRAR,COREOR,COSTCO,COSTOR,CREADV,CREEXT,CREMUL,CUSCAR,CUSDEC,CUSEXP,CUSPED,CUSREP,CUSRES,DEBADV,DEBMUL,DEBREC,DELFOR,DELJIT,DESADV,DESTIM,DGRECA,DIRDEB,DIRDEF,DMRDEF,DMSTAT,DOCADV,DOCAMA,DOCAMI,DOCAMR,DOCAPP,DOCARE,DOCINF,ENTREC,FINCAN,FINPAY,FINSTA,GENRAL,GESMES,HANMOV,ICASRP,ICSOLI,IFCSUM,IFTCCA,IFTDGN,IFTFCC,IFTIAG,IFTICL,IFTMAN,IFTMBC,IFTMBF,IFTMBP,IFTMCA,IFTMCS,IFTMIN,IFTRIN,IFTSAI,IFTSTA,IFTSTQ,IMPDEF,INFCON,INFENT,INSDES,INSPRE,INSREQ,INSRPT,INVOIC,INVRPT,IPPOAD,IPPOMO,ISENDS,ITRRPT,JAPRES,JINFDE,JOBAPP,JOBCON,JOBMOD,JOBOFF,JUPREQ,KEYMAN,LEDGER,LREACT,LRECLM,MEDPID,MEDPRE,MEDREQ,MEDRPT,MEDRUC,MEQPOS,MOVINS,MSCONS,ORDCHG,ORDERS,ORDRSP,OSTENQ,OSTRPT,PARTIN,PAXLST,PAYDUC,PAYEXT,PAYMUL,PAYORD,PRICAT,PRIHIS,PROCST,PRODAT,PRODEX,PROINQ,PROSRV,PROTAP,PRPAID,QALITY,QUOTES,RDRMES,REBORD,RECADV,RECALC,RECECO,RECLAM,RECORD,REGENT,RELIST,REMADV,REPREM,REQDOC,REQOTE,RESETT,RESMSG,RETACC,RETANN,RETINS,RPCALL,SAFHAZ,SANCRT,SLSFCT,SLSRPT,SOCADE,SSIMOD,SSRECH,SSREGW,STATAC,STLRPT,SUPCOT,SUPMAN,SUPRES,TANSTA,TAXCON,TPFREP,UTILMD,UTILTS,VATDEC,VESDEP,WASDIS,WKGRDC,WKGRRE
0073=C,F
0073=C,F
0081=D,S
1001=1:9,10,12:22,59:95,105,110,120,130,140,150,190,201:212,215,220:233,240:242,245,270,271,310,311,315,320,325:328,330,335,340,341,343,345,350,351,370,380:390,393:396,409,412,425:431,435,447,448,450:452,454:458,460,465:469,481,485,490:493,520,530,550,575,580,610,621:624,630:633,635,640,650,655,700:716,720,722:724,730,740,741,743:746,750,760,761,763:766,770,775,780:799,810:812,820:825,830,833,840,841,850:853,855,856,860:865,870,890,895,896,901,910,911,913:917,925:927,929:938,940,941,950:955,960:966,990,991,995,996,998
1073=1,2
1131=12,16,23,25,35:39,42:44,52:56,100:110,112:123,125:137,139:158,160:170,172:192,ZZZ
1153=AC,AE,AF,AP,AU,AV,BA,BC:BE,BH,BM:BO,BR,BT,BW,CD,CG,CH,CK,CM:CP,CR:CW,CZ:DB,DI,DL,DM,DQ,DR,EA,EB,ED,EE,EI,EN,EP:ER,ET,EX,FC,FF,FI,FN,FO,FS,FT,FV,FX,GA,GC,GD,GN,HS,IA,IB,II,IL,IP,IS,IT,IV,JB,JE,LA:LC,LI,LO,LS,MA,MB,MF:MH,MR,MS,NA,OH,OI,ON,OP,OR,PB:PF,PI,PK,PL,PP:PS,PW,PY,RA,RC,RE,RF,RR,RT,SA,SB,SD:SF,SH,SI,SM,SN,SP,SQ,SS,SW,SZ,TB,TE,TF,TI,TL,TN,TP,UC,UN,UO,VA,VC,VM,VN,VP,VR:VT,VV,WE,WM,WN,WR,WS,WY,XA,XC,XP,AAA:AAE,AAG,AAJ:AAQ,AAS:AAV,AAY:ABE,ABG:ABL,ABO:ABU,ABW,ABY,ACB:ACU,ACW,ACX,ADB:ADK,ADP:ADW,ADY:AFG,AFI:AIN,ASC,AWB,CAS,CEC,CFE,CFO,CKN,CMR,CNO,COF,CRN,CST,DAN,ERN,FLW,GDN,HWB,ICA,ICE,ICO,INB,INN,INO,LAN,LAR,MRN,MSS,MWB,POR,RCN,REN,SRN,STA,UAR,UCN,VON,ZZZ
1225=1:9,10:53
1229=1:9,10:23
1373=1:9,11:21
2005=2:4,7:9,10:18,20:22,35:39,42,44:48,50:55,58:61,63:65,67,69,71,72,74:76,79,81,84,85,89:97,101,107:111,113:115,117,119,123:126,128,129,131:138,140,141,143,144,146:216,218,219,221:240,242:255,257:268,270:288,290:346,ZZZ
2379=2,3,101:103,105:110,201:204,301:306,401,402,404,405,501:503,600:604,608:610,613:616,701:711,713,715:718,801:814
3035=AA,AB,AE:AH,AK:AR,AT:AX,AZ,B1,B2,BA:BI,BK:BQ,BS:BZ,C1,C2,CA:FH,FJ:FP,FR,FT,FW:GF,GO,GR,I1,I2,IB,IC,II,IM:IP,IS,IT,IV,LA,LN,LP,MA,MF,MG,MI,MP,MR:MT,N1,N2,NI,OA,OB,OF,OI,OO,OP,OR:OT,OV,OY,P1:P4,PA:PO,PQ:PT,PW:PZ,RA,RB,RE,RF,RH,RI,RL,RM,RP,RS,RV,RW,SB,SE:SG,SI,SK,SN,SO,SR:SU,SX:SZ,TC,TD,TR:TT,UC,UD,UP,VN,WD,WH,WM,WS,XX,COP,CPD,DCP,TCP,UHP,WPA,ZZZ
3045=1
3055=1:9,10:30,86:99,100:126,128:179,181:184,ZZZ
3139=AA:BF,BU,CA:CG,CN:CP,CR,CW,DE,DI,DL,EB:ED,EX,GR,HE,HG,HM,IC,IN,LB,LO,MC,MD,MH,MR,MS,NT,OC,PA,PD,PE,PM,QA,QC,RD,SA,SC,SD,SR,SU,TA,TD,TI,TR,WH,ZZZ
3153=AA:AC,CA,EI,EM,EX,FT,FX,GM,IE,IM,MA,PB,PS,SW,TE,TG,TL,TM,TT,TX,XF
3155=AA:AD,CA,EI,EM,EX,FT,FX,GM,IE,IM,MA,PB,PS,SW,TE,TG,TL,TM,TT,TX,XF
3227=1,2,4,5,7:9,10:58,60:62,64,66:93,96:99,100:111,113:116,118:149,151:159,ZZZ
3279=DO,DR,EA,IN,IR
3285=1:9,10
3301=1:5
4025=ADV,AGT,AMY,BEC,BEN,BON,CAS,CBF,CDT,COC,COM,COS,CPY,DIV,FEX,GDS,GVT,IHP,INS,INT,LIF,LOA,LOR,NET,PEN,REF,REN,ROY,SAL,SCV,SEC,SSB,SUB,TAX,VAT,ZZZ
4027=1
4343=AA:AD,AF,AG,AP,CA,CO,NA,RE
4347=1:8
4383=ABX,BEX,BGI,BKD,BKI,CAL,CHG,CHI,CHN,CLR,COL:CON,CPP,CUX,DDT,DEP,FEX,FGI,INT,LOC,LOK,MSC,PAC,PGI,POS,REC,RET,RGI,RTR,SEC,STO,TCK,TRF,UGI,VDA,WDL,ZZZ
4401=AA,AB,AD:AM,AP,AT,CO,DA:DK,DN:DP,EI,EM,EX,QC,QE,RL,SW
4403=1:9
4405=1:9,10:21
4431=1,10:14,20,21,23,24,41,44,45,ZZZ
4435=1:9,10:15,ZZZ
4439=1:9,10:47,61:64,69:71,ZZZ
4451=AAA:ABA,ABC:ABJ,ABL:ACP,ALC,ALL,ARR,AUT,BLC,BLR,CCI,CEX,CHG,CIP,CLP,CLR,COI,CUR,CUS,DAR,DCL,DEL,DIN,DOC,DUT,EUR,FBC,GBL,GEN,GS7,HAN,HAZ,ICN,IIN,IMI,IND,INS,INV,IRP,ITR,ITS,LIN,LOI,MCO,MKS,ORI,OSI,PAC,PAI,PAY,PKG,PKT,PMD,PMT,PRD,PRF,PRI,PUR,QIN,QQD,QUT,RAH,REG,RET,REV,RQR,RQT,SAF,SIC,SIN,SLR,SPA,SPG,SPH,SPP,SPT,SRN,SSR,SUR,TCA,TDT,TRA,TRR,TXD,WHI,ZZZ
4453=1:4
4461=1:9,10:23,25:43,50,60:67,70,74:78,91:96,ZZZ
4463=1
4465=1:9,10:65,ZZZ
4471=1:9,10:24,ZZZ
4487=1,4:8
5025=1:9,10:99,100:136,138:190,192:311,ZZZ
6341=AAA,AMS,ARG,AST,AUS,BEL,CAN,CAR,CIE,DEN,ECR,FIN,FRA,IMF,LNF,LNS,MIL,NOR,NYC,PHI,SRE,SWE,ZUR
6343=1:9,10:17
6347=1:6
7143=AA:AC,BO,BP,CC,CG,CL,CR,CV,DR,DW,EC,EF,EN,GS,HS,IB,IN,IS,IT,IZ,MA,MF,MN,MP,NB,ON,PD,PL,PO,PV,QS,RC,RN,RU,RY,SA,SG,SK,SN,SS,ST,TG,UA,UP,VN,VP,VS,VX,SRS,ZZZ
7187=1:9,10,11
7293=1:7
7365=1:9,10:58,ZZZ