Prompt: *7,!!,"There are no CHS COMMON ACCOUNTING NUMBERs for this facility.",!!,"Please contact your Site Manager.",!,*7
Line Location: ACHSA44+13
Function Call: WRITE
Prompt: !!,"Enter last 4 digits of the CAN Number: "
Line Location: A1+3
Function Call: WRITE
Prompt: $P($G(^ACHS(2,ACHSCAN,0)),U),"// "
Line Location: A1+4
Function Call: WRITE
Prompt: *7," Must Have CAN Number"
Line Location: A1+17
Function Call: WRITE
Prompt: " Invalid entry"
Line Location: VALID+4
Function Call: WRITE
Prompt: !!,"SEQ NO",?10,"FY",?15,"CAN NUMBER",?30,"DESCRIPTION OF THE CAN NUMBER",!,"------",?10,"--",?15,"----------",?30,"-----------------------------"