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

Package: Mental Health Social Services

Routine: AMHLEGP1


Information

AMHLEGP1 ; IHS/CMI/LAB - GROUP FORM DATA ENTRY CREATE RECORD ;

Source Information

Source file <AMHLEGP1.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Mental Health Social Services 7 (PCCLINK,RECCHECK)^AMHLE2  PAUSE^AMHLEA  EN^AMHLEDEL  CALLDIE^AMHLEIN  EP2^AMHLEPOV  ($$ALLOWP,NALLOWP)^AMHUTIL  $$HL^AMHUTIL2  
VA Fileman 4 ^DIC  (FILE,YN)^DICN  ^DIE  ^DIR  
IHS VA Utilities 2 $$VALI^XBDIQ1  ^XBFMK  
IHS Patient 1 KILL^AUPNPAT  
Kernel 1 $$FMTE^XLFDT  
Registration 1 TERM^VALM0  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health Social Services 1 AMHLEGP  

Entry Points

Name Comments DBIA/ICR reference
PAUSE ;
INFORM ;EP
PROCESS ;
PROV ;create provider entries
CREATE ;create mhss record
START ;EP - called from AMHLEGP
DEL ;
POV ;create pov records
EXIT ;clean up and exit
ERROR ;
XIT ;EP
EDUC ;
CPT ;
SOAP ;

External References

Name Field # of Occurrence
PCCLINK^AMHLE2 SOAP+3
RECCHECK^AMHLE2 POV+4
PAUSE^AMHLEA PROCESS+10
EN^AMHLEDEL DEL+2
CALLDIE^AMHLEIN CREATE+4, SOAP+1
EP2^AMHLEPOV POV+5
$$ALLOWP^AMHUTIL PROCESS+10
NALLOWP^AMHUTIL PROCESS+10
$$HL^AMHUTIL2 CREATE+6
KILL^AUPNPAT XIT+4
^DIC PROCESS+3
FILE^DICN CREATE+2, PROV+2, POV+2, CPT+2, EDUC+4
YN^DICN PROCESS+8
^DIE CREATE+6
^DIR ERROR+2, PAUSE+1
TERM^VALM0 INFORM+2
$$VALI^XBDIQ1 CREATE+6
^XBFMK CREATE+3
$$FMTE^XLFDT PROCESS+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCESS+2
Function Call: WRITE
  • Prompt: !!?10,"***** PATIENT'S DATE OF DEATH IS ",$$FMTE^XLFDT(AUPNDOD),!!
  • Line Location: PROCESS+7
Function Call: WRITE
  • Prompt: !!,"Creating new record for ",$P(^DPT(AMHPAT,0),U),"."
  • Line Location: CREATE+2
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Behavioral Health Record is NOT complete!! Deleting Record.",!
  • Line Location: CREATE+3
Function Call: WRITE
  • Prompt: !!,"ERROR -- Incomplete record!! Deleting record!!"
  • Line Location: CREATE+5
Function Call: WRITE
  • Prompt: !!,"Creating provider record failed.!! Notify site manager!",!!
  • Line Location: PROV+3
Function Call: WRITE
  • Prompt: !!,"Creating pov record failed.!! Notify site manager!",!!
  • Line Location: POV+3
Function Call: WRITE
  • Prompt: !,"Incomplete record!! Deleting record!!"
  • Line Location: POV+4
Function Call: WRITE
  • Prompt: !!,"Creating cpt record failed.!! Notify site manager!",!!
  • Line Location: CPT+3
Function Call: WRITE
  • Prompt: !!,"Creating PT ED record failed.!! Notify site manager!",!!
  • Line Location: EDUC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EDUC+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SOAP+1
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"You have NOT completed entry of all of the ",AMHNUM," patients!!",!,"This means that you MUST enter each of the remaining visits individually,",!,"using ",AMHTIME\AMHNUM," minutes activity time for each patient.",!!!
  • Line Location: ERROR+1
Function Call: WRITE
  • Prompt: !!,IORVON,"The GRP option will be deactivated in the next application release.",!,"Users are encouraged to begin utilizing the option GP Group Form Data",!,"Entry Using Group Definition.",IORVOFF
  • Line Location: INFORM+3
Function Call: WRITE
  • Prompt: !!,"This is the GROUP Data Entry Option: You will be asked to enter the total",!,"number of visits , the total Activity Time for ALL Patients listed on the",!,"Group Form,"
  • Line Location: INFORM+5
Function Call: WRITE
  • Prompt: "and all other pertinent information required for a visit.",!!
  • Line Location: INFORM+6
Function Call: WRITE
  • Prompt: " .....You MUST complete ALL entries prior to leaving this option.....",!
  • Line Location: INFORM+7
Routine Call
  • DIE
  • Line Location:
    • CREATE+6
Routine Call
  • DIC
  • Line Location:
    • PROCESS+3
