ACRFVLK3 ;IHS/OIRM/DSD/EFG - VENDOR FILE LOOKUP 3 ; [ 04/23/2007 10:56 AM ]
Source file <ACRFVLK3.m>
Package | Total | Call Graph |
---|---|---|
Commitment Register | 2 | ($$IDATE,CKVEND)^ACRFUFMU (HEAD,SUBHEAD,WRT)^ACRFVLK2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDATA | ;SET VENDOR VARIABLES
|
|
SUBH(ACT,ERR,VAR,HD1) | ;
|
|
LOOP(ACT,ERR,VAR) | ; LOOP THROUGH VENDOR AND SET BY NAME
; ---- ENTERS WITH WRITE SUBROUTINE CALL ; ACTIVE FLAG -- 1 OR 0 ; ERROR FLAG -- 1 OR 0 ; VAR STRING -- E(IN), D(UNS), Z(IP) + 1 FOR HAS, 0 FOR MISSING |
|
V(ACT) | ;EP - GATHER VENDORS AND SORTS BY NAME, DUNS, EIN, OR ZIP
; --------ENTERS WITH ACT STRING (ACTIVE, ERROR, SORT NAME) |
|
ADEZ(ACT) | ;EP - GATHER ACTIVE VENDORS WITH DUNS, EIN, OR ZIP
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUTTVNDR - [#9999999.11] | LOOP+9, GETDATA+3, GETDATA+4, GETDATA+5, GETDATA+6 |
^TMP("ACR" | LOOP+32* |
Name | Line Occurrences |
---|---|
GETDATA | LOOP+12 |
LOOP | V+14, ADEZ+17 |
SUBH | V+4, ADEZ+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACRACT | LOOP+13, GETDATA+2!, GETDATA+15* |
ACRDUNS | LOOP+14, LOOP+15, LOOP+21, LOOP+23, LOOP+24, LOOP+27, LOOP+30, GETDATA+2!, GETDATA+10* |
ACREFT | LOOP+21, LOOP+24, LOOP+27, LOOP+30, GETDATA+2!, GETDATA+14* |
ACREFTT | GETDATA+2!, GETDATA+13*, GETDATA+14 |
>> ACREIN | LOOP+16, LOOP+17, GETDATA+11* |
>> ACRERR | LOOP+8*, LOOP+10, LOOP+31 |
ACREX | LOOP+21, LOOP+24, LOOP+26, LOOP+27, LOOP+30, GETDATA+2!, GETDATA+12* |
ACROUT | LOOP+9, GETDATA+1! |
ACRREC | GETDATA+1! |
ACRV0 | GETDATA+1!, GETDATA+3*, GETDATA+8, GETDATA+10 |
ACRV11 | GETDATA+1!, GETDATA+4*, GETDATA+11, GETDATA+12 |
ACRV13 | GETDATA+1!, GETDATA+5*, GETDATA+7 |
ACRV19 | GETDATA+1!, GETDATA+6*, GETDATA+13, GETDATA+14 |
ACRVAR | V+3~, V+6*, V+7, ADEZ+3*, ADEZ+4, ADEZ+5, ADEZ+6, ADEZ+8, ADEZ+9, ADEZ+11 , ADEZ+12, ADEZ+14 |
ACRVNAM | LOOP+20, LOOP+21, LOOP+24, LOOP+27, LOOP+30, GETDATA+1!, GETDATA+8*, GETDATA+9* |
ACRVREC | LOOP+6~, LOOP+7*, LOOP+9*, LOOP+11, GETDATA+3, GETDATA+4, GETDATA+5, GETDATA+6, GETDATA+9, GETDATA+15 |
ACRZIP | LOOP+18, LOOP+19, LOOP+21, LOOP+24, LOOP+27, LOOP+29, LOOP+30, GETDATA+1!, GETDATA+7* |
ACT | SUBH~, SUBH+2, SUBH+3, SUBH+4*, SUBH+7*, SUBH+8, V~, V+4, V+14, ADEZ~ , ADEZ+2, ADEZ+17, LOOP~, LOOP+13 |
ERR | SUBH~, SUBH+2*, SUBH+5*, V+4, V+8, V+14, ADEZ+2, ADEZ+17, LOOP~, LOOP+10 , LOOP+31 |
HD1 | SUBH~, SUBH+8*, V+3~, V+4, V+7*, V+12, ADEZ+2, ADEZ+5*, ADEZ+15 |
HD2 | V+3~, V+5*, V+9*, V+12, ADEZ+4*, ADEZ+15 |
NUM | ADEZ+1~, ADEZ+7*, ADEZ+10*, ADEZ+13*, ADEZ+16, LOOP+6~, LOOP+7*, LOOP+23*, LOOP+26*, LOOP+29* , LOOP+33 |
>> STR | LOOP+21*, LOOP+24*, LOOP+27*, LOOP+30*, LOOP+31*, LOOP+32 |
TAIL | V+3~, V+8*, V+9, V+11 |
TITLE | V+2~, V+10*, V+11*, V+13, ADEZ+1~, ADEZ+8*, ADEZ+11*, ADEZ+14*, ADEZ+16 |
U | V+11, LOOP+21, LOOP+24, LOOP+27, LOOP+30, LOOP+31, GETDATA+7, GETDATA+8, GETDATA+10, GETDATA+11 , GETDATA+12, GETDATA+13, GETDATA+14 |
VAR | SUBH~, SUBH+3*, SUBH+6*, V+4, V+6, V+14, ADEZ+2, ADEZ+3, ADEZ+17, LOOP~ , LOOP+14, LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+19, LOOP+22, LOOP+25, LOOP+28 |
>> VARN | LOOP+20*, LOOP+23*, LOOP+26*, LOOP+29*, LOOP+32 |