.VER 1.3
.INI
BOPDIR_D97B,,D 97B,UN,D97B,Direct Balance of Payment Declaration Message
.PRIVATE EDIdEv
.DATE 3/25/2004 2:57:42 PM
TDVER 
.PUBLIC
.STD ,LS
.SETS
BOPDIR=^[!UNH*1,M][!BGM,M][!DTM*1,M,3]{:2[RFF*1][DTM*1]}{:2[!NAD*1,M][CTA][COM*1,,5]}{:999[LIN][!FII,M]{:9999[!RCS,M][FTX*1,,10]{[RFF*1][DTM*1]}[!NAD*1,M,2]{[!MOA*1,M][CUX]}[LOC,,4]}}^[!UNS,M]{:999[LIN][!RCS,M][FII][NAD*1][!MOA*1,M,2]{:9999[RCS][FTX*1,,10]{[GIR*1][QTY*1][PRI]}{[RFF*1][DTM*1]}[FII][NAD*1][!MOA*1,M][LOC,,4]}}{:99[RFF*1]{:99[!RCS,M][FTX*1]{:9999[!SEQ,M]{[GIR*1][QTY*1][PRI]}{:999[!MOA*1,M][NAD*1]}}}}^{[AUT][DTM*1]}[!UNT,M]
.SEGS
AUT=[!9280,M][9282]
BGM=[C002][C106][1225][4343]
COM=[C076],@M
CTA=[3139][C056]
CUX={2[C504]}[5402][6341]
DTM=[C507],@M
FII=[!3035,M][C078][C088][3207]
FTX=[!4451,M][4453][C107][C108][3453],....*1.
GIR=[!7297,M]{5[C206]},.@M....
LIN=[1082][1229][C212][C829][1222][7083]
LOC=[!3227,M][C517][C519][C553][5479]
MOA=[C516],@M
NAD=[!3035,M][C082][C058][C080][C059][3164][3229][3251][3207],...*1.*1.*1....
PRI=[C509][5213]
QTY=[C186],@M
RCS=[!7293,M][C550][1229]
RFF=[C506],@M
SEQ=[1245][C286]
UNA=[1---,M,1][2---,M,1][3---,M,1][4---,M,1][5---,M,1][6---,M,1],@M[1:1]@M[1:1]@M[1:1]@M[1:1]@M[1:1]@M[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..
UNS=[!0081,M]
UNT=[!0074,M][!0062,M]
UNZ=[0036,M,1][0020,M,1]
.COMS
C002=[1001][1131][3055][1000]
C056=[3413][3412]
C058={5[!3124,M]},.+C+C+C+C
C059={4[!3042,M]},.+C+C+C
C076=[!3148,M][!3155,M]
C078=[3194]{2[3192]}[6345]
C080={5[!3036,M]}[3045],.+C+C+C+C.
C082=[!3039,M][1131][3055]
C088=[3433][1131][3055][3434][1131][3055][3432][3436]
C106=[1004][1056][1060]
C107=[!4441,M][1131][3055]
C108={5[!4440,M]},.+C+C+C+C
C186=[!6063,M][!6060,M][6411]
C206=[!7402,M][7405][4405]
C212=[7140][7143][1131][3055]
C286=[!1050,M][1159][1131][3055]
C504=[!6347,M][6345][6343][6348]
C506=[!1153,M][1154][1156][4000]
C507=[!2005,M][2380][2379]
C509=[!5125,M][5118][5375][5387][5284][6411]
C516=[!5025,M][5004][6345][6343][4405]
C517=[3225][1131][3055][3224]
C519=[3223][1131][3055][3222]
C550=[!7295,M][1131][3055][7294]
C553=[3233][1131][3055][3232]
C829=[5495][1082]
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]
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
0052=AN,1,3
0054=AN,1,3
0057=AN,1,6
0058=AN,1,14
0060=N,1,6
0062=AN,1,14
0065=AN,1,6
0068=AN,1,35
0070=N,1,2
0073=A,1,1
0074=N,1,6
0081=A,1,1
1---=AN,1,1
1000=AN,1,35
1001=AN,1,3
1004=AN,1,35
1050=AN,1,10
1056=AN,1,9
1060=AN,1,6
1082=AN,1,6
1131=AN,1,3
1153=AN,1,3
1154=AN,1,35
1156=AN,1,6
1159=AN,1,3
1222=N,1,2
1225=AN,1,3
1229=AN,1,3
1245=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,512
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,70
3225=AN,1,25
3227=AN,1,3
3229=AN,1,9
3232=AN,1,70
3233=AN,1,25
3251=AN,1,9
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
4343=AN,1,3
4405=AN,1,3
4440=AN,1,70
4441=AN,1,17
4451=AN,1,3
4453=AN,1,3
5---=AN,1,1
5004=N,1,18
5025=AN,1,3
5118=N,1,15
5125=AN,1,3
5213=AN,1,3
5284=N,1,9
5375=AN,1,3
5387=AN,1,3
5402=N,1,12
5479=AN,1,3
5495=AN,1,3
6---=AN,1,1
6060=N,1,15
6063=AN,1,3
6341=AN,1,3
6343=AN,1,3
6345=AN,1,3
6347=AN,1,3
6348=N,1,4
6411=AN,1,3
7083=AN,1,3
7140=AN,1,35
7143=AN,1,3
7293=AN,1,3
7294=AN,1,35
7295=AN,1,17
7297=AN,1,3
7402=AN,1,35
7405=AN,1,3
9280=AN,1,35
9282=AN,1,35
.CODES
0001=UNOA:UNOF
0002=1:3
0007=1,4,5,8,9,12,14,18,22,30,31,33,34,51:55,57:59,61,63,65,80,82,84:87,89:92,103,128,129,144:148,ZZZ
0025=AA,BB
0029=A
0031=1
0035=1
0051=AA:AD,CC,CE,EC:EE,EN,ER,EU,EX,IA,KE,LI,OD,RI,RT,UN
0052=1,2,88:90,D,S
0054=1,2,902,911,912,921,932,93A,94A,94B,95A,95B,96A,96B,97A,97B
0065=APERAK,AUTACK,AUTHOR,AVLREQ,AVLRSP,BANSTA,BAPLIE,BAPLTE,BOPBNK,BOPCUS,BOPDIR,BOPINF,CALINF,CASINT,CASRES,COARRI,CODECO,CODENO,COEDOR,COHAOR,COLREQ,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,CUSPED,CUSREP,CUSRES,DEBADV,DEBMUL,DELFOR,DELJIT,DESADV,DESTIM,DGRECA,DIRDEB,DIRDEF,DOCADV,DOCAMA,DOCAMI,DOCAMR,DOCAPP,DOCARE,DOCINF,FINCAN,FINSTA,GENRAL,GESMES,HANMOV,IFCSUM,IFTCCA,IFTDGN,IFTFCC,IFTIAG,IFTMAN,IFTMBC,IFTMBF,IFTMBP,IFTMCS,IFTMIN,IFTRIN,IFTSAI,IFTSTA,IFTSTQ,INFENT,INSPRE,INVOIC,INVRPT,ITRRPT,JAPRES,JINFDE,JOBAPP,JOBCON,JOBMOD,JOBOFF,KEYMAN,LREACT,MEDPID,MEDREQ,MEDRPT,MEDRUC,MEQPOS,MOVINS,MSCONS,ORDCHG,ORDERS,ORDRSP,OSTENQ,OSTRPT,PARTIN,PAXLST,PAYDUC,PAYEXT,PAYMUL,PAYORD,PRICAT,PRIHIS,PRODAT,PRODEX,PROINQ,PRPAID,QALITY,QUOTES,RDRMES,REBORD,RECADV,RECALC,RECECO,RECLAM,REMADV,REPREM,REQDOC,REQOTE,RESETT,RESMSG,RESREQ,RESRSP,RETACC,RETANN,RETINS,SAFHAZ,SANCRT,SLSFCT,SLSRPT,SSIMOD,SSRECH,SSREGW,STATAC,SUPCOT,SUPMAN,SUPRES,TANSTA,VATDEC,VESDEP,WASDIS,WKGRDC,WKGRRE
0073=C,F
0081=D,S
1001=1:9,10:45,47:99,100:140,142:187,190,201:212,215:237,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
1131=12,16,23,25,33:40,42:49,52:65,67:74,100:110,112:123,125:137,139:158,160:170,172:192,ZZZ
1153=AAA:AAE,AAG,AAJ:AAQ,AAS:AAV,AAY:ABE,ABG:ABZ,AC,ACA:ADW,ADY,ADZ,AE,AEA:AEZ,AF,AFA:AMZ,AP,ASC,AU,AV,AWA:AWI,BA,BC:BE,BH,BM:BO,BR,BT,BW,CAS,CD,CEC,CFE,CFO,CG,CH,CK,CKN,CM,CMR,CN,CNO,CO,COF,CP,CR,CRN,CS,CST,CT:CW,CZ,DA,DAN,DB,DI,DL,DM,DQ,DR,EA,EB,ED,EE,EI,EN,EP:ER,ERN,ET,EX,FC,FF,FI,FLW,FN,FO,FS,FT,FV,FX,GA,GC,GD,GDN,GN,HS,HWB,IA,IB,ICA,ICE,ICO,II,IL,INB,INN,INO,IP,IS,IT,IV,JB,JE,LA,LAN,LAR,LB,LC,LI,LO,LS,MA,MB,MF:MH,MR,MRN,MS,MSS,MWB,NA,OH,OI,ON,OP,OR,PB:PF,PI,PK,PL,POR,PP:PS,PW,PY,RA,RC,RCN,RE,REN,RF,RR,RT,SA,SB,SD:SF,SH,SI,SM,SN,SP,SQ,SRN,SS,STA,SW,SZ,TB,TE,TF,TI,TL,TN,TP,UAR,UC,UCN,UN,UO,VA,VC,VM,VN,VON,VP,VR:VT,VV,WE,WM,WN,WR,WS,WY,XA,XC,XP,ZZZ
1159=1:6
1225=1:9,10:59
1229=1:9,10:26
1245=1:9,10:15
2005=2:4,7:9,10:18,20:22,35:39,42,44:55,58:61,63:65,67,69,71,72,74:76,79,81,84,85,89:97,101,107:111,113:119,123:126,128,129,131:138,140:219,221:268,270:288,290:384,387:440,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:AZ,B1,B2,BA:BQ,BS:BZ,C1,C2,CA:CO,COP,COQ,CP,CPA:CPF,CQ:DC,DCP,DD:HR,I1,I2,IB:IJ,IL:IW,LA,LB,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,TCP,TD,TR:TT,UC,UD,UHP,UP,VN,WD,WH,WM,WPA,WS,XX,ZZZ
3045=1
3055=1:9,10:99,100:126,128:198,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
3155=AA:AG,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:99,100:180,ZZZ
4343=AA:AD,AF,AG,AI,AJ,AP,CA,CO,NA,RE
4405=1:9,10:25
4451=AAA:ABA,ABC:ADC,ADE:AES,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
5025=1:9,10:99,100:136,138:190,192:336,338:366,ZZZ
5125=AAA:AAG,CAL,INF,INV
5213=A,I,S
5375=AA:AE,AI,AQ,CA,CT,CU,DI,EC,NW,PC,PE,PK,PL,PT:PW,QT,SR,TB,TU,TW,WH
5387=AAA:ABK,AI,ALT,AP,BR,CAT,CDV,CON,CP,CU,CUP,CUS,DAP,DIS,DPR,DR,DSC,EC,ES,EUP,FCR,GRP,INV,LBL,MAX,MIN,MNR,MSR,MXR,NE,NQT,NTP,NW,OCR,OFR,PAQ,PBQ,PPD,PPR,PRO,PRP,PW,QTE,RES,RTP,SHD,SRP,SW,TB,TRF,TU,TW,WH
5495=1,2
6063=1:3,8,11,12,17,18,20:33,35,36,40,46:99,100:219
6341=AAA,AAB,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:18
6347=1:7
7083=A,D,I
7143=AA:AQ,AT:AZ,BB:BM,BO,BP,CC,CG,CL,CR,CV,DR,DW,EC,EF,EN,GB,GN,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,SRS,SS,ST,TG,UA,UP,VN,VP,VS,VX,ZZZ
7293=1:9,10:15
7297=1:9,10