Hi,
Can anyone help me to write the parser instructions for the following format.
The current code only gives links to the first line, ie. to INS1_XENLA to
INS_ACOCA. I have tried a number of different ideas to no avail (and am at
the stage of pulling my hair out!!).
Thanks,
Janice
================================================================================
Janice Coventry
The Walter and Eliza Hall Institute of Medical Research,
P.O. Royal Melbourne Hospital, Victoria, 3050, Australia.
Phone: International +61-3-9345-2586 FAX: International +61-3-9347-0852
National 03-9345-2586 National 03-9347-0852
Email: janice at wehi.edu.au
===============================================================================
DB REFERENCE: SWISS:(INS1_XENLA,INS2_MOUSE,INS2_RAT,INS2_XENLA,INS_ACOCA,#
& INS_AMICA,INS_ANAPL,INS_ANSAN,INS_BALBO,INS_BALPH,#
& INS_BOVIN,INS_CAMDR,INS_CANFA,INS_CAPHI,INS_CERAE,#
& INS_CHICK,INS_CRILO,INS_CROAT,INS_DIDMA,INS_ELEMA,#
& INS_FELCA,INS_GEOCY,INS_HORSE,INS_HUMAN,INS_HYSCR,#
& INS_KATPE,INS_LEPSP,INS_MACFA,INS_PANTR,INS_PETMA,INS_PIG,#
& INS_PSESC,INS_RABIT,INS_SHEEP,INS_SQUAC,INS_TORMA,#
& INS_ZAODH)#
& PIR1:(IPHU,IPHO,INRB,INWHP,INWHF,INWH1S,IPPG,INEL,IPBO,INSH,INGT,#
& INCMA,IPDG,INCT,IPRT2,INHY,INMS2,INPQ,IPCH,INTK,INOS,#
& A61129,INGS,INRS,IPXL1,IPXL2,INGXA,A61125,INDF,IPRYM,INLMS)#
& PIR2:(S09278,JQ0178,A40909,JQ0359,A60414,JQ0362,B42179,A42179)#
& PIR3:(S15426,JQ0360,JQ0363,S22056,S22058,S17490,S44470)#
#field /gblid=%MHCPEP_DBREF_FIELD
/itype=link /ftype=@DF_LINK /idtype=@SRSxLINKID
/begstr="DB REFERENCE: "
/nextstr="& "
/find=dbref
.......
}
#readlink /id=%MHCPEP_SWISSPROT_REF /link=@MHCPEP_SWISSPROT_LINK
#readlink /id=%MHCPEP_PIR_REF /link=@MHCPEP_PIR_LINK
#link /id=%MHCPEP_SWISSPROT_LINK
/lib1=@MHCPEP_DB /lib2=@SWISSPROT_DB
/field1=@MHCPEP_ID_FIELD /field2=@SWISSPROT_ID_FIELD
/idtype1=@SRSxSEQID /idtype2=@SRSxSEQID
#link /id=%MHCPEP_PIR_LINK
/lib1=@MHCPEP_DB /lib2=@PIR_DB
/field1=@MHCPEP_ID_FIELD /field2=@PIR_ID_FIELD
/idtype1=@SRSxSEQID /idtype2=@SRSxSEQID
#PARSER /id=%MHCPEP_PARSER /newline="\n" /ignore=" \r"
/convert=upper /#BNF =
dbref = swissref | pirref;
swissref = 'SWISS:(' mpswlinks;
pirref = 'PIR1:(' mppirlinks;
mpswlink = ~,#)~ <new not>;
mpswlinks = [mpswlink {',' [mpswlink]}] [',#' | ')#'] <wrt c=@MHCPEP_SWISSPROT_REF>;
mppirlinks = [mpswlink {',' [mpswlink]}][',#' | ')#'] <wrt c=@MHCPEP_PIR_REF>;
--