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

Package: Health Summary

Routine: GMTSXAR


Information

GMTSXAR ; SLC/KER - List Parameters/Resequence ; 02/27/2002

Source Information

Source file <GMTSXAR.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 6 %XY^%RCR  ^DIC  FIELD^DID  ^DIE  $$GET1^DIQ  ^DIR  
Health Summary 1 ($$MGR,$$PDI,$$PDN)^GMTSXAW3  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Summary 1 GMTSXA  

Entry Points

Name Comments DBIA/ICR reference
SOH1 ; Help - Single ?
AE(X) ; Allowable Entity
CHKM ; Check (Menu)
REO ; Re-order
TOT(X) ; Total Allowable Entities
SET ; Set Order
SOL ; List
ADED ; Add/Edit
CONTM ; Continue Menu
DA(GMTSI,X) ; Get DA
EN ; Main Entry
SOH2 ; Help - Double ??
ED ; Edit Record
CHK ; Check if OK
CONTH ; Continue Help
CONT(X) ; Ask to Continue
L ; Lock Record
L2 ; Lock Record
OK(X) ; Ask if OK
SO ; Select Order
OKH ; OK Help
ORD ; Order of Entities

External References

Name Field # of Occurrence
%XY^%RCR EN+7
^DIC DA+2, L2+4, AE+7
FIELD^DID ADED+10
^DIE L+6, L2+7
$$GET1^DIQ AE+4
^DIR SO+10, CONT+8, OK+2
$$MGR^GMTSXAW3 EN+4, ADED+3
$$PDI^GMTSXAW3 EN+6, ADED+5, AE+3
$$PDN^GMTSXAW3 ED+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Please select the order in which you want these to be entities"
  • Line Location: ORD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SO+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SO+6
Function Call: WRITE
  • Prompt: $S($L($P(GMTSEXIT,"^",2)):"...",1:""),$P(GMTSEXIT,"^",2)
  • Line Location: SO+15
Function Call: WRITE
  • Prompt: !,?5,$J(GMTSC,4)," ",GMTST
  • Line Location: SOL+4
Function Call: WRITE
  • Prompt: !,?11,"Select a Health Summary Type entity to list"
  • Line Location: SOH1+3
Function Call: WRITE
  • Prompt: " ",GMTSNXC
  • Condition for execution: $L($G(GMTSNXC))
  • Line Location: SOH1+3
Function Call: WRITE
  • Prompt: " (1-",GMTSC,")",!
  • Line Location: SOH1+3
Function Call: WRITE
  • Prompt: !,?11,"Select a Health Summary Type entity to list ",GMTSN," (1-",GMTSC,")",!
  • Line Location: SOH1+4
