AFSLTF1 ;IHS/OIRM/DSD/JDM,HJT - EXPORT PAYMENT RCDS TO FILE(ECS)-MODULE #2; [ 10/27/2004 4:21 PM ]
Source file <AFSLTF1.m>
| Package | Total | Call Graph | 
|---|---|---|
| NCR Financial System | 3 | (HDR,TRL)^AFSLTF2 ^AFSLTPAC (,WRLS)^AFSLTPRC | 
| VA Fileman | 3 | ^DIE EN^DIK ^DIR | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TNUM | ; | |
| XTRL | ;CREATE TRAILER RCDS | |
| XREF | ;SET ^AFSLPTMP( NODES | |
| LOOPO | ; | |
| SKPNDS | ; | |
| PRC | ; ; Var AFSLFY should be a 4-digit year here. IHS/DSD/HJT 1/23/1999 | |
| RNDXP | ;REINDEX XREF 'P' FOR THE BATCH | |
| STEXDT | ||
| ASKYR | ; | |
| LOOPME | ;Loop thru 'ME' Xref using all payments in all export batches | |
| CHK | ;checks for certification date,open/close,export date | |
| LOOPP | ; ; This subroutine sets up temporary globals inorder to write the ; payment details to a Unix file (DE - call #58). | |
| PDT | ; | |
| TREAS | ;GET & CHECK SCHED# | |
| PRCX | ;SET TEMP EXPORT GBL ^AFSLPTMP( | |
| EXDAT | ;set export date for schedule | |
| XDTL | ;LOOP THRU 'ME' XREF & CREATE DETAIL RCDS | |
| XHDR | ;CREATE '&' AND 'A' CARDS | |
| TREASX | ; | |
| GROUPX | ; | |
| GROUPING | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^AFSLAFP - [#9002325] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AFSLAFP - [#9002325] | STEXDT+5, TREAS+3, PRCX+2, PRCX+5, RNDXP+2, LOOPP+6, LOOPP+7, LOOPP+8, LOOPP+9, LOOPP+10 , LOOPP+11, CHK+1, CHK+3, CHK+5, PDT+4, PDT+6, PDT+7 | 
| ^AFSLAFP("B" | PRC+2, PRC+3 | 
| ^AFSLAFP("L" | PRCX+4 | 
| ^AFSLAFP("ME" | LOOPME+2, CHK+5 | 
| ^AFSLAFP("P" | LOOPO+1, LOOPO+2, LOOPP+4, LOOPP+5 | 
| ^AFSLPTMP | XDTL+3!, SKPNDS+5*, SKPNDS+6*, SKPNDS+7* | 
| ^AFSLXTMP | XDTL+3! | 
| Name | Line Occurrences | 
|---|---|
| ASKYR | PRC+2, ASKYR+8 | 
| CHK | RNDXP+7 | 
| EXDAT | XTRL+1 | 
| GROUPING | GROUPING+7 | 
| GROUPX | GROUPING+1, GROUPING+2 | 
| LOOPME | LOOPME+9 | 
| LOOPO | LOOPO+4 | 
| LOOPP | LOOPO+3, SKPNDS+8 | 
| PRC | TREAS+1 | 
| PRCX | LOOPME+6 | 
| RNDXP | PRCX+3 | 
| SKPNDS | LOOPP+6, LOOPP+7, LOOPP+8 | 
| STEXDT | STEXDT+6 | 
| TREASX | TREAS+2 | 
| XREF | XDTL+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | CHK+1 | 
| ^(2 | CHK+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> AFSL1 | AFSLTF1+6* | 
| >> AFSL1A | AFSLTF1+6* | 
| >> AFSL2 | AFSLTF1+6* | 
| >> AFSL3 | AFSLTF1+6* | 
| >> AFSL4 | AFSLTF1+6* | 
| >> AFSL5 | AFSLTF1+6* | 
| >> AFSLAMT | AFSLTF1+7* | 
| >> AFSLBATC( | LOOPME+8*, STEXDT, STEXDT+1, STEXDT+2 | 
| >> AFSLBATN | STEXDT+2*, STEXDT+4 | 
| >> AFSLBCNT | LOOPME+7*, LOOPME+8* | 
| >> AFSLBN | TREAS+2*, TREAS+3*, TREAS+5, TREAS+9*, TREASX+2, TREASX+3, TNUM+1 | 
| >> AFSLBND | LOOPME+8, PRCX+2*, PRCX+4*, PRCX+5*, RNDXP+2, RNDXP+3, RNDXP+4, RNDXP+7, LOOPP+4, LOOPP+5 , LOOPP+6, LOOPP+7, LOOPP+8, LOOPP+9, LOOPP+10, LOOPP+11 | 
| >> AFSLBTCX | PRCX+2* | 
| >> AFSLBTN | EXDAT+1*, STEXDT, STEXDT+1*, STEXDT+2, STEXDT+8* | 
| >> AFSLBYND | LOOPME+6*, PRCX+2, PRCX+4, PRCX+5, RNDXP+2, RNDXP+3, RNDXP+4, RNDXP+7, LOOPP+4, LOOPP+5 , LOOPP+6, LOOPP+7, LOOPP+8, LOOPP+9, LOOPP+10, LOOPP+11 | 
| >> AFSLCBA | PRC+5* | 
| >> AFSLCBC | PRC+5* | 
| >> AFSLCKNX | XDTL+10*, XDTL+15* | 
| >> AFSLCNT | AFSLTF1+7*, PRC+5* | 
| >> AFSLCNT1 | PRC+5* | 
| >> AFSLCNTX | XDTL+10*, XDTL+15* | 
| >> AFSLDFYN | PDT+6*, PDT+8, PDT+9 | 
| >> AFSLDNUM | PDT+4*, PDT+8, PDT+10 | 
| >> AFSLECSP | XTRL+3* | 
| >> AFSLEFLG | XTRL+4* | 
| >> AFSLEIN | PRC+4* | 
| >> AFSLEIN1 | PRC+4*, PDT+2, PDT+4, PDT+6, PDT+7 | 
| >> AFSLEMSG | AFSLTF1+6*, XTRL+3 | 
| >> AFSLEXTP | GROUPX+1*, GROUPX+2*, GROUPX+3*, XDTL+8, XDTL+13 | 
| >> AFSLFLG | PRC+5*, XTRL+2*, XTRL+3, CHK+6* | 
| >> AFSLFLG1 | AFSLTF1+6*, CHK+6* | 
| >> AFSLFY | AFSLTF1+9*, PRC+2, PRC+3, ASKYR+10* | 
| >> AFSLFYN | AFSLTF1+7*, PRC+2, PRC+3*, TREAS+1, TREAS+3, TREASX+2, LOOPME+2, LOOPME+6, RNDXP+7*, CHK+1 , CHK+3, CHK+5, TNUM+2, TNUM+3, PDT+1, PDT+4, PDT+6, PDT+7, STEXDT+3 | 
| >> AFSLIN | AFSLTF1+7* | 
| >> AFSLMNX | XREF+1*, LOOPME+2*, LOOPME+3, PRCX+1, PRCX+2, PRCX+4, PRCX+5 | 
| >> AFSLNXPN | AFSLTF1+9*, SKPNDS+4*, SKPNDS+5, SKPNDS+6, SKPNDS+7 | 
| >> AFSLONX | RNDXP+6*, LOOPO+1, LOOPO+2*, LOOPP+4, LOOPP+5 | 
| >> AFSLOO | CHK+7* | 
| >> AFSLPAX | XDTL+10*, XDTL+15* | 
| >> AFSLPCX | XDTL+10*, XDTL+15* | 
| >> AFSLPDNM | PDT+7*, PDT+11 | 
| >> AFSLPDT | PDT+2, PDT+12 | 
| >> AFSLPG | AFSLTF1+8* | 
| >> AFSLPND | LOOPO+3*, LOOPP+4, LOOPP+5*, LOOPP+6, LOOPP+7, LOOPP+8, LOOPP+9, LOOPP+10, LOOPP+11 | 
| >> AFSLPND0 | LOOPP+6*, LOOPP+9*, SKPNDS+1*, SKPNDS+5 | 
| >> AFSLPND1 | LOOPP+6*, LOOPP+7*, LOOPP+10*, SKPNDS+2*, SKPNDS+6 | 
| >> AFSLPND2 | LOOPP+6*, LOOPP+7*, LOOPP+8*, LOOPP+11*, SKPNDS+3*, SKPNDS+7 | 
| >> AFSLPTX | XDTL+10*, XDTL+15* | 
| >> AFSLSCDX | TREASX+1* | 
| >> AFSLSCH | CHK+6* | 
| >> AFSLSCH1 | AFSLTF1+7*, RNDXP+7*, CHK+1, CHK+3, CHK+5, CHK+6, TNUM+4, PDT+1, PDT+2, PDT+4 , PDT+6, PDT+7 | 
| >> AFSLSCH1( | CHK+6* | 
| >> AFSLSCH2 | CHK+3*, CHK+6 | 
| >> AFSLSCH3 | CHK+1*, CHK+6 | 
| >> AFSLSCHZ | CHK+6* | 
| >> AFSLSEQ | AFSLTF1+7* | 
| >> AFSLSEQ1 | AFSLTF1+7* | 
| >> AFSLSH11 | TREASX+3*, TNUM+5 | 
| >> AFSLTFY | AFSLTF1+9 | 
| >> AFSLTNUM | TREAS+2 | 
| >> AFSLTRSC | LOOPME+5 | 
| >> AFSLXTYP | GROUPING+1, GROUPING+2 | 
| >> DA | TREASX+2*, RNDXP+4*, TNUM+4*, PDT+2*, PDT+11*, STEXDT+4* | 
| >> DA(1 | RNDXP+4*, TNUM+3*, PDT+2*, PDT+10*, STEXDT+3* | 
| >> DA(2 | RNDXP+4*, PDT+1*, PDT+9* | 
| >> DIE | TREASX+2*, TNUM+2*, PDT+1*, PDT+8*, STEXDT+3* | 
| >> DIK | RNDXP+3* | 
| >> DIK(1 | RNDXP+3* | 
| DIR | GROUPING+3!, ASKYR+1! | 
| DIR("?" | TREAS+7* | 
| DIR("??" | TREAS+8* | 
| DIR("A" | TREAS+6*, GROUPING+5*, ASKYR+2* | 
| DIR("B" | TREAS+5*, GROUPING+5* | 
| DIR(0 | TREAS+4*, GROUPING+4*, ASKYR+5* | 
| >> DIROUT | GROUPING+7 | 
| >> DIRUT | ASKYR+7 | 
| >> DR | TREASX+2*, TNUM+5*, PDT+2*, PDT+12*, STEXDT+4* | 
| DT | CHK+6 | 
| >> DTOUT | GROUPING+7 | 
| >> DUOUT | GROUPING+7 | 
| IO(0 | AFSLTF1+5, TREAS+9, GROUPING+7, LOOPME+5 | 
| U | TREAS+3, PRCX+2, CHK+5, CHK+6, PDT+4, PDT+6, PDT+7 | 
| >> X | TREAS+2*, TREASX+1, GROUPING+1*, GROUPING+2*, GROUPX+1, TNUM+1*, ASKYR+7*, ASKYR+8, ASKYR+10 | 
| >> XX | RNDXP+1*, RNDXP+2, RNDXP+4 | 
| >> Y | TREAS+9 |