Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^BGPCMSMT

Package: IHS GPRA Information System

Global: ^BGPCMSMT


Information

FileMan FileNo FileMan Filename Package
90379.07 BGP 10 CMS PATIENT LISTS IHS GPRA Information System

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
IHS GPRA Information System 7 BGP010P1    BGP0C1    BGP0CP    BGP0CSII    BGP0CTXC    BGP0GT    BGP0POS2    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
IHS GPRA Information System 2 BGP010P1    BGP0POS2    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
IHS GPRA Information System 2 BGP 10 CMS MEASURES(#90379.01)[.01]    BGP 10 TAXONOMIES(#90377.08)[#90379.0711(.01)]    

Fields, Total: 21

Field # Name Loc Type Details
.01 MEASURE 0;1 POINTER TO BGP 10 CMS MEASURES FILE (#90379.01)
************************REQUIRED FIELD************************
BGP 10 CMS MEASURES(#90379.01)

  • LAST EDITED:  MAY 23, 2007
  • CROSS-REFERENCE:  90379.07^B
    1)= S ^BGPCMSMT("B",$E(X,1,30),DA)=""
    2)= K ^BGPCMSMT("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  90379.07^AC^MUMPS
    1)= I $P(^BGPCMSMT(DA,0),U,2)]"" S ^BGPCMSMT("AO",$P(^BGPCMSMT(DA,0),U),$P(^BGPCMSMT(DA,0),U,2),DA)=""
    2)= I $P(^BGPCMSMT(DA,0),U,2)]"" K ^BGCMSME("AO",$P(^BGPCMSMT(DA,0),U),$P(^BGPCMSMT(DA,0),U,2),DA)
.02 ORDER 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • CROSS-REFERENCE:  90379.07^AOTOO^MUMPS
    1)= S ^BGPCMSMT("AO",$P(^BGPCMSMT(DA,0),U),$P(^BGPCMSMT(DA,0),U,2),DA)=""
    2)= K ^BGPCMSMT("AO",$P(^BGPCMSMT(DA,0),U),$P(^BGPCMSMT(DA,0),U,2),DA)
.03 SELECTION TITLE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
.04 HDR TITLE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
.05 DISPLAY # EXCLUSIONS? 0;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
.06 MAIN PATIENT LIST? 0;6 SET
  • '1' FOR YES;

  • LAST EDITED:  APR 25, 2008
1 PRINT ROUTINE 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
2 COMPUTE ROUTINE 2;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
1100 TAXONOMIES USED 11;0 POINTER Multiple #90379.0711 90379.0711
2100 REPORT INTRO TEXT 21;0 WORD-PROCESSING #90379.0721
7101 HDR 2 71;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7102 MEASURE TITLE 71;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7103 HDR 3 71;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  MAY 31, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
7201 ASTERISK ADM TYPE? 72;1 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7202 ASTERISK DSCH TYPE? 72;2 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7203 ASTERISK ASPIRIN ALLERGY? 72;3 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7204 ASTERISK WARFARIN RX? 72;4 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7205 ASTERISK ON ACE/ARB ALLERGY? 72;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 24, 2007
7206 ASTERISK BETA ALLERGY? 72;6 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2007
7207 ASTERISK DATES? 72;7 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 27, 2007
7300 FIRST PAGE LIST HEADER 73;0 WORD-PROCESSING #90379.0773

Found Entries, Total: 44

MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    
MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^1^1    MEASURE: 90379.01^2^2    
MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    MEASURE: 90379.01^2^2    
MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    
MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^3^3    MEASURE: 90379.01^4^4    
MEASURE: 90379.01^4^4    MEASURE: 90379.01^4^4    MEASURE: 90379.01^4^4    MEASURE: 90379.01^4^4    
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All