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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ACHSTXUT

Package: Contract Health Management Information System

Routine: ACHSTXUT


Information

ACHSTXUT ; IHS/ITSC/PMF - DATA TRANMISSION SUBROUTINES ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSTXUT.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
Contract Health Management Information System 1 ($$LOC,$$ZEROTH,PTLK)^ACHS  
IHS VA Utilities 1 $$DIR^XBDIR  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Contract Health Management Information System 6 ACHSMD0  ACHSMD2  ACHSMD2D  ACHSPCC3  ACHSTX MARK PATIENT  ACHSTX MARK VENDOR  

Entry Points

Name Comments DBIA/ICR reference
PT ;EP - From Option. Mark Patient for re-export.
TXLOGADD ;EP - Add entry to transmission log.
L2 ;
ABEND ;
VEN ;EP - From Option. Mark Vendor for re-export.
L3 ;

External References

Name Field # of Occurrence
$$LOC^ACHS TXLOGADD+7
$$ZEROTH^ACHS L2+4
PTLK^ACHS PT+2
^DIC TXLOGADD+7, L3+2, VEN+3
^DIE PT+11, VEN+13
$$DIR^XBDIR L2+3, PT+8, VEN+10
$$FMTE^XLFDT PT+7, VEN+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"NOT AN ENTRY POINT"
  • Line Location: ACHSTXUT+3
Function Call: WRITE
  • Prompt: !!,$P(^DPT(DFN,0),U),!
  • Line Location: PT+4
Function Call: WRITE
  • Prompt: "This patient has no CHS documents on file."
  • Line Location: PT+5
Function Call: WRITE
  • Prompt: "has already been marked for export with the next P.O. for them."
  • Line Location: PT+6
Function Call: WRITE
  • Prompt: "was last exported on ",$$FMTE^XLFDT($P(^AUPNPAT(DFN,0),U,15)),"."
  • Line Location: PT+7
Function Call: WRITE
  • Prompt: !!,$P(^AUTTVNDR(DA,0),U),!
  • Line Location: VEN+6
Function Call: WRITE
  • Prompt: "This vendor has no CHS documents on file.",!
  • Line Location: VEN+7
Function Call: WRITE
  • Prompt: "has already been marked for export with the next P.O. for them."
  • Line Location: VEN+8
Function Call: WRITE
  • Prompt: "was last exported on ",$$FMTE^XLFDT($P(^AUTTVNDR(DA,11),U,12)),"."
  • Line Location: VEN+9
Routine Call
  • DIE
  • Line Location:
    • PT+11
    • VEN+13
Routine Call
  • DIC
  • Line Location:
    • TXLOGADD+7
    • L3+2
    • VEN+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AUTTVNDR - [#9999999.11] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSF - [#9002080] PT+5, VEN+7
^AFSTXLOG( TXLOGADD+6, TXLOGADD+7, L2+1, L2+2, L2+4*, L3+4
^AUPNPAT - [#9000001] PT+6, PT+7
^AUTTVNDR - [#9999999.11] VEN+6, VEN+8, VEN+9, VEN+10
^DPT - [#2] PT+4, PT+8

Label References

Name Line Occurrences
ABEND TXLOGADD+4, TXLOGADD+5, TXLOGADD+6, L2+3
L2 L2+3
L3 L2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHSEXFS TXLOGADD+4, L3+1
>> ACHSY L3+3*, ABEND+1*
DA TXLOGADD+3!, PT+9~, PT+10*, VEN+1~, VEN+5*, VEN+6, VEN+7, VEN+8, VEN+9, VEN+10
DA(1 L3+1*
DFN PT+1~, PT+3, PT+4, PT+5, PT+6, PT+7, PT+8, PT+10
DIC TXLOGADD+7*, L3+1*, VEN+1~, VEN+2*
DIC("A" VEN+2*
DIC(0 TXLOGADD+2*, VEN+2*
DIE PT+9~, PT+10*, VEN+11~, VEN+12*
DR PT+9~, PT+10*, VEN+11~, VEN+12*
DUZ(2 TXLOGADD+5, TXLOGADD+7, L2+1, L2+2, L2+4, L3+1, L3+4, PT+5, VEN+7
U PT+4, PT+6, PT+7, PT+8, VEN+6, VEN+8, VEN+9, VEN+10
X TXLOGADD+3!, TXLOGADD+7*, L3+1*
Y TXLOGADD+3!, L3+3, ABEND+1*, VEN+4, VEN+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All