Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AFSLLDO2

Package: NCR Financial System

Routine: AFSLLDO2


Information

AFSLLDO2 ;IHS/OIRM/DSD/JDM,HJT - LOAD ODF FROM DOWNLOAD FILE; [ 10/27/2004 4:21 PM ]

Source Information

Source file <AFSLLDO2.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
NCR Financial System 3 OPENHFS^AFSLCK1  ^AFSLCKZC  ^AFSLLDO3  
VA Fileman 3 ^%DT  (NOW,YX)^%DTC  IXALL^DIK  
Commitment Register 1 DIR^ACRFDIC  
IHS VA Utilities 1 ^XBCLS  
Kernel 1 CLOSE^%ZISH  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Commitment Register 1 ACRFODD  
NCR Financial System 1 AFSLLDO1  

Entry Points

Name Comments DBIA/ICR reference
11
10
12
FRD
CHKEND ;
6
NOSAV ;
CHKS ;
1
3
EMSG ;ERROR MESSAGES
5
7
SKPCLR ;
9
8
CHKSX ;
VARKIL ;

External References

Name Field # of Occurrence
^%DT CHKSX+7
NOW^%DTC SKPCLR+7, SKPCLR+9
YX^%DTC SKPCLR+7, SKPCLR+9
CLOSE^%ZISH SKPCLR+12
DIR^ACRFDIC FRD+9, FRD+15
OPENHFS^AFSLCK1 SKPCLR+3
^AFSLCKZC SKPCLR+5
^AFSLLDO3 CHKEND+8
IXALL^DIK SKPCLR+8
^XBCLS FRD, FRD+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"READY TO IMPORT SELECTED DOWNLOAD FILE."
  • Line Location: FRD+1
Function Call: WRITE
  • Prompt: !!,"Some Area Offices make obligations/payments for multiple accounting points."
  • Line Location: FRD+2
Function Call: WRITE
  • Prompt: !,"I must CLEAR the local obligations database before importing the 1ST",!,"Accounting Point download file ONLY."
  • Line Location: FRD+3
Function Call: WRITE
  • Prompt: !!,@AFSLRVON,"***WARNING! ANSWERING ""Y"" TO THE NEXT QUESTION WILL CLEAR THE DATABASE.",@AFSLRVOF,*7
  • Line Location: FRD+4
Function Call: WRITE
  • Prompt: !,"LOADING RECORDS FOR A/P ",AFSLAPN,!,"WORKING "
  • Line Location: FRD+20
Function Call: READ
  • Timeout: 60
  • Variable: X
  • Line Location: SKPCLR+5
Function Call: WRITE
  • Prompt: "."
  • Line Location: SKPCLR+5
Function Call: WRITE
  • Prompt: AFSLI
  • Line Location: SKPCLR+6
Function Call: WRITE
  • Prompt: !!,"BEGINNING COMPILED RE-CROSSREFERENCING. PLEASE WAIT WHILE FILEMAN REINDEXES.",!,"BEGIN: "
  • Line Location: SKPCLR+7
Function Call: WRITE
  • Prompt: Y
  • Line Location: SKPCLR+7
Function Call: WRITE
  • Prompt: !?58,"END: "
  • Line Location: SKPCLR+9
Function Call: WRITE
  • Prompt: Y
  • Line Location: SKPCLR+9
Function Call: WRITE
  • Prompt: !,"FILE IN USE AT THIS TIME. TRY LATER."
  • Line Location: CHKS+4
Function Call: WRITE
  • Prompt: !!,"DUPLICATE ENTRY! DOC.# "_$E(X,17,26)_" ALREADY EXISTS YOU CANNOT CREATE A DUPLICATE."
  • Line Location: 1+0
Function Call: WRITE
  • Prompt: !!,"CHS FI PAYMENT! DOC.# "_$P(AFSLXZ,U,1)_" CANNOT BE ENTERED INTO THE 1166 DOCUMENTS FILE."
  • Line Location: 3+0
