ECXSCXN ;ALB/JAP Clinic Extract ;Mar 18, 2021@15:55:41
Source file <ECXSCXN.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BEG | ;entry point from option
|
|
START | ;entry point from taskmgr
|
|
ENCNTR(ECSD1,ECED) | ;search file #409.68 for encounter data
|
|
FILE | ;record setup for file #727.827
|
|
SETUP | ;set required input for ECXTRAC
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^PX(839.7 - [#839.7] | Classic Fileman Calls |