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

Package: Utility Tables

Routine: AUTTVNDR


Information

AUTTVNDR ; IHS/DIRM/JDM/DFM - CHECK FOR VENDOR FILE DUPLICATES; [ 10/06/2006 8:10 AM ]

Source Information

Source file <AUTTVNDR.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Utility Tables 1 $$^AUTTVND1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Utility Tables 1 AUTTVND2  

Entry Points

Name Comments DBIA/ICR reference
NAME ;EP;Called from ^DD(9999999.11,.01,"LAYGO",1,0)
S3 ;
S2 ;
R ;
L2 ;
L3 ;
W ;
SUFFIX ;EP;TO CHECK EIN SUFFICES FOR MATCHES WITH EXISTING VENDORS
E2 ;
FIND ;
E3 ;
EIN ;EP;CALL WHEN EIN NO. IS EDITED TO CHECK FOR EIN MATCHES

External References

Name Field # of Occurrence
$$^AUTTVND1 NAME+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking VENDOR NAME for matches.",!
  • Line Location: NAME+2
Function Call: WRITE
  • Prompt: !,"No matches found.",!
  • Line Location: NAME+8
Function Call: WRITE
  • Prompt: !!,"Do you still want to ",$S($G(DIC(0))'["L"&($G(DLAYGO)'=9999999.11):"make this change",1:"add this entry"),": NO//"
  • Line Location: L2+1
Function Call: WRITE
  • Prompt: !!?4,"Answer NO to stop the addition of ",AUT3," as a new VENDOR.",!?4,"Answer YES to add, a '^' will be taken as a NO."
  • Line Location: L2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: L3+4
Function Call: WRITE
  • Prompt: !!,"Checking VENDOR EIN for matches.",!
  • Line Location: EIN+3
Function Call: WRITE
  • Prompt: !,"No matches found."
  • Line Location: EIN+7
Function Call: WRITE
  • Prompt: !!,"Do you still want to ",$S($G(DIC(0))'["L"&($G(DLAYGO)'=9999999.11):"enter this EIN",1:"add this entry"),": NO//"
  • Line Location: E2+1
Function Call: WRITE
  • Prompt: !!?4,"Answer NO to stop the addition of ",AUT3," as a new VENDOR.",!?4,"Answer YES to add, a '^' will be taken as a NO."
  • Line Location: E2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: E3+4
Function Call: WRITE
  • Prompt: !!,"Checking VENDOR EIN including SUFFIX for matches.",!
  • Line Location: SUFFIX+2
Function Call: WRITE
  • Prompt: !?5,$P($G(^AUTTVNDR(AUT1,0)),"^"),?40,$P($G(^AUTTVNDR(AUT1,11)),"^",13)
  • Line Location: SUFFIX+5
Function Call: WRITE
  • Prompt: !,"No matches found."
  • Line Location: SUFFIX+6
Function Call: WRITE
  • Prompt: !
  • Line Location: S3+4
Function Call: WRITE
  • Prompt: !?5
  • Line Location: W+1
Function Call: WRITE
  • Prompt: $P($G(^AUTTVNDR(AUT1,0)),"^"),?40+$S($L($G(AUTX))<16:$L($G(AUTX)),1:15)," ",$P($G(^AUTTVNDR(AUT1,11)),"^",13)
  • Line Location: W+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTVNDR - [#9999999.11] SUFFIX+4, SUFFIX+5, W+2, W+3
^AUTTVNDR("ASX" NAME+5
^AUTTVNDR("C" EIN+6
^AUTTVNDR("E" SUFFIX+5
^AUTTVNDR("G" FIND+6, FIND+8

Label References

Name Line Occurrences
E2 E2+4
E3 EIN+7
FIND NAME+6
L2 L2+4
L3 NAME+8
R FIND+8
S3 SUFFIX+6
W NAME+5, EIN+6, FIND+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AUT1 NAME+3~, NAME+4*, NAME+5*, EIN+4~, EIN+6*, SUFFIX+3~, SUFFIX+5*, FIND+7*, FIND+8*, W+2
, W+3
AUT2 NAME+3~, NAME+4*, NAME+8*, L2+2*, L2+3*, L2+4, L3+2, L3+3, EIN+4~, EIN+5*
, EIN+7*, E2+2*, E2+3*, E2+4, E3+2, E3+3, SUFFIX+3~, SUFFIX+4*, SUFFIX+5*, SUFFIX+6*
, S2+3*, S2+5*, S3+2, S3+3, FIND+8, W+3*
AUT3 NAME+3~, NAME+4*, NAME+6, L2+4, L3+1, EIN+4~, EIN+5*, E2+4, E3+1, SUFFIX+3~
, SUFFIX+4*, S3+1
AUTJ NAME+6*, NAME+7!
AUTQUIT NAME+6, FIND+6, FIND+8, FIND+10!, R+2*
>> AUTX NAME+6*, FIND+1*, FIND+2, FIND+3, FIND+4, FIND+6, W+2, W+3
>> AUTZ FIND+3*, FIND+4*, FIND+5, FIND+6*, FIND+8
>> DA EIN+6, SUFFIX+4
>> DDS EIN+1
>> DIC(0 NAME+1, L2+1, E2+1
>> DIE NAME+1, EIN+2, SUFFIX+1, S2+1
>> DLAYGO NAME+1, L2+1, E2+1
U FIND+2
X NAME+4*, NAME+5, L3+1*, L3+2!, EIN+5, EIN+6, E3+1*, E3+2!, SUFFIX+4*, SUFFIX+5
, S3+1*, S3+2!
>> Z R+1*, R+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All