Routine: AFSLTF1

Information

AFSLTF1 ;IHS/OIRM/DSD/JDM,HJT - EXPORT PAYMENT RCDS TO FILE(ECS)-MODULE #2; [ 10/27/2004 4:21 PM ]

Source Information

Source file <AFSLTF1.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
NCR Financial System	3	(HDR,TRL)^AFSLTF2 ^AFSLTPAC (,WRLS)^AFSLTPRC
VA Fileman	3	^DIE EN^DIK ^DIR

Entry Points

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	Field # of Occurrence
HDR^AFSLTF2	XHDR+1
TRL^AFSLTF2	XTRL+3
^AFSLTPAC	XDTL+14
^AFSLTPRC	XDTL+9
WRLS^AFSLTPRC	XDTL+11, XDTL+16
^DIE	TREASX+2, TNUM+6, PDT+3, PDT+13, STEXDT+5
EN^DIK	RNDXP+5
^DIR	TREAS+9, GROUPING+6, ASKYR+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO '^' ALLOWED AT THIS TIME" Line Location: GROUPING+7
Function Call: WRITE	Prompt: !,"PROCESSING BATCH:",AFSLTRSC Line Location: LOOPME+5
Function Call: WRITE	Prompt: *7 Line Location: ASKYR+8
Routine Call	DIE Line Location: TREASX+2 TNUM+6 PDT+3 PDT+13 STEXDT+5
Routine Call	DIR Line Location: TREAS+9 GROUPING+6 ASKYR+6

FileNo	Call Tags
^AFSLAFP - [#9002325]	Classic Fileman Calls

Global Variables Directly Accessed

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!

Label References

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

Local Variables

Legend:

>>	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

Customize PDF page

Package: NCR Financial System

Routine: AFSLTF1

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: