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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^SCPT(404.48

Package: Scheduling

Global: ^SCPT(404.48


Information

FileMan FileNo FileMan Filename Package
404.48 PCMM HL7 EVENT Scheduling

Description

Directly Accessed By Routines, Total: 11

Package Total Routines
Scheduling 11 SCMCHL    SCMCHLB2    SCMCHLE    SCMCHLP    SCMCHLX    SCMCHLX1    SCMCLN    SCMCTSK1
SD659PST    TEAM POSITIONS    ^SCPT(404.48    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Scheduling 1 SD659PST    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Scheduling 5 PATIENT TEAM POSITION ASSIGNMENT(#404.43)[.07]    POSITION ASSIGNMENT HISTORY(#404.52)[.07]    PRECEPTOR ASSIGNMENT HISTORY(#404.53)[.07]    TEAM POSITION(#404.57)[.07]    TEAM POSITION HISTORY(#404.59)[.07]    
Kernel 1 NEW PERSON(#200)[.05]    
Registration 1 PATIENT(#2)[.02]    

Fields, Total: 7

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

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 31, 1999
  • HELP-PROMPT:  Enter date/time of PCMM primary care event.
  • CROSS-REFERENCE:  404.48^B
    1)= S ^SCPT(404.48,"B",$E(X,1,30),DA)=""
    2)= K ^SCPT(404.48,"B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  MAY 07, 1999
  • CROSS-REFERENCE:  404.48^C
    1)= S ^SCPT(404.48,"C",$E(X,1,30),DA)=""
    2)= K ^SCPT(404.48,"C",$E(X,1,30),DA)
    Allow look-up by patient.
.03 TRANSMISSION REQUIRED 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 07, 1999
  • HELP-PROMPT:  Enter YES if the PCMM Primary Care event requires transmission.
  • CROSS-REFERENCE:  404.48^AACXMIT1^MUMPS
    1)= D AACXMIT^SCMCHLX(DA,-1)
    2)= D AACXMIT^SCMCHLX(DA,0)
    This xref is used to flag entries for transmission to the NPCD.
    Resulting node: ^SCPT(404.48,"AACXMIT",EVENTPTR,DA)
    Where: EVENTPTR = Value in EVENT POINTER field (#.07)
.04 TEAM POSITION 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<1) X
  • LAST EDITED:  JUL 01, 1999
  • HELP-PROMPT:  This field stores the TEAM POSITION pointer. If EVENT POINTER is for file 404.53, this field will store Preceptee TM POS-Preceptor TM POS. 1-35 Characters.
  • DESCRIPTION:  The TEAM POSITION value needs to be preserved so deletions can be processed.
    File 404.43
    Save piece 2 (TP - Team Position IEN).
    Use TP to get all providers with $$PRTPC^SCAPMC.
    Get IEN from VARPTR and attach it to ID.
    Send down a delete.
    File 404.52
    Save piece 1 (TP - Team Position IEN).
    Get IEN from VARPTR.
    Find every Primary Care 404.43 entry for this TP.
    Create ID with 404.43 IEN-IEN-0-AP/PCP.
    Send down a delete.
    File 404.53
    Save piece 1 (TP1) & piece 6 (TP2) (Team Position IEN).
    Loop to get each IEN for TP1 in 404.52.
    Loop to get each IEN for TP2 in 404.52.
    Find every Primary Care 404.43 entry for TP1.
    Create IDs with 404.43 IEN-TP1 IENs-TP2 IENs-PCP.
    Send down a delete.
.05 USER 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 18, 1999
.07 EVENT POINTER 0;7 VARIABLE POINTER PATIENT TEAM POSITION ASSIGNMENT(#404.43)  POSITION ASSIGNMENT HISTORY(#404.52)  PRECEPTOR ASSIGNMENT HISTORY(#404.53)  TEAM POSITION HISTORY(#404.59)  TEAM POSITION(#404.57)  

  • LAST EDITED:  AUG 11, 1999
  • HELP-PROMPT:  Enter Patient Team, Patient Team Position, Position History, Preceptor History, or Team entry that generated this event.
  • DESCRIPTION:  
    This field is used to enable PCMM to delete a future event from this Event file when a future assignment is deleted from either the PATIENT TEAM ASSIGNMENT or PATIENT TEAM POSITION ASSIGNMENT files.
  • CROSS-REFERENCE:  404.48^AACXMIT2^MUMPS
    1)= D AACXMIT^SCMCHLX(DA,-1)
    2)= D AACXMIT^SCMCHLX(DA,0,X)
    This xref is used to flag entries for transmission to the NPCD.
    Resulting node: ^SCPT(404.48,"AACXMIT",EVENTPTR,DA)
    Where: EVENTPTR = Value in EVENT POINTER field (#.07)
.08 WORKLOAD 0;8 SET
  • '1' FOR WORKLOAD;

  • LAST EDITED:  DEC 10, 2002
  • HELP-PROMPT:  Indicates if this is for Workload Transmission
  • DESCRIPTION:  
    This field is used to designate that the HL7 message is Workload and based on Primary Care provider and position workload.

External References

Name Field # of Occurrence
^%DT .01+1
Y^DIQ IDA1+1
AACXMIT^SCMCHLX .03(XREF 2S), .03(XREF 2K), .07(XREF 1S), .07(XREF 1K)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(2 IDA1+1
^DPT - [#2] IDA1+1
^SCPT(404.48 - [#404.48] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)

Naked Globals

Name Field # of Occurrence
^("0" IDA2+1
^(0 IDA1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .01+1*
%I IDA1+1*!
>> C IDA1+1*
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 2S), .03(XREF 2K), .07(XREF 1S), .07(XREF 1K)
>> DIC IDA1+1, IDA2+1
>> DIY IDA2+1*
U IDA1+1, IDA2+1
X .01+1*!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .04+1!, .07(XREF 1K)
>> Y IDA1+1*, IDA2+1, .01+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All