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 |  Pointed To By FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^BCHSORT

Package: IHS RPMS CHR System

Global: ^BCHSORT


Information

FileMan FileNo FileMan Filename Package
90002.41 CHR REPORT SORT IHS RPMS CHR System

Description

Directly Accessed By Routines, Total: 23

Package Total Routines
IHS RPMS CHR System 23 BCHDL    BCHDL1    BCHDLA    BCHDLA1    BCHDLN    BCHDLN1    BCHGDEL    BCHPOST
BCHRL0    BCHRL01    BCHRL1    BCHRL2    BCHRL3    BCHRLP    BCHRLP1    BCHRLS
BCHRP1    BCHRPT    BCHRPT0    BCHRPT1    BCHRPT4    BCHRPTCP    BCHRPTU    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
IHS RPMS CHR System 2 BCHENV    BCHPOST    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IHS RPMS CHR System 1 CHR REPORT TEMPORARY DEFINITION(#90002.42)[.07, #90002.421102(.01)]    

Fields, Total: 20

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 08, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999, 0 Decimal Digits
.01 ITEM 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  SEP 08, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DELETE TEST:  .01,0)= I 1
  • CROSS-REFERENCE:  90002.41^B
    1)= S ^BCHSORT("B",$E(X,1,30),DA)=""
    2)= K ^BCHSORT("B",$E(X,1,30),DA)
.02 PROCESS TYPE 0;2 SET
  • 'Q' FOR QMAN;
  • 'R' FOR READER CALL;
  • 'N' FOR NUMERIC;
  • 'Y' FOR YES/NO;
  • 'F' FOR FREE TEXT;
  • 'D' FOR DATE RANGE;
  • 'W' FOR WORD PROCESSING;
  • 'J' FOR JUST A HIT, NO INTERACTION;

  • LAST EDITED:  NOV 21, 1994
.03 QMAN TERM 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  SEP 20, 1993
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
.04 FILE,FIELD FOR DIR/DIQ 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.05 PRINT/SELECT/SORT 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  JUL 27, 1994
  • HELP-PROMPT:  Answer must be 1-3 characters in length.
.06 COLUMN HEADER 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 21, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
.07 SUGGESTED COLUMN WIDTH 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>80)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  Type a Number between 1 and 80, 0 Decimal Digits
.08 MULT LOGIC 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 21, 1993
.09 ORDER ON MENU 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."3N.N) X
  • LAST EDITED:  NOV 21, 1994
  • HELP-PROMPT:  Type a Number between 1 and 999, 2 Decimal Digits
  • CROSS-REFERENCE:  90002.41^C
    1)= S ^BCHSORT("C",$E(X,1,30),DA)=""
    2)= K ^BCHSORT("C",$E(X,1,30),DA)
.11 PATIENT/RECORD 0;11 SET
  • 'P' FOR PATIENT;
  • 'V' FOR RECORD/VISIT;
  • 'PV' FOR PATIENT/VISIT/RECORD;

  • LAST EDITED:  AUG 18, 1994
.12 ORDER ON PATIENT MENU 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 20, 1994
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • CROSS-REFERENCE:  90002.41^PO
    1)= S ^BCHSORT("PO",$E(X,1,30),DA)=""
    2)= K ^BCHSORT("PO",$E(X,1,30),DA)
.13 PATIENT/DATE RANGE NECESSARY 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 01, 1994
.14 PRINT MENU HEADER 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<2) X
  • LAST EDITED:  JUL 28, 1994
  • HELP-PROMPT:  Answer must be 2-20 characters in length.
.15 SCREEN ITEM FOR DOWNLOAD 0;15 SET
  • '1' FOR YES;

  • LAST EDITED:  FEB 01, 1995
  • CROSS-REFERENCE:  90002.41^AD
    1)= S ^BCHSORT("AD",$E(X,1,30),DA)=""
    2)= K ^BCHSORT("AD",$E(X,1,30),DA)
1 SCREEN LOGIC 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 21, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
2 TRANSLATION LOGIC 2;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 09, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
3 PRINT LOGIC 3;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 23, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
4 SPECIAL LOGIC 4;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  NOV 17, 1993
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @
5 SORT LOGIC 5;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  NOV 21, 1994
  • HELP-PROMPT:  This is Standard MUMPS code.
    WRITE AUTHORITY:  @

Found Entries, Total: 73

ITEM: A1c Value    ITEM: Activity Location    ITEM: BMI Taken    ITEM: BMI Value    ITEM: Blood Pressure Taken    ITEM: Blood Pressure Value    ITEM: Blood Sugar Done    ITEM: Blood Sugar Result    
ITEM: CHR (Provider)    ITEM: Chart Facility    ITEM: Classification/Beneficiary    ITEM: Date of Last Visit    ITEM: Date of Service    ITEM: Designated Provider    ITEM: Eligibility Status    ITEM: HbA1c Done    
ITEM: Head Circ Taken    ITEM: Head Circumference    ITEM: Health Problem (Desc)    ITEM: Health Problem Code    ITEM: Height    ITEM: Height Taken    ITEM: Hemacrit Done    ITEM: Home Phone    
ITEM: Hospital/Clinic NAME    ITEM: Living Patients    ITEM: Mailing Address-City    ITEM: Mailing Address-Street    ITEM: Medicaid Eligibility    ITEM: Medicare Eligibility    ITEM: Mother's Name    ITEM: Non-Registered Patient Name    
ITEM: Number Served    ITEM: PPD Reading    ITEM: Patient Age    ITEM: Patient Chart #    ITEM: Patient Community    ITEM: Patient DOB    ITEM: Patient DOD    ITEM: Patient SSN    
ITEM: Patient Sex    ITEM: Patient Tribe    ITEM: Prim Hlth Prob (Code)    ITEM: Prim Hlth Prob (Desc)    ITEM: Primary Service (Desc)    ITEM: Primary Service Code    ITEM: Private Ins Elig    ITEM: Program    
ITEM: Provider Narrative    ITEM: Pulse    ITEM: Pulse Taken    ITEM: Referred by CHR to    ITEM: Referred to CHR by    ITEM: Registered Patient Name    ITEM: Respiration    ITEM: Respiration Taken    
ITEM: Service (Desc)    ITEM: Service Code    ITEM: Service Minutes    ITEM: Specialty    ITEM: Temperature    ITEM: Temperature Taken    ITEM: Throat Culture Done    ITEM: Travel Time    
ITEM: UA Done    ITEM: Vision Corrected Taken    ITEM: Vision Corrected Value    ITEM: Vision Uncorrected Done    ITEM: Vision Uncorrected Value    ITEM: Waist Circumference Taken    ITEM: Waist Circumference Value    ITEM: Weight Taken    
ITEM: Weight Value    

External References

Name Field # of Occurrence
^DIM 1+1, 2+1, 3+1, 4+1, 5+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHSORT("AD" .15(XREF 1S), .15(XREF 1K)
^BCHSORT("B" .01(XREF 1S), .01(XREF 1K)
^BCHSORT("C" .09(XREF 1S), .09(XREF 1K)
^BCHSORT("PO" .12(XREF 1S), .12(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .09(XREF 1S), .09(XREF 1K), .12(XREF 1S), .12(XREF 1K), .15(XREF 1S), .15(XREF 1K)
X .001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .03+1!, .04+1!, .05+1!, .06+1!, .07+1!, .09+1!
, .09(XREF 1S), .09(XREF 1K), .12+1!, .12(XREF 1S), .12(XREF 1K), .14+1!, .15(XREF 1S), .15(XREF 1K), 1+1!, 2+1!
, 3+1!, 4+1!, 5+1!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All