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

Package: Health Summary

Routine: GMTSXAR


Information

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

Source Information

Source file <GMTSXAR.m>

Entry Points

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

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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call