Routine: PXBUTL0

Information

PXBUTL0 ;ISL/JVS,ESW - UTILITIES-3 LINE HELP MESSAGES ;6/17/03 10:29

Source file <PXBUTL0.m>

Name	Comments	DBIA/ICR reference
HELP(CAT)	;Help messages written when ?'s are entered.
WR	;--Write to the screen
STP1	;--STOP CODE 1 ?
STP3	;--STOP CODE 3 ?
STP900	;--STOP CODE 900
PRV1	;--Provider 1 ?
PRV3	;--Provider 3 ?
PRVM	;--CPT Add Multiple Provider(s)
PRVMD	;--CPT Delete Multiple Providers(s)
POV1	;--Purpose of Visit 1 ?
POV3	;--Purpose of Visit 3 ?
PL1	;--Problem list ?
PL11	;--Problem List ?
PLM	;--Problem List ?
CPT1	;--CPT Procedure 1 ?
CPT4	;--USE MORE THAN 1 LETTER ?
CPT3	;--CPT Procedure 3 ?
CPTM	;--CPT Add Multiple Procedure(s)
CPTMDP	;--CPT Adding Procedure with Multiple that already exist
CPTMNO	;--CPT Add Multiple Procedure(s)
CPTMD	;--CPT Delete Multiple Procedure(s)
WH1	;--WHICH when selecting different line options 1 ?
WH2	;--WHICH when selecting different line options 2 ?
WH3	;--WHICH when selecting different line options 3 ?
QU1	;--QUANTITY when changing quantity of CPT's ?
QU2	;--QUANTITY when changing quantity of CPT'S ??
OP1	;--ORDERING PROVIDER for CPT's ?
OP2	;--ORDERING PROVIDER for CPT'S ??

Name	Line Occurrences
Function Call: WRITE	Prompt: !,IOELEOL,?(IOM-$L(MES(I)))\2,MES(I) Line Location: WR+1
Function Call: WRITE	Prompt: !,$E(EDATA,1,50) Line Location: CPTMNO+1
Function Call: WRITE	Prompt: !,"The above Item(s) are not VALID or ACTIVE Codes." Line Location: CPTMNO+2
Function Call: WRITE	Prompt: !,"Enter each one separately to get more complete help." Line Location: CPTMNO+3