Routine: RMPRPIYC

Information

RMPRPIYC ;HINCIO/ODJ - PIP HCPCS Prompt utilities ;3/8/01

Source file <RMPRPIYC.m>

Name	Comments	DBIA/ICR reference
HCPCS(RMPR5,RMPR1,RMPR11,RMPREXC)	;
HCPCS1
HCPCSU
HCPCSX
QM
QMX
QM1
QM1X
QM1H
QM2
QM2X
LIKE(RMPRSTN,RMPRTXT,RMPREXC,RMPR1,RMPR11)	;
LIKEA1
LIKEA2
LIKEA3
LIKEB
LIKEG
LIKEC
LIKEX
LIKEH
HCDIC(RMPRSTN,RMPRTXT,RMPR1)	;
HCDICX
HCMAT()	;
HCMATX

Name	Line Occurrences
Function Call: WRITE	Prompt: $E(RMPRH,1+$L(RMPRTXT),$L(RMPRH)) Line Location: LIKE+21
Function Call: WRITE	Prompt: !?4,$J(RMPRLIN,2),?9,RMPRH,?19,RMPRHA("SHORT DESC") Line Location: LIKEA3+3
Function Call: WRITE	Prompt: !!,"Please enter a number within the range." Line Location: LIKEB+8
Function Call: WRITE	Prompt: !!,"This response must be a number." Line Location: LIKEB+9

FileNo	Call Tags
^RMPR(661.1 - [#661.1]	Classic Fileman Calls