Routine: APCDBMSR

Information

APCDBMSR ; IHS/CMI/LAB - ENTER BIRTH MEASUREMENT

Source file <APCDBMSR.m>

Package	Total	Call Graph
VA Fileman	3	FILE^DICN ^DIE ^DIR
IHS VA Utilities	1	EN^XBNEW

Name	Comments	DBIA/ICR reference
BMADD(P)	;PEP - called to add a patient to the BIRTH MEASUREMENTs file
PAUSE	;EP
BM11	;
BM12	;
BM	;EP - called from d/e input template APCD BM (BM)
BM1	;EP - called from XBNEW call

Name	Line Occurrences (* Changed, ! Killed)
^AUPNBMSR - [#9000024]	BM1+2, BMADD+5
^DPT - [#2]	BMADD+4

Name	Field # of Occurrence
>> APCDPARS	BM1+1*
>> APCDREPI	BM+1*, BM1+2, BM11+1
>> APCDRFS	BM1+1*
D0	BMADD+6~, BMADD+8!
DA	BM+1, BM11+1*, BM11+2!
DD	BMADD+6~, BMADD+8!
DIC	BMADD+6~, BMADD+7*
DIC(0	BMADD+7*
DIE	BM11+1*, BM11+2!
DINUM	BMADD+8!, BMADD+9*
DIR	PAUSE+1!
DIR("A"	PAUSE+1*
DIR(0	PAUSE+1*
>> DIRUT	PAUSE+1*
DO	BMADD+6~, BMADD+8!
DR	BM11+1*, BM11+2!
>> DUOUT	PAUSE+1
P	BMADD~, BMADD+3, BMADD+4, BMADD+5, BMADD+7
U	BM1+2
X	BM1+2, BMADD+6~, BMADD+7, BMADD+9
Y	BM+3!, BM12+2!, BMADD+6~, BMADD+11