SCMCCV6 ;BP/CMF - PCMM HL7 Baseline Xmit to AAC ; March 26, 2000
Source file <SCMCCV6.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN(SCTST,SCDFN) | ;
 ; entry point for option 'SCMC PCMM BASELINE SEEDING' ; this option should not be on any users menu ; this option should be queued to run once ; it should not be run more than once without consulting NVS  | 
|
| BASELINE(SCP177,SCP212,SCPDFN,SCPTST) | ;
 ; input ; SCP177 = Patch 177 date (required) ; SCP212 = Patch 212 date (optional, default = today) ; SCPDFN = Patient ien (optional, default = 0) ; SCPTST = 1 := test [default = 0] ; ; output ; 1 = success ; 0 = failure  | 
|
| CHECK() | ;
 ; Description: Determine whether or not the Baseline has run.  | 
|
| EVENT(SC177,SC212,SCDFN,SCTST) | ;
 ; Description: Create an Event in file (#404.48)  | 
|
| MSG(SC1,SC2,SCTST) | ;
 | 
|
| RESTART(SCTST) | ; alb/rpm
 ; This undocumented entry point allows a user to clear the Baseline ; date stored in file #404.44 field #17. Then the last patient IEN ; that was processed from the last run is retrieved from ^XTMP("SCMCCV6" ; and decremented to seed the restart point. If ^XTMP does not exist ; the IEN is set to 0.  | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | GET1^DIQ | 
| ^SCTM(404.44 - [#404.44] | GET1^DIQ | 
| ^SCTM(404.57 - [#404.57] | GET1^DIQ |