Function Call: WRITE
  • Prompt: !,?11,"Parameter """,GMTSPARM,""" has multiple "
  • Line Location: SOH2+2
Function Call: WRITE
  • Prompt: !,?11,"allowable entities for which Health Summary Types may"
  • Line Location: SOH2+3
Function Call: WRITE
  • Prompt: !,?11,"be assigned and displayed on the CPRS reports tab. Now"
  • Line Location: SOH2+4
Function Call: WRITE
  • Prompt: !,?11,"you must select the order in which you want these entites"
  • Line Location: SOH2+5
Function Call: WRITE
  • Prompt: !,?11,"to be used by the site.",!
  • Line Location: SOH2+6
Function Call: WRITE
  • Prompt: !!!," Parameter """,GMTSPARM,""" has ",GMTSTOT," allowable entities"
  • Line Location: CONT+3
Function Call: WRITE
  • Prompt: !," which may have the Health Summary Types on the CPRS reports tab "
  • Line Location: CONT+4
Function Call: WRITE
  • Prompt: !," and are used in the following order:"
  • Line Location: CONT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+8
Function Call: WRITE
  • Prompt: !," Enter either 'Y' or 'N'"
  • Line Location: CONTH+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: GMTSC=1
  • Line Location: CONTM+4
Function Call: WRITE
  • Prompt: !,$J(GMTSC,6)," ",GMTST
  • Line Location: CONTM+4
Function Call: WRITE
  • Prompt: !!,?8,"You have selected to resequenced the Health Summary Type"
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: !,?8,"entities in the following order:",!
  • Line Location: CHK+4
Function Call: WRITE
  • Prompt: !,?7,$J(GMTSC,4),?13,$P($G(GMTSCUR(GMTSI)),"^",5),?33,$P($G(GMTSORD(GMTSI)),"^",5)
  • Line Location: CHKM+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !," Enter either 'Y' or 'N'",!,!," Resequence entities:",!
  • Line Location: OKH+1
Function Call: WRITE
  • Prompt: !,?5," Unable to resequence at this time."
  • Line Location: ED+4
Function Call: WRITE
  • Prompt: !," Another user is editing this entry.",!," Unable to resequence at this time."
  • Line Location: L+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: ADED+6
Function Call: WRITE
  • Prompt: "'"
  • Condition for execution: $L(GMTSPARM)
  • Line Location: ADED+6
Function Call: WRITE
  • Prompt: GMTSPARM
  • Line Location: ADED+6
Function Call: WRITE
  • Prompt: "'"
  • Condition for execution: $L(GMTSPARM)
  • Line Location: ADED+6
Function Call: WRITE
  • Prompt: GMTSPARM
  • Line Location: ADED+6
Function Call: WRITE
  • Prompt: !," Another user is editing this entry.",!," Unable to resequence at this time."
  • Line Location: L2+3
Routine Call
  • DIE
  • Line Location:
    • L+6
    • L2+7
Routine Call
  • DIC
  • Line Location:
    • DA+2
    • L2+4
    • AE+7
Routine Call
  • DIR
  • Line Location:
    • SO+10
    • CONT+8
    • OK+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XTV(8989.51 - [#8989.51] FIELD^DID
8989.513 GET1^DIQ
^XTV(8989.518 - [#8989.518] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMT(142.98 - [#142.98] SO+11
^XTV(8989.51 - [#8989.51] L+1, L+7, L2+1, L2+7

Label References

Name Line Occurrences
$$CONT ORD+3
$$DA L+6
$$OK CHK+5
$$TOT ORD+2, SO+1
CHK EN+15
CHKM CHK+5, OKH+1
CONTM CONT+6, CONTH+2
ED CHK+5
L L+2
L2 L2+2
ORD EN+15
REO SO+5, SET+1
SET SO+4, SO+16
SO ORD+5
SOH1 SOH2+1
SOL SO+5, SOH1+5, SOH2+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%X EN+1~, EN+7*
%Y EN+1~, EN+7*
DA EN+1~, ED+1~, L+6*, DA+1~, ADED+1~, L2+5*, L2+6*, AE+1~, AE+5~
DA(1 ED+5*, L+6, DA+1*, DA+2, ADED+7*, ADED+8, L2+5*
DIC EN+1~, ED+1~, ED+5*, DA+1~, DA+2*, ADED+1~, ADED+8*, L2+5~*, AE+1~, AE+5~*
DIC("B" AE+7*
DIC("DR" ADED+9*
DIC("P" ADED+11*
DIC("S" AE+6*
DIC(0 DA+2*, ADED+8*, AE+5*
DIDEL EN+1~, ED+1~
DIE EN+1~, ED+1~, ED+5*, ADED+1~, ADED+8*, L2+5~*
DIR EN+1~, SO+6~, CONT+6~, OK+1~
DIR("?" SO+7*, CONT+8*, OK+1*
DIR("??" SO+7*, CONT+8*, OK+1*
DIR("A" SO+8*, CONT+7*, OK+2*
DIR("B" SO+9!*, CONT+8*, OK+2*
DIR(0 SO+7*, CONT+8*, OK+2*
DIROUT EN+1~, SO+6~, SO+14, CONT+6~, OK+1~
DIRUT EN+1~, SO+6~
DLAYGO ADED+1~, ADED+10*
DR EN+1~, ED+1~, ED+5*, ADED+1~, L2+6*
DTOUT EN+1~, SO+6~, SO+14, CONT+6~, OK+1~, ED+1~, DA+1~, ADED+1~, AE+1~, AE+5~
DUOUT EN+1~, SO+6~, SO+14, CONT+6~, OK+1~, DA+1~, ADED+1~, AE+1~, AE+5~
GMTSA EN+1~, SOL+1~, SOL+2*, SOL+3, CONT+6~, CONTM+2*, CONTM+3, CHK+1~, CHK+5*
GMTSC EN+1~, EN+8*, EN+12*, EN+13, EN+14, ORD+1~, SO+1~, SO+5*, SOL+1~*, SOL+2*
, SOL+4, SOH1+1~*, SOH1+3, SOH1+4, SET+5*, SET+7*, REO+1~*, REO+3*, CONT+6~, CONTM+1*
, CONTM+4*, CHK+1~*, CHK+2, CHKM+1~*, CHKM+2*, CHKM+3*, CHKM+4
GMTSCHG EN+1~, EN+5*, EN+16, CHK+2*, L+6*
GMTSCNT EN+1~, ORD+1~, ORD+2*, SO+2*, ED+1~, ED+2*, L+1*, L+2, L+3, ADED+1~
, ADED+7*, L2+1*, L2+2, L2+3
GMTSCONT EN+1~, ORD+3*
GMTSCT EN+1~, SOH1+1~*, SOH1+2
GMTSCUR EN+1~
GMTSCUR( EN+13*, CONTM+1, CONTM+2, CHK+1, CHKM+1, CHKM+2, CHKM+4
GMTSCUR(0 CONT+1, CONT+2
GMTSD EN+1~, SO+11~*, SO+12
GMTSDEF ADED+1~, AE+1~, AE+2*, AE+4*, AE+7
GMTSENT ADED+1~, AE+1~, AE+2*, AE+4
GMTSEQ EN+1~, ED+1~, L+5*, L+6
GMTSEQ( EN+9*, SET+3
GMTSEXIT EN+1~, EN+15, ORD+3*, ORD+5, ORD+6*, SO+12*, SO+14*, SO+15, CONT+1*
GMTSF EN+2~, EN+11~*, EN+13
GMTSFI EN+2~, ED+1~, L+5*
GMTSI EN+2~, EN+8*, EN+9, EN+10, EN+13, EN+14, ORD+1~, ORD+2*, SO+1~*, SO+5*
, SOL+1~*, SOL+2, SOH1+1~*, SET+5*, SET+6*, SET+7, REO+1~*, REO+2*, REO+3, TOT+1~*
, CONT+6~, CONTM+1*, CONTM+2, CHK+1~*, CHKM+1~*, CHKM+2*, CHKM+4, ED+1~, L+4*, L+5
, DA~, DA+1
GMTSIE EN+2~, EN+9~*, EN+10*, EN+11
GMTSM EN+2~, DA+1~, ADED+2~
GMTSMAX EN+2~, SO+1~, SO+6*, SO+7
GMTSMGR EN+3~, EN+4*, ADED+2~, ADED+3*
GMTSN EN+2~, SOL+1~, SOL+2*, SOL+3, SOH1+1~, SOH1+2*, SOH1+3, SOH1+4, CONT+6~, CONTM+2*
, CONTM+3
GMTSNEW EN+2~, ADED+2~, L2+4*
GMTSNXC EN+2~, ORD+1~, SO+3*, SO+8, SOH1+3
GMTSNXT EN+2~, ORD+1~, SO+2*, SO+3, SOH1+1
GMTSO EN+2~, SET+1~*, SET+4
GMTSO("AL" EN+8, EN+10, EN+11
GMTSO("ET" EN+7!, EN+11, EN+13
GMTSOK EN+2~
GMTSOLD EN+2~, ORD+5
GMTSOLD( EN+13*, SOL+1, SOL+2, SOH1+1, SET+6, SET+7!, REO+2, REO+3, TOT+1
GMTSOLD("B" EN+14*, SO+1!
GMTSON EN+2~, ORD+1~, ORD+2*, SET+3*, SET+4
GMTSORD EN+2~, SO+13!
GMTSORD( SET+4*, CHK+1, CHKM+1, CHKM+4, L+4, L+5
GMTSORD(" " SET+1
GMTSORD("@" SO+13*
GMTSORD(0 ED+3
GMTSPARM EN+2~, EN+5*, EN+6, SOH2+1, SOH2+2, CONT+1, CONT+2, CONT+3, ED+3, ADED+2~
, ADED+4*, ADED+5, ADED+6, AE+1~, AE+2*, AE+3
GMTSPI EN+2~, EN+6*, EN+7, ED+2*, ED+3, ED+5, L+1, L+7, ADED+2~, ADED+5*
, ADED+7, L2+1, L2+5, L2+7, AE+1~, AE+3*, AE+4
GMTSREM EN+2~, ORD+1~, SO+1*, SO+2, SO+4, SO+6, SO+16
GMTSREO EN+3~, SO+1~, REO+1!
GMTSREO( SET+2, SET+4, SET+7!, REO+3*
GMTSREO(0 SO+9
GMTSSO ORD+1~, ORD+2*, SO+2*
GMTSSSO EN+3~
GMTST EN+3~, ORD+1~, ORD+2*, SOL+1~, SOL+3*, SOL+4, CONT+6~, CONTM+3*, CONTM+4, ED+1~
, L+1*, L+2, L+3, ADED+2~, L2+1*, L2+2, L2+3
GMTST("DID" ADED+11
GMTSTOT EN+3~, ORD+1~, ORD+2*, SO+2, CONT+1, CONT+2, CONT+3
GMTSUSR EN+3~, SO+11
X EN+1~, SO+6~, SO+10, TOT~, TOT+1*, TOT+2, CONT~, CONT+9*, OK~, OK+2*
, L+6*, DA~, DA+1*, DA+2*, ADED+1~, AE~, AE+2, AE+7*, AE+8
Y EN+1~, SO+4*, SO+6~, SO+10, SO+13*, SO+14, SO+16, SET+2, SET+4, SET+7
, CONT+9, OK+2, DA+1~, DA+2, ADED+1~, L2+4, L2+5, L2+6, AE+1~, AE+5~
, AE+7
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