Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: AFJXVER

Package: Network Health Exchange

Routine: AFJXVER


Information

AFJXVER ;FO-OAKLAND/GMB-VERIFY NHE DATA MESSAGE IS VALID ;1/09/01 13:51

Source Information

Source file <AFJXVER.m>

Entry Points

Name Comments DBIA/ICR reference
ENTER ;
ALL ; ALL MESSAGES
VALID(AXMZ) ; ONE MESSAGE
MSG(AXMZ) ;
DT2INT(X) ; Convert date from external to internal fileman format.
SPACES(X) ; Get rid of leading and trailing spaces

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Network Health Exchange Data Message report"
  • Line Location: ALL+2
Function Call: WRITE
  • Prompt: !,?20,"for ",^XMB("NETNAME"),!,?24,"on ",$$HTE^XLFDT($H)
  • Line Location: ALL+3
Function Call: WRITE
  • Prompt: !,"NETWORK,HEALTH EXCHANGE user not in New Person file."
  • Line Location: ALL+5
Function Call: WRITE
  • Prompt: !!,"Checking NETWORK,HEALTH EXCHANGE messages..."
  • Line Location: ALL+6
Function Call: WRITE
  • Prompt: !,"No Mail Box for this user defined..."
  • Line Location: ALL+7
Function Call: WRITE
  • Prompt: !,?3,"Checking ",AXBSKTN," basket..."
  • Line Location: ALL+12
Function Call: WRITE
  • Prompt: !!,"Message count"
  • Line Location: ALL+27
Function Call: WRITE
  • Prompt: !,?3,$J(+AXLIST(2,AXBSKTN),8)
  • Line Location: ALL+30
Function Call: WRITE
  • Prompt: " message",$S((+AXLIST(2,AXBSKTN)=1):"",1:"s")
  • Line Location: ALL+31
Function Call: WRITE
  • Prompt: " in the '",AXBSKTN,"' basket."
  • Line Location: ALL+32
Function Call: WRITE
  • Prompt: !!,"Site",?49,$J("Not Valid",10),$J("Valid",10),$J("Total",10),!
  • Line Location: ALL+33
Function Call: WRITE
  • Prompt: !,$E(AXSITE,1,48),?49
  • Line Location: ALL+36
Function Call: WRITE
  • Prompt: $J(+$G(AXLIST(1,AXSITE,AXSEG)),10)
  • Line Location: ALL+37
Function Call: WRITE
  • Prompt: !,?3,"Problems for ",$$FMTE^XLFDT(AXDATE,5),": ",$G(AXLIST(1,AXSITE,AXDATE))
  • Line Location: ALL+40
Function Call: WRITE
  • Prompt: !,$J(AXMZ,15)," ",AXLIST(1,AXSITE,AXDATE,AXMZ)
  • Line Location: ALL+43

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] FIND1^DIC
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call