Function Call: WRITE
  • Prompt: !!,"OBLIGATION YR FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 5+0
Function Call: WRITE
  • Prompt: !!,"DOCUMENT NO. FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 6+0
Function Call: WRITE
  • Prompt: !!,"RECORD# ",AFSLI," DOC# ",$P(AFSLXZ,U,1)," NOT SAVED (CLOSED & AGE>",AFSLPY," YRS."
  • Line Location: 7+0
Function Call: WRITE
  • Prompt: !!,"OBJECT CLASS FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 8+0
Function Call: WRITE
  • Prompt: !!,"LOCATION CODE FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 9+0
Function Call: WRITE
  • Prompt: !!,"OBLIGATION DT FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 10+0
Function Call: WRITE
  • Prompt: !!,"DOC.REF. CODE FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 11+0
Function Call: WRITE
  • Prompt: !!,"CAN NUMBER FORMAT ERROR ON RECORD# "_AFSLI
  • Line Location: 12+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AFSLODOC( FRD+22!, SKPCLR+10, CHKS+4, CHKSX+12
^AFSLODOC("B" CHKSX+10
^AFSLODOC("C" CHKSX+14
^AFSLODOC("D" CHKSX+16
^AFSLODOC(0 FRD+23*
^AFSLREJT FRD+22!, NOSAV+1*, NOSAV+2*, NOSAV+3*, NOSAV+4*
^AFSLREJT("B" NOSAV+3*, NOSAV+5*
^AFSLREJT(0 FRD+23*, NOSAV+2*

Label References

Name Line Occurrences
@( SKPCLR+5, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+9
CHKEND CHKS+8, CHKS+9, CHKS+10, CHKS+11, CHKS+12, CHKS+18, CHKSX+1, CHKSX+2, CHKSX+11, CHKSX+13
, CHKSX+15
CHKS SKPCLR+5
NOSAV 1, 3, 5, 6, 7, 8, 9, 10, 11, 12
SKPCLR FRD+21
VARKIL SKPCLR+13, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+8, CHKEND+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DEV SKPCLR+13!
%FN FRD+19*, SKPCLR+13!
%IN FRD+19*, SKPCLR+13!
>> ACROUT FRD+17
>> ACRQUIT FRD+17
>> ACRY FRD+10, FRD+16
AFSEXFN FRD+19, SKPCLR+14!
>> AFSLACRL CHKS+7*
>> AFSLAPIN FRD+10*, FRD+21
>> AFSLAPN FRD+20, CHKS+3, CHKS+11
AFSLCAN CHKS+6*, CHKS+10, CHKS+11, CHKSX+14, VARKIL+2!
AFSLCFLG CHKS+5*, CHKSX+14*, VARKIL+1!
AFSLCMD SKPCLR+14!
AFSLCONT FRD+16*, FRD+17, SKPCLR+14!
>> AFSLCRDT CHKS+7*
AFSLDDAT VARKIL+2!
AFSLDNOD SKPCLR+14!
AFSLDNXT SKPCLR+14!
AFSLDOC CHKS+6*, CHKS+9, CHKSX+12, VARKIL+1!
AFSLDOCN CHKSX+12*, CHKSX+14, CHKSX+16, VARKIL+2!
AFSLDOCX SKPCLR+14!
>> AFSLDREF CHKS+6*, CHKSX+2
>> AFSLDSBT CHKS+7*
AFSLDT SKPCLR+14!
AFSLDUP FRD+19*, SKPCLR+5, SKPCLR+14!, CHKS+5*, CHKSX+11*, CHKSX+13*, CHKSX+15*, CHKSX+16*, CHKEND+8, CHKEND+9
, 1*
>> AFSLDUPF FRD+19*, CHKS+4*
AFSLDUPV SKPCLR+14!
AFSLEMSG SKPCLR+5, CHKS+5*, CHKS+8*, CHKS+9*, CHKS+10*, CHKS+11*, CHKS+12*, CHKS+18*, CHKSX+1*, CHKSX+2*
, CHKSX+16*, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+9, 1!
, 3!, 5!, 6!, 7!, 8!, 9!, 10!, 11!, 12!, VARKIL+1!
, NOSAV+3, NOSAV+4
AFSLFFND SKPCLR+14!
AFSLFNUM VARKIL+2!
AFSLFY SKPCLR+14!, CHKS+6*, CHKS+8, CHKSX+7*, CHKSX+10
AFSLFYN CHKSX+10*, CHKSX+12, CHKSX+14, CHKSX+16, VARKIL+2!
AFSLI SKPCLR+5*, SKPCLR+6, SKPCLR+14!, 5, 6, 7, 8, 9, 10, 11
, 12, NOSAV+3, NOSAV+4
>> AFSLIMN CHKS+7*
>> AFSLLADT CHKS+7*
>> AFSLLCD CHKS+6*, CHKS+13*, CHKS+14*, CHKS+15*, CHKS+16*, CHKS+17*, CHKS+18
AFSLLTDL SKPCLR+14!
AFSLLTH SKPCLR+14!
AFSLLTR SKPCLR+14!
>> AFSLNZC SKPCLR+5
>> AFSLOBDT CHKS+6*, CHKSX+1
AFSLOBJ CHKS+6*, CHKS+12, CHKSX+16, VARKIL+2!
AFSLOBLD SKPCLR+15!
AFSLOFLG CHKS+5*, CHKSX+16*, VARKIL+1!
AFSLOK SKPCLR+15!
>> AFSLPY 7
AFSLRVOF FRD+4, SKPCLR+15!
AFSLRVON FRD+4, SKPCLR+15!
AFSLSN SKPCLR+15!
AFSLSNX SKPCLR+15!
AFSLVAL SKPCLR+15!
AFSLWCTR SKPCLR+2*, SKPCLR+5*, SKPCLR+6!
AFSLXC SKPCLR+15!
AFSLXFND SKPCLR+15!
AFSLXY FRD+19*, SKPCLR+13!, VARKIL+3*
AFSLXY2 SKPCLR+15!, VARKIL+3*
AFSLXZ FRD+19*, SKPCLR+13!, 3, 7, VARKIL+3*
AFSLXZ2 SKPCLR+13!
AFSLYNOD SKPCLR+15!
AFSLYNXT SKPCLR+15!
AFSLYY VARKIL+2!
AFSLZROS FRD+19*, SKPCLR+15!
DA VARKIL+1!
DIE VARKIL+1!
DIK SKPCLR+8*, SKPCLR+15!
DIR FRD+5~, FRD+11~
DIR("A" FRD+7*, FRD+13*
DIR("B" FRD+8*, FRD+14*
DIR(0 FRD+6*, FRD+12*
DR VARKIL+1!
DX SKPCLR+15!
DY SKPCLR+15!
I SKPCLR+15!
IO SKPCLR+5
IO(0 SKPCLR+5, SKPCLR+6, SKPCLR+7, SKPCLR+9, CHKS+4
K SKPCLR+15!, NOSAV+1, NOSAV+2*, NOSAV+3, NOSAV+4, NOSAV+5
U 3, 7, NOSAV+2, NOSAV+3, NOSAV+4
X FRD+5~, FRD+11~, SKPCLR+1*, SKPCLR+5*, SKPCLR+15!, CHKS+1*, CHKS+2*, CHKS+3, CHKS+6, CHKS+7
, CHKSX+6, CHKSX+7*, CHKSX+8*, 1, NOSAV+3, NOSAV+4
>> XSAVEX CHKSX+6*, CHKSX+8
XY SKPCLR+15!
Y FRD+5~, FRD+11~, SKPCLR+7, SKPCLR+9, CHKSX+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All