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 |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^MCAR(690.97

Package: Medicine

Global: ^MCAR(690.97


Information

FileMan FileNo FileMan Filename Package
690.97 MCQ POLLING Medicine

Description

Directly Accessed By Routines, Total: 4

Package Total Routines
Medicine 4 DIAGNOSIS    MCPOS01A    ^MCAR(690.97    MCARE1    

Fields, Total: 6

Field # Name Loc Type Details
.01 DATE/TIME 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
  • LAST EDITED:  MAY 02, 1996
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  690.97^B
    1)= S ^MCAR(690.97,"B",$E(X,1,30),DA)=""
    2)= K ^MCAR(690.97,"B",$E(X,1,30),DA)
.02 TYPE 0;2 SET
  • '1' FOR PAT;
  • '2' FOR PCC;
  • '3' FOR DEL;

  • LAST EDITED:  MAY 02, 1996
.03 DA 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999999999999, 6 Decimal Digits
.04 FILE 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999999999999, 6 Decimal Digits
.05 MCARGDA 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999999999999, 6 Decimal Digits
.06 MCQDEL 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAY 02, 1996
  • HELP-PROMPT:  Answer must be 1-30 characters in length.

External References

Name Field # of Occurrence
^%DT .01+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MCAR(690.97 - [#690.97] .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .01+1*
>> DA .01(XREF 1S), .01(XREF 1K)
>> DINUM .01+1*
X .01+1*!, .01(XREF 1S), .01(XREF 1K), .03+1!, .04+1!, .05+1!, .06+1!
>> Y .01+1
Info |  Desc |  Directly Accessed By Routines |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All