DDMP1 ;SFISC/DPC-ASCII IMPORT UTIILTIES ;9/19/96 14:58
Source file <DDMP1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FILENUM(DDMPF) | ; | |
| FLDVAL | ; | |
| TMPL2SQ(DDMPF,DDMPFLSQ) | ; | |
| TMP2DR | ; | |
| INFILE(DDMPINAR,DDMPFMT,DDMPFBCK,DDMPDR,DDMPNCNT) | ; | |
| RQIDOK(DDMPFLDS) | ; | |
| TODR(DDMPF,DDMPFLDS,DDMPDR,DDMPDRTP) | ; | |
| GETSRC(DDMPFSRC) | ; | |
| TMPL2DR(DDMPF,DDMPFLDS) | ; | |
| GETFMT(DDMPFMT) | ; ; Sets up format info. | 
| Name | Field # of Occurrence | 
|---|---|
| $$FTG^%ZISH | GETSRC+4 | 
| BLD^DIALOG | GETFMT+6, GETFMT+18, GETSRC+5, GETSRC+6, RQIDOK+9, INFILE+9, FILENUM+3, FLDVAL+6, FLDVAL+9, FLDVAL+11 , FLDVAL+15, FLDVAL+17, TMPL2SQ+7, TODR+12, TMP2DR+4 | 
| FIND^DIC | GETFMT+5 | 
| LIST^DIC | TMPL2SQ+8 | 
| REQIDS^DICU | RQIDOK+4 | 
| $$FLDNUM^DILFD | FLDVAL+2 | 
| $$VFILE^DILFD | FILENUM+1 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD( | FLDVAL+3, FLDVAL+12 | 
| ^DIC("B" | FILENUM+2 | 
| ^DIST( | TMPL2SQ+3 | 
| ^TMP("DILIST" | TMPL2SQ+9, TMPL2SQ+10, TMPL2SQ+11, TMPL2SQ+14! | 
| ^TMP($J | GETSRC+3!, GETSRC+4, GETSRC+6 | 
| Name | Line Occurrences | 
|---|---|
| $$FILENUM | INFILE+10 | 
| FLDVAL | INFILE+17 | 
| TMP2DR | TODR+3, TODR+11, TODR+18 | 
| TMPL2SQ | TMPL2DR+3 | 
| TODR | INFILE+25, TMPL2DR+6, TODR+22 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | INFILE+5, FILENUM+2 | 
| ^(1 | TMPL2SQ+12 | 
| ^(2 | TMPL2SQ+12 | 
| ^(3 | TMPL2SQ+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DDMP0 | FLDVAL+1~, FLDVAL+3*, FLDVAL+4, FLDVAL+7 | 
| DDMP0P2 | INFILE+16~, INFILE+19, FLDVAL+7*, FLDVAL+8, FLDVAL+12 | 
| DDMPARAM | TMPL2SQ+5~, TMPL2SQ+7 | 
| DDMPARAM("FILE" | TMPL2SQ+6* | 
| DDMPARAM(1 | TMPL2SQ+6* | 
| DDMPASCI | GETFMT+13~*, GETFMT+14*, GETFMT+15 | 
| DDMPCPTH | TODR+1~, TODR+6, TODR+7*, TODR+8, TODR+15 | 
| DDMPDELM | INFILE+1~, INFILE+3*, INFILE+4*, INFILE+11 | 
| DDMPDONE | INFILE+1~, INFILE+5, INFILE+21*, TODR+1~, TODR+2, TMP2DR+1* | 
| DDMPDPTH | INFILE+12~, INFILE+13*, INFILE+15, FLDVAL+9, FLDVAL+11, TODR+1~, TODR+4, TODR+5*, TODR+6, TODR+7 , TODR+9, TODR+10, TODR+13, TODR+16, TODR+17, TODR+20, TODR+21 | 
| DDMPDR | INFILE~, INFILE+25, TMPL2DR+1~, TMPL2DR+6, TMPL2DR+8, TODR~, TODR+22 | 
| DDMPDR( | TMP2DR+2*, TMP2DR+3 | 
| DDMPDRTP | TODR~, TODR+22 | 
| DDMPDRTP( | TODR+9, TODR+10, TODR+13*, TODR+20*, TMP2DR+2, TMP2DR+3, TMP2DR+5! | 
| DDMPERCT | RQIDOK+2~*, RQIDOK+10 | 
| DDMPERR | TMPL2DR+2~*, TMPL2DR+4 | 
| DDMPF | RQIDOK+2~*, RQIDOK+3*, RQIDOK+4, RQIDOK+7, RQIDOK+8, INFILE+1~, INFILE+7, INFILE+8*, INFILE+9, INFILE+10* , INFILE+14, INFILE+25, INFILE+26, FILENUM~, FILENUM+1, FILENUM+2, FILENUM+3, TMPL2DR~, TMPL2DR+3, TMPL2DR+6 , TMPL2SQ~, TMPL2SQ+3, TMPL2SQ+6, TODR~, TODR+9, TODR+10, TODR+13, TODR+20, TMP2DR+2, TMP2DR+3 , TMP2DR+4, TMP2DR+5 | 
| DDMPFBCK | INFILE~, INFILE+26* | 
| DDMPFDF | INFILE+12~, INFILE+14*, INFILE+18, INFILE+19*, FLDVAL+2, FLDVAL+3, FLDVAL+5, FLDVAL+14 | 
| DDMPFDWN | TODR+1~, TODR+21*, TODR+22 | 
| DDMPFLD | INFILE+12~, INFILE+15*, INFILE+18, FLDVAL+2*, FLDVAL+3, FLDVAL+5, FLDVAL+14 | 
| DDMPFLDS | RQIDOK~, INFILE+1~, INFILE+24*, INFILE+25, TMPL2DR~, TMPL2DR+3, TMPL2DR+5*, TMPL2DR+6, TMPL2DR+7!, TMPL2DR+8* , TODR~, TODR+3, TODR+4, TODR+5, TODR+6, TODR+7, TODR+9, TODR+10, TODR+13, TODR+14* , TODR+20, TODR+21, TODR+22 | 
| DDMPFLDS( | RQIDOK+3, RQIDOK+7, INFILE+20*, FLDVAL+16, TODR+3, TODR+4, TODR+5, TODR+6, TODR+7, TODR+9 , TODR+10, TODR+13, TODR+20, TODR+21 | 
| DDMPFLDS("LN" | TODR+13 | 
| DDMPFLSQ | TMPL2SQ~, TMPL2SQ+2 | 
| DDMPFLSQ( | TMPL2SQ+12* | 
| DDMPFLSQ("LN" | TMPL2SQ+13* | 
| DDMPFMT | GETFMT~, GETFMT+4, GETFMT+5, GETFMT+6, INFILE~ | 
| DDMPFMT("FDELIM" | GETFMT+8*, GETFMT+11*, GETFMT+12, GETFMT+14, GETFMT+15*, GETFMT+18, INFILE+4 | 
| DDMPFMT("FIXED" | GETFMT+9*, GETFMT+17*, GETFMT+18, INFILE+3 | 
| DDMPFMT("IEN" | GETFMT+7* | 
| DDMPFMT("QUOTED" | GETFMT+10*, GETFMT+16* | 
| DDMPFRMT | GETFMT+3~ | 
| DDMPFRMT("DILIST" | GETFMT+6, GETFMT+7, GETFMT+8, GETFMT+9, GETFMT+10 | 
| DDMPFSRC | GETSRC~ | 
| DDMPFSRC("FILE" | GETSRC+4, GETSRC+5, GETSRC+6 | 
| DDMPFSRC("PATH" | GETSRC+4 | 
| DDMPFSTR | INFILE+1~, INFILE+11*, INFILE+13, INFILE+15, INFILE+18*, INFILE+20, FLDVAL+16 | 
| DDMPI | GETFMT+13~, GETFMT+14*, INFILE+1~, INFILE+11*, INFILE+20, FLDVAL+16 | 
| DDMPIMWK | GETSRC+2~, GETSRC+4*, GETSRC+5 | 
| DDMPINAR | INFILE~, INFILE+5, INFILE+22 | 
| DDMPJ | INFILE+1~, INFILE+15*, INFILE+18, FLDVAL+9, FLDVAL+11, FLDVAL+16 | 
| DDMPNCNT | INFILE~, INFILE+2*, INFILE+5*, INFILE+22*, INFILE+23 | 
| DDMPODTH | TODR+1~, TODR+4*, TODR+16*, TODR+17 | 
| DDMPP | RQIDOK+8~, RQIDOK+9, FLDVAL+5~, FLDVAL+6, FLDVAL+13~, FLDVAL+15 | 
| DDMPP("FIELD" | FLDVAL+14* | 
| DDMPP("FILE" | RQIDOK+8*, FLDVAL+5*, FLDVAL+14* | 
| DDMPP(1 | FLDVAL+5*, FLDVAL+14* | 
| DDMPPATH | TMPL2SQ+1~, TMPL2SQ+11*, TMPL2SQ+12 | 
| DDMPPC | GETFMT+13~, GETFMT+14* | 
| DDMPPPTH | TODR+1~, TODR+6*, TODR+8, TODR+15* | 
| DDMPRID | RQIDOK+2~, RQIDOK+5*, RQIDOK+6*, RQIDOK+7 | 
| DDMPRIDS | RQIDOK+2~ | 
| DDMPRIDS("REQ | UIRED IDENTIFIERS" , RQIDOK+6 | 
| DDMPSQ | TMPL2SQ+1~, TMPL2SQ+10*, TMPL2SQ+11, TMPL2SQ+12, TMPL2SQ+13 | 
| DDMPTPNM | TMPL2SQ+1~, TMPL2SQ+2*, TMPL2SQ+3, TMPL2SQ+6 | 
| DDMPTPNO | TMPL2SQ+1~, TMPL2SQ+3*, TMPL2SQ+4, TMPL2SQ+8 | 
| DDMPVAL | INFILE+1~, INFILE+5*, INFILE+6, INFILE+8, INFILE+11 | 
| >> DIERR | RQIDOK+2, RQIDOK+10, INFILE+5, INFILE+15, INFILE+17, INFILE+23, FLDVAL+2, TMPL2DR+2, TMPL2DR+4, TODR+2 | 
| U | INFILE+18, FLDVAL+7, FLDVAL+12, FLDVAL+16, TMPL2SQ+12, TODR+21 |