Routine Call
  • DIR
  • Line Location:
    • ERROR+2
    • PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AMHREC - [#9002011] Classic Fileman Calls
^AMHRPRO - [#9002011.01] Classic Fileman Calls
^AMHRPROV - [#9002011.02] Classic Fileman Calls
^AMHRPROC - [#9002011.04] Classic Fileman Calls
^AMHREDU - [#9002011.05] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] CREATE+7
^AMHSITE - [#9002013] SOAP+1
^DPT - [#2] CREATE+2

Label References

Name Line Occurrences
DEL CREATE+5, POV+4
ERROR PROCESS+5
EXIT START+3
PAUSE CREATE+3, INFORM+4, DEL+3
PROCESS START+2, PROCESS+6, PROCESS+8, PROCESS+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PROCESS+8*
AMHACT XIT+1!
AMHACTN CREATE+1*, XIT+2!
AMHAWIXX CREATE+4*!
AMHBEEP XIT+1!
AMHBT XIT+1!
AMHC XIT+1!
AMHCLN XIT+2!
AMHCOMM XIT+1!
AMHCONT XIT+1!
>> AMHCPT( CPT+1, CPT+2
AMHDASH XIT+1!
AMHDATE CREATE+2, XIT+1!
>> AMHEDUC( EDUC+1, EDUC+3
AMHGOT XIT+1!
AMHGROUP XIT+2!
AMHHIT START+1*, PROCESS+11*, SOAP+4, EXIT+2!
AMHHRN XIT+3!
AMHL XIT+3!
AMHLEGP XIT+2!
AMHLEGP("RECS ADDED" , SOAP+4*
AMHLEGPI START+2*, XIT+1!
AMHLEIN XIT+1!
AMHLOC XIT+1!
AMHLPCC XIT+1!
AMHLPCCT XIT+3!
AMHNARR XIT+1!
AMHNUM START+2, ERROR+1, XIT+1!, XIT+2!
AMHOKAY POV+4*, XIT+1!
AMHOL XIT+2!
AMHPAT PROCESS+1*, PROCESS+4*, PROCESS+6, PROCESS+9*, PROCESS+10, CREATE+2, XIT+1!
AMHPOV XIT+1!
AMHPOV( POV+1, POV+2
AMHPOVP XIT+1!
AMHPOVS XIT+1!
AMHPROG XIT+1!
AMHPROV XIT+1!
AMHPROV( PROV+1, PROV+2
AMHPTYPE XIT+2!
AMHQUIT START+1*, START+2, PROCESS+5, ERROR+3*, ERROR+4*, XIT+1!
AMHR CREATE+4*, CREATE+6, CREATE+7, SOAP+1, SOAP+4, XIT+2!, DEL+1
AMHR0 XIT+3!
>> AMHRDEL DEL+1*
AMHREC XIT+1!
AMHTICL XIT+3!
AMHTIME ERROR+1, XIT+1!
AMHTNRQ XIT+3!
AMHTOD XIT+2!
AMHTQ XIT+3!
AMHTTXT XIT+3!
AMHVISIT XIT+1!
>> AMHVTYPE CREATE+7*
AMHX PROV+1*, PROV+2, POV+1*, POV+2, CPT+1*, CPT+2, EDUC+1*, EDUC+3, EXIT+2!
APCDOVRR XIT+2!
>> AUPNDOD PROCESS+7
D EXIT+3!
D0 CREATE+2!, PROV+2!, POV+2!, CPT+2!, EDUC+2!, EXIT+1!, EXIT+3!
DA CREATE+2!, CREATE+4*, CREATE+6*!, PROV+2!, POV+2!, CPT+2!, EDUC+2!, SOAP+1*, EXIT+1!, EXIT+3!
DD CREATE+2!, PROV+2!, POV+2!, CPT+2!, EDUC+2!
DI EXIT+1!
DIADD CREATE+2*!, PROV+2*!, POV+2*!, CPT+2*!, EDUC+2*, EDUC+4!
DIC PROCESS+3*!, CREATE+2!*, PROV+2!*, POV+2!*, CPT+2!*, EDUC+2!*, EDUC+4!, EXIT+1!, EXIT+3!
DIC("DR" CREATE+2*, PROV+2*, POV+2*, CPT+2*, EDUC+3*
DIC(0 PROCESS+3*, CREATE+2*, PROV+2*, POV+2*, CPT+2*, EDUC+2*
DIE CREATE+2!, CREATE+4*, CREATE+6*!, PROV+2!, POV+2!, CPT+2!, EDUC+4!, SOAP+1*
DIR EXIT+3!, ERROR+2!, PAUSE+1!
DIR("A" ERROR+2*, PAUSE+1*
DIR("B" ERROR+2*
DIR(0 ERROR+2*, PAUSE+1*
>> DIRUT ERROR+2*, ERROR+3, PAUSE+1*
DIU EXIT+1!
DIZ EXIT+3!
DLAYGO CREATE+2*!, PROV+2*!, POV+2*!, CPT+2*!, EDUC+2*, EDUC+4!
DO CREATE+2!, PROV+2!, POV+2!, CPT+2!, EDUC+2!, EDUC+4!, EXIT+1!, EXIT+3!
DR CREATE+2!, CREATE+4*, CREATE+6*!, PROV+2!, POV+2!, CPT+2!, EDUC+2!, EDUC+4!, SOAP+1*, EXIT+1!
, EXIT+3!
>> DUOUT ERROR+2, PAUSE+1
DUZ PROCESS+10
DUZ(2 SOAP+1
IOF INFORM+1
>> IORVOFF INFORM+3
>> IORVON INFORM+3
U CREATE+2, CREATE+7, PROV+2, POV+2, CPT+2, EDUC+3, SOAP+1
X CREATE+2*!, PROV+2*!, POV+2*!, CPT+2*!, EDUC+3*, EDUC+4!, EXIT+1!, EXIT+3!
Y PROCESS+4, PROCESS+5, PROCESS+9, CREATE+3, CREATE+4, CREATE+5, PROV+3, POV+3, CPT+3, EDUC+5
, EXIT+1!, EXIT+3!, ERROR+